/ Liren Large Software Subsidy 9 / 09.iso / e / e070 / 5.ddi / EXPLORER / VIEWER / MAKEI.FAS

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 41 53 4c 20 46 49 4c | 45 0d 0a 43 6f 70 79 72 |FASL FIL|E..Copyr|
|00000010| 69 67 68 74 20 28 63 29 | 20 31 39 38 34 20 53 61 |ight (c)| 1984 Sa|
|00000020| 6e 20 4d 61 72 63 6f 20 | 41 73 73 6f 63 69 61 74 |n Marco |Associat|
|00000030| 65 73 0d 0a 09 41 6c 6c | 20 72 69 67 68 74 73 20 |es...All| rights |
|00000040| 72 65 73 65 72 76 65 64 | 2e 0d 0a 1a ff 07 04 55 |reserved|.......U|
|00000050| 53 45 52 0e 0d 00 00 00 | 00 07 04 4c 49 53 50 0e |SER.....|...LISP.|
|00000060| 0b 01 05 44 45 46 55 4e | 07 14 4d 41 4b 45 2d 53 |...DEFUN|..MAKE-S|
|00000070| 43 52 45 45 4e 2d 49 4e | 53 54 41 4e 43 45 0b 01 |CREEN-IN|STANCE..|
|00000080| 09 26 4f 50 54 49 4f 4e | 41 4c 07 04 50 41 47 45 |.&OPTION|AL..PAGE|
|00000090| 23 00 00 00 00 04 10 02 | 04 10 02 07 0b 4d 41 4b |#.......|.....MAK|
|000000a0| 45 2d 53 43 52 45 45 4e | 07 06 48 45 41 44 45 52 |E-SCREEN|..HEADER|
|000000b0| 0b 01 04 4c 49 53 54 26 | 00 04 10 02 07 06 43 45 |...LIST&|......CE|
|000000c0| 4e 54 45 52 26 00 07 06 | 46 4f 4f 54 45 52 26 00 |NTER&...|FOOTER&.|
|000000d0| 07 06 53 55 50 4c 45 4d | 26 00 07 0a 43 45 4e 54 |..SUPLEM|&...CENT|
|000000e0| 45 52 2d 52 4f 57 0b 01 | 05 51 55 4f 54 45 07 0a |ER-ROW..|.QUOTE..|
|000000f0| 4f 4e 45 2d 57 49 4e 44 | 4f 57 04 10 02 07 0a 53 |ONE-WIND|OW.....S|
|00000100| 55 50 4c 45 4d 2d 52 4f | 57 0b 01 05 51 55 4f 54 |UPLEM-RO|W...QUOT|
|00000110| 45 07 0a 54 57 4f 2d 57 | 49 4e 44 4f 57 04 10 02 |E..TWO-W|INDOW...|
|00000120| 07 0c 4d 45 53 53 41 47 | 45 2d 41 54 54 52 0b 01 |..MESSAG|E-ATTR..|
|00000130| 02 49 46 07 10 2a 45 58 | 50 4c 4f 52 45 52 2d 43 |.IF..*EX|PLORER-C|
|00000140| 4f 4c 4f 52 2a 23 04 00 | 00 00 23 70 00 00 00 04 |OLOR*#..|..#p....|
|00000150| 10 04 07 0b 42 4f 52 44 | 45 52 2d 41 54 54 52 0b |....BORD|ER-ATTR.|
|00000160| 01 02 49 46 07 10 2a 45 | 58 50 4c 4f 52 45 52 2d |..IF..*E|XPLORER-|
|00000170| 43 4f 4c 4f 52 2a 23 01 | 00 00 00 23 07 00 00 00 |COLOR*#.|...#....|
|00000180| 04 10 04 07 06 57 49 4e | 44 4f 57 07 12 4d 41 4b |.....WIN|DOW..MAK|
|00000190| 45 2d 57 49 4e 44 4f 57 | 2d 53 54 52 45 41 4d 07 |E-WINDOW|-STREAM.|
|000001a0| 07 4b 45 59 57 4f 52 44 | 0e 0b 02 04 50 41 47 45 |.KEYWORD|....PAGE|
|000001b0| 07 04 50 41 47 45 0b 02 | 04 4c 45 46 54 23 00 00 |..PAGE..|.LEFT#..|
|000001c0| 00 00 0b 02 03 54 4f 50 | 23 00 00 00 00 0b 02 05 |.....TOP|#.......|
|000001d0| 57 49 44 54 48 23 50 00 | 00 00 0b 02 06 48 45 49 |WIDTH#P.|.....HEI|
|000001e0| 47 48 54 23 19 00 00 00 | 0b 02 06 53 54 41 54 55 |GHT#....|...STATU|
|000001f0| 53 23 00 00 00 00 04 10 | 0d 04 10 13 04 10 04 36 |S#......|.......6|
|00000200| 0b 01 05 44 45 46 55 4e | 07 0d 53 43 52 45 45 4e |...DEFUN|..SCREEN|
|00000210| 2d 53 54 52 45 41 4d 07 | 02 4f 50 0b 01 09 26 4f |-STREAM.|.OP...&O|
|00000220| 50 54 49 4f 4e 41 4c 07 | 04 41 52 47 31 07 04 41 |PTIONAL.|.ARG1..A|
|00000230| 52 47 32 07 04 41 52 47 | 33 07 04 41 52 47 34 04 |RG2..ARG|3..ARG4.|
|00000240| 10 06 0b 01 04 43 41 53 | 45 07 02 4f 50 0b 02 0a |.....CAS|E..OP...|
|00000250| 49 4e 49 54 49 41 4c 49 | 5a 45 07 02 3c 2d 07 0d |INITIALI|ZE..<-..|
|00000260| 53 43 52 45 45 4e 2d 57 | 49 4e 44 4f 57 07 06 53 |SCREEN-W|INDOW..S|
|00000270| 43 52 45 45 4e 04 10 02 | 0b 02 0c 53 45 54 2d 50 |CREEN...|...SET-P|
|00000280| 4f 53 49 54 49 4f 4e 23 | 00 00 00 00 23 00 00 00 |OSITION#|....#...|
|00000290| 00 04 10 05 07 02 3c 2d | 07 0d 53 43 52 45 45 4e |......<-|..SCREEN|
|000002a0| 2d 57 49 4e 44 4f 57 07 | 06 53 43 52 45 45 4e 04 |-WINDOW.|.SCREEN.|
|000002b0| 10 02 0b 02 08 53 45 54 | 2d 53 49 5a 45 23 50 00 |.....SET|-SIZE#P.|
|000002c0| 00 00 23 19 00 00 00 04 | 10 05 07 02 3c 2d 07 0d |..#.....|....<-..|
|000002d0| 53 43 52 45 45 4e 2d 57 | 49 4e 44 4f 57 07 06 53 |SCREEN-W|INDOW..S|
|000002e0| 43 52 45 45 4e 04 10 02 | 0b 02 0c 43 4c 45 41 52 |CREEN...|...CLEAR|
|000002f0| 2d 53 43 52 45 45 4e 04 | 10 03 07 02 3c 2d 07 0d |-SCREEN.|....<-..|
|00000300| 53 43 52 45 45 4e 2d 57 | 49 4e 44 4f 57 07 06 53 |SCREEN-W|INDOW..S|
|00000310| 43 52 45 45 4e 04 10 02 | 0b 02 0b 43 4c 45 41 52 |CREEN...|...CLEAR|
|00000320| 2d 49 4e 50 55 54 04 10 | 03 0b 01 04 53 45 54 46 |-INPUT..|....SETF|
|00000330| 07 11 53 43 52 45 45 4e | 2d 43 45 4e 54 45 52 2d |..SCREEN|-CENTER-|
|00000340| 52 4f 57 07 06 53 43 52 | 45 45 4e 04 10 02 07 04 |ROW..SCR|EEN.....|
|00000350| 41 52 47 31 04 10 03 0b | 01 04 53 45 54 46 07 11 |ARG1....|..SETF..|
|00000360| 53 43 52 45 45 4e 2d 53 | 55 50 4c 45 4d 2d 52 4f |SCREEN-S|UPLEM-RO|
|00000370| 57 07 06 53 43 52 45 45 | 4e 04 10 02 0b 01 05 51 |W..SCREE|N......Q|
|00000380| 55 4f 54 45 07 0a 54 57 | 4f 2d 57 49 4e 44 4f 57 |UOTE..TW|O-WINDOW|
|00000390| 04 10 02 04 10 03 0b 01 | 04 53 45 54 46 0b 01 05 |........|.SETF...|
|000003a0| 46 49 52 53 54 07 0d 53 | 43 52 45 45 4e 2d 48 45 |FIRST..S|CREEN-HE|
|000003b0| 41 44 45 52 07 06 53 43 | 52 45 45 4e 04 10 02 04 |ADER..SC|REEN....|
|000003c0| 10 02 0b 01 02 4f 52 07 | 04 41 52 47 32 26 00 04 |.....OR.|.ARG2&..|
|000003d0| 10 03 04 10 03 0b 01 04 | 53 45 54 46 07 0d 53 43 |........|SETF..SC|
|000003e0| 52 45 45 4e 2d 43 45 4e | 54 45 52 07 06 53 43 52 |REEN-CEN|TER..SCR|
|000003f0| 45 45 4e 04 10 02 0b 01 | 02 4f 52 07 04 41 52 47 |EEN.....|.OR..ARG|
|00000400| 33 26 00 04 10 03 04 10 | 03 0b 01 04 53 45 54 46 |3&......|....SETF|
|00000410| 07 0d 53 43 52 45 45 4e | 2d 46 4f 4f 54 45 52 07 |..SCREEN|-FOOTER.|
|00000420| 06 53 43 52 45 45 4e 04 | 10 02 0b 01 02 4f 52 07 |.SCREEN.|.....OR.|
|00000430| 04 41 52 47 34 26 00 04 | 10 03 04 10 03 07 0b 53 |.ARG4&..|.......S|
|00000440| 43 52 45 45 4e 2d 44 52 | 41 57 04 10 01 07 02 3c |CREEN-DR|AW.....<|
|00000450| 2d 07 0d 53 43 52 45 45 | 4e 2d 57 49 4e 44 4f 57 |-..SCREE|N-WINDOW|
|00000460| 07 06 53 43 52 45 45 4e | 04 10 02 0b 02 08 53 45 |..SCREEN|......SE|
|00000470| 54 2d 53 49 5a 45 23 50 | 00 00 00 23 1a 00 00 00 |T-SIZE#P|...#....|
|00000480| 04 10 05 07 02 3c 2d 07 | 0d 53 43 52 45 45 4e 2d |.....<-.|.SCREEN-|
|00000490| 57 49 4e 44 4f 57 07 06 | 53 43 52 45 45 4e 04 10 |WINDOW..|SCREEN..|
|000004a0| 02 0b 02 0d 53 45 54 2d | 43 55 52 53 4f 52 50 4f |....SET-|CURSORPO|
|000004b0| 53 23 00 00 00 00 23 19 | 00 00 00 04 10 05 04 10 |S#....#.|........|
|000004c0| 0d 0b 02 07 52 45 46 52 | 45 53 48 07 02 3c 2d 07 |....REFR|ESH..<-.|
|000004d0| 0d 53 43 52 45 45 4e 2d | 57 49 4e 44 4f 57 07 06 |.SCREEN-|WINDOW..|
|000004e0| 53 43 52 45 45 4e 04 10 | 02 0b 02 08 53 45 54 2d |SCREEN..|....SET-|
|000004f0| 53 49 5a 45 23 50 00 00 | 00 23 19 00 00 00 04 10 |SIZE#P..|.#......|
|00000500| 05 07 02 3c 2d 07 0d 53 | 43 52 45 45 4e 2d 57 49 |...<-..S|CREEN-WI|
|00000510| 4e 44 4f 57 07 06 53 43 | 52 45 45 4e 04 10 02 0b |NDOW..SC|REEN....|
|00000520| 02 0c 43 4c 45 41 52 2d | 53 43 52 45 45 4e 04 10 |..CLEAR-|SCREEN..|
|00000530| 03 07 0b 53 43 52 45 45 | 4e 2d 44 52 41 57 04 10 |...SCREE|N-DRAW..|
|00000540| 01 07 02 3c 2d 07 0d 53 | 43 52 45 45 4e 2d 57 49 |...<-..S|CREEN-WI|
|00000550| 4e 44 4f 57 07 06 53 43 | 52 45 45 4e 04 10 02 0b |NDOW..SC|REEN....|
|00000560| 02 08 53 45 54 2d 53 49 | 5a 45 23 50 00 00 00 23 |..SET-SI|ZE#P...#|
|00000570| 1a 00 00 00 04 10 05 07 | 02 3c 2d 07 0d 53 43 52 |........|.<-..SCR|
|00000580| 45 45 4e 2d 57 49 4e 44 | 4f 57 07 06 53 43 52 45 |EEN-WIND|OW..SCRE|
|00000590| 45 4e 04 10 02 0b 02 0d | 53 45 54 2d 43 55 52 53 |EN......|SET-CURS|
|000005a0| 4f 52 50 4f 53 23 00 00 | 00 00 23 19 00 00 00 04 |ORPOS#..|..#.....|
|000005b0| 10 05 04 10 06 0b 02 0b | 4d 4f 56 45 2d 43 45 4e |........|MOVE-CEN|
|000005c0| 54 45 52 0b 01 04 57 48 | 45 4e 07 04 41 52 47 33 |TER...WH|EN..ARG3|
|000005d0| 0b 01 04 53 45 54 46 07 | 04 41 52 47 31 0b 01 01 |...SETF.|.ARG1...|
|000005e0| 2b 07 04 41 52 47 31 07 | 11 53 43 52 45 45 4e 2d |+..ARG1.|.SCREEN-|
|000005f0| 43 45 4e 54 45 52 2d 52 | 4f 57 07 06 53 43 52 45 |CENTER-R|OW..SCRE|
|00000600| 45 4e 04 10 02 04 10 03 | 04 10 03 04 10 03 0b 01 |EN......|........|
|00000610| 04 57 48 45 4e 07 04 41 | 52 47 32 0b 01 04 53 45 |.WHEN..A|RG2...SE|
|00000620| 54 46 07 0d 53 43 52 45 | 45 4e 2d 43 45 4e 54 45 |TF..SCRE|EN-CENTE|
|00000630| 52 07 06 53 43 52 45 45 | 4e 04 10 02 07 04 41 52 |R..SCREE|N.....AR|
|00000640| 47 32 04 10 03 04 10 03 | 0b 01 04 57 48 45 4e 0b |G2......|...WHEN.|
|00000650| 01 02 4f 52 07 04 41 52 | 47 32 0b 01 03 4e 4f 54 |..OR..AR|G2...NOT|
|00000660| 0b 01 03 45 51 4c 07 04 | 41 52 47 31 07 11 53 43 |...EQL..|ARG1..SC|
|00000670| 52 45 45 4e 2d 43 45 4e | 54 45 52 2d 52 4f 57 07 |REEN-CEN|TER-ROW.|
|00000680| 06 53 43 52 45 45 4e 04 | 10 02 04 10 03 04 10 02 |.SCREEN.|........|
|00000690| 04 10 03 07 12 53 43 52 | 45 45 4e 2d 4d 4f 56 45 |.....SCR|EEN-MOVE|
|000006a0| 2d 43 45 4e 54 45 52 07 | 04 41 52 47 31 04 10 02 |-CENTER.|.ARG1...|
|000006b0| 04 10 03 07 02 3c 2d 07 | 0d 53 43 52 45 45 4e 2d |.....<-.|.SCREEN-|
|000006c0| 57 49 4e 44 4f 57 07 06 | 53 43 52 45 45 4e 04 10 |WINDOW..|SCREEN..|
|000006d0| 02 0b 02 0d 53 45 54 2d | 43 55 52 53 4f 52 50 4f |....SET-|CURSORPO|
|000006e0| 53 23 00 00 00 00 23 19 | 00 00 00 04 10 05 04 10 |S#....#.|........|
|000006f0| 05 0b 02 0a 53 55 50 50 | 4c 45 4d 45 4e 54 0b 01 |....SUPP|LEMENT..|
|00000700| 04 57 48 45 4e 07 04 41 | 52 47 33 0b 01 04 53 45 |.WHEN..A|RG3...SE|
|00000710| 54 46 07 04 41 52 47 31 | 0b 01 01 2b 07 04 41 52 |TF..ARG1|...+..AR|
|00000720| 47 31 07 11 53 43 52 45 | 45 4e 2d 53 55 50 4c 45 |G1..SCRE|EN-SUPLE|
|00000730| 4d 2d 52 4f 57 07 06 53 | 43 52 45 45 4e 04 10 02 |M-ROW..S|CREEN...|
|00000740| 04 10 03 04 10 03 04 10 | 03 0b 01 04 57 48 45 4e |........|....WHEN|
|00000750| 07 04 41 52 47 32 0b 01 | 04 53 45 54 46 07 0d 53 |..ARG2..|.SETF..S|
|00000760| 43 52 45 45 4e 2d 53 55 | 50 4c 45 4d 07 06 53 43 |CREEN-SU|PLEM..SC|
|00000770| 52 45 45 4e 04 10 02 07 | 04 41 52 47 32 04 10 03 |REEN....|.ARG2...|
|00000780| 04 10 03 0b 01 04 57 48 | 45 4e 0b 01 02 4f 52 07 |......WH|EN...OR.|
|00000790| 04 41 52 47 32 0b 01 03 | 4e 4f 54 0b 01 03 45 51 |.ARG2...|NOT...EQ|
|000007a0| 4c 07 04 41 52 47 31 07 | 11 53 43 52 45 45 4e 2d |L..ARG1.|.SCREEN-|
|000007b0| 53 55 50 4c 45 4d 2d 52 | 4f 57 07 06 53 43 52 45 |SUPLEM-R|OW..SCRE|
|000007c0| 45 4e 04 10 02 04 10 03 | 04 10 02 04 10 03 07 12 |EN......|........|
|000007d0| 53 43 52 45 45 4e 2d 4d | 4f 56 45 2d 53 55 50 4c |SCREEN-M|OVE-SUPL|
|000007e0| 45 4d 07 04 41 52 47 31 | 04 10 02 04 10 03 07 02 |EM..ARG1|........|
|000007f0| 3c 2d 07 0d 53 43 52 45 | 45 4e 2d 57 49 4e 44 4f |<-..SCRE|EN-WINDO|
|00000800| 57 07 06 53 43 52 45 45 | 4e 04 10 02 0b 02 0d 53 |W..SCREE|N......S|
|00000810| 45 54 2d 43 55 52 53 4f | 52 50 4f 53 23 00 00 00 |ET-CURSO|RPOS#...|
|00000820| 00 23 19 00 00 00 04 10 | 05 04 10 05 0b 02 0c 53 |.#......|.......S|
|00000830| 45 54 2d 4d 45 53 53 41 | 47 45 53 0b 01 04 57 48 |ET-MESSA|GES...WH|
|00000840| 45 4e 07 04 41 52 47 31 | 0b 01 04 53 45 54 46 0b |EN..ARG1|...SETF.|
|00000850| 01 05 46 49 52 53 54 07 | 0d 53 43 52 45 45 4e 2d |..FIRST.|.SCREEN-|
|00000860| 48 45 41 44 45 52 07 06 | 53 43 52 45 45 4e 04 10 |HEADER..|SCREEN..|
|00000870| 02 04 10 02 07 04 41 52 | 47 31 04 10 03 07 10 44 |......AR|G1.....D|
|00000880| 52 41 57 2d 48 45 41 44 | 45 52 2d 4c 49 4e 45 04 |RAW-HEAD|ER-LINE.|
|00000890| 10 01 04 10 04 0b 01 04 | 57 48 45 4e 07 04 41 52 |........|WHEN..AR|
|000008a0| 47 32 0b 01 04 53 45 54 | 46 07 0d 53 43 52 45 45 |G2...SET|F..SCREE|
|000008b0| 4e 2d 43 45 4e 54 45 52 | 07 06 53 43 52 45 45 4e |N-CENTER|..SCREEN|
|000008c0| 04 10 02 07 04 41 52 47 | 32 04 10 03 0b 01 04 57 |.....ARG|2......W|
|000008d0| 48 45 4e 0b 01 07 4e 55 | 4d 42 45 52 50 07 11 53 |HEN...NU|MBERP..S|
|000008e0| 43 52 45 45 4e 2d 43 45 | 4e 54 45 52 2d 52 4f 57 |CREEN-CE|NTER-ROW|
|000008f0| 07 06 53 43 52 45 45 4e | 04 10 02 04 10 02 07 10 |..SCREEN|........|
|00000900| 44 52 41 57 2d 43 45 4e | 54 45 52 2d 4c 49 4e 45 |DRAW-CEN|TER-LINE|
|00000910| 04 10 01 04 10 03 04 10 | 04 0b 01 04 57 48 45 4e |........|....WHEN|
|00000920| 07 04 41 52 47 33 0b 01 | 04 53 45 54 46 07 0d 53 |..ARG3..|.SETF..S|
|00000930| 43 52 45 45 4e 2d 46 4f | 4f 54 45 52 07 06 53 43 |CREEN-FO|OTER..SC|
|00000940| 52 45 45 4e 04 10 02 07 | 04 41 52 47 33 04 10 03 |REEN....|.ARG3...|
|00000950| 07 10 44 52 41 57 2d 46 | 4f 4f 54 45 52 2d 4c 49 |..DRAW-F|OOTER-LI|
|00000960| 4e 45 04 10 01 04 10 04 | 0b 01 04 57 48 45 4e 07 |NE......|...WHEN.|
|00000970| 04 41 52 47 34 0b 01 04 | 53 45 54 46 07 0d 53 43 |.ARG4...|SETF..SC|
|00000980| 52 45 45 4e 2d 53 55 50 | 4c 45 4d 07 06 53 43 52 |REEN-SUP|LEM..SCR|
|00000990| 45 45 4e 04 10 02 07 04 | 41 52 47 34 04 10 03 0b |EEN.....|ARG4....|
|000009a0| 01 04 57 48 45 4e 0b 01 | 07 4e 55 4d 42 45 52 50 |..WHEN..|.NUMBERP|
|000009b0| 07 11 53 43 52 45 45 4e | 2d 53 55 50 4c 45 4d 2d |..SCREEN|-SUPLEM-|
|000009c0| 52 4f 57 07 06 53 43 52 | 45 45 4e 04 10 02 04 10 |ROW..SCR|EEN.....|
|000009d0| 02 07 10 44 52 41 57 2d | 53 55 50 4c 45 4d 2d 4c |...DRAW-|SUPLEM-L|
|000009e0| 49 4e 45 04 10 01 04 10 | 03 04 10 04 07 02 3c 2d |INE.....|......<-|
|000009f0| 07 0d 53 43 52 45 45 4e | 2d 57 49 4e 44 4f 57 07 |..SCREEN|-WINDOW.|
|00000a00| 06 53 43 52 45 45 4e 04 | 10 02 0b 02 0d 53 45 54 |.SCREEN.|.....SET|
|00000a10| 2d 43 55 52 53 4f 52 50 | 4f 53 23 00 00 00 00 23 |-CURSORP|OS#....#|
|00000a20| 19 00 00 00 04 10 05 04 | 10 06 0b 02 0b 50 55 53 |........|.....PUS|
|00000a30| 48 2d 48 45 41 44 45 52 | 0b 01 02 49 46 0b 01 02 |H-HEADER|...IF...|
|00000a40| 45 51 07 04 41 52 47 31 | 0b 01 05 51 55 4f 54 45 |EQ..ARG1|...QUOTE|
|00000a50| 0b 01 03 50 4f 50 04 10 | 02 04 10 03 0b 01 03 50 |...POP..|.......P|
|00000a60| 4f 50 07 0d 53 43 52 45 | 45 4e 2d 48 45 41 44 45 |OP..SCRE|EN-HEADE|
|00000a70| 52 07 06 53 43 52 45 45 | 4e 04 10 02 04 10 02 0b |R..SCREE|N.......|
|00000a80| 01 04 50 55 53 48 07 04 | 41 52 47 31 07 0d 53 43 |..PUSH..|ARG1..SC|
|00000a90| 52 45 45 4e 2d 48 45 41 | 44 45 52 07 06 53 43 52 |REEN-HEA|DER..SCR|
|00000aa0| 45 45 4e 04 10 02 04 10 | 03 04 10 04 07 10 44 52 |EEN.....|......DR|
|00000ab0| 41 57 2d 48 45 41 44 45 | 52 2d 4c 49 4e 45 04 10 |AW-HEADE|R-LINE..|
|00000ac0| 01 07 02 3c 2d 07 0d 53 | 43 52 45 45 4e 2d 57 49 |...<-..S|CREEN-WI|
|00000ad0| 4e 44 4f 57 07 06 53 43 | 52 45 45 4e 04 10 02 0b |NDOW..SC|REEN....|
|00000ae0| 02 0d 53 45 54 2d 43 55 | 52 53 4f 52 50 4f 53 23 |..SET-CU|RSORPOS#|
|00000af0| 00 00 00 00 23 19 00 00 | 00 04 10 05 04 10 04 0b |....#...|........|
|00000b00| 02 08 53 48 4f 57 2d 41 | 52 47 07 0f 44 52 41 57 |..SHOW-A|RG..DRAW|
|00000b10| 2d 48 45 41 44 45 52 2d | 41 52 47 07 03 41 52 47 |-HEADER-|ARG..ARG|
|00000b20| 04 10 02 07 02 3c 2d 07 | 0d 53 43 52 45 45 4e 2d |.....<-.|.SCREEN-|
|00000b30| 57 49 4e 44 4f 57 07 06 | 53 43 52 45 45 4e 04 10 |WINDOW..|SCREEN..|
|00000b40| 02 0b 02 0d 53 45 54 2d | 43 55 52 53 4f 52 50 4f |....SET-|CURSORPO|
|00000b50| 53 23 00 00 00 00 23 19 | 00 00 00 04 10 05 04 10 |S#....#.|........|
|00000b60| 03 0b 02 0b 43 4c 45 41 | 52 2d 49 4e 50 55 54 0b |....CLEA|R-INPUT.|
|00000b70| 02 09 52 45 41 44 2d 43 | 48 41 52 0b 02 11 52 45 |..READ-C|HAR...RE|
|00000b80| 41 44 2d 43 48 41 52 2d | 4e 4f 2d 48 41 4e 47 04 |AD-CHAR-|NO-HANG.|
|00000b90| 10 03 0b 01 04 53 45 54 | 51 07 04 41 52 47 31 07 |.....SET|Q..ARG1.|
|00000ba0| 0c 53 43 52 45 45 4e 2d | 49 4e 50 55 54 07 02 4f |.SCREEN-|INPUT..O|
|00000bb0| 50 0b 01 02 4f 52 07 15 | 2a 53 43 52 45 45 4e 2d |P...OR..|*SCREEN-|
|00000bc0| 49 4e 50 55 54 2d 53 54 | 52 45 41 4d 2a 07 0d 53 |INPUT-ST|REAM*..S|
|00000bd0| 43 52 45 45 4e 2d 57 49 | 4e 44 4f 57 07 06 53 43 |CREEN-WI|NDOW..SC|
|00000be0| 52 45 45 4e 04 10 02 04 | 10 03 04 10 03 04 10 03 |REEN....|........|
|00000bf0| 07 02 3c 2d 07 0d 53 43 | 52 45 45 4e 2d 57 49 4e |..<-..SC|REEN-WIN|
|00000c00| 44 4f 57 07 06 53 43 52 | 45 45 4e 04 10 02 0b 02 |DOW..SCR|EEN.....|
|00000c10| 0d 53 45 54 2d 43 55 52 | 53 4f 52 50 4f 53 23 00 |.SET-CUR|SORPOS#.|
|00000c20| 00 00 00 23 19 00 00 00 | 04 10 05 07 04 41 52 47 |...#....|.....ARG|
|00000c30| 31 04 10 04 0b 01 09 4f | 54 48 45 52 57 49 53 45 |1......O|THERWISE|
|00000c40| 0b 01 05 45 52 52 4f 52 | 26 18 55 6e 6b 6e 6f 77 |...ERROR|&.Unknow|
|00000c50| 6e 20 6f 70 20 74 6f 20 | 73 63 72 65 65 6e 3a 20 |n op to |screen: |
|00000c60| 7e 41 07 02 4f 50 04 10 | 03 04 10 02 04 10 0b 04 |~A..OP..|........|
|00000c70| 10 04 36 0b 01 05 44 45 | 46 55 4e 07 12 4d 41 4b |..6...DE|FUN..MAK|
|00000c80| 45 2d 53 43 52 45 45 4e | 2d 53 54 52 45 41 4d 0b |E-SCREEN|-STREAM.|
|00000c90| 01 09 26 4f 50 54 49 4f | 4e 41 4c 07 04 50 41 47 |..&OPTIO|NAL..PAG|
|00000ca0| 45 23 00 00 00 00 04 10 | 02 04 10 02 0b 01 03 4c |E#......|.......L|
|00000cb0| 45 54 07 06 53 43 52 45 | 45 4e 07 14 4d 41 4b 45 |ET..SCRE|EN..MAKE|
|00000cc0| 2d 53 43 52 45 45 4e 2d | 49 4e 53 54 41 4e 43 45 |-SCREEN-|INSTANCE|
|00000cd0| 07 04 50 41 47 45 04 10 | 02 04 10 02 04 10 01 0b |..PAGE..|........|
|00000ce0| 01 07 43 4c 4f 53 55 52 | 45 0b 01 05 51 55 4f 54 |..CLOSUR|E...QUOT|
|00000cf0| 45 07 06 53 43 52 45 45 | 4e 04 10 01 04 10 02 0b |E..SCREE|N.......|
|00000d00| 01 08 46 55 4e 43 54 49 | 4f 4e 07 0d 53 43 52 45 |..FUNCTI|ON..SCRE|
|00000d10| 45 4e 2d 53 54 52 45 41 | 4d 04 10 02 04 10 03 04 |EN-STREA|M.......|
|00000d20| 10 03 04 10 04 36 0b 01 | 05 44 45 46 55 4e 07 13 |.....6..|.DEFUN..|
|00000d30| 4d 41 4b 45 2d 4b 45 59 | 2d 4d 45 4e 55 2d 41 52 |MAKE-KEY|-MENU-AR|
|00000d40| 52 41 59 07 06 43 2d 4c | 49 53 54 04 10 01 0b 01 |RAY..C-L|IST.....|
|00000d50| 04 4c 45 54 2a 07 01 4c | 0b 01 06 4c 45 4e 47 54 |.LET*..L|...LENGT|
|00000d60| 48 07 06 43 2d 4c 49 53 | 54 04 10 02 04 10 02 07 |H..C-LIS|T.......|
|00000d70| 04 32 2a 2a 4c 0b 01 03 | 4c 53 48 23 01 00 00 00 |.2**L...|LSH#....|
|00000d80| 07 01 4c 04 10 03 04 10 | 02 07 01 41 0b 01 0a 4d |..L.....|...A...M|
|00000d90| 41 4b 45 2d 41 52 52 41 | 59 07 04 32 2a 2a 4c 04 |AKE-ARRA|Y..2**L.|
|00000da0| 10 02 04 10 02 04 10 03 | 0b 01 02 44 4f 07 01 49 |........|...DO..I|
|00000db0| 23 00 00 00 00 0b 01 02 | 31 2b 07 01 49 04 10 02 |#.......|1+..I...|
|00000dc0| 04 10 03 04 10 01 0b 01 | 01 3d 07 01 49 07 04 32 |........|.=..I..2|
|00000dd0| 2a 2a 4c 04 10 03 07 01 | 41 04 10 02 0b 01 02 44 |**L.....|A......D|
|00000de0| 4f 07 04 50 4f 53 4e 0b | 01 02 31 2d 07 01 4c 04 |O..POSN.|..1-..L.|
|00000df0| 10 02 0b 01 02 31 2d 07 | 04 50 4f 53 4e 04 10 02 |.....1-.|.POSN...|
|00000e00| 04 10 03 07 09 49 4e 44 | 45 58 2d 42 49 54 23 01 |.....IND|EX-BIT#.|
|00000e10| 00 00 00 0b 01 03 4c 53 | 48 07 09 49 4e 44 45 58 |......LS|H..INDEX|
|00000e20| 2d 42 49 54 23 01 00 00 | 00 04 10 03 04 10 03 07 |-BIT#...|........|
|00000e30| 01 53 04 0b 01 02 49 46 | 0b 01 05 5a 45 52 4f 50 |.S....IF|...ZEROP|
|00000e40| 0b 01 06 4c 4f 47 41 4e | 44 07 09 49 4e 44 45 58 |...LOGAN|D..INDEX|
|00000e50| 2d 42 49 54 07 01 49 04 | 10 03 04 10 02 07 01 53 |-BIT..I.|.......S|
|00000e60| 0b 01 0d 53 54 52 49 4e | 47 2d 41 50 50 45 4e 44 |...STRIN|G-APPEND|
|00000e70| 07 12 4b 45 59 2d 43 48 | 4f 49 43 45 2d 4d 45 53 |..KEY-CH|OICE-MES|
|00000e80| 53 41 47 45 0b 01 03 4e | 54 48 07 04 50 4f 53 4e |SAGE...N|TH..POSN|
|00000e90| 07 06 43 2d 4c 49 53 54 | 04 10 03 04 10 02 0b 01 |..C-LIST|........|
|00000ea0| 02 49 46 07 01 53 26 02 | 2c 20 26 00 04 10 04 0b |.IF..S&.|, &.....|
|00000eb0| 01 02 49 46 07 01 53 07 | 01 53 26 00 04 10 04 04 |..IF..S.|.S&.....|
|00000ec0| 10 04 04 10 04 04 10 03 | 04 10 03 0b 01 01 3e 07 |........|......>.|
|00000ed0| 09 49 4e 44 45 58 2d 42 | 49 54 07 01 49 04 10 03 |.INDEX-B|IT..I...|
|00000ee0| 0b 01 04 53 45 54 46 0b | 01 04 41 52 45 46 07 01 |...SETF.|..AREF..|
|00000ef0| 41 07 01 49 04 10 03 0b | 01 02 49 46 07 01 53 07 |A..I....|..IF..S.|
|00000f00| 01 53 26 00 04 10 04 04 | 10 03 04 10 02 04 10 03 |.S&.....|........|
|00000f10| 04 10 04 04 10 03 04 10 | 04 36 0b 01 05 44 45 46 |........|.6...DEF|
|00000f20| 55 4e 07 12 54 45 58 54 | 2d 57 49 4e 44 4f 57 2d |UN..TEXT|-WINDOW-|
|00000f30| 53 54 52 45 41 4d 07 02 | 4f 50 0b 01 09 26 4f 50 |STREAM..|OP...&OP|
|00000f40| 54 49 4f 4e 41 4c 07 04 | 41 52 47 31 07 04 41 52 |TIONAL..|ARG1..AR|
|00000f50| 47 32 07 04 41 52 47 33 | 07 04 41 52 47 34 04 10 |G2..ARG3|..ARG4..|
|00000f60| 06 0b 01 04 43 41 53 45 | 07 02 4f 50 0b 02 07 52 |....CASE|..OP...R|
|00000f70| 45 46 52 45 53 48 07 0c | 54 57 49 4e 2d 44 49 53 |EFRESH..|TWIN-DIS|
|00000f80| 50 4c 41 59 07 04 54 57 | 49 4e 04 10 02 04 10 02 |PLAY..TW|IN......|
|00000f90| 0b 02 0a 49 4e 49 54 49 | 41 4c 49 5a 45 0b 01 04 |...INITI|ALIZE...|
|00000fa0| 57 48 45 4e 0b 01 03 41 | 4e 44 07 04 41 52 47 33 |WHEN...A|ND..ARG3|
|00000fb0| 0b 01 01 3d 23 00 00 00 | 00 07 09 4c 4c 2d 4c 45 |...=#...|...LL-LE|
|00000fc0| 4e 47 54 48 07 04 41 52 | 47 33 04 10 02 04 10 03 |NGTH..AR|G3......|
|00000fd0| 04 10 03 0b 01 04 53 45 | 54 46 07 04 41 52 47 33 |......SE|TF..ARG3|
|00000fe0| 04 04 10 03 04 10 03 07 | 0f 54 57 49 4e 2d 49 4e |........|.TWIN-IN|
|00000ff0| 49 54 49 41 4c 49 5a 45 | 07 04 54 57 49 4e 07 04 |ITIALIZE|..TWIN..|
|00001000| 41 52 47 31 07 04 41 52 | 47 32 07 04 41 52 47 33 |ARG1..AR|G2..ARG3|
|00001010| 0b 01 02 4f 52 07 04 41 | 52 47 34 23 00 00 00 00 |...OR..A|RG4#....|
|00001020| 04 10 03 04 10 06 04 10 | 03 0b 02 05 43 4c 45 41 |........|....CLEA|
|00001030| 52 07 0f 4c 49 4e 45 2d | 4c 49 53 54 2d 43 4c 45 |R..LINE-|LIST-CLE|
|00001040| 41 52 07 04 54 57 49 4e | 07 04 41 52 47 31 04 10 |AR..TWIN|..ARG1..|
|00001050| 03 07 0c 54 57 49 4e 2d | 44 49 53 50 4c 41 59 07 |...TWIN-|DISPLAY.|
|00001060| 04 54 57 49 4e 07 0a 54 | 57 49 4e 2d 43 4f 55 4e |.TWIN..T|WIN-COUN|
|00001070| 54 07 04 54 57 49 4e 04 | 10 02 04 10 03 04 10 03 |T..TWIN.|........|
|00001080| 0b 02 03 41 44 44 0b 01 | 06 55 4e 4c 45 53 53 0b |...ADD..|.UNLESS.|
|00001090| 01 05 5a 45 52 4f 50 07 | 09 4c 4c 2d 4c 45 4e 47 |..ZEROP.|.LL-LENG|
|000010a0| 54 48 07 04 41 52 47 31 | 04 10 02 04 10 02 0b 01 |TH..ARG1|........|
|000010b0| 04 53 45 54 46 07 04 41 | 52 47 32 07 0a 54 57 49 |.SETF..A|RG2..TWI|
|000010c0| 4e 2d 43 4f 55 4e 54 07 | 04 54 57 49 4e 04 10 02 |N-COUNT.|.TWIN...|
|000010d0| 04 10 03 07 0d 4c 49 4e | 45 2d 4c 49 53 54 2d 41 |.....LIN|E-LIST-A|
|000010e0| 44 44 07 04 54 57 49 4e | 07 04 41 52 47 31 04 10 |DD..TWIN|..ARG1..|
|000010f0| 03 07 0c 54 57 49 4e 2d | 44 49 53 50 4c 41 59 07 |...TWIN-|DISPLAY.|
|00001100| 04 54 57 49 4e 07 04 41 | 52 47 32 04 10 03 04 10 |.TWIN..A|RG2.....|
|00001110| 05 04 10 02 0b 02 07 52 | 45 53 48 41 50 45 0b 01 |.......R|ESHAPE..|
|00001120| 04 53 45 54 46 07 04 41 | 52 47 33 07 0b 54 57 49 |.SETF..A|RG3..TWI|
|00001130| 4e 2d 4f 46 46 53 45 54 | 07 04 54 57 49 4e 04 10 |N-OFFSET|..TWIN..|
|00001140| 02 07 04 41 52 47 34 07 | 0b 54 57 49 4e 2d 4c 45 |...ARG4.|.TWIN-LE|
|00001150| 4e 47 54 48 07 04 54 57 | 49 4e 04 10 02 04 10 05 |NGTH..TW|IN......|
|00001160| 0b 01 04 57 48 45 4e 07 | 04 41 52 47 31 0b 01 04 |...WHEN.|.ARG1...|
|00001170| 53 45 54 46 07 0b 54 57 | 49 4e 2d 4f 46 46 53 45 |SETF..TW|IN-OFFSE|
|00001180| 54 07 04 54 57 49 4e 04 | 10 02 07 04 41 52 47 31 |T..TWIN.|....ARG1|
|00001190| 04 10 03 04 10 03 0b 01 | 04 57 48 45 4e 07 04 41 |........|.WHEN..A|
|000011a0| 52 47 32 0b 01 04 53 45 | 54 46 07 0b 54 57 49 4e |RG2...SE|TF..TWIN|
|000011b0| 2d 4c 45 4e 47 54 48 07 | 04 54 57 49 4e 04 10 02 |-LENGTH.|.TWIN...|
|000011c0| 07 04 41 52 47 32 04 10 | 03 04 10 03 07 02 3c 2d |..ARG2..|......<-|
|000011d0| 07 0b 54 57 49 4e 2d 53 | 54 52 45 41 4d 07 04 54 |..TWIN-S|TREAM..T|
|000011e0| 57 49 4e 04 10 02 0b 02 | 08 53 45 54 2d 53 49 5a |WIN.....|.SET-SIZ|
|000011f0| 45 07 0f 2a 44 49 53 50 | 4c 41 59 2d 57 49 44 54 |E..*DISP|LAY-WIDT|
|00001200| 48 2a 0b 01 01 2b 07 04 | 41 52 47 31 07 04 41 52 |H*...+..|ARG1..AR|
|00001210| 47 32 04 10 03 04 10 05 | 0b 01 04 43 4f 4e 44 0b |G2......|...COND.|
|00001220| 01 01 3d 07 04 41 52 47 | 33 07 0b 54 57 49 4e 2d |..=..ARG|3..TWIN-|
|00001230| 4f 46 46 53 45 54 07 04 | 54 57 49 4e 04 10 02 04 |OFFSET..|TWIN....|
|00001240| 10 03 0b 01 04 57 48 45 | 4e 0b 01 01 3e 07 0b 54 |.....WHE|N...>..T|
|00001250| 57 49 4e 2d 4c 45 4e 47 | 54 48 07 04 54 57 49 4e |WIN-LENG|TH..TWIN|
|00001260| 04 10 02 07 04 41 52 47 | 34 04 10 03 07 0c 54 57 |.....ARG|4.....TW|
|00001270| 49 4e 2d 44 49 53 50 4c | 41 59 07 04 54 57 49 4e |IN-DISPL|AY..TWIN|
|00001280| 07 04 41 52 47 34 04 10 | 03 04 10 03 04 10 02 0b |..ARG4..|........|
|00001290| 01 01 54 07 0c 54 57 49 | 4e 2d 44 49 53 50 4c 41 |..T..TWI|N-DISPLA|
|000012a0| 59 07 04 54 57 49 4e 04 | 10 02 04 10 02 04 10 03 |Y..TWIN.|........|
|000012b0| 04 10 06 0b 01 09 4f 54 | 48 45 52 57 49 53 45 0b |......OT|HERWISE.|
|000012c0| 01 06 43 45 52 52 4f 52 | 26 13 49 67 6e 6f 72 65 |..CERROR|&.Ignore|
|000012d0| 20 74 68 65 20 6d 65 73 | 73 61 67 65 2e 26 24 49 | the mes|sage.&$I|
|000012e0| 6e 76 61 6c 69 64 20 6d | 65 73 73 61 67 65 20 74 |nvalid m|essage t|
|000012f0| 6f 20 61 20 74 65 78 74 | 20 77 69 6e 64 6f 77 3a |o a text| window:|
|00001300| 20 7e 53 07 02 4f 50 04 | 10 04 04 10 02 04 10 08 | ~S..OP.|........|
|00001310| 04 10 04 36 0b 01 05 44 | 45 46 55 4e 07 17 4d 41 |...6...D|EFUN..MA|
|00001320| 4b 45 2d 54 45 58 54 2d | 57 49 4e 44 4f 57 2d 53 |KE-TEXT-|WINDOW-S|
|00001330| 54 52 45 41 4d 0b 01 09 | 26 4f 50 54 49 4f 4e 41 |TREAM...|&OPTIONA|
|00001340| 4c 07 04 50 41 47 45 23 | 00 00 00 00 04 10 02 04 |L..PAGE#|........|
|00001350| 10 02 0b 01 03 4c 45 54 | 07 04 54 57 49 4e 07 09 |.....LET|..TWIN..|
|00001360| 4d 41 4b 45 2d 54 57 49 | 4e 07 06 53 54 52 45 41 |MAKE-TWI|N..STREA|
|00001370| 4d 07 12 4d 41 4b 45 2d | 57 49 4e 44 4f 57 2d 53 |M..MAKE-|WINDOW-S|
|00001380| 54 52 45 41 4d 0b 02 04 | 50 41 47 45 07 04 50 41 |TREAM...|PAGE..PA|
|00001390| 47 45 0b 02 04 4c 45 46 | 54 07 0d 2a 4c 45 46 54 |GE...LEF|T..*LEFT|
|000013a0| 2d 4f 46 46 53 45 54 2a | 0b 02 03 54 4f 50 23 00 |-OFFSET*|...TOP#.|
|000013b0| 00 00 00 0b 02 05 57 49 | 44 54 48 07 0f 2a 44 49 |......WI|DTH..*DI|
|000013c0| 53 50 4c 41 59 2d 57 49 | 44 54 48 2a 0b 02 06 48 |SPLAY-WI|DTH*...H|
|000013d0| 45 49 47 48 54 0b 01 02 | 31 2b 07 1a 2a 41 56 41 |EIGHT...|1+..*AVA|
|000013e0| 49 4c 41 42 4c 45 2d 31 | 2d 57 49 4e 44 4f 57 2d |ILABLE-1|-WINDOW-|
|000013f0| 4c 49 4e 45 53 2a 04 10 | 02 0b 02 06 53 54 41 54 |LINES*..|....STAT|
|00001400| 55 53 23 02 00 00 00 0b | 02 09 41 54 54 52 49 42 |US#.....|..ATTRIB|
|00001410| 55 54 45 07 10 2a 54 45 | 58 54 2d 41 54 54 52 49 |UTE..*TE|XT-ATTRI|
|00001420| 42 55 54 45 2a 04 10 0f | 04 10 03 04 10 02 04 10 |BUTE*...|........|
|00001430| 01 0b 01 07 43 4c 4f 53 | 55 52 45 0b 01 05 51 55 |....CLOS|URE...QU|
|00001440| 4f 54 45 07 04 54 57 49 | 4e 04 10 01 04 10 02 0b |OTE..TWI|N.......|
|00001450| 01 08 46 55 4e 43 54 49 | 4f 4e 07 12 54 45 58 54 |..FUNCTI|ON..TEXT|
|00001460| 2d 57 49 4e 44 4f 57 2d | 53 54 52 45 41 4d 04 10 |-WINDOW-|STREAM..|
|00001470| 02 04 10 03 04 10 03 04 | 10 04 36 40             |........|..6@    |
+--------+-------------------------+-------------------------+--------+--------+