/ Liren Large Software Subsidy 9 / 09.iso / e / e070 / 5.ddi / EXPLORER / VIEWER / TWORLD.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 0c 54 57 2d 44 52 41 |...DEFUN|..TW-DRA|
|00000070| 57 2d 43 41 4c 4c 07 04 | 43 4e 55 4d 07 04 46 52 |W-CALL..|CNUM..FR|
|00000080| 4f 4d 07 02 54 4f 04 10 | 03 0b 01 03 4c 45 54 07 |OM..TO..|....LET.|
|00000090| 04 46 52 4f 57 0b 01 04 | 47 45 54 46 07 09 2a 49 |.FROW...|GETF..*I|
|000000a0| 2d 46 4e 52 4f 57 2a 07 | 04 46 52 4f 4d 23 00 00 |-FNROW*.|.FROM#..|
|000000b0| 00 00 04 10 04 04 10 02 | 07 04 54 52 4f 57 0b 01 |........|..TROW..|
|000000c0| 04 47 45 54 46 07 09 2a | 49 2d 46 4e 52 4f 57 2a |.GETF..*|I-FNROW*|
|000000d0| 07 02 54 4f 23 00 00 00 | 00 04 10 04 04 10 02 07 |..TO#...|........|
|000000e0| 03 43 4f 4c 0b 01 01 2b | 07 0c 2a 49 2d 54 41 47 |.COL...+|..*I-TAG|
|000000f0| 2d 4c 45 46 54 2a 0b 01 | 01 2a 07 09 2a 49 2d 44 |-LEFT*..|.*..*I-D|
|00000100| 45 50 54 48 2a 0b 01 01 | 2b 07 0d 2a 49 2d 54 41 |EPTH*...|+..*I-TA|
|00000110| 47 2d 57 49 44 54 48 2a | 07 0e 2a 49 2d 4c 49 4e |G-WIDTH*|..*I-LIN|
|00000120| 45 2d 57 49 44 54 48 2a | 04 10 03 04 10 03 04 10 |E-WIDTH*|........|
|00000130| 03 04 10 02 04 10 03 07 | 10 49 2d 44 52 41 57 2d |........|.I-DRAW-|
|00000140| 43 41 4c 4c 2d 4c 49 4e | 45 07 03 43 4f 4c 07 04 |CALL-LIN|E..COL..|
|00000150| 46 52 4f 57 07 04 54 52 | 4f 57 04 10 04 07 16 49 |FROW..TR|OW.....I|
|00000160| 2d 44 52 41 57 2d 41 43 | 54 49 56 45 2d 43 41 4c |-DRAW-AC|TIVE-CAL|
|00000170| 4c 2d 54 41 47 0b 01 01 | 2b 07 03 43 4f 4c 23 02 |L-TAG...|+..COL#.|
|00000180| 00 00 00 04 10 03 07 04 | 54 52 4f 57 07 04 43 4e |........|TROW..CN|
|00000190| 55 4d 04 10 04 04 10 04 | 04 10 04 36 0b 01 05 44 |UM......|...6...D|
|000001a0| 45 46 55 4e 07 0e 54 57 | 2d 44 52 41 57 2d 52 45 |EFUN..TW|-DRAW-RE|
|000001b0| 54 55 52 4e 07 04 43 4e | 55 4d 07 04 46 52 4f 4d |TURN..CN|UM..FROM|
|000001c0| 07 02 54 4f 04 10 03 0b | 01 03 4c 45 54 07 04 46 |..TO....|..LET..F|
|000001d0| 52 4f 57 0b 01 04 47 45 | 54 46 07 09 2a 49 2d 46 |ROW...GE|TF..*I-F|
|000001e0| 4e 52 4f 57 2a 07 04 46 | 52 4f 4d 23 00 00 00 00 |NROW*..F|ROM#....|
|000001f0| 04 10 04 04 10 02 07 04 | 54 52 4f 57 0b 01 04 47 |........|TROW...G|
|00000200| 45 54 46 07 09 2a 49 2d | 46 4e 52 4f 57 2a 07 02 |ETF..*I-|FNROW*..|
|00000210| 54 4f 23 00 00 00 00 04 | 10 04 04 10 02 07 03 43 |TO#.....|.......C|
|00000220| 4f 4c 0b 01 01 2b 07 0c | 2a 49 2d 54 41 47 2d 4c |OL...+..|*I-TAG-L|
|00000230| 45 46 54 2a 0b 01 01 2a | 07 09 2a 49 2d 44 45 50 |EFT*...*|..*I-DEP|
|00000240| 54 48 2a 0b 01 01 2b 07 | 0d 2a 49 2d 54 41 47 2d |TH*...+.|.*I-TAG-|
|00000250| 57 49 44 54 48 2a 07 0e | 2a 49 2d 4c 49 4e 45 2d |WIDTH*..|*I-LINE-|
|00000260| 57 49 44 54 48 2a 04 10 | 03 04 10 03 04 10 03 04 |WIDTH*..|........|
|00000270| 10 02 04 10 03 07 18 49 | 2d 44 52 41 57 2d 49 4e |.......I|-DRAW-IN|
|00000280| 41 43 54 49 56 45 2d 43 | 41 4c 4c 2d 54 41 47 0b |ACTIVE-C|ALL-TAG.|
|00000290| 01 01 2b 07 03 43 4f 4c | 23 02 00 00 00 04 10 03 |..+..COL|#.......|
|000002a0| 07 04 54 52 4f 57 07 04 | 43 4e 55 4d 04 10 04 07 |..TROW..|CNUM....|
|000002b0| 12 49 2d 44 52 41 57 2d | 52 45 54 55 52 4e 2d 4c |.I-DRAW-|RETURN-L|
|000002c0| 49 4e 45 07 03 43 4f 4c | 07 04 46 52 4f 57 07 04 |INE..COL|..FROW..|
|000002d0| 54 52 4f 57 04 10 04 04 | 10 04 04 10 04 36 0b 01 |TROW....|.....6..|
|000002e0| 05 44 45 46 55 4e 07 0d | 54 57 2d 45 52 41 53 45 |.DEFUN..|TW-ERASE|
|000002f0| 2d 43 41 4c 4c 07 04 43 | 4e 55 4d 07 04 46 52 4f |-CALL..C|NUM..FRO|
|00000300| 4d 07 02 54 4f 04 10 03 | 0b 01 03 4c 45 54 07 04 |M..TO...|...LET..|
|00000310| 46 52 4f 57 0b 01 04 47 | 45 54 46 07 09 2a 49 2d |FROW...G|ETF..*I-|
|00000320| 46 4e 52 4f 57 2a 07 04 | 46 52 4f 4d 23 00 00 00 |FNROW*..|FROM#...|
|00000330| 00 04 10 04 04 10 02 07 | 04 54 52 4f 57 0b 01 04 |........|.TROW...|
|00000340| 47 45 54 46 07 09 2a 49 | 2d 46 4e 52 4f 57 2a 07 |GETF..*I|-FNROW*.|
|00000350| 02 54 4f 23 00 00 00 00 | 04 10 04 04 10 02 07 03 |.TO#....|........|
|00000360| 43 4f 4c 0b 01 01 2b 07 | 0c 2a 49 2d 54 41 47 2d |COL...+.|.*I-TAG-|
|00000370| 4c 45 46 54 2a 0b 01 01 | 2a 07 09 2a 49 2d 44 45 |LEFT*...|*..*I-DE|
|00000380| 50 54 48 2a 0b 01 01 2b | 07 0d 2a 49 2d 54 41 47 |PTH*...+|..*I-TAG|
|00000390| 2d 57 49 44 54 48 2a 07 | 0e 2a 49 2d 4c 49 4e 45 |-WIDTH*.|.*I-LINE|
|000003a0| 2d 57 49 44 54 48 2a 04 | 10 03 04 10 03 04 10 03 |-WIDTH*.|........|
|000003b0| 04 10 02 04 10 03 07 10 | 49 2d 45 52 41 53 45 2d |........|I-ERASE-|
|000003c0| 43 41 4c 4c 2d 54 41 47 | 0b 01 01 2b 07 03 43 4f |CALL-TAG|...+..CO|
|000003d0| 4c 23 02 00 00 00 04 10 | 03 07 04 54 52 4f 57 07 |L#......|...TROW.|
|000003e0| 04 43 4e 55 4d 04 10 04 | 07 11 49 2d 45 52 41 53 |.CNUM...|..I-ERAS|
|000003f0| 45 2d 43 41 4c 4c 2d 4c | 49 4e 45 07 03 43 4f 4c |E-CALL-L|INE..COL|
|00000400| 07 04 46 52 4f 57 07 04 | 54 52 4f 57 04 10 04 04 |..FROW..|TROW....|
|00000410| 10 04 04 10 04 36 0b 01 | 05 44 45 46 55 4e 07 14 |.....6..|.DEFUN..|
|00000420| 54 57 2d 44 52 41 57 2d | 49 4e 49 54 49 41 4c 2d |TW-DRAW-|INITIAL-|
|00000430| 43 41 4c 4c 07 04 43 4e | 55 4d 07 05 46 4e 41 4d |CALL..CN|UM..FNAM|
|00000440| 45 04 10 02 0b 01 03 4c | 45 54 07 03 52 4f 57 0b |E......L|ET..ROW.|
|00000450| 01 04 47 45 54 46 07 09 | 2a 49 2d 46 4e 52 4f 57 |..GETF..|*I-FNROW|
|00000460| 2a 07 05 46 4e 41 4d 45 | 04 10 03 04 10 02 07 03 |*..FNAME|........|
|00000470| 43 4f 4c 07 0c 2a 49 2d | 54 41 47 2d 4c 45 46 54 |COL..*I-|TAG-LEFT|
|00000480| 2a 04 10 02 04 10 02 07 | 16 49 2d 44 52 41 57 2d |*.......|.I-DRAW-|
|00000490| 41 43 54 49 56 45 2d 43 | 41 4c 4c 2d 54 41 47 0b |ACTIVE-C|ALL-TAG.|
|000004a0| 01 01 2b 07 03 43 4f 4c | 23 02 00 00 00 04 10 03 |..+..COL|#.......|
|000004b0| 07 03 52 4f 57 07 04 43 | 4e 55 4d 04 10 04 04 10 |..ROW..C|NUM.....|
|000004c0| 03 04 10 04 36 0b 01 05 | 44 45 46 55 4e 07 16 54 |....6...|DEFUN..T|
|000004d0| 57 2d 44 52 41 57 2d 49 | 4e 49 54 49 41 4c 2d 52 |W-DRAW-I|NITIAL-R|
|000004e0| 45 54 55 52 4e 07 04 43 | 4e 55 4d 07 05 46 4e 41 |ETURN..C|NUM..FNA|
|000004f0| 4d 45 04 10 02 0b 01 03 | 4c 45 54 07 03 52 4f 57 |ME......|LET..ROW|
|00000500| 0b 01 04 47 45 54 46 07 | 09 2a 49 2d 46 4e 52 4f |...GETF.|.*I-FNRO|
|00000510| 57 2a 07 05 46 4e 41 4d | 45 04 10 03 04 10 02 07 |W*..FNAM|E.......|
|00000520| 03 43 4f 4c 07 0c 2a 49 | 2d 54 41 47 2d 4c 45 46 |.COL..*I|-TAG-LEF|
|00000530| 54 2a 04 10 02 04 10 02 | 07 18 49 2d 44 52 41 57 |T*......|..I-DRAW|
|00000540| 2d 49 4e 41 43 54 49 56 | 45 2d 43 41 4c 4c 2d 54 |-INACTIV|E-CALL-T|
|00000550| 41 47 0b 01 01 2b 07 03 | 43 4f 4c 23 02 00 00 00 |AG...+..|COL#....|
|00000560| 04 10 03 07 03 52 4f 57 | 07 04 43 4e 55 4d 04 10 |.....ROW|..CNUM..|
|00000570| 04 04 10 03 04 10 04 36 | 0b 01 05 44 45 46 55 4e |.......6|...DEFUN|
|00000580| 07 15 54 57 2d 45 52 41 | 53 45 2d 49 4e 49 54 49 |..TW-ERA|SE-INITI|
|00000590| 41 4c 2d 43 41 4c 4c 07 | 04 43 4e 55 4d 07 05 46 |AL-CALL.|.CNUM..F|
|000005a0| 4e 41 4d 45 04 10 02 0b | 01 03 4c 45 54 07 03 52 |NAME....|..LET..R|
|000005b0| 4f 57 0b 01 04 47 45 54 | 46 07 09 2a 49 2d 46 4e |OW...GET|F..*I-FN|
|000005c0| 52 4f 57 2a 07 05 46 4e | 41 4d 45 04 10 03 04 10 |ROW*..FN|AME.....|
|000005d0| 02 07 03 43 4f 4c 07 0c | 2a 49 2d 54 41 47 2d 4c |...COL..|*I-TAG-L|
|000005e0| 45 46 54 2a 04 10 02 04 | 10 02 07 10 49 2d 45 52 |EFT*....|....I-ER|
|000005f0| 41 53 45 2d 43 41 4c 4c | 2d 54 41 47 0b 01 01 2b |ASE-CALL|-TAG...+|
|00000600| 07 03 43 4f 4c 23 02 00 | 00 00 04 10 03 07 03 52 |..COL#..|.......R|
|00000610| 4f 57 07 04 43 4e 55 4d | 04 10 04 04 10 03 04 10 |OW..CNUM|........|
|00000620| 04 36 0b 01 05 44 45 46 | 55 4e 07 0d 54 57 2d 50 |.6...DEF|UN..TW-P|
|00000630| 41 55 53 45 2d 43 41 4c | 4c 07 04 43 4e 55 4d 07 |AUSE-CAL|L..CNUM.|
|00000640| 05 4c 41 53 54 46 07 05 | 46 4e 41 4d 45 07 05 46 |.LASTF..|FNAME..F|
|00000650| 41 52 47 53 07 07 41 52 | 47 56 41 4c 53 0b 01 04 |ARGS..AR|GVALS...|
|00000660| 26 41 55 58 07 06 43 48 | 4f 49 43 45 04 10 07 0b |&AUX..CH|OICE....|
|00000670| 01 04 53 45 54 51 07 06 | 43 48 4f 49 43 45 0b 01 |..SETQ..|CHOICE..|
|00000680| 07 46 55 4e 43 41 4c 4c | 07 0b 2a 49 2d 53 54 45 |.FUNCALL|..*I-STE|
|00000690| 50 2d 46 4e 2a 07 04 43 | 4e 55 4d 0b 01 05 51 55 |P-FN*..C|NUM...QU|
|000006a0| 4f 54 45 07 05 45 4e 54 | 52 59 04 10 02 0b 01 01 |OTE..ENT|RY......|
|000006b0| 54 04 10 05 04 10 03 0b | 01 02 49 46 07 05 4c 41 |T.......|..IF..LA|
|000006c0| 53 54 46 07 0c 54 57 2d | 44 52 41 57 2d 43 41 4c |STF..TW-|DRAW-CAL|
|000006d0| 4c 07 04 43 4e 55 4d 07 | 05 4c 41 53 54 46 07 05 |L..CNUM.|.LASTF..|
|000006e0| 46 4e 41 4d 45 04 10 04 | 07 14 54 57 2d 44 52 41 |FNAME...|..TW-DRA|
|000006f0| 57 2d 49 4e 49 54 49 41 | 4c 2d 43 41 4c 4c 07 04 |W-INITIA|L-CALL..|
|00000700| 43 4e 55 4d 07 05 46 4e | 41 4d 45 04 10 03 04 10 |CNUM..FN|AME.....|
|00000710| 04 07 0c 49 2d 50 52 49 | 4e 54 2d 43 41 4c 4c 07 |...I-PRI|NT-CALL.|
|00000720| 04 43 4e 55 4d 07 05 46 | 4e 41 4d 45 07 05 46 41 |.CNUM..F|NAME..FA|
|00000730| 52 47 53 07 07 41 52 47 | 56 41 4c 53 04 10 05 0b |RGS..ARG|VALS....|
|00000740| 01 04 57 48 45 4e 0b 01 | 02 45 51 07 06 43 48 4f |..WHEN..|.EQ..CHO|
|00000750| 49 43 45 0b 01 05 51 55 | 4f 54 45 07 0b 45 4e 54 |ICE...QU|OTE..ENT|
|00000760| 52 59 2d 42 52 45 41 4b | 04 10 02 04 10 03 07 02 |RY-BREAK|........|
|00000770| 3c 2d 07 08 2a 53 43 52 | 45 45 4e 2a 07 07 4b 45 |<-..*SCR|EEN*..KE|
|00000780| 59 57 4f 52 44 0e 0b 02 | 0c 53 45 54 2d 4d 45 53 |YWORD...|.SET-MES|
|00000790| 53 41 47 45 53 04 26 00 | 26 00 26 00 04 10 07 0b |SAGES.&.|&.&.....|
|000007a0| 01 05 42 52 45 41 4b 0b | 01 06 46 4f 52 4d 41 54 |..BREAK.|..FORMAT|
|000007b0| 04 26 15 3b 42 72 65 61 | 6b 20 6f 6e 20 65 6e 74 |.&.;Brea|k on ent|
|000007c0| 72 79 20 74 6f 20 7e 41 | 07 05 46 4e 41 4d 45 04 |ry to ~A|..FNAME.|
|000007d0| 10 04 04 10 02 07 1e 4b | 45 59 2d 4d 45 4e 55 2d |.......K|EY-MENU-|
|000007e0| 52 45 53 45 54 2d 53 43 | 52 45 45 4e 2d 4d 45 53 |RESET-SC|REEN-MES|
|000007f0| 53 41 47 45 53 04 10 01 | 07 02 3c 2d 07 08 2a 53 |SAGES...|..<-..*S|
|00000800| 43 52 45 45 4e 2a 0b 02 | 0b 43 4c 45 41 52 2d 49 |CREEN*..|.CLEAR-I|
|00000810| 4e 50 55 54 04 10 03 04 | 10 06 04 10 07 36 0b 01 |NPUT....|.....6..|
|00000820| 05 44 45 46 55 4e 07 0f | 54 57 2d 50 41 55 53 45 |.DEFUN..|TW-PAUSE|
|00000830| 2d 52 45 54 55 52 4e 07 | 04 43 4e 55 4d 07 05 4c |-RETURN.|.CNUM..L|
|00000840| 41 53 54 46 07 05 46 4e | 41 4d 45 07 05 56 41 4c |ASTF..FN|AME..VAL|
|00000850| 55 45 0b 01 04 26 41 55 | 58 07 06 43 48 4f 49 43 |UE...&AU|X..CHOIC|
|00000860| 45 04 10 06 0b 01 04 53 | 45 54 51 07 06 43 48 4f |E......S|ETQ..CHO|
|00000870| 49 43 45 0b 01 07 46 55 | 4e 43 41 4c 4c 07 0b 2a |ICE...FU|NCALL..*|
|00000880| 49 2d 53 54 45 50 2d 46 | 4e 2a 07 04 43 4e 55 4d |I-STEP-F|N*..CNUM|
|00000890| 0b 01 05 51 55 4f 54 45 | 0b 01 06 52 45 54 55 52 |...QUOTE|...RETUR|
|000008a0| 4e 04 10 02 0b 01 01 54 | 04 10 05 04 10 03 0b 01 |N......T|........|
|000008b0| 04 57 48 45 4e 0b 01 02 | 45 51 07 06 43 48 4f 49 |.WHEN...|EQ..CHOI|
|000008c0| 43 45 0b 01 05 51 55 4f | 54 45 07 0c 52 45 54 55 |CE...QUO|TE..RETU|
|000008d0| 52 4e 2d 42 52 45 41 4b | 04 10 02 04 10 03 07 02 |RN-BREAK|........|
|000008e0| 3c 2d 07 08 2a 53 43 52 | 45 45 4e 2a 0b 02 0c 53 |<-..*SCR|EEN*...S|
|000008f0| 45 54 2d 4d 45 53 53 41 | 47 45 53 04 26 00 26 00 |ET-MESSA|GES.&.&.|
|00000900| 26 00 04 10 07 0b 01 05 | 42 52 45 41 4b 0b 01 06 |&.......|BREAK...|
|00000910| 46 4f 52 4d 41 54 04 26 | 18 3b 42 72 65 61 6b 20 |FORMAT.&|.;Break |
|00000920| 6f 6e 20 72 65 74 75 72 | 6e 20 66 72 6f 6d 20 7e |on retur|n from ~|
|00000930| 41 07 05 46 4e 41 4d 45 | 04 10 04 04 10 02 07 1e |A..FNAME|........|
|00000940| 4b 45 59 2d 4d 45 4e 55 | 2d 52 45 53 45 54 2d 53 |KEY-MENU|-RESET-S|
|00000950| 43 52 45 45 4e 2d 4d 45 | 53 53 41 47 45 53 04 10 |CREEN-ME|SSAGES..|
|00000960| 01 07 02 3c 2d 07 08 2a | 53 43 52 45 45 4e 2a 0b |...<-..*|SCREEN*.|
|00000970| 02 0b 43 4c 45 41 52 2d | 49 4e 50 55 54 04 10 03 |..CLEAR-|INPUT...|
|00000980| 04 10 06 07 0e 49 2d 50 | 52 49 4e 54 2d 52 45 54 |.....I-P|RINT-RET|
|00000990| 55 52 4e 07 04 43 4e 55 | 4d 07 05 46 4e 41 4d 45 |URN..CNU|M..FNAME|
|000009a0| 07 05 56 41 4c 55 45 04 | 10 04 0b 01 02 49 46 07 |..VALUE.|.....IF.|
|000009b0| 05 4c 41 53 54 46 0b 01 | 02 49 46 07 0d 2a 49 2d |.LASTF..|.IF..*I-|
|000009c0| 44 52 41 57 2d 4d 4f 44 | 45 2a 07 0e 54 57 2d 44 |DRAW-MOD|E*..TW-D|
|000009d0| 52 41 57 2d 52 45 54 55 | 52 4e 07 04 43 4e 55 4d |RAW-RETU|RN..CNUM|
|000009e0| 07 05 4c 41 53 54 46 07 | 05 46 4e 41 4d 45 04 10 |..LASTF.|.FNAME..|
|000009f0| 04 07 0d 54 57 2d 45 52 | 41 53 45 2d 43 41 4c 4c |...TW-ER|ASE-CALL|
|00000a00| 07 04 43 4e 55 4d 07 05 | 4c 41 53 54 46 07 05 46 |..CNUM..|LASTF..F|
|00000a10| 4e 41 4d 45 04 10 04 04 | 10 04 0b 01 02 49 46 07 |NAME....|.....IF.|
|00000a20| 0d 2a 49 2d 44 52 41 57 | 2d 4d 4f 44 45 2a 07 16 |.*I-DRAW|-MODE*..|
|00000a30| 54 57 2d 44 52 41 57 2d | 49 4e 49 54 49 41 4c 2d |TW-DRAW-|INITIAL-|
|00000a40| 52 45 54 55 52 4e 07 04 | 43 4e 55 4d 07 05 46 4e |RETURN..|CNUM..FN|
|00000a50| 41 4d 45 04 10 03 07 15 | 54 57 2d 45 52 41 53 45 |AME.....|TW-ERASE|
|00000a60| 2d 49 4e 49 54 49 41 4c | 2d 43 41 4c 4c 07 04 43 |-INITIAL|-CALL..C|
|00000a70| 4e 55 4d 07 05 46 4e 41 | 4d 45 04 10 03 04 10 04 |NUM..FNA|ME......|
|00000a80| 04 10 04 04 10 07 36 0b | 01 05 44 45 46 55 4e 07 |......6.|..DEFUN.|
|00000a90| 0d 54 57 4f 52 4c 44 2d | 54 52 41 43 45 52 0b 01 |.TWORLD-|TRACER..|
|00000aa0| 05 26 52 45 53 54 07 07 | 41 52 47 56 41 4c 53 0b |.&REST..|ARGVALS.|
|00000ab0| 01 04 26 41 55 58 07 05 | 56 41 4c 55 45 07 04 43 |..&AUX..|VALUE..C|
|00000ac0| 4e 55 4d 0b 01 04 49 4e | 43 46 07 09 2a 49 2d 43 |NUM...IN|CF..*I-C|
|00000ad0| 41 4c 4c 53 2a 04 10 02 | 04 10 02 07 05 4c 41 53 |ALLS*...|.....LAS|
|00000ae0| 54 46 07 0c 2a 4c 41 53 | 54 2d 46 4e 41 4d 45 2a |TF..*LAS|T-FNAME*|
|00000af0| 04 10 02 07 05 44 45 50 | 54 48 07 09 2a 49 2d 44 |.....DEP|TH..*I-D|
|00000b00| 45 50 54 48 2a 04 10 02 | 04 10 07 0b 01 06 55 4e |EPTH*...|......UN|
|00000b10| 4c 45 53 53 07 05 4c 41 | 53 54 46 0b 01 04 53 45 |LESS..LA|STF...SE|
|00000b20| 54 46 07 04 43 4e 55 4d | 23 01 00 00 00 07 09 2a |TF..CNUM|#......*|
|00000b30| 49 2d 43 41 4c 4c 53 2a | 23 01 00 00 00 04 10 05 |I-CALLS*|#.......|
|00000b40| 07 0c 49 2d 49 4e 49 54 | 49 41 4c 49 5a 45 04 10 |..I-INIT|IALIZE..|
|00000b50| 01 04 10 04 0b 01 0e 55 | 4e 57 49 4e 44 2d 50 52 |.......U|NWIND-PR|
|00000b60| 4f 54 45 43 54 0b 01 05 | 50 52 4f 47 4e 07 0d 54 |OTECT...|PROGN..T|
|00000b70| 57 2d 50 41 55 53 45 2d | 43 41 4c 4c 07 04 43 4e |W-PAUSE-|CALL..CN|
|00000b80| 55 4d 07 05 4c 41 53 54 | 46 07 07 2a 46 4e 41 4d |UM..LAST|F..*FNAM|
|00000b90| 45 2a 07 07 2a 46 41 52 | 47 53 2a 07 07 41 52 47 |E*..*FAR|GS*..ARG|
|00000ba0| 56 41 4c 53 04 10 06 0b | 01 04 49 4e 43 46 07 09 |VALS....|..INCF..|
|00000bb0| 2a 49 2d 44 45 50 54 48 | 2a 04 10 02 0b 01 04 53 |*I-DEPTH|*......S|
|00000bc0| 45 54 46 07 0c 2a 4c 41 | 53 54 2d 46 4e 41 4d 45 |ETF..*LA|ST-FNAME|
|00000bd0| 2a 07 07 2a 46 4e 41 4d | 45 2a 04 10 03 0b 01 04 |*..*FNAM|E*......|
|00000be0| 53 45 54 51 07 05 56 41 | 4c 55 45 0b 01 13 4d 55 |SETQ..VA|LUE...MU|
|00000bf0| 4c 54 49 50 4c 45 2d 56 | 41 4c 55 45 2d 4c 49 53 |LTIPLE-V|ALUE-LIS|
|00000c00| 54 0b 01 05 41 50 50 4c | 59 07 06 2a 46 56 41 4c |T...APPL|Y..*FVAL|
|00000c10| 2a 07 07 41 52 47 56 41 | 4c 53 04 10 03 04 10 02 |*..ARGVA|LS......|
|00000c20| 04 10 03 0b 01 04 44 45 | 43 46 07 09 2a 49 2d 44 |......DE|CF..*I-D|
|00000c30| 45 50 54 48 2a 04 10 02 | 07 0f 54 57 2d 50 41 55 |EPTH*...|..TW-PAU|
|00000c40| 53 45 2d 52 45 54 55 52 | 4e 07 04 43 4e 55 4d 07 |SE-RETUR|N..CNUM.|
|00000c50| 05 4c 41 53 54 46 07 07 | 2a 46 4e 41 4d 45 2a 07 |.LASTF..|*FNAME*.|
|00000c60| 05 56 41 4c 55 45 04 10 | 05 0b 01 0b 56 41 4c 55 |.VALUE..|....VALU|
|00000c70| 45 53 2d 4c 49 53 54 07 | 05 56 41 4c 55 45 04 10 |ES-LIST.|.VALUE..|
|00000c80| 02 04 10 08 0b 01 05 50 | 52 4f 47 4e 0b 01 04 53 |.......P|ROGN...S|
|00000c90| 45 54 46 07 0c 2a 4c 41 | 53 54 2d 46 4e 41 4d 45 |ETF..*LA|ST-FNAME|
|00000ca0| 2a 07 05 4c 41 53 54 46 | 04 10 03 0b 01 04 53 45 |*..LASTF|......SE|
|00000cb0| 54 46 07 09 2a 49 2d 44 | 45 50 54 48 2a 07 05 44 |TF..*I-D|EPTH*..D|
|00000cc0| 45 50 54 48 04 10 03 0b | 01 06 55 4e 4c 45 53 53 |EPTH....|..UNLESS|
|00000cd0| 07 05 4c 41 53 54 46 07 | 09 49 2d 43 4c 45 41 4e |..LASTF.|.I-CLEAN|
|00000ce0| 55 50 04 10 01 04 10 03 | 04 10 04 04 10 03 04 10 |UP......|........|
|00000cf0| 05 36 0b 01 05 44 45 46 | 55 4e 07 08 54 57 2d 53 |.6...DEF|UN..TW-S|
|00000d00| 45 54 55 50 07 07 53 54 | 45 50 50 45 52 07 06 48 |ETUP..ST|EPPER..H|
|00000d10| 45 49 47 48 54 07 04 46 | 55 4e 53 0b 01 04 26 41 |EIGHT..F|UNS...&A|
|00000d20| 55 58 07 03 49 4e 43 07 | 03 46 55 4e 07 05 46 4e |UX..INC.|.FUN..FN|
|00000d30| 41 4d 45 04 10 07 07 0a | 55 4e 49 4e 53 50 45 43 |AME.....|UNINSPEC|
|00000d40| 54 46 04 10 01 07 02 3c | 2d 07 08 2a 53 43 52 45 |TF.....<|-..*SCRE|
|00000d50| 45 4e 2a 0b 02 0b 4d 4f | 56 45 2d 43 45 4e 54 45 |EN*...MO|VE-CENTE|
|00000d60| 52 0b 01 05 51 55 4f 54 | 45 07 0a 4f 4e 45 2d 57 |R...QUOT|E..ONE-W|
|00000d70| 49 4e 44 4f 57 04 10 02 | 04 10 04 0b 01 04 53 45 |INDOW...|......SE|
|00000d80| 54 46 07 09 2a 49 2d 46 | 4e 52 4f 57 2a 04 04 10 |TF..*I-F|NROW*...|
|00000d90| 03 07 02 3c 2d 07 08 2a | 49 2d 44 57 49 4e 2a 0b |...<-..*|I-DWIN*.|
|00000da0| 02 08 53 45 54 2d 53 49 | 5a 45 23 4e 00 00 00 07 |..SET-SI|ZE#N....|
|00000db0| 06 48 45 49 47 48 54 04 | 10 05 07 02 3c 2d 07 08 |.HEIGHT.|....<-..|
|00000dc0| 2a 49 2d 44 57 49 4e 2a | 0b 02 0d 53 45 54 2d 41 |*I-DWIN*|...SET-A|
|00000dd0| 54 54 52 49 42 55 54 45 | 23 07 00 00 00 04 10 04 |TTRIBUTE|#.......|
|00000de0| 07 02 3c 2d 07 08 2a 49 | 2d 44 57 49 4e 2a 0b 02 |..<-..*I|-DWIN*..|
|00000df0| 0c 43 4c 45 41 52 2d 53 | 43 52 45 45 4e 04 10 03 |.CLEAR-S|CREEN...|
|00000e00| 0b 01 04 53 45 54 46 07 | 03 49 4e 43 0b 01 02 49 |...SETF.|.INC...I|
|00000e10| 46 0b 01 01 3c 0b 01 01 | 2d 07 06 48 45 49 47 48 |F...<...|-..HEIGH|
|00000e20| 54 0b 01 01 2a 23 02 00 | 00 00 0b 01 06 4c 45 4e |T...*#..|.....LEN|
|00000e30| 47 54 48 07 04 46 55 4e | 53 04 10 02 04 10 03 04 |GTH..FUN|S.......|
|00000e40| 10 03 23 05 00 00 00 04 | 10 03 23 01 00 00 00 23 |..#.....|..#....#|
|00000e50| 02 00 00 00 04 10 04 04 | 10 03 0b 01 02 44 4f 07 |........|.....DO.|
|00000e60| 02 46 4c 07 04 46 55 4e | 53 0b 01 04 52 45 53 54 |.FL..FUN|S...REST|
|00000e70| 07 02 46 4c 04 10 02 04 | 10 03 07 03 4c 45 4e 23 |..FL....|....LEN#|
|00000e80| 00 00 00 00 0b 01 03 4d | 41 58 07 03 4c 45 4e 0b |.......M|AX..LEN.|
|00000e90| 01 06 4c 45 4e 47 54 48 | 0b 01 0b 53 59 4d 42 4f |..LENGTH|...SYMBO|
|00000ea0| 4c 2d 4e 41 4d 45 07 05 | 46 4e 41 4d 45 04 10 02 |L-NAME..|FNAME...|
|00000eb0| 04 10 02 04 10 03 04 10 | 03 07 03 52 4f 57 23 00 |........|...ROW#.|
|00000ec0| 00 00 00 0b 01 01 2b 07 | 03 52 4f 57 07 03 49 4e |......+.|.ROW..IN|
|00000ed0| 43 04 10 03 04 10 03 04 | 10 03 0b 01 04 4e 55 4c |C.......|.....NUL|
|00000ee0| 4c 07 02 46 4c 04 10 02 | 0b 01 04 53 45 54 46 07 |L..FL...|...SETF.|
|00000ef0| 0c 2a 49 2d 54 41 47 2d | 4c 45 46 54 2a 0b 01 03 |.*I-TAG-|LEFT*...|
|00000f00| 4d 41 58 07 16 2a 46 4e | 41 4d 45 2d 4c 45 4e 47 |MAX..*FN|AME-LENG|
|00000f10| 54 48 2d 44 45 46 41 55 | 4c 54 2a 07 03 4c 45 4e |TH-DEFAU|LT*..LEN|
|00000f20| 04 10 03 04 10 03 07 07 | 49 2d 53 45 54 55 50 07 |........|I-SETUP.|
|00000f30| 07 53 54 45 50 50 45 52 | 07 06 48 45 49 47 48 54 |.STEPPER|..HEIGHT|
|00000f40| 0b 01 01 2d 07 03 52 4f | 57 0b 01 02 31 2d 07 03 |...-..RO|W...1-..|
|00000f50| 49 4e 43 04 10 02 04 10 | 03 04 10 04 04 10 03 0b |INC.....|........|
|00000f60| 01 02 49 46 0b 01 05 4c | 49 53 54 50 0b 01 05 46 |..IF...L|ISTP...F|
|00000f70| 49 52 53 54 07 02 46 4c | 04 10 02 04 10 02 0b 01 |IRST..FL|........|
|00000f80| 04 53 45 54 46 07 03 46 | 55 4e 0b 01 05 46 49 52 |.SETF..F|UN...FIR|
|00000f90| 53 54 0b 01 05 46 49 52 | 53 54 07 02 46 4c 04 10 |ST...FIR|ST..FL..|
|00000fa0| 02 04 10 02 07 05 46 4e | 41 4d 45 0b 01 06 53 45 |......FN|AME...SE|
|00000fb0| 43 4f 4e 44 0b 01 05 46 | 49 52 53 54 07 02 46 4c |COND...F|IRST..FL|
|00000fc0| 04 10 02 04 10 02 04 10 | 05 0b 01 04 53 45 54 46 |........|....SETF|
|00000fd0| 07 03 46 55 4e 0b 01 05 | 46 49 52 53 54 07 02 46 |..FUN...|FIRST..F|
|00000fe0| 4c 04 10 02 07 05 46 4e | 41 4d 45 0b 01 05 46 49 |L.....FN|AME...FI|
|00000ff0| 52 53 54 07 02 46 4c 04 | 10 02 04 10 05 04 10 04 |RST..FL.|........|
|00001000| 0b 01 04 57 48 45 4e 0b | 01 02 4f 52 0b 01 06 4d |...WHEN.|..OR...M|
|00001010| 45 4d 42 45 52 07 03 46 | 55 4e 0b 01 04 52 45 53 |EMBER..F|UN...RES|
|00001020| 54 07 02 46 4c 04 10 02 | 04 10 03 0b 01 05 41 53 |T..FL...|......AS|
|00001030| 53 4f 43 07 03 46 55 4e | 0b 01 04 52 45 53 54 07 |SOC..FUN|...REST.|
|00001040| 02 46 4c 04 10 02 04 10 | 03 04 10 03 0b 01 06 43 |.FL.....|.......C|
|00001050| 45 52 52 4f 52 26 1d 49 | 67 6e 6f 72 65 20 74 68 |ERROR&.I|gnore th|
|00001060| 65 20 72 65 70 65 61 74 | 65 64 20 66 75 6e 63 74 |e repeat|ed funct|
|00001070| 69 6f 6e 2e 26 32 54 68 | 65 20 66 75 6e 63 74 69 |ion.&2Th|e functi|
|00001080| 6f 6e 20 7e 41 20 69 73 | 20 62 65 69 6e 67 20 74 |on ~A is| being t|
|00001090| 72 61 63 65 64 20 74 77 | 69 63 65 20 69 6e 20 74 |raced tw|ice in t|
|000010a0| 77 2d 73 65 74 75 70 2e | 07 03 46 55 4e 04 10 04 |w-setup.|..FUN...|
|000010b0| 04 10 03 07 08 49 4e 53 | 50 45 43 54 46 0b 01 05 |.....INS|PECTF...|
|000010c0| 46 49 52 53 54 07 02 46 | 4c 04 10 02 0b 01 08 46 |FIRST..F|L......F|
|000010d0| 55 4e 43 54 49 4f 4e 07 | 0d 54 57 4f 52 4c 44 2d |UNCTION.|.TWORLD-|
|000010e0| 54 52 41 43 45 52 04 10 | 02 04 10 03 0b 01 04 53 |TRACER..|.......S|
|000010f0| 45 54 46 0b 01 04 47 45 | 54 46 07 09 2a 49 2d 46 |ETF...GE|TF..*I-F|
|00001100| 4e 52 4f 57 2a 07 05 46 | 4e 41 4d 45 04 10 03 07 |NROW*..F|NAME....|
|00001110| 03 52 4f 57 04 10 03 07 | 02 3c 2d 07 08 2a 49 2d |.ROW....|.<-..*I-|
|00001120| 44 57 49 4e 2a 0b 02 0d | 53 45 54 2d 43 55 52 53 |DWIN*...|SET-CURS|
|00001130| 4f 52 50 4f 53 23 00 00 | 00 00 07 03 52 4f 57 04 |ORPOS#..|....ROW.|
|00001140| 10 05 07 02 3c 2d 07 08 | 2a 49 2d 44 57 49 4e 2a |....<-..|*I-DWIN*|
|00001150| 0b 02 0c 57 52 49 54 45 | 2d 53 54 52 49 4e 47 0b |...WRITE|-STRING.|
|00001160| 01 0b 53 59 4d 42 4f 4c | 2d 4e 41 4d 45 07 05 46 |..SYMBOL|-NAME..F|
|00001170| 4e 41 4d 45 04 10 02 04 | 10 04 07 02 3c 2d 07 08 |NAME....|....<-..|
|00001180| 2a 49 2d 44 57 49 4e 2a | 0b 02 09 43 4c 45 41 52 |*I-DWIN*|...CLEAR|
|00001190| 2d 45 4f 4c 04 10 03 04 | 10 0a 04 10 0b 36 40    |-EOL....|.....6@ |
+--------+-------------------------+-------------------------+--------+--------+