home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 160 / 160.d81 / rom routines / rom routines.0829
Commodore BASIC  |  1997-01-01  |  9.5 KB

view JSON data     |     view as text     |     open on a Mac     |     open on a PC

This file was processed as: Commodore BASIC (document/cbmBasic).

You can browse this item here: rom routines.0829

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert Commodore BASIC (document/cbmBasic) magic Supported
100% file Commodore C64 program, offset 0x0827, line 10, token (0x9e) SYS 2089 default (weak)
99% file data default
100% TrID Commodore 64 BASIC V2 program default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 08 27 08 0a 00 9e 32 | 30 38 39 3a 8f 22 14 14 |..'....2|089:."..|
|00000010| 14 14 14 14 14 14 14 14 | 14 14 14 14 14 53 54 41 |........|.....STA|
|00000020| 52 4c 49 4e 4b 45 44 00 | 00 00 78 a9 74 85 01 a0 |RLINKED.|..x.t...|
|00000030| 00 b9 42 08 99 00 d0 b9 | 42 09 99 00 d1 c8 d0 f1 |..B.....|B.......|
|00000040| 4c 00 d0 a9 8f 85 f9 a9 | 09 85 fa ad 67 09 85 22 |L.......|....g.."|
|00000050| ad 68 09 85 23 a9 01 85 | bb a9 08 85 bc 20 f9 d0 |.h..#...|..... ..|
|00000060| a9 27 85 fb a9 d1 85 fc | ad 27 d1 18 69 01 85 2d |.'......|.'..i..-|
|00000070| 85 fd ad 28 d1 69 08 85 | 2e 85 fe 20 f2 d0 20 f2 |...(.i..|... .. .|
|00000080| d0 a0 00 b1 fb 85 bb c8 | b1 fb 85 bc f0 34 a5 fd |........|.....4..|
|00000090| 85 f9 a5 fe 85 fa 20 f2 | d0 20 f2 d0 a0 00 b1 fb |...... .|. ......|
|000000a0| 85 22 18 65 f9 8d 21 d1 | c8 b1 fb 85 23 65 fa 8d |.".e..!.|....#e..|
|000000b0| 22 d1 20 9b d0 ad 21 d1 | 85 fd ad 22 d1 85 fe 4c |". ...!.|..."...L|
|000000c0| 38 d0 a0 05 b9 95 d0 99 | 7b 02 88 10 f7 a9 00 85 |8.......|{.......|
|000000d0| 7a a9 08 85 7b 4c 7b 02 | a9 77 85 01 58 60 a5 f9 |z...{L{.|.w..X`..|
|000000e0| 18 65 22 85 f9 a5 fa 65 | 23 85 fa a5 bb 18 65 22 |.e"....e|#.....e"|
|000000f0| 85 bb a5 23 65 bc 85 bc | 20 d7 d0 a0 00 b1 f9 91 |...#e...| .......|
|00000100| bb 20 d7 d0 a5 22 38 e9 | 01 85 22 a5 23 e9 00 85 |. ..."8.|..".#...|
|00000110| 23 a5 23 d0 e8 a5 22 d0 | e4 60 38 a5 f9 e9 01 85 |#.#...".|.`8.....|
|00000120| f9 a5 fa e9 00 85 fa a5 | bb 38 e9 01 85 bb a5 bc |........|.8......|
|00000130| e9 00 85 bc 60 e6 fb d0 | 02 e6 fc 60 a0 00 b1 f9 |....`...|...`....|
|00000140| 91 bb e6 f9 d0 02 e6 fa | e6 bb d0 02 e6 bc a5 22 |........|......."|
|00000150| 38 e9 01 85 22 a5 23 e9 | 00 85 23 a5 23 d0 df a5 |8...".#.|..#.#...|
|00000160| 22 d0 db 60 00 00 00 00 | 42 24 41 24 ff 9f 01 00 |"..`....|B$A$....|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 2a 08 0a 00 97 35 36 2c | 31 36 30 3a 97 35 35 2c |*....56,|160:.55,|
|000001a0| 30 3a 9c 3a 44 56 b2 c2 | 28 31 38 36 29 3a 8b 44 |0:.:DV..|(186):.D|
|000001b0| 56 b3 38 a7 44 56 b2 38 | 00 4c 08 14 00 99 22 93 |V.8.DV.8|.L....".|
|000001c0| 0e 08 9f d2 cf cd 20 41 | 4e 44 20 cb 45 52 4e 41 |...... A|ND .ERNA|
|000001d0| 4c 20 d2 4f 55 54 49 4e | 45 53 00 78 08 1e 00 99 |L .OUTIN|ES.x....|
|000001e0| 22 11 11 d0 52 49 4e 54 | 20 d4 4f 20 c6 49 4c 45 |"...RINT| .O .ILE|
|000001f0| 20 cf 52 20 d0 52 49 4e | 54 45 52 20 28 05 c6 9f | .R .RIN|TER (...|
|00000200| 2f 05 d0 9f 29 3f 00 94 | 08 28 00 a1 4f 24 3a 8b |/...)?..|.(..O$:.|
|00000210| 4f 24 b3 b1 22 46 22 af | 4f 24 b3 b1 22 50 22 a7 |O$.."F".|O$.."P".|
|00000220| 34 30 00 aa 08 32 00 8b | 4f 24 b2 22 50 22 a7 44 |40...2..|O$."P".D|
|00000230| b2 34 3a 89 31 30 30 30 | 00 c1 08 37 00 46 24 b2 |.4:.1000|...7.F$.|
|00000240| 22 52 4f 4d 20 4b 45 52 | 4e 41 4c 2e 54 58 54 00 |"ROM KER|NAL.TXT.|
|00000250| e2 08 3c 00 99 22 11 c6 | 49 4c 45 20 4e 41 4d 45 |..<.."..|ILE NAME|
|00000260| 20 57 49 4c 4c 20 42 45 | 20 05 22 46 24 22 9f 2e | WILL BE| ."F$"..|
|00000270| 00 1e 09 46 00 99 22 11 | d0 52 49 4e 54 20 54 4f |...F..".|.RINT TO|
|00000280| 20 57 48 49 43 48 20 44 | 52 49 56 45 3f 20 28 05 | WHICH D|RIVE? (.|
|00000290| 38 9f 2f 05 39 9f 2f 31 | 05 30 9f 2f 31 05 31 9f |8./.9./1|.0./1.1.|
|000002a0| 2f 31 05 32 9f 2f 31 05 | 36 9f 29 3f 00 41 09 50 |/1.2./1.|6.)?.A.P|
|000002b0| 00 a1 44 24 3a 8b 44 24 | b3 22 38 22 af 44 24 b1 |..D$:.D$|."8".D$.|
|000002c0| 22 32 22 a7 8b 44 24 b3 | b1 22 36 22 a7 38 30 00 |"2"..D$.|."6".80.|
|000002d0| 59 09 5a 00 8b c5 28 44 | 24 29 b2 30 af 44 24 b3 |Y.Z...(D|$).0.D$.|
|000002e0| b1 22 30 22 a7 38 30 00 | 71 09 64 00 44 b2 c5 28 |."0".80.|q.d.D..(|
|000002f0| 44 24 29 3a 8b 44 b3 38 | a7 44 b2 44 aa 31 30 00 |D$):.D.8|.D.D.10.|
|00000300| 8f 09 6e 00 a0 32 3a 9f | 32 2c 44 2c 32 2c 46 24 |..n..2:.|2,D,2,F$|
|00000310| aa 22 2c 53 2c 57 22 3a | 89 32 30 30 30 00 9d 09 |.",S,W":|.2000...|
|00000320| e8 03 a0 32 3a 9f 32 2c | 34 2c 37 00 bd 09 d0 07 |...2:.2,|4,7.....|
|00000330| 8c 3a 99 22 11 11 d0 52 | 49 4e 54 49 4e 47 2e 2e |.:."...R|INTING..|
|00000340| 2e 22 3a 98 32 2c c7 28 | 31 33 29 00 dd 09 da 07 |.":.2,.(|13).....|
|00000350| 87 41 24 3a 8b 41 24 b3 | b1 22 4d 4f 4a 4f 22 a7 |.A$:.A$.|."MOJO".|
|00000360| 98 32 2c 41 24 3a 89 32 | 30 31 30 00 e4 09 e4 07 |.2,A$:.2|010.....|
|00000370| a0 32 00 1b 0a b8 0b 97 | 34 39 31 35 32 2c 30 3a |.2......|49152,0:|
|00000380| 97 34 34 2c 31 39 32 3a | 97 34 33 2c 31 3a 97 34 |.44,192:|.43,1:.4|
|00000390| 35 2c c2 28 35 33 32 34 | 36 29 3a 97 34 36 2c c2 |5,.(5324|6):.46,.|
|000003a0| 28 34 33 32 34 39 29 3a | 8a 00 23 0a 88 13 83 22 |(43249):|..#...."|
|000003b0| 22 00 2b 0a 92 13 83 22 | 22 00 37 0a 9c 13 83 22 |".+...."|".7...."|
|000003c0| 20 20 20 20 22 00 43 0a | a6 13 83 22 20 20 20 20 | ".C.|..." |
|000003d0| 22 00 7f 0a b0 13 83 22 | 20 20 20 20 20 20 20 20 |"......"| |
|000003e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000003f0| 20 20 20 20 20 d2 cf cd | 20 c1 ce c4 20 cb c5 d2 | ...| ... ...|
|00000400| ce c1 cc 20 d2 cf d5 d4 | c9 ce c5 d3 22 00 bb 0a |... ....|...."...|
|00000410| ba 13 83 22 20 20 20 20 | 20 20 20 20 20 20 20 20 |..." | |
|00000420| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000430| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -------|--------|
|00000440| 2d 2d 2d 2d 2d 2d 2d 2d | 22 00 c7 0a c4 13 83 22 |--------|"......"|
|00000450| 20 20 20 20 22 00 d3 0a | ce 13 83 22 20 20 20 20 | "...|..." |
|00000460| 22 00 11 0b d8 13 83 22 | 20 20 20 20 cc c5 c7 c5 |"......"| ....|
|00000470| ce c4 3b 20 3d ca d5 cd | d0 20 c1 c4 c4 d2 c5 d3 |..; =...|. ......|
|00000480| d3 c5 d3 2c 20 5b 5d 3d | d6 c5 c3 d4 cf d2 20 ca |..., []=|...... .|
|00000490| d5 cd d0 20 c1 c4 c4 d2 | c5 d3 d3 c5 d3 20 22 00 |... ....|..... ".|
|000004a0| 1d 0b e2 13 83 22 20 20 | 20 20 22 00 29 0b ec 13 |....." | ".)...|
|000004b0| 83 22 20 20 20 20 22 00 | 69 0b f6 13 83 22 20 20 |." ".|i...." |
|000004c0| 20 20 20 34 32 31 31 35 | 20 24 41 34 38 33 20 5b | 42115| $A483 [|
|000004d0| 37 37 30 2f 24 30 33 30 | 32 5d 20 28 57 52 4d 52 |770/$030|2] (WRMR|
|000004e0| 53 54 29 20 3d 20 57 41 | 52 4d 20 53 54 41 52 54 |ST) = WA|RM START|
|000004f0| 2f 52 45 53 45 54 22 00 | 75 0b 00 14 83 22 20 20 |/RESET".|u...." |
|00000500| 20 20 22 00 c2 0b 0a 14 | 83 22 20 20 20 20 20 34 | ".....|." 4|
|00000510| 32 30 34 32 20 24 41 34 | 33 41 20 2d 2d 2d 2d 2d |2042 $A4|3A -----|
|00000520| 2d 2d 2d 2d 2d 2d 20 28 | 50 4e 54 45 52 52 29 20 |------ (|PNTERR) |
|00000530| 3d 20 50 52 49 4e 54 53 | 20 45 52 52 4f 52 2e 20 |= PRINTS| ERROR. |
|00000540| 27 58 27 3d 43 4f 44 45 | 20 28 31 2d 33 30 29 22 |'X'=CODE| (1-30)"|
|00000550| 00 ce 0b 14 14 83 22 20 | 20 20 20 22 00 0e 0c 1e |......" | "....|
|00000560| 14 83 22 20 20 20 20 20 | 34 32 31 30 30 20 24 41 |.." |42100 $A|
|00000570| 34 37 34 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 |474 ----|------- |
|00000580| 28 52 53 54 42 41 43 29 | 20 3d 20 52 45 54 55 52 |(RSTBAC)| = RETUR|
|00000590| 4e 53 20 54 4f 20 42 41 | 53 49 43 22 00 1a 0c 28 |NS TO BA|SIC"...(|
|000005a0| 14 83 22 20 20 20 20 22 | 00 67 0c 32 14 83 22 20 |.." "|.g.2.." |
|000005b0| 20 20 20 20 34 32 33 33 | 36 20 24 41 35 36 30 20 | 4233|6 $A560 |
|000005c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 20 28 4b 45 59 |--------|--- (KEY|
|000005d0| 42 52 44 29 20 3d 20 49 | 4e 50 55 54 20 41 20 38 |BRD) = I|NPUT A 8|
|000005e0| 30 20 42 59 54 45 20 4c | 49 4e 45 20 46 52 4f 4d |0 BYTE L|INE FROM|
|000005f0| 20 54 48 45 22 00 ba 0c | 3c 14 83 22 20 20 20 20 | THE"...|<.." |
|00000600| 4b 45 59 42 4f 41 52 44 | 2e 20 27 41 27 3d 43 48 |KEYBOARD|. 'A'=CH|
|00000610| 41 52 20 27 58 27 3d 31 | 2c 27 59 27 3d 32 35 35 |AR 'X'=1|,'Y'=255|
|00000620| 20 41 44 44 52 45 53 53 | 20 4f 46 20 4b 45 59 42 | ADDRESS| OF KEYB|
|00000630| 4f 41 52 44 20 42 55 46 | 46 45 52 2d 31 2e 20 42 |OARD BUF|FER-1. B|
|00000640| 55 46 20 45 4e 44 53 22 | 00 cd 0c 46 14 83 22 20 |UF ENDS"|...F.." |
|00000650| 20 20 20 57 49 54 48 20 | 30 2e 22 00 d9 0c 50 14 | WITH |0."...P.|
|00000660| 83 22 20 20 20 20 22 00 | 1c 0d 5a 14 83 22 20 20 |." ".|..Z.." |
|00000670| 20 20 20 34 32 33 36 34 | 20 24 41 35 37 43 20 5b | 42364| $A57C [|
|00000680| 37 37 32 2f 24 30 33 30 | 34 5d 20 28 43 52 55 4e |772/$030|4] (CRUN|
|00000690| 43 48 29 20 3d 20 43 52 | 55 4e 43 48 20 42 41 53 |CH) = CR|UNCH BAS|
|000006a0| 49 43 20 54 4f 4b 45 4e | 53 22 00 28 0d 64 14 83 |IC TOKEN|S".(.d..|
|000006b0| 22 20 20 20 20 22 00 6b | 0d 6e 14 83 22 20 20 20 |" ".k|.n.." |
|000006c0| 20 20 34 32 37 37 38 20 | 24 41 37 31 41 20 5b 37 | 42778 |$A71A [7|
|000006d0| 37 34 2f 24 30 33 30 36 | 5d 20 28 50 4e 54 54 4f |74/$0306|] (PNTTO|
|000006e0| 4b 29 20 3d 20 50 52 49 | 4e 54 20 42 41 53 49 43 |K) = PRI|NT BASIC|
|000006f0| 20 54 4f 4b 45 4e 53 2e | 22 00 77 0d 78 14 83 22 | TOKENS.|".w.x.."|
|00000700| 20 20 20 20 22 00 c8 0d | 82 14 83 22 20 20 20 20 | "...|..." |
|00000710| 20 34 32 39 38 30 20 24 | 41 37 45 34 20 5b 37 37 | 42980 $|A7E4 [77|
|00000720| 36 2f 24 30 33 30 38 5d | 20 28 53 4e 42 49 4e 53 |6/$0308]| (SNBINS|
|00000730| 29 20 3d 20 53 54 41 52 | 54 20 4e 45 57 20 42 41 |) = STAR|T NEW BA|
|00000740| 53 49 43 20 49 4e 53 54 | 52 55 43 54 49 4f 4e 20 |SIC INST|RUCTION |
|00000750| 4c 49 4e 4b 2e 22 00 d4 | 0d 8c 14 83 22 20 20 20 |LINK."..|...." |
|00000760| 20 22 00 25 0e 96 14 83 | 22 20 20 20 20 20 34 33 | ".%....|" 43|
|00000770| 37 33 31 20 24 41 41 44 | 33 20 2d 2d 2d 2d 2d 2d |731 $AAD|3 ------|
|00000780| 2d 2d 2d 2d 2d 20 28 50 | 4e 54 43 52 29 20 3d 20 |----- (P|NTCR) = |
|00000790| 50 52 49 4e 54 20 41 20 | 43 41 52 52 49 41 47 45 |PRINT A |CARRIAGE|
|000007a0| 20 52 45 54 55 52 4e 2f | 4c 49 4e 45 20 46 45 45 | RETURN/|LINE FEE|
|000007b0| 44 2e 22 00 31 0e a0 14 | 83 22 20 20 20 20 22 00 |D.".1...|." ".|
|000007c0| 84 0e aa 14 83 22 20 20 | 20 20 20 34 33 38 30 36 |....." | 43806|
|000007d0| 20 24 41 42 31 45 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d | $AB1E -|--------|
|000007e0| 2d 2d 20 28 50 4e 54 53 | 54 52 29 20 3d 20 50 52 |-- (PNTS|TR) = PR|
|000007f0| 49 4e 54 20 41 20 53 54 | 52 49 4e 47 20 54 45 52 |INT A ST|RING TER|
|00000800| 4d 20 57 49 54 48 20 30 | 2e 20 27 41 27 3d 4c 42 |M WITH 0|. 'A'=LB|
|00000810| 2c 22 00 97 0e b4 14 83 | 22 20 20 20 20 27 59 27 |,"......|" 'Y'|
|00000820| 3d 48 42 2e 22 00 a3 0e | be 14 83 22 20 20 20 20 |=HB."...|..." |
|00000830| 22 00 e2 0e c8 14 83 22 | 20 20 20 20 20 34 33 38 |"......"| 438|
|00000840| 33 39 20 24 41 42 33 46 | 20 2d 2d 2d 2d 2d 2d 2d |39 $AB3F| -------|
|00000850| 2d 2d 2d 2d 20 28 50 4e | 54 53 50 43 29 20 3d 20 |---- (PN|TSPC) = |
|00000860| 50 52 49 4e 54 53 20 41 | 20 53 50 41 43 45 2e 22 |PRINTS A| SPACE."|
|00000870| 00 ee 0e d2 14 83 22 20 | 20 20 20 22 00 33 0f dc |......" | ".3..|
|00000880| 14 83 22 20 20 20 20 20 | 34 34 36 37 38 20 24 41 |.." |44678 $A|
|00000890| 45 38 36 20 5b 37 37 38 | 2f 24 30 33 30 41 5d 20 |E86 [778|/$030A] |
|000008a0| 28 41 52 49 54 48 29 20 | 3d 20 47 45 54 20 4d 41 |(ARITH) |= GET MA|
|000008b0| 54 48 20 45 4c 45 4d 45 | 4e 54 20 4c 49 4e 4b 2e |TH ELEME|NT LINK.|
|000008c0| 22 00 3f 0f e6 14 83 22 | 20 20 20 20 22 00 89 0f |".?...."| "...|
|000008d0| f0 14 83 22 20 20 20 20 | 20 34 34 37 39 37 20 24 |..." | 44797 $|
|000008e0| 41 46 45 44 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |AFED ---|--------|
|000008f0| 20 28 43 4f 4d 4d 41 29 | 20 3d 20 53 45 41 52 43 | (COMMA)| = SEARC|
|00000900| 48 20 46 4f 52 20 43 4f | 4d 4d 41 20 50 41 52 41 |H FOR CO|MMA PARA|
|00000910| 4d 45 54 45 52 2e 22 00 | 95 0f fa 14 83 22 20 20 |METER.".|....." |
|00000920| 20 20 22 00 e8 0f 04 15 | 83 22 20 20 20 20 20 34 | ".....|." 4|
|00000930| 35 34 38 32 20 24 42 31 | 41 41 20 2d 2d 2d 2d 2d |5482 $B1|AA -----|
|00000940| 2d 2d 2d 2d 2d 2d 20 28 | 43 4f 4e 56 46 50 29 20 |------ (|CONVFP) |
|00000950| 3d 20 43 4f 4e 56 45 52 | 54 53 20 41 20 46 4c 4f |= CONVER|TS A FLO|
|00000960| 41 54 49 4e 47 20 50 4f | 49 4e 54 20 4e 55 4d 42 |ATING PO|INT NUMB|
|00000970| 45 52 20 49 4e 22 00 21 | 10 0e 15 83 22 20 20 20 |ER IN".!|...." |
|00000980| 20 27 46 41 43 31 27 20 | 54 4f 20 41 4e 20 49 4e | 'FAC1' |TO AN IN|
|00000990| 54 45 47 45 52 20 4e 55 | 4d 42 45 52 2e 20 27 59 |TEGER NU|MBER. 'Y|
|000009a0| 27 3d 4c 42 20 26 20 27 | 41 27 3d 48 42 2e 22 00 |'=LB & '|A'=HB.".|
|000009b0| 2d 10 18 15 83 22 20 20 | 20 20 22 00 82 10 22 15 |-...." | "...".|
|000009c0| 83 22 20 20 20 20 20 34 | 35 39 36 39 20 24 42 33 |." 4|5969 $B3|
|000009d0| 39 31 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 20 28 |91 -----|------ (|
|000009e0| 43 4f 4e 49 4e 54 29 20 | 3d 20 43 4f 4e 56 45 52 |CONINT) |= CONVER|
|000009f0| 54 53 20 41 4e 20 49 4e | 54 45 47 45 52 20 54 4f |TS AN IN|TEGER TO|
|00000a00| 20 46 4c 4f 41 54 49 4e | 47 20 50 4f 49 4e 54 22 | FLOATIN|G POINT"|
|00000a10| 00 be 10 2c 15 83 22 20 | 20 20 20 4e 55 4d 42 45 |...,.." | NUMBE|
|00000a20| 52 20 41 4e 44 20 53 54 | 4f 52 45 53 20 49 54 20 |R AND ST|ORES IT |
|00000a30| 49 4e 20 27 46 41 43 31 | 27 2e 20 27 59 27 3d 4c |IN 'FAC1|'. 'Y'=L|
|00000a40| 42 20 26 20 27 41 27 3d | 48 42 2e 22 00 ca 10 36 |B & 'A'=|HB."...6|
|00000a50| 15 83 22 20 20 20 20 22 | 00 19 11 40 15 83 22 20 |.." "|...@.." |
|00000a60| 20 20 20 20 34 38 35 38 | 39 20 24 42 44 43 44 20 | 4858|9 $BDCD |
|00000a70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 20 28 4c 49 4e |--------|--- (LIN|
|00000a80| 50 4e 54 29 20 3d 20 50 | 52 49 4e 54 53 20 49 4e |PNT) = P|RINTS IN|
|00000a90| 54 45 47 45 52 2e 20 27 | 58 27 3d 4c 42 2c 20 27 |TEGER. '|X'=LB, '|
|00000aa0| 41 27 3d 48 42 2e 22 00 | 25 11 4a 15 83 22 20 20 |A'=HB.".|%.J.." |
|00000ab0| 20 20 22 00 78 11 54 15 | 83 22 20 20 20 20 20 35 | ".x.T.|." 5|
|00000ac0| 33 32 36 35 20 24 44 30 | 31 31 20 2d 2d 2d 2d 2d |3265 $D0|11 -----|
|00000ad0| 2d 2d 2d 2d 2d 2d 20 28 | 56 49 43 48 49 50 29 20 |------ (|VICHIP) |
|00000ae0| 3d 20 43 4f 4e 54 52 4f | 4c 53 20 56 49 43 20 49 |= CONTRO|LS VIC I|
|00000af0| 49 20 43 48 49 50 2e 20 | 31 31 3d 4f 46 46 2f 32 |I CHIP. |11=OFF/2|
|00000b00| 37 3d 4f 4e 2e 22 00 84 | 11 5e 15 83 22 20 20 20 |7=ON."..|.^.." |
|00000b10| 20 22 00 c0 11 68 15 83 | 22 20 20 20 20 20 35 37 | "...h..|" 57|
|00000b20| 36 35 34 20 24 45 31 33 | 36 20 2d 2d 2d 2d 2d 2d |654 $E13|6 ------|
|00000b30| 2d 2d 2d 2d 2d 20 28 53 | 59 53 54 49 4e 29 20 3d |----- (S|YSTIN) =|
|00000b40| 20 53 59 53 20 43 4f 4d | 4d 41 4e 44 2e 22 00 cc | SYS COM|MAND."..|
|00000b50| 11 72 15 83 22 20 20 20 | 20 22 00 1e 12 7c 15 83 |.r.." | "...|..|
|00000b60| 22 20 20 20 20 20 35 38 | 32 33 35 20 24 45 33 37 |" 58|235 $E37|
|00000b70| 42 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 20 28 43 |B ------|----- (C|
|00000b80| 4c 52 49 4e 54 29 20 3d | 20 43 4c 45 41 52 53 20 |LRINT) =| CLEARS |
|00000b90| 49 4e 54 45 52 52 55 50 | 54 20 41 4e 44 20 52 45 |INTERRUP|T AND RE|
|00000ba0| 53 45 54 20 53 59 53 54 | 45 4d 2e 22 00 2a 12 86 |SET SYST|EM.".*..|
|00000bb0| 15 83 22 20 20 20 20 22 | 00 7a 12 90 15 83 22 20 |.." "|.z...." |
|00000bc0| 20 20 20 20 35 38 32 35 | 31 20 24 45 33 38 42 20 | 5825|1 $E38B |
|00000bd0| 5b 37 36 38 2f 24 30 33 | 30 30 5d 20 28 45 52 52 |[768/$03|00] (ERR|
|00000be0| 4d 45 53 29 20 3d 20 45 | 52 52 4f 52 20 4d 45 53 |MES) = E|RROR MES|
|00000bf0| 53 41 47 45 20 4c 49 4e | 4b 2e 20 50 52 49 4e 54 |SAGE LIN|K. PRINT|
|00000c00| 53 20 45 52 52 4f 52 22 | 00 90 12 9a 15 83 22 20 |S ERROR"|......" |
|00000c10| 20 20 20 4d 45 53 53 41 | 47 45 20 49 46 22 00 9c | MESSA|GE IF"..|
|00000c20| 12 a4 15 83 22 20 20 20 | 20 22 00 d5 12 ae 15 83 |...." | "......|
|00000c30| 22 20 20 20 20 20 27 58 | 27 20 50 4f 53 49 54 49 |" 'X|' POSITI|
|00000c40| 56 45 2c 20 44 52 4f 50 | 53 20 54 48 52 4f 55 47 |VE, DROP|S THROUG|
|00000c50| 48 20 49 46 20 27 58 27 | 20 4e 45 47 41 54 49 56 |H IF 'X'| NEGATIV|
|00000c60| 45 2e 22 00 e1 12 b8 15 | 83 22 20 20 20 20 22 00 |E.".....|." ".|
|00000c70| 30 13 c2 15 83 22 20 20 | 20 20 20 35 38 32 36 30 |0...." | 58260|
|00000c80| 20 24 45 33 39 34 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d | $E394 -|--------|
|00000c90| 2d 2d 20 28 52 53 54 53 | 59 53 29 20 3d 20 52 45 |-- (RSTS|YS) = RE|
|00000ca0| 53 45 54 20 53 59 53 54 | 45 4d 20 54 4f 20 44 45 |SET SYST|EM TO DE|
|00000cb0| 46 41 55 4c 54 20 56 41 | 4c 55 45 53 2e 22 00 3c |FAULT VA|LUES.".<|
|00000cc0| 13 cc 15 83 22 20 20 20 | 20 22 00 87 13 d6 15 83 |...." | "......|
|00000cd0| 22 20 20 20 20 20 35 38 | 37 33 32 20 24 45 35 36 |" 58|732 $E56|
|00000ce0| 43 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 20 28 50 |C ------|----- (P|
|00000cf0| 55 54 43 53 52 29 20 3d | 20 50 55 54 20 43 52 53 |UTCSR) =| PUT CRS|
|00000d00| 52 20 4f 4e 20 53 43 52 | 45 45 4e 2e 20 27 58 27 |R ON SCR|EEN. 'X'|
|00000d10| 3d 32 31 31 22 00 8f 13 | e0 15 83 22 22 00 c0 13 |=211"...|...""...|
|00000d20| ea 15 83 22 20 20 20 20 | 20 20 20 20 20 20 20 20 |..." | |
|00000d30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000d40| 20 20 20 20 20 20 20 20 | 20 20 20 20 31 22 00 c8 | | 1"..|
|00000d50| 13 f4 15 83 22 22 00 d0 | 13 fe 15 83 22 22 00 d8 |....""..|....""..|
|00000d60| 13 08 16 83 22 22 00 e0 | 13 12 16 83 22 22 00 e8 |....""..|....""..|
|00000d70| 13 1c 16 83 22 22 00 f0 | 13 26 16 83 22 22 00 0b |....""..|.&..""..|
|00000d80| 14 30 16 83 22 20 20 20 | 20 52 4f 57 2c 27 59 27 |.0.." | ROW,'Y'|
|00000d90| 3d 32 31 34 20 43 4f 4c | 22 00 17 14 3a 16 83 22 |=214 COL|"...:.."|
|00000da0| 20 20 20 20 22 00 6a 14 | 44 16 83 22 20 20 20 20 | ".j.|D.." |
|00000db0| 20 35 38 39 33 30 20 24 | 45 36 33 32 20 2d 2d 2d | 58930 $|E632 ---|
|00000dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 20 28 47 45 54 43 48 52 |--------| (GETCHR|
|00000dd0| 29 20 3d 20 47 45 54 20 | 43 48 41 52 41 43 54 45 |) = GET |CHARACTE|
|00000de0| 52 20 46 52 4f 4d 20 53 | 43 52 45 45 4e 2e 20 27 |R FROM S|CREEN. '|
|00000df0| 41 27 3d 43 48 52 2c 22 | 00 87 14 4e 16 83 22 20 |A'=CHR,"|...N.." |
|00000e00| 20 20 20 32 31 31 3d 52 | 4f 57 2c 20 32 31 34 3d | 211=R|OW, 214=|
|00000e10| 43 4f 4c 2e 22 00 93 14 | 58 16 83 22 20 20 20 20 |COL."...|X.." |
|00000e20| 22 00 e1 14 62 16 83 22 | 20 20 20 20 20 35 39 39 |"...b.."| 599|
|00000e30| 35 33 20 24 45 41 33 31 | 20 5b 37 38 38 2f 24 30 |53 $EA31| [788/$0|
|00000e40| 33 31 34 5d 20 28 48 52 | 44 49 4e 54 29 20 3d 20 |314] (HR|DINT) = |
|00000e50| 48 41 52 44 57 41 52 45 | 20 49 4e 54 45 52 52 55 |HARDWARE| INTERRU|
|00000e60| 50 54 2e 20 31 38 34 3d | 46 49 4c 45 23 2c 22 00 |PT. 184=|FILE#,".|
|00000e70| f6 14 6c 16 83 22 20 20 | 20 20 31 38 36 3d 44 45 |..l.." | 186=DE|
|00000e80| 56 23 2e 22 00 02 15 76 | 16 83 22 20 20 20 20 22 |V#."...v|.." "|
|00000e90| 00 49 15 80 16 83 22 20 | 20 20 20 20 35 39 36 32 |.I...." | 5962|
|00000ea0| 36 20 24 45 38 45 41 20 | 2d 2d 2d 2d 2d 2d 2d 2d |6 $E8EA |--------|
|00000eb0| 2d 2d 2d 20 28 53 43 52 | 4f 4c 4c 29 20 3d 20 53 |--- (SCR|OLL) = S|
|00000ec0| 43 52 4f 4c 4c 20 53 43 | 52 45 45 4e 20 4f 4e 45 |CROLL SC|REEN ONE|
|00000ed0| 20 4c 49 4e 45 2e 22 00 | 55 15 8a 16 83 22 20 20 | LINE.".|U...." |
|00000ee0| 20 20 22 00 aa 15 94 16 | 83 22 20 20 20 20 20 35 | ".....|." 5|
|00000ef0| 39 39 30 33 20 24 45 39 | 46 46 20 2d 2d 2d 2d 2d |9903 $E9|FF -----|
|00000f00| 2d 2d 2d 2d 2d 2d 20 28 | 43 4c 52 4c 49 4e 29 20 |------ (|CLRLIN) |
|00000f10| 3d 20 43 4c 45 41 52 53 | 20 41 20 4c 49 4e 45 20 |= CLEARS| A LINE |
|00000f20| 4f 4e 20 54 48 45 20 53 | 43 52 45 45 4e 2e 20 27 |ON THE S|CREEN. '|
|00000f30| 58 27 3d 4c 49 4e 45 22 | 00 bc 15 9e 16 83 22 20 |X'=LINE"|......" |
|00000f40| 20 20 20 28 30 2d 32 34 | 29 22 00 c8 15 a8 16 83 | (0-24|)"......|
|00000f50| 22 20 20 20 20 22 00 1e | 16 b2 16 83 22 20 20 20 |" "..|...." |
|00000f60| 20 20 35 39 39 30 35 20 | 24 45 41 30 31 20 2d 2d | 59905 |$EA01 --|
|00000f70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 20 28 43 4c 52 31 32 |--------|- (CLR12|
|00000f80| 30 29 20 3d 20 43 4c 45 | 41 52 53 20 31 32 30 20 |0) = CLE|ARS 120 |
|00000f90| 53 43 52 45 45 4e 20 42 | 59 54 45 53 2e 20 27 58 |SCREEN B|YTES. 'X|
|00000fa0| 27 3d 4c 49 4e 45 20 27 | 59 27 3d 22 00 42 16 bc |'=LINE '|Y'=".B..|
|00000fb0| 16 83 22 20 20 20 20 4e | 55 4d 42 45 52 20 4f 46 |.." N|UMBER OF|
|00000fc0| 20 42 59 54 45 53 20 28 | 30 2d 31 39 39 29 2e 22 | BYTES (|0-199)."|
|00000fd0| 00 4e 16 c6 16 83 22 20 | 20 20 20 22 00 9d 16 d0 |.N...." | "....|
|00000fe0| 16 83 22 20 20 20 20 20 | 36 32 39 32 39 20 24 46 |.." |62929 $F|
|00000ff0| 34 41 35 20 5b 38 31 36 | 2f 24 30 33 33 30 5d 20 |4A5 [816|/$0330] |
|00001000| 28 4c 4f 44 4c 4e 4b 29 | 20 3d 20 4c 4f 41 44 20 |(LODLNK)| = LOAD |
|00001010| 4c 49 4e 4b 2e 20 27 41 | 27 3d 30 3d 4c 4f 41 44 |LINK. 'A|'=0=LOAD|
|00001020| 2f 31 2d 56 45 52 49 46 | 59 2c 22 00 b5 16 da 16 |/1-VERIF|Y,".....|
|00001030| 83 22 20 20 20 20 31 38 | 33 3d 4e 41 4d 45 20 4c |." 18|3=NAME L|
|00001040| 45 4e 22 00 c1 16 e4 16 | 83 22 20 20 20 20 22 00 |EN".....|." ".|
|00001050| 14 17 ee 16 83 22 20 20 | 20 20 20 36 32 39 35 37 |....." | 62957|
|00001060| 20 24 46 35 45 44 20 5b | 38 31 38 2f 24 30 33 33 | $F5ED [|818/$033|
|00001070| 32 5d 20 28 53 41 56 4c | 4e 4b 29 20 3d 20 53 41 |2] (SAVL|NK) = SA|
|00001080| 56 45 20 4c 49 4e 4b 2e | 20 31 38 35 3d 53 55 42 |VE LINK.| 185=SUB|
|00001090| 43 4d 44 2f 31 38 36 3d | 44 45 56 23 2f 31 39 33 |CMD/186=|DEV#/193|
|000010a0| 2d 22 00 42 17 f8 16 83 | 22 20 20 20 20 31 39 34 |-".B....|" 194|
|000010b0| 3d 53 54 41 52 54 20 41 | 4e 44 20 31 37 34 2d 31 |=START A|ND 174-1|
|000010c0| 37 35 3d 45 4e 44 20 4f | 46 20 46 49 4c 45 2e 22 |75=END O|F FILE."|
|000010d0| 00 4e 17 02 17 83 22 20 | 20 20 20 22 00 89 17 0c |.N...." | "....|
|000010e0| 17 83 22 20 20 20 20 20 | 36 34 37 33 38 20 24 46 |.." |64738 $F|
|000010f0| 43 45 32 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 |CE2 ----|------- |
|00001100| 28 43 4f 4c 44 52 54 29 | 20 3d 20 43 4f 4c 44 20 |(COLDRT)| = COLD |
|00001110| 52 45 53 45 54 2e 22 00 | 95 17 16 17 83 22 20 20 |RESET.".|....." |
|00001120| 20 20 22 00 d0 17 20 17 | 83 22 20 20 20 20 20 36 | "... .|." 6|
|00001130| 35 30 39 35 20 24 46 45 | 34 37 20 5b 37 39 32 2f |5095 $FE|47 [792/|
|00001140| 24 30 33 31 38 5d 20 28 | 4e 4d 49 29 20 3d 20 4e |$0318] (|NMI) = N|
|00001150| 4d 49 20 49 4e 54 45 52 | 52 55 50 54 2e 22 00 dc |MI INTER|RUPT."..|
|00001160| 17 2a 17 83 22 20 20 20 | 20 22 00 31 18 34 17 83 |.*.." | ".1.4..|
|00001170| 22 20 20 20 20 20 36 35 | 31 32 36 20 24 46 45 36 |" 65|126 $FE6|
|00001180| 36 20 5b 37 39 30 2f 24 | 30 33 31 36 5d 20 28 42 |6 [790/$|0316] (B|
|00001190| 52 4b 49 4e 54 29 20 3d | 20 42 52 45 41 4b 20 49 |RKINT) =| BREAK I|
|000011a0| 4e 54 45 52 52 55 50 54 | 20 56 45 43 54 4f 52 2e |NTERRUPT| VECTOR.|
|000011b0| 20 28 57 41 52 4d 20 52 | 45 53 45 54 29 2e 22 00 | (WARM R|ESET).".|
|000011c0| 3d 18 3e 17 83 22 20 20 | 20 20 22 00 90 18 48 17 |=.>.." | "...H.|
|000011d0| 83 22 20 20 20 20 20 36 | 35 34 30 39 20 24 46 46 |." 6|5409 $FF|
|000011e0| 38 31 20 36 35 33 37 31 | 2f 24 46 46 35 42 20 28 |81 65371|/$FF5B (|
|000011f0| 43 49 4e 54 29 20 3d 20 | 49 4e 49 54 49 41 4c 49 |CINT) = |INITIALI|
|00001200| 5a 45 20 53 43 52 45 45 | 4e 20 45 44 49 54 4f 52 |ZE SCREE|N EDITOR|
|00001210| 20 41 4e 44 20 54 48 45 | 20 36 35 36 37 22 00 a2 | AND THE| 6567"..|
|00001220| 18 52 17 83 22 20 20 20 | 20 56 49 43 20 49 49 22 |.R.." | VIC II"|
|00001230| 00 ae 18 5c 17 83 22 20 | 20 20 20 22 00 f8 18 66 |...\.." | "...f|
|00001240| 17 83 22 20 20 20 20 20 | 36 35 34 31 32 20 24 46 |.." |65412 $F|
|00001250| 46 38 34 20 36 34 33 39 | 31 2f 24 46 44 41 33 20 |F84 6439|1/$FDA3 |
|00001260| 28 49 4f 49 4e 49 54 29 | 20 3d 20 49 4e 49 54 49 |(IOINIT)| = INITI|
|00001270| 41 4c 49 5a 45 20 41 4c | 4c 20 49 2f 4f 20 44 45 |ALIZE AL|L I/O DE|
|00001280| 56 49 43 45 53 22 00 04 | 19 70 17 83 22 20 20 20 |VICES"..|.p.." |
|00001290| 20 22 00 59 19 7a 17 83 | 22 20 20 20 20 20 36 35 | ".Y.z..|" 65|
|000012a0| 34 31 35 20 24 46 46 38 | 37 20 36 34 38 34 38 2f |415 $FF8|7 64848/|
|000012b0| 24 46 44 35 30 20 28 52 | 41 4d 54 41 53 29 20 3d |$FD50 (R|AMTAS) =|
|000012c0| 20 54 45 53 54 53 20 52 | 41 4d 2e 20 53 45 54 53 | TESTS R|AM. SETS|
|000012d0| 20 54 4f 50 20 26 20 42 | 4f 54 54 4f 4d 20 50 4f | TOP & B|OTTOM PO|
|000012e0| 49 4e 54 45 52 53 22 00 | 65 19 84 17 83 22 20 20 |INTERS".|e...." |
|000012f0| 20 20 22 00 ba 19 8e 17 | 83 22 20 20 20 20 20 36 | ".....|." 6|
|00001300| 35 34 31 38 20 24 46 46 | 38 41 20 36 34 37 38 39 |5418 $FF|8A 64789|
|00001310| 2f 24 46 44 31 35 20 28 | 52 45 53 54 4f 52 29 20 |/$FD15 (|RESTOR) |
|00001320| 3d 20 52 45 53 45 54 53 | 20 53 59 53 54 45 4d 20 |= RESETS| SYSTEM |
|00001330| 26 20 49 52 51 20 56 45 | 43 54 4f 52 53 2e 20 44 |& IRQ VE|CTORS. D|
|00001340| 49 53 41 42 4c 45 53 22 | 00 cf 19 98 17 83 22 20 |ISABLES"|......" |
|00001350| 20 20 20 46 41 53 54 4c | 4f 41 44 53 22 00 db 19 | FASTL|OADS"...|
|00001360| a2 17 83 22 20 20 20 20 | 22 00 2e 1a ac 17 83 22 |..." |"......"|
|00001370| 20 20 20 20 20 36 35 34 | 32 31 20 24 46 46 38 44 | 654|21 $FF8D|
|00001380| 20 36 34 37 39 34 2f 24 | 46 44 31 41 20 28 56 45 | 64794/$|FD1A (VE|
|00001390| 43 54 4f 52 29 20 3d 20 | 47 45 54 2f 53 45 54 20 |CTOR) = |GET/SET |
|000013a0| 53 59 53 54 45 4d 20 52 | 41 4d 20 56 45 43 54 4f |SYSTEM R|AM VECTO|
|000013b0| 52 53 2e 20 27 58 27 3d | 4c 42 2c 22 00 63 1a b6 |RS. 'X'=|LB,".c..|
|000013c0| 17 83 22 20 20 20 20 27 | 59 27 3d 48 42 20 4f 46 |.." '|Y'=HB OF|
|000013d0| 20 56 45 43 54 4f 52 2e | 20 53 45 43 3d 53 45 54 | VECTOR.| SEC=SET|
|000013e0| 2c 20 43 4c 43 3d 47 45 | 54 20 56 45 43 54 4f 52 |, CLC=GE|T VECTOR|
|000013f0| 22 00 6f 1a c0 17 83 22 | 20 20 20 20 22 00 c2 1a |".o...."| "...|
|00001400| ca 17 83 22 20 20 20 20 | 20 36 35 34 32 34 20 24 |..." | 65424 $|
|00001410| 46 46 39 30 20 36 35 30 | 34 38 2f 24 46 45 31 38 |FF90 650|48/$FE18|
|00001420| 20 28 53 45 54 4d 53 47 | 29 20 3d 20 43 4f 4e 54 | (SETMSG|) = CONT|
|00001430| 52 4f 4c 53 20 53 59 53 | 54 45 4d 20 4d 45 53 53 |ROLS SYS|TEM MESS|
|00001440| 41 47 45 53 2e 20 27 41 | 27 3d 4d 45 53 53 2e 22 |AGES. 'A|'=MESS."|
|00001450| 00 f3 1a d4 17 83 22 20 | 20 20 20 43 4f 44 45 2e |......" | CODE.|
|00001460| 20 42 49 54 20 36 3d 43 | 4f 4e 54 52 4f 4c 20 42 | BIT 6=C|ONTROL B|
|00001470| 49 54 20 37 3d 45 52 52 | 4f 52 20 43 4f 44 45 2e |IT 7=ERR|OR CODE.|
|00001480| 22 00 ff 1a de 17 83 22 | 20 20 20 20 22 00 4e 1b |"......"| ".N.|
|00001490| e8 17 83 22 20 20 20 20 | 20 36 35 34 32 37 20 24 |..." | 65427 $|
|000014a0| 46 46 39 33 20 36 30 38 | 35 37 2f 24 45 44 42 39 |FF93 608|57/$EDB9|
|000014b0| 20 28 53 45 43 4f 4e 44 | 29 20 3d 20 53 45 4e 44 | (SECOND|) = SEND|
|000014c0| 20 53 45 43 4f 4e 44 41 | 52 59 20 41 44 44 52 2e | SECONDA|RY ADDR.|
|000014d0| 20 46 4f 52 20 4c 49 53 | 54 45 4e 22 00 62 1b f2 | FOR LIS|TEN".b..|
|000014e0| 17 83 22 20 20 20 20 52 | 4f 55 54 49 4e 45 2e 22 |.." R|OUTINE."|
|000014f0| 00 6e 1b fc 17 83 22 20 | 20 20 20 22 00 b7 1b 06 |.n...." | "....|
|00001500| 18 83 22 20 20 20 20 20 | 27 41 27 3d 41 44 44 52 |.." |'A'=ADDR|
|00001510| 2e 20 41 44 44 52 45 53 | 53 20 4d 55 53 54 20 42 |. ADDRES|S MUST B|
|00001520| 45 20 4f 52 45 44 20 57 | 49 54 48 20 39 36 20 28 |E ORED W|ITH 96 (|
|00001530| 24 36 30 29 20 42 45 46 | 4f 52 45 20 43 41 4c 4c |$60) BEF|ORE CALL|
|00001540| 49 4e 47 2e 22 00 c3 1b | 10 18 83 22 20 20 20 20 |ING."...|..." |
|00001550| 22 00 17 1c 1a 18 83 22 | 20 20 20 20 20 36 35 34 |"......"| 654|
|00001560| 33 30 20 24 46 46 39 36 | 20 36 30 38 37 31 2f 24 |30 $FF96| 60871/$|
|00001570| 45 44 43 37 20 28 54 4b | 53 41 29 20 3d 20 53 45 |EDC7 (TK|SA) = SE|
|00001580| 4e 44 20 53 45 43 4f 4e | 44 41 52 59 20 41 44 44 |ND SECON|DARY ADD|
|00001590| 52 2e 20 46 4f 52 20 54 | 41 4c 4b 20 52 4f 55 54 |R. FOR T|ALK ROUT|
|000015a0| 49 4e 45 2e 22 00 23 1c | 24 18 83 22 20 20 20 20 |INE.".#.|$.." |
|000015b0| 22 00 6c 1c 2e 18 83 22 | 20 20 20 20 20 27 41 27 |".l...."| 'A'|
|000015c0| 3d 41 44 44 52 2e 20 41 | 44 44 52 45 53 53 20 4d |=ADDR. A|DDRESS M|
|000015d0| 55 53 54 20 42 45 20 4f | 52 45 44 20 57 49 54 48 |UST BE O|RED WITH|
|000015e0| 20 39 36 20 28 24 36 30 | 29 20 42 45 46 4f 52 45 | 96 ($60|) BEFORE|
|000015f0| 20 43 41 4c 4c 49 4e 47 | 2e 22 00 78 1c 38 18 83 | CALLING|.".x.8..|
|00001600| 22 20 20 20 20 22 00 cb | 1c 42 18 83 22 20 20 20 |" "..|.B.." |
|00001610| 20 20 36 35 34 33 33 20 | 24 46 46 39 39 20 36 35 | 65433 |$FF99 65|
|00001620| 30 36 31 2f 24 46 45 32 | 35 20 28 4d 45 4d 54 4f |061/$FE2|5 (MEMTO|
|00001630| 50 29 20 3d 20 47 45 54 | 2f 53 45 54 20 4d 45 4d |P) = GET|/SET MEM|
|00001640| 4f 52 59 20 54 4f 50 2e | 20 27 58 27 3d 4c 42 2c |ORY TOP.| 'X'=LB,|
|00001650| 20 27 59 27 3d 48 42 2c | 22 00 e6 1c 4c 18 83 22 | 'Y'=HB,|"...L.."|
|00001660| 20 20 20 20 53 45 43 3d | 47 45 54 20 43 4c 43 3d | SEC=|GET CLC=|
|00001670| 53 45 54 22 00 f2 1c 56 | 18 83 22 20 20 20 20 22 |SET"...V|.." "|
|00001680| 00 45 1d 60 18 83 22 20 | 20 20 20 20 36 35 34 33 |.E.`.." | 6543|
|00001690| 36 20 24 46 46 39 43 20 | 36 35 30 37 36 2f 24 46 |6 $FF9C |65076/$F|
|000016a0| 45 33 34 20 28 4d 45 4d | 42 4f 54 29 20 3d 20 47 |E34 (MEM|BOT) = G|
|000016b0| 45 54 2f 53 45 54 20 4d | 45 4d 4f 52 59 20 45 4e |ET/SET M|EMORY EN|
|000016c0| 44 2e 20 27 58 27 3d 4c | 42 2c 20 27 59 27 3d 48 |D. 'X'=L|B, 'Y'=H|
|000016d0| 42 2c 22 00 60 1d 6a 18 | 83 22 20 20 20 20 53 45 |B,".`.j.|." SE|
|000016e0| 43 3d 47 45 54 20 43 4c | 43 3d 53 45 54 22 00 68 |C=GET CL|C=SET".h|
|000016f0| 1d 74 18 83 22 22 00 99 | 1d 7e 18 83 22 20 20 20 |.t..""..|.~.." |
|00001700| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001710| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001720| 20 20 20 20 20 32 22 00 | a1 1d 88 18 83 22 22 00 | 2".|....."".|
|00001730| a9 1d 92 18 83 22 22 00 | b1 1d 9c 18 83 22 22 00 |....."".|....."".|
|00001740| b9 1d a6 18 83 22 22 00 | c1 1d b0 18 83 22 22 00 |....."".|....."".|
|00001750| c9 1d ba 18 83 22 22 00 | d5 1d c4 18 83 22 20 20 |....."".|....." |
|00001760| 20 20 22 00 2a 1e ce 18 | 83 22 20 20 20 20 20 36 | ".*...|." 6|
|00001770| 35 34 33 39 20 24 46 46 | 39 46 20 36 30 30 33 39 |5439 $FF|9F 60039|
|00001780| 2f 24 45 41 38 37 20 28 | 53 43 4e 4b 45 59 29 20 |/$EA87 (|SCNKEY) |
|00001790| 3d 20 53 43 41 4e 20 54 | 48 45 20 4b 45 59 42 4f |= SCAN T|HE KEYBO|
|000017a0| 41 52 44 2e 20 27 58 27 | 3d 41 53 43 49 49 2c 20 |ARD. 'X'|=ASCII, |
|000017b0| 27 59 27 3d 4b 45 59 22 | 00 3b 1e d8 18 83 22 20 |'Y'=KEY"|.;...." |
|000017c0| 20 20 20 43 4f 44 45 2e | 22 00 47 1e e2 18 83 22 | CODE.|".G...."|
|000017d0| 20 20 20 20 22 00 9b 1e | ec 18 83 22 20 20 20 20 | "...|..." |
|000017e0| 20 36 35 34 34 32 20 24 | 46 46 41 32 20 36 35 30 | 65442 $|FFA2 650|
|000017f0| 35 37 2f 24 46 45 32 31 | 20 28 53 45 54 54 4d 4f |57/$FE21| (SETTMO|
|00001800| 29 20 3d 20 53 45 54 20 | 49 45 45 45 20 42 55 53 |) = SET |IEEE BUS|
|00001810| 20 43 41 52 44 20 54 49 | 4d 45 20 4f 55 54 20 46 | CARD TI|ME OUT F|
|00001820| 4c 41 47 2e 20 53 45 54 | 22 00 d7 1e f6 18 83 22 |LAG. SET|"......"|
|00001830| 20 20 20 20 42 49 54 20 | 37 20 4f 46 20 27 41 27 | BIT |7 OF 'A'|
|00001840| 54 4f 20 53 45 54 2c 20 | 43 4c 45 41 52 20 42 49 |TO SET, |CLEAR BI|
|00001850| 54 20 37 20 4f 46 20 27 | 41 27 20 54 4f 20 52 45 |T 7 OF '|A' TO RE|
|00001860| 53 45 54 2e 22 00 e3 1e | 00 19 83 22 20 20 20 20 |SET."...|..." |
|00001870| 22 00 32 1f 0a 19 83 22 | 20 20 20 20 20 36 35 34 |".2...."| 654|
|00001880| 34 35 20 24 46 46 41 35 | 20 36 30 39 34 37 2f 24 |45 $FFA5| 60947/$|
|00001890| 45 45 31 33 20 28 41 43 | 50 54 52 29 20 3d 20 47 |EE13 (AC|PTR) = G|
|000018a0| 45 54 20 44 41 54 41 20 | 46 52 4f 4d 20 53 45 52 |ET DATA |FROM SER|
|000018b0| 49 41 4c 20 50 4f 52 54 | 2e 20 27 41 27 20 26 22 |IAL PORT|. 'A' &"|
|000018c0| 00 46 1f 14 19 83 22 20 | 20 20 20 27 58 27 3d 44 |.F...." | 'X'=D|
|000018d0| 41 54 41 22 00 52 1f 1e | 19 83 22 20 20 20 20 22 |ATA".R..|.." "|
|000018e0| 00 9e 1f 28 19 83 22 20 | 20 20 20 20 36 35 34 34 |...(.." | 6544|
|000018f0| 38 20 24 46 46 41 38 20 | 36 30 38 39 33 2f 24 45 |8 $FFA8 |60893/$E|
|00001900| 44 44 44 20 28 43 49 4f | 55 54 29 20 3d 20 53 45 |DDD (CIO|UT) = SE|
|00001910| 4e 44 20 41 20 42 59 54 | 45 20 4f 56 45 52 20 53 |ND A BYT|E OVER S|
|00001920| 45 52 49 41 4c 20 42 55 | 53 53 2e 22 00 b3 1f 32 |ERIAL BU|SS."...2|
|00001930| 19 83 22 20 20 20 20 27 | 41 27 3d 44 41 54 41 2e |.." '|A'=DATA.|
|00001940| 22 00 bf 1f 3c 19 83 22 | 20 20 20 20 22 00 0f 20 |"...<.."| ".. |
|00001950| 46 19 83 22 20 20 20 20 | 20 36 35 34 35 31 20 24 |F.." | 65451 $|
|00001960| 46 46 41 42 20 36 30 39 | 31 31 2f 24 45 44 45 46 |FFAB 609|11/$EDEF|
|00001970| 20 28 55 4e 54 41 4c 4b | 29 20 3d 20 53 54 4f 50 | (UNTALK|) = STOP|
|00001980| 20 53 45 4e 44 49 4e 47 | 20 44 41 54 41 20 54 4f | SENDING| DATA TO|
|00001990| 20 41 20 44 45 56 49 43 | 45 20 4f 4e 22 00 26 20 | A DEVIC|E ON".& |
|000019a0| 50 19 83 22 20 20 20 20 | 53 45 52 49 41 4c 20 42 |P.." |SERIAL B|
|000019b0| 55 53 53 22 00 32 20 5a | 19 83 22 20 20 20 20 22 |USS".2 Z|.." "|
|000019c0| 00 88 20 64 19 83 22 20 | 20 20 20 20 36 35 34 35 |.. d.." | 6545|
|000019d0| 34 20 24 46 46 41 45 20 | 36 30 39 32 36 2f 24 45 |4 $FFAE |60926/$E|
|000019e0| 44 46 45 20 28 55 4e 4c | 53 4e 29 20 3d 20 53 54 |DFE (UNL|SN) = ST|
|000019f0| 4f 50 20 47 45 54 54 49 | 4e 47 20 44 41 54 41 20 |OP GETTI|NG DATA |
|00001a00| 54 4f 20 41 20 44 45 56 | 49 43 45 20 4f 4e 20 53 |TO A DEV|ICE ON S|
|00001a10| 45 52 49 41 4c 22 00 97 | 20 6e 19 83 22 20 20 20 |ERIAL"..| n.." |
|00001a20| 20 42 55 53 22 00 a3 20 | 78 19 83 22 20 20 20 20 | BUS".. |x.." |
|00001a30| 22 00 f7 20 82 19 83 22 | 20 20 20 20 20 36 35 34 |".. ..."| 654|
|00001a40| 35 37 20 24 46 46 42 31 | 20 36 30 36 38 34 2f 24 |57 $FFB1| 60684/$|
|00001a50| 45 44 30 43 20 28 4c 49 | 53 54 45 4e 29 20 3d 20 |ED0C (LI|STEN) = |
|00001a60| 53 45 54 20 41 20 44 45 | 56 49 43 45 20 4f 4e 20 |SET A DE|VICE ON |
|00001a70| 53 45 52 49 41 4c 20 42 | 55 53 53 20 54 4f 20 52 |SERIAL B|USS TO R|
|00001a80| 45 41 44 2e 22 00 0a 21 | 8c 19 83 22 20 20 20 20 |EAD."..!|..." |
|00001a90| 27 41 27 3d 44 45 56 22 | 00 16 21 96 19 83 22 20 |'A'=DEV"|..!..." |
|00001aa0| 20 20 20 22 00 68 21 a0 | 19 83 22 20 20 20 20 20 | ".h!.|.." |
|00001ab0| 36 35 34 36 30 20 24 46 | 46 42 34 20 36 30 36 38 |65460 $F|FB4 6068|
|00001ac0| 31 2f 24 45 44 30 39 20 | 28 54 41 4c 4b 29 20 3d |1/$ED09 |(TALK) =|
|00001ad0| 20 53 45 54 20 41 20 44 | 45 56 49 43 45 20 4f 4e | SET A D|EVICE ON|
|00001ae0| 20 53 45 52 49 41 4c 20 | 42 55 53 53 20 54 4f 20 | SERIAL |BUSS TO |
|00001af0| 53 45 4e 44 2e 22 00 7b | 21 aa 19 83 22 20 20 20 |SEND.".{|!..." |
|00001b00| 20 27 41 27 3d 44 45 56 | 22 00 87 21 b4 19 83 22 | 'A'=DEV|"..!..."|
|00001b10| 20 20 20 20 22 00 dd 21 | be 19 83 22 20 20 20 20 | "..!|..." |
|00001b20| 20 36 35 34 36 33 20 24 | 46 46 42 37 20 36 35 30 | 65463 $|FFB7 650|
|00001b30| 33 31 2f 24 46 45 30 37 | 20 28 52 45 41 44 53 54 |31/$FE07| (READST|
|00001b40| 29 20 3d 20 52 45 41 44 | 20 53 54 20 42 59 54 45 |) = READ| ST BYTE|
|00001b50| 2e 20 27 41 27 20 41 4e | 44 20 31 34 34 28 24 39 |. 'A' AN|D 144($9|
|00001b60| 30 29 3d 20 53 54 41 54 | 55 53 22 00 ee 21 c8 19 |0)= STAT|US"..!..|
|00001b70| 83 22 20 20 20 20 43 4f | 44 45 2e 22 00 fa 21 d2 |." CO|DE."..!.|
|00001b80| 19 83 22 20 20 20 20 22 | 00 4d 22 dc 19 83 22 20 |.." "|.M"..." |
|00001b90| 20 20 20 20 36 35 34 36 | 36 20 24 46 46 42 41 20 | 6546|6 $FFBA |
|00001ba0| 36 35 30 32 34 2f 24 46 | 45 30 30 20 28 53 45 54 |65024/$F|E00 (SET|
|00001bb0| 4c 46 53 29 20 3d 20 53 | 45 54 20 4c 4f 47 49 43 |LFS) = S|ET LOGIC|
|00001bc0| 41 4c 20 46 49 4c 45 53 | 2e 20 27 41 27 3d 46 49 |AL FILES|. 'A'=FI|
|00001bd0| 4c 45 20 27 58 27 3d 44 | 45 56 22 00 60 22 e6 19 |LE 'X'=D|EV".`"..|
|00001be0| 83 22 20 20 20 20 27 59 | 27 3d 53 45 43 22 00 6c |." 'Y|'=SEC".l|
|00001bf0| 22 f0 19 83 22 20 20 20 | 20 22 00 be 22 fa 19 83 |"..." | ".."...|
|00001c00| 22 20 20 20 20 20 36 35 | 34 36 39 20 24 46 46 42 |" 65|469 $FFB|
|00001c10| 44 20 36 35 30 31 37 2f | 24 46 44 46 39 20 28 53 |D 65017/|$FDF9 (S|
|00001c20| 45 54 4e 41 4d 29 20 3d | 20 53 45 54 20 46 49 4c |ETNAM) =| SET FIL|
|00001c30| 45 20 4e 41 4d 45 2e 20 | 27 41 27 3d 4c 45 4e 47 |E NAME. |'A'=LENG|
|00001c40| 54 48 2c 20 27 58 27 3d | 4c 42 2c 22 00 d1 22 04 |TH, 'X'=|LB,"..".|
|00001c50| 1a 83 22 20 20 20 20 27 | 59 27 3d 48 42 2e 22 00 |.." '|Y'=HB.".|
|00001c60| dd 22 0e 1a 83 22 20 20 | 20 20 22 00 2d 23 18 1a |."..." | ".-#..|
|00001c70| 83 22 20 20 20 20 20 36 | 35 34 37 32 20 24 46 46 |." 6|5472 $FF|
|00001c80| 43 30 20 5b 37 39 34 2f | 24 30 33 31 41 5d 20 28 |C0 [794/|$031A] (|
|00001c90| 4f 50 45 4e 29 20 3d 20 | 4f 50 45 4e 20 41 20 46 |OPEN) = |OPEN A F|
|00001ca0| 49 4c 45 2e 20 31 38 34 | 3d 46 49 4c 45 2c 20 31 |ILE. 184|=FILE, 1|
|00001cb0| 38 35 3d 53 55 42 43 4d | 44 2c 22 00 41 23 22 1a |85=SUBCM|D,".A#".|
|00001cc0| 83 22 20 20 20 20 31 38 | 36 3d 44 45 56 23 22 00 |." 18|6=DEV#".|
|00001cd0| 4d 23 2c 1a 83 22 20 20 | 20 20 22 00 92 23 36 1a |M#,.." | "..#6.|
|00001ce0| 83 22 20 20 20 20 20 36 | 35 34 37 35 20 24 46 46 |." 6|5475 $FF|
|00001cf0| 43 33 20 5b 37 39 36 2f | 24 30 33 31 43 5d 20 28 |C3 [796/|$031C] (|
|00001d00| 43 4c 4f 53 45 29 20 3d | 20 43 4c 4f 53 45 20 41 |CLOSE) =| CLOSE A|
|00001d10| 20 46 49 4c 45 2e 20 27 | 41 27 3d 46 49 4c 45 22 | FILE. '|A'=FILE"|
|00001d20| 00 9e 23 40 1a 83 22 20 | 20 20 20 22 00 e8 23 4a |..#@.." | "..#J|
|00001d30| 1a 83 22 20 20 20 20 20 | 36 35 34 37 38 20 24 46 |.." |65478 $F|
|00001d40| 46 43 36 20 5b 37 39 38 | 2f 24 30 33 31 45 5d 20 |FC6 [798|/$031E] |
|00001d50| 28 43 48 4b 49 4e 29 20 | 3d 20 53 45 54 20 46 49 |(CHKIN) |= SET FI|
|00001d60| 4c 45 20 54 4f 20 52 45 | 41 44 2e 20 27 58 27 3d |LE TO RE|AD. 'X'=|
|00001d70| 46 49 4c 45 2e 22 00 f4 | 23 54 1a 83 22 20 20 20 |FILE."..|#T.." |
|00001d80| 20 22 00 3f 24 5e 1a 83 | 22 20 20 20 20 20 36 35 | ".?$^..|" 65|
|00001d90| 34 38 31 20 24 46 46 43 | 39 20 5b 38 30 30 2f 24 |481 $FFC|9 [800/$|
|00001da0| 30 33 32 30 5d 20 28 43 | 48 4b 4f 55 54 29 20 3d |0320] (C|HKOUT) =|
|00001db0| 20 53 45 54 20 46 49 4c | 45 20 54 4f 20 57 52 49 | SET FIL|E TO WRI|
|00001dc0| 54 45 2c 20 27 58 27 3d | 46 49 4c 45 22 00 4b 24 |TE, 'X'=|FILE".K$|
|00001dd0| 68 1a 83 22 20 20 20 20 | 22 00 8b 24 72 1a 83 22 |h.." |"..$r.."|
|00001de0| 20 20 20 20 20 36 35 34 | 38 34 20 24 46 46 43 43 | 654|84 $FFCC|
|00001df0| 20 5b 38 30 32 2f 24 30 | 33 32 32 5d 20 28 43 4c | [802/$0|322] (CL|
|00001e00| 52 43 48 4e 29 20 3d 20 | 43 4c 45 41 52 20 41 4c |RCHN) = |CLEAR AL|
|00001e10| 4c 20 46 49 4c 45 53 2e | 22 00 97 24 7c 1a 83 22 |L FILES.|"..$|.."|
|00001e20| 20 20 20 20 22 00 e9 24 | 86 1a 83 22 20 20 20 20 | "..$|..." |
|00001e30| 20 36 35 34 38 37 20 24 | 46 46 43 46 20 5b 38 30 | 65487 $|FFCF [80|
|00001e40| 34 2f 24 30 33 32 34 5d | 20 28 43 48 52 49 4e 29 |4/$0324]| (CHRIN)|
|00001e50| 20 3d 20 49 4e 50 55 54 | 20 52 4f 55 54 49 4e 45 | = INPUT| ROUTINE|
|00001e60| 2e 20 27 41 27 3d 41 53 | 43 49 49 20 43 48 41 52 |. 'A'=AS|CII CHAR|
|00001e70| 41 43 54 45 52 2e 22 00 | f5 24 90 1a 83 22 20 20 |ACTER.".|.$..." |
|00001e80| 20 20 22 00 4a 25 9a 1a | 83 22 20 20 20 20 20 36 | ".J%..|." 6|
|00001e90| 35 34 39 30 20 24 46 46 | 44 32 20 5b 38 30 36 2f |5490 $FF|D2 [806/|
|00001ea0| 24 30 33 32 36 5d 20 28 | 43 48 52 4f 55 54 29 20 |$0326] (|CHROUT) |
|00001eb0| 3d 20 50 52 49 4e 54 20 | 41 20 43 48 41 52 41 43 |= PRINT |A CHARAC|
|00001ec0| 54 45 52 2e 20 27 41 27 | 3d 43 48 41 52 41 43 54 |TER. 'A'|=CHARACT|
|00001ed0| 45 52 2f 42 59 54 45 22 | 00 56 25 a4 1a 83 22 20 |ER/BYTE"|.V%..." |
|00001ee0| 20 20 20 22 00 aa 25 ae | 1a 83 22 20 20 20 20 20 | "..%.|.." |
|00001ef0| 36 35 34 39 33 20 24 46 | 46 44 35 20 36 32 36 32 |65493 $F|FD5 6262|
|00001f00| 32 2f 24 46 34 39 45 20 | 28 4c 4f 41 44 29 20 3d |2/$F49E |(LOAD) =|
|00001f10| 20 4c 4f 41 44 20 4d 4c | 2e 20 27 41 27 3d 30 2d | LOAD ML|. 'A'=0-|
|00001f20| 4c 4f 41 44 2f 31 2d 56 | 45 52 49 46 59 20 27 58 |LOAD/1-V|ERIFY 'X|
|00001f30| 27 3d 4c 42 20 4f 46 22 | 00 d4 25 b8 1a 83 22 20 |'=LB OF"|..%..." |
|00001f40| 20 20 20 53 54 41 52 54 | 20 27 59 27 3d 48 42 20 | START| 'Y'=HB |
|00001f50| 4f 46 20 53 54 41 52 54 | 20 41 44 44 52 45 53 53 |OF START| ADDRESS|
|00001f60| 2e 22 00 e0 25 c2 1a 83 | 22 20 20 20 20 22 00 33 |."..%...|" ".3|
|00001f70| 26 cc 1a 83 22 20 20 20 | 20 20 36 35 34 39 36 20 |&..." | 65496 |
|00001f80| 24 46 46 44 38 20 36 32 | 39 34 31 2f 24 46 35 44 |$FFD8 62|941/$F5D|
|00001f90| 44 20 28 53 41 56 45 29 | 20 3d 20 53 41 56 45 20 |D (SAVE)| = SAVE |
|00001fa0| 4d 4c 2e 20 31 39 33 2d | 31 39 34 3d 53 54 41 52 |ML. 193-|194=STAR|
|00001fb0| 54 2c 20 27 58 27 20 26 | 20 27 59 27 3d 45 4e 44 |T, 'X' &| 'Y'=END|
|00001fc0| 22 00 79 26 d6 1a 83 22 | 20 20 20 20 27 41 27 3d |".y&..."| 'A'=|
|00001fd0| 31 39 33 20 4f 52 20 32 | 35 35 20 49 46 20 54 48 |193 OR 2|55 IF TH|
|00001fe0| 45 52 45 20 49 53 20 4e | 4f 20 53 45 43 4f 4e 44 |ERE IS N|O SECOND|
|00001ff0| 41 52 59 20 41 44 44 52 | 45 53 53 20 53 50 45 43 |ARY ADDR|ESS SPEC|
|00002000| 49 46 49 45 44 2e 22 00 | 85 26 e0 1a 83 22 20 20 |IFIED.".|.&..." |
|00002010| 20 20 22 00 d6 26 ea 1a | 83 22 20 20 20 20 20 36 | "..&..|." 6|
|00002020| 35 34 39 39 20 24 46 46 | 44 42 20 36 33 32 30 34 |5499 $FF|DB 63204|
|00002030| 2f 24 46 36 45 34 20 28 | 53 45 54 54 49 4d 29 20 |/$F6E4 (|SETTIM) |
|00002040| 3d 20 53 45 54 20 53 59 | 53 54 45 4d 20 43 4c 4f |= SET SY|STEM CLO|
|00002050| 43 4b 2e 20 27 41 27 3d | 48 42 2c 20 27 58 27 3d |CK. 'A'=|HB, 'X'=|
|00002060| 4d 42 2c 22 00 e8 26 f4 | 1a 83 22 20 20 20 20 27 |MB,"..&.|.." '|
|00002070| 59 27 3d 4c 42 22 00 f4 | 26 fe 1a 83 22 20 20 20 |Y'=LB"..|&..." |
|00002080| 20 22 00 fc 26 08 1b 83 | 22 22 00 2d 27 12 1b 83 | "..&...|"".-'...|
|00002090| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |" | |
|000020a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000020b0| 20 20 20 20 20 20 20 20 | 20 33 22 00 35 27 1c 1b | | 3".5'..|
|000020c0| 83 22 22 00 3d 27 26 1b | 83 22 22 00 45 27 30 1b |."".='&.|."".E'0.|
|000020d0| 83 22 22 00 4d 27 3a 1b | 83 22 22 00 55 27 44 1b |."".M':.|."".U'D.|
|000020e0| 83 22 22 00 5d 27 4e 1b | 83 22 22 00 ae 27 58 1b |."".]'N.|.""..'X.|
|000020f0| 83 22 20 20 20 20 20 36 | 35 35 30 32 20 24 46 46 |." 6|5502 $FF|
|00002100| 44 45 20 36 33 31 39 37 | 2f 24 46 36 44 44 20 28 |DE 63197|/$F6DD (|
|00002110| 52 44 54 49 4d 29 20 3d | 20 52 45 41 44 20 53 59 |RDTIM) =| READ SY|
|00002120| 53 54 45 4d 20 43 4c 4f | 43 4b 2e 20 27 41 27 3d |STEM CLO|CK. 'A'=|
|00002130| 48 42 2c 20 27 58 27 3d | 4d 42 2c 22 00 c0 27 62 |HB, 'X'=|MB,"..'b|
|00002140| 1b 83 22 20 20 20 20 27 | 59 27 3d 4c 42 22 00 cc |.." '|Y'=LB"..|
|00002150| 27 6c 1b 83 22 20 20 20 | 20 22 00 1c 28 76 1b 83 |'l.." | "..(v..|
|00002160| 22 20 20 20 20 20 36 35 | 35 30 35 20 24 46 46 45 |" 65|505 $FFE|
|00002170| 31 20 5b 38 30 38 2f 24 | 30 33 32 38 5d 20 28 53 |1 [808/$|0328] (S|
|00002180| 54 4f 50 29 20 3d 20 54 | 45 53 54 20 46 4f 52 20 |TOP) = T|EST FOR |
|00002190| 53 54 4f 50 20 4b 45 59 | 2e 20 27 41 27 3d 30 2c |STOP KEY|. 'A'=0,|
|000021a0| 20 31 39 37 3d 33 20 49 | 46 22 00 30 28 80 1b 83 | 197=3 I|F".0(...|
|000021b0| 22 20 20 20 20 50 52 45 | 53 53 45 44 2e 22 00 3c |" PRE|SSED.".<|
|000021c0| 28 8a 1b 83 22 20 20 20 | 20 22 00 87 28 94 1b 83 |(..." | "..(...|
|000021d0| 22 20 20 20 20 20 36 35 | 35 30 38 20 24 46 46 45 |" 65|508 $FFE|
|000021e0| 34 20 5b 38 31 30 2f 24 | 30 33 32 41 5d 20 28 47 |4 [810/$|032A] (G|
|000021f0| 45 54 49 4e 29 20 3d 20 | 47 45 54 20 52 4f 55 54 |ETIN) = |GET ROUT|
|00002200| 49 4e 45 2e 20 27 41 27 | 20 26 20 27 58 27 3d 41 |INE. 'A'| & 'X'=A|
|00002210| 53 43 49 49 22 00 9d 28 | 9e 1b 83 22 20 20 20 20 |SCII"..(|..." |
|00002220| 43 48 41 52 41 43 54 45 | 52 2e 22 00 a9 28 a8 1b |CHARACTE|R."..(..|
|00002230| 83 22 20 20 20 20 22 00 | f5 28 b2 1b 83 22 20 20 |." ".|.(..." |
|00002240| 20 20 20 36 35 35 31 31 | 20 24 46 46 45 37 20 5b | 65511| $FFE7 [|
|00002250| 38 31 32 2f 24 30 33 32 | 43 5d 20 28 43 4c 41 4c |812/$032|C] (CLAL|
|00002260| 4c 29 20 3d 20 43 4c 45 | 41 52 20 41 4c 4c 20 46 |L) = CLE|AR ALL F|
|00002270| 49 4c 45 53 2e 20 28 41 | 42 4f 52 54 20 49 2f 4f |ILES. (A|BORT I/O|
|00002280| 29 2e 22 00 01 29 bc 1b | 83 22 20 20 20 20 22 00 |)."..)..|." ".|
|00002290| 44 29 c6 1b 83 22 20 20 | 20 20 20 36 35 35 31 34 |D)..." | 65514|
|000022a0| 20 24 46 46 45 41 20 36 | 33 31 33 31 2f 24 46 36 | $FFEA 6|3131/$F6|
|000022b0| 39 42 20 28 55 44 54 49 | 4d 29 20 3d 20 55 50 44 |9B (UDTI|M) = UPD|
|000022c0| 41 54 45 20 53 59 53 54 | 45 4d 20 43 4c 4f 43 4b |ATE SYST|EM CLOCK|
|000022d0| 2e 22 00 50 29 d0 1b 83 | 22 20 20 20 20 22 00 9e |.".P)...|" "..|
|000022e0| 29 da 1b 83 22 20 20 20 | 20 20 36 35 35 31 37 20 |)..." | 65517 |
|000022f0| 24 46 46 45 44 20 35 38 | 36 32 39 2f 24 45 35 30 |$FFED 58|629/$E50|
|00002300| 35 20 28 53 43 52 45 45 | 4e 29 20 3d 20 52 45 54 |5 (SCREE|N) = RET|
|00002310| 55 52 4e 20 53 43 52 45 | 45 4e 20 46 4f 52 4d 41 |URN SCRE|EN FORMA|
|00002320| 54 2e 20 27 58 27 3d 43 | 4f 4c 2c 22 00 b2 29 e4 |T. 'X'=C|OL,"..).|
|00002330| 1b 83 22 20 20 20 20 27 | 59 27 3d 52 4f 57 2e 22 |.." '|Y'=ROW."|
|00002340| 00 be 29 ee 1b 83 22 20 | 20 20 20 22 00 0c 2a f8 |..)..." | "..*.|
|00002350| 1b 83 22 20 20 20 20 20 | 36 35 35 32 30 20 24 46 |.." |65520 $F|
|00002360| 46 46 30 20 35 38 36 33 | 34 2f 24 45 35 30 41 20 |FF0 5863|4/$E50A |
|00002370| 28 50 4c 4f 54 29 20 3d | 20 47 45 54 2f 53 45 54 |(PLOT) =| GET/SET|
|00002380| 20 43 52 53 52 20 4f 4e | 20 53 43 52 45 45 4e 2e | CRSR ON| SCREEN.|
|00002390| 20 27 58 27 3d 52 4f 57 | 2c 22 00 37 2a 02 1c 83 | 'X'=ROW|,".7*...|
|000023a0| 22 20 20 20 20 27 59 27 | 3d 43 4f 4c 2e 20 53 45 |" 'Y'|=COL. SE|
|000023b0| 43 3d 47 45 54 2c 20 43 | 4c 43 3d 53 45 54 20 43 |C=GET, C|LC=SET C|
|000023c0| 52 53 52 2e 22 00 43 2a | 0c 1c 83 22 20 20 20 20 |RSR.".C*|..." |
|000023d0| 22 00 99 2a 16 1c 83 22 | 20 20 20 20 20 36 35 35 |"..*..."| 655|
|000023e0| 32 33 20 24 46 46 46 33 | 20 35 38 36 32 34 2f 24 |23 $FFF3| 58624/$|
|000023f0| 45 35 30 30 20 28 49 4f | 42 41 53 45 29 20 3d 20 |E500 (IO|BASE) = |
|00002400| 47 45 54 20 41 44 44 52 | 45 53 53 45 53 20 4f 46 |GET ADDR|ESSES OF|
|00002410| 20 44 45 56 49 43 45 53 | 2e 20 55 53 45 44 20 54 | DEVICES|. USED T|
|00002420| 4f 20 4d 41 4b 45 22 00 | c2 2a 20 1c 83 22 20 20 |O MAKE".|.* .." |
|00002430| 20 20 44 49 46 46 45 52 | 45 4e 54 20 53 59 53 54 | DIFFER|ENT SYST|
|00002440| 45 4d 53 20 43 4f 4d 50 | 41 54 49 42 4c 45 2e 22 |EMS COMP|ATIBLE."|
|00002450| 00 ce 2a 2a 1c 83 22 20 | 20 20 20 22 00 db 2a 34 |..**.." | "..*4|
|00002460| 1c 83 22 20 20 20 20 20 | 22 00 e3 2a 3e 1c 83 22 |.." |"..*>.."|
|00002470| 22 00 eb 2a 48 1c 83 22 | 22 00 f3 2a 52 1c 83 22 |"..*H.."|"..*R.."|
|00002480| 22 00 fb 2a 5c 1c 83 22 | 22 00 03 2b 66 1c 83 22 |"..*\.."|"..+f.."|
|00002490| 22 00 0b 2b 70 1c 83 22 | 22 00 13 2b 7a 1c 83 22 |"..+p.."|"..+z.."|
|000024a0| 22 00 1b 2b 84 1c 83 22 | 22 00 23 2b 8e 1c 83 22 |"..+..."|".#+..."|
|000024b0| 22 00 2b 2b 98 1c 83 22 | 22 00 33 2b a2 1c 83 22 |".++..."|".3+..."|
|000024c0| 22 00 3b 2b ac 1c 83 22 | 22 00 43 2b b6 1c 83 22 |".;+..."|".C+..."|
|000024d0| 22 00 4b 2b c0 1c 83 22 | 22 00 53 2b ca 1c 83 22 |".K+..."|".S+..."|
|000024e0| 22 00 5b 2b d4 1c 83 22 | 22 00 63 2b de 1c 83 22 |".[+..."|".c+..."|
|000024f0| 22 00 6b 2b e8 1c 83 22 | 22 00 73 2b f2 1c 83 22 |".k+..."|".s+..."|
|00002500| 22 00 7b 2b fc 1c 83 22 | 22 00 83 2b 06 1d 83 22 |".{+..."|"..+..."|
|00002510| 22 00 8b 2b 10 1d 83 22 | 22 00 93 2b 1a 1d 83 22 |"..+..."|"..+..."|
|00002520| 22 00 9b 2b 24 1d 83 22 | 22 00 a3 2b 2e 1d 83 22 |"..+$.."|"..+..."|
|00002530| 22 00 ab 2b 38 1d 83 22 | 22 00 b3 2b 42 1d 83 22 |"..+8.."|"..+B.."|
|00002540| 22 00 bb 2b 4c 1d 83 22 | 22 00 c3 2b 56 1d 83 22 |"..+L.."|"..+V.."|
|00002550| 22 00 cb 2b 60 1d 83 22 | 22 00 d3 2b 6a 1d 83 22 |"..+`.."|"..+j.."|
|00002560| 22 00 db 2b 74 1d 83 22 | 22 00 e3 2b 7e 1d 83 22 |"..+t.."|"..+~.."|
|00002570| 22 00 eb 2b 88 1d 83 22 | 22 00 f3 2b 92 1d 83 22 |"..+..."|"..+..."|
|00002580| 22 00 fb 2b 9c 1d 83 22 | 22 00 2c 2c a6 1d 83 22 |"..+..."|".,,..."|
|00002590| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000025a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000025b0| 20 20 20 20 20 20 20 20 | 34 22 00 34 2c b0 1d 83 | |4".4,...|
|000025c0| 22 22 00 40 2c ba 1d 83 | 22 4d 4f 4a 4f 22 00 00 |"".@,...|"MOJO"..|
|000025d0| 00 00 | |.. | |
+--------+-------------------------+-------------------------+--------+--------+