1
0
mirror of synced 2026-01-12 00:42:56 +00:00
Interlisp.medley/library/MAIKOCOLOR.TEDIT

8 lines
5.2 KiB
Plaintext
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

1
KALEIDOSCOPE MANUAL - 16-JAN-89 - Dev. Draft
1
KALEIDOSCOPE MANUAL - 16-JAN-89 - Dev. Draft
MAIKOCOLOR
1
ENVOS KALEIDOSCOPE
1
MAIKOCOLOR
6
2
Introduction
1
This module is the Envos Lisp software driver for running the COLOR module under Maiko (Maiko is the MACHINETYPE of Medley running on the Sun workstations). The machine independent functionality is provided by and documented with the COLOR module. There are no MAIKOCOLOR functions that the user needs to call directly. The user calls functions described in the COLOR documentation.
2
Requirements
1
In order to run COLOR, you need a Sun 3 or Sun 4 with a color display (CG 4), plus a color emulator (lde). COLOR will *not* run on a non-color emulator, attempting to use color capabilities will cause an error trap into URaid. You additionally need:
COLOR
LLCOLOR
2
Installation
1
MAIKOCOLOR may be loaded into a sysout running on any D-Machine (or non-color emulator), as long as color is not initialized. Thus an initial sysout can be made which runs on all systems, by loading COLOR, and then writing the sysout.
To install, simply (FILESLOAD 'MAIKOCOLOR), which will load all the additional files necessary for running color.
2
Initialization
1
To actually use color, the user must be running on a color capable emulator (lde).
To Initialize color running under Maiko, simply type
(COLORDISPLAY 'ON 'MAIKOCOLOR)
Lisp will permanently allocate a color "screen", and will attempt to map the color frame buffer to that screen.
At this point, the user should refer to the documentation for COLOR.
2
Known Bugs
1
NOTE: As this is currently unreleased software undergoing active development, this list of bugs should not be construed as being a limitation or defect of the final product. This list is only included to point out the current state of affairs of the software.
1. Color screen is never GC'ed
2. Color TEdit slower than B/W TEdit
3. Can't create big color windows
(LIST ((PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC) STARTINGPAGE# 2) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD LEFT) CHARLOOKS (SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF SLOPE REGULAR WEIGHT MEDIUM) FORMATINFO (ARABIC)) (54 12 288 36) NIL) (HEADING NIL (HEADINGTYPE FOOTINGV) (54 27 558 36) NIL) (HEADING NIL (HEADINGTYPE VERSOHEAD) (54 762 558 36) NIL) (TEXT NIL NIL (54 54 504 618) NIL))) (PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC)) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD LEFT) CHARLOOKS (SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF SLOPE REGULAR WEIGHT MEDIUM) FORMATINFO (ARABIC)) (558 12 288 36) NIL) (HEADING NIL (HEADINGTYPE FOOTINGR) (54 27 558 36) NIL) (HEADING NIL (HEADINGTYPE RECTOHEAD) (54 762 558 36) NIL) (TEXT NIL NIL (54 54 504 684) NIL))) (PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC)) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD LEFT) CHARLOOKS (SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF SLOPE REGULAR WEIGHT MEDIUM) FORMATINFO (ARABIC)) (54 12 288 36) NIL) (HEADING NIL (HEADINGTYPE FOOTINGV) (54 27 558 36) NIL) (HEADING NIL (HEADINGTYPE VERSOHEAD) (54 762 558 36) NIL) (TEXT NIL NIL (54 54 504 684) NIL)))))
2<00><00><01><01>3<00><00><01><01>T3<00><00><01><01>T3<01>2<01>T3<01><01>T2<00><00><01> <01>3<01><01>T3<01>2<01>T2<00><00><01> <01>@<01> PAGEHEADING VERSOHEAD@<01> PAGEHEADING RECTOHEAD?<01> PAGEHEADINGFOOTINGV?<01> PAGEHEADINGFOOTINGROPTIMAOPTIMAOPTIMA

 HRULE.GETFNOPTIMA

-  HRULE.GETFNOPTIMA
 -   HRULE.GETFNOPTIMA


 HRULE.GETFNOPTIMA
  HRULE.GETFNOPTIMA HRULE.GETFNOPTIMA
 HRULE.GETFNOPTIMA <01> HRULE.GETFNOPTIMA
 HRULE.GETFNOPTIMA <00> HRULE.GETFNOPTIMA HRULE.GETFNOPTIMA<00>r HRULE.GETFNOPTIMA HRULE.GETFNOPTIMAU5pE HRULE.GETFNOPTIMA
 HRULE.GETFNOPTIMA &#<07>ez<65>