DISASSEMBLER
FILE INFORMATION
FILENAME(S): DISASSEMBLER
FILE TYPE(S): PRG
FILE SIZE: 7.2K
FIRST SEEN: 2025-11-30 21:28:28
APPEARS ON: 1 disk(s)
FILE HASH
d7686f725db617e9bb5be0a66de8c566644233f9084a7064ceaa76c44dabf4ea
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISKETTE 1 | DISASSEMBLER | PRG | DuncanTwain | 6 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 5A 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..'.Z..*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 00 4D 08 5B 00 8F 2A 2A 20 |*******.M.[..** |
00000030: 41 4E 20 45 58 50 4C 41 49 4E 49 4E 47 20 44 49 |AN EXPLAINING DI|
00000040: 53 41 53 53 45 4D 42 4C 45 52 20 2A 2A 00 73 08 |SASSEMBLER **.s.|
00000050: 5C 00 8F 2A 20 20 20 20 20 20 20 20 20 20 20 20 |\..* |
00000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000070: 20 20 2A 00 99 08 5D 00 8F 2A 20 20 20 46 4F 52 | *...]..* FOR|
00000080: 20 54 48 45 20 43 20 36 34 20 43 4F 4D 50 55 54 | THE C 64 COMPUT|
00000090: 45 52 20 20 20 20 20 20 2A 00 BF 08 5E 00 8F 2A |ER *...^..*|
000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000000C0: E5 08 5F 00 8F 2A 42 41 53 45 44 20 4F 4E 20 41 |.._..*BASED ON A|
000000D0: 4E 20 50 55 42 20 44 4F 4D 41 49 4E 20 44 49 53 |N PUB DOMAIN DIS|
000000E0: 41 53 53 20 2A 00 0B 09 60 00 8F 2A 20 20 20 20 |ASS *...`..* |
000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000100: 20 20 20 20 20 20 20 20 20 20 2A 00 31 09 61 00 | *.1.a.|
00000110: 8F 2A 20 20 20 20 49 44 45 41 20 45 4E 20 43 4F |.* IDEA EN CO|
00000120: 50 59 52 49 47 48 54 53 20 20 20 20 20 20 20 20 |PYRIGHTS |
00000130: 2A 00 57 09 62 00 8F 2A 20 20 20 20 20 4A 4F 48 |*.W.b..* JOH|
00000140: 4E 20 48 4F 4C 4C 45 4E 42 45 52 47 20 20 20 20 |N HOLLENBERG |
00000150: 20 20 20 20 20 20 2A 00 7D 09 63 00 8F 2A 2A 2A | *.}.c..***|
00000160: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000170: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A9 09 |*************...|
00000180: 82 00 86 4F 24 28 31 36 29 2C 52 24 28 33 30 30 |...O$(16),R$(300|
00000190: 29 2C 41 24 28 31 35 29 2C 56 41 28 32 35 35 29 |),A$(15),VA(255)|
000001A0: 3A 52 24 28 30 29 B2 22 22 00 C3 09 8C 00 58 24 |:R$(0)."".....X$|
000001B0: B2 22 30 31 32 33 34 35 36 37 38 39 41 42 43 44 |."0123456789ABCD|
000001C0: 45 46 22 00 DA 09 96 00 4C 24 B2 22 32 32 32 33 |EF".....L$."2223|
000001D0: 32 32 33 33 33 32 31 31 32 22 00 E0 09 97 00 8C |223332112"......|
000001E0: 00 F6 09 9B 00 81 49 B2 30 A4 32 35 35 3A 87 52 |......I.0.255:.R|
000001F0: 24 28 49 29 3A 82 00 43 0A A0 00 4F 24 28 30 29 |$(I):..C...O$(0)|
00000200: B2 22 42 52 4B 3B 4F 52 41 30 3F 3F 3F 3B 3F 3F |."BRK;ORA0???;??|
00000210: 3F 3B 3F 3F 3F 3B 4F 52 41 31 41 53 4C 31 3F 3F |?;???;ORA1ASL1??|
00000220: 3F 3B 50 48 50 3B 4F 52 41 32 41 53 4C 3A 3F 3F |?;PHP;ORA2ASL:??|
00000230: 3F 3B 3F 3F 3F 3B 4F 52 41 33 41 53 4C 33 3F 3F |?;???;ORA3ASL3??|
00000240: 3F 3B 22 00 90 0A AA 00 4F 24 28 31 29 B2 22 42 |?;".....O$(1)."B|
00000250: 50 4C 3C 4F 52 41 34 3F 3F 3F 3B 3F 3F 3F 3B 3F |PL<ORA4???;???;?|
00000260: 3F 3F 3B 4F 52 41 35 41 53 4C 35 3F 3F 3F 3B 43 |??;ORA5ASL5???;C|
00000270: 4C 43 3B 4F 52 41 36 3F 3F 3F 3B 3F 3F 3F 3B 3F |LC;ORA6???;???;?|
00000280: 3F 3F 3B 4F 52 41 37 41 53 4C 37 3F 3F 3F 3B 22 |??;ORA7ASL7???;"|
00000290: 00 DD 0A B4 00 4F 24 28 32 29 B2 22 4A 53 52 33 |.....O$(2)."JSR3|
000002A0: 41 4E 44 30 3F 3F 3F 3B 3F 3F 3F 3B 42 49 54 31 |AND0???;???;BIT1|
000002B0: 41 4E 44 31 52 4F 4C 31 3F 3F 3F 3B 50 4C 50 3B |AND1ROL1???;PLP;|
000002C0: 41 4E 44 32 52 4F 4C 3A 3F 3F 3F 3B 42 49 54 33 |AND2ROL:???;BIT3|
000002D0: 41 4E 44 33 52 4F 4C 33 3F 3F 3F 3B 22 00 2A 0B |AND3ROL3???;".*.|
000002E0: BE 00 4F 24 28 33 29 B2 22 42 4D 49 3C 41 4E 44 |..O$(3)."BMI<AND|
000002F0: 34 3F 3F 3F 3B 3F 3F 3F 3B 3F 3F 3F 3B 41 4E 44 |4???;???;???;AND|
00000300: 35 52 4F 4C 35 3F 3F 3F 3B 53 45 43 3B 41 4E 44 |5ROL5???;SEC;AND|
00000310: 36 3F 3F 3F 3B 3F 3F 3F 3B 3F 3F 3F 3B 41 4E 44 |6???;???;???;AND|
00000320: 37 52 4F 4C 37 3F 3F 3F 3B 22 00 77 0B C8 00 4F |7ROL7???;".w...O|
00000330: 24 28 34 29 B2 22 52 54 49 3B 45 4F 52 30 3F 3F |$(4)."RTI;EOR0??|
00000340: 3F 3B 3F 3F 3F 3B 3F 3F 3F 3B 45 4F 52 31 4C 53 |?;???;???;EOR1LS|
00000350: 52 31 3F 3F 3F 3B 50 48 41 3B 45 4F 52 32 4C 53 |R1???;PHA;EOR2LS|
00000360: 52 3A 3F 3F 3F 3B 4A 4D 50 33 45 4F 52 33 4C 53 |R:???;JMP3EOR3LS|
00000370: 52 33 3F 3F 3F 3B 22 00 C4 0B D2 00 4F 24 28 35 |R3???;".....O$(5|
00000380: 29 B2 22 42 56 43 3C 45 4F 52 34 3F 3F 3F 3B 3F |)."BVC<EOR4???;?|
00000390: 3F 3F 3B 3F 3F 3F 3B 45 4F 52 35 4C 53 52 35 3F |??;???;EOR5LSR5?|
000003A0: 3F 3F 3B 43 4C 49 3B 45 4F 52 36 3F 3F 3F 3B 3F |??;CLI;EOR6???;?|
000003B0: 3F 3F 3B 3F 3F 3F 3B 45 4F 52 37 4C 53 52 37 3F |??;???;EOR7LSR7?|
000003C0: 3F 3F 3B 22 00 11 0C DC 00 4F 24 28 36 29 B2 22 |??;".....O$(6)."|
000003D0: 52 54 53 3B 41 44 43 30 3F 3F 3F 3B 3F 3F 3F 3B |RTS;ADC0???;???;|
000003E0: 3F 3F 3F 3B 41 44 43 31 52 4F 52 31 3F 3F 3F 3B |???;ADC1ROR1???;|
000003F0: 50 4C 41 3B 41 44 43 32 52 4F 52 3A 3F 3F 3F 3B |PLA;ADC2ROR:???;|
00000400: 4A 4D 50 38 41 44 43 33 52 4F 52 33 3F 3F 3F 3B |JMP8ADC3ROR3???;|
00000410: 22 00 5E 0C E6 00 4F 24 28 37 29 B2 22 42 56 53 |".^...O$(7)."BVS|
00000420: 3C 41 44 43 34 3F 3F 3F 3B 3F 3F 3F 3B 3F 3F 3F |<ADC4???;???;???|
00000430: 3B 41 44 43 35 52 4F 52 35 3F 3F 3F 3B 53 45 49 |;ADC5ROR5???;SEI|
00000440: 3B 41 44 43 36 3F 3F 3F 3B 3F 3F 3F 3B 3F 3F 3F |;ADC6???;???;???|
00000450: 3B 41 44 43 37 52 4F 52 37 3F 3F 3F 3B 22 00 AB |;ADC7ROR7???;"..|
00000460: 0C F0 00 4F 24 28 38 29 B2 22 3F 3F 3F 3B 53 54 |...O$(8)."???;ST|
00000470: 41 30 3F 3F 3F 3B 3F 3F 3F 3B 53 54 59 31 53 54 |A0???;???;STY1ST|
00000480: 41 31 53 54 58 31 3F 3F 3F 3B 44 45 59 3B 3F 3F |A1STX1???;DEY;??|
00000490: 3F 3B 54 58 41 3B 3F 3F 3F 3B 53 54 59 33 53 54 |?;TXA;???;STY3ST|
000004A0: 41 33 53 54 58 33 3F 3F 3F 3B 22 00 F8 0C FA 00 |A3STX3???;".....|
000004B0: 4F 24 28 39 29 B2 22 42 43 43 3C 53 54 41 34 3F |O$(9)."BCC<STA4?|
000004C0: 3F 3F 3B 3F 3F 3F 3B 53 54 59 35 53 54 41 35 53 |??;???;STY5STA5S|
000004D0: 54 58 39 3F 3F 3F 3B 54 59 41 3B 53 54 41 36 54 |TX9???;TYA;STA6T|
000004E0: 58 53 3B 3F 3F 3F 3B 3F 3F 3F 3B 53 54 41 37 3F |XS;???;???;STA7?|
000004F0: 3F 3F 3B 3F 3F 3F 3B 22 00 46 0D 04 01 4F 24 28 |??;???;".F...O$(|
00000500: 31 30 29 B2 22 4C 44 59 32 4C 44 41 30 4C 44 58 |10)."LDY2LDA0LDX|
00000510: 32 3F 3F 3F 3B 4C 44 59 31 4C 44 41 31 4C 44 58 |2???;LDY1LDA1LDX|
00000520: 31 3F 3F 3F 3B 54 41 59 3B 4C 44 41 32 54 41 58 |1???;TAY;LDA2TAX|
00000530: 3B 3F 3F 3F 3B 4C 44 59 33 4C 44 41 33 4C 44 58 |;???;LDY3LDA3LDX|
00000540: 33 3F 3F 3F 3B 22 00 94 0D 0E 01 4F 24 28 31 31 |3???;".....O$(11|
00000550: 29 B2 22 42 43 53 3C 4C 44 41 34 3F 3F 3F 3B 3F |)."BCS<LDA4???;?|
00000560: 3F 3F 3B 4C 44 59 35 4C 44 41 35 4C 44 58 39 3F |??;LDY5LDA5LDX9?|
00000570: 3F 3F 3B 43 4C 56 3B 4C 44 41 36 54 53 58 3B 3F |??;CLV;LDA6TSX;?|
00000580: 3F 3F 3B 4C 44 59 37 4C 44 41 37 4C 44 58 36 3F |??;LDY7LDA7LDX6?|
00000590: 3F 3F 3B 22 00 E2 0D 18 01 4F 24 28 31 32 29 B2 |??;".....O$(12).|
000005A0: 22 43 50 59 32 43 4D 50 30 3F 3F 3F 3B 3F 3F 3F |"CPY2CMP0???;???|
000005B0: 3B 43 50 59 31 43 4D 50 31 44 45 43 31 3F 3F 3F |;CPY1CMP1DEC1???|
000005C0: 3B 49 4E 59 3B 43 4D 50 32 44 45 58 3B 3F 3F 3F |;INY;CMP2DEX;???|
000005D0: 3B 43 50 59 33 43 4D 50 33 44 45 43 33 3F 3F 3F |;CPY3CMP3DEC3???|
000005E0: 3B 22 00 30 0E 22 01 4F 24 28 31 33 29 B2 22 42 |;".0.".O$(13)."B|
000005F0: 4E 45 3C 43 4D 50 34 3F 3F 3F 3B 3F 3F 3F 3B 3F |NE<CMP4???;???;?|
00000600: 3F 3F 3B 43 4D 50 35 44 45 43 35 3F 3F 3F 3B 43 |??;CMP5DEC5???;C|
00000610: 4C 44 3B 43 4D 50 36 3F 3F 3F 3B 3F 3F 3F 3B 3F |LD;CMP6???;???;?|
00000620: 3F 3F 3B 43 4D 50 37 44 45 43 37 3F 3F 3F 3B 22 |??;CMP7DEC7???;"|
00000630: 00 7E 0E 2C 01 4F 24 28 31 34 29 B2 22 43 50 58 |.~.,.O$(14)."CPX|
00000640: 32 53 42 43 30 3F 3F 3F 3B 3F 3F 3F 3B 43 50 58 |2SBC0???;???;CPX|
00000650: 31 53 42 43 31 49 4E 43 31 3F 3F 3F 3B 49 4E 58 |1SBC1INC1???;INX|
00000660: 3B 53 42 43 32 4E 4F 50 3B 3F 3F 3F 3B 43 50 58 |;SBC2NOP;???;CPX|
00000670: 33 53 42 43 33 49 4E 43 33 3F 3F 3F 3B 22 00 CC |3SBC3INC3???;"..|
00000680: 0E 36 01 4F 24 28 31 35 29 B2 22 42 45 51 3C 53 |.6.O$(15)."BEQ<S|
00000690: 42 43 34 3F 3F 3F 3B 3F 3F 3F 3B 3F 3F 3F 3B 53 |BC4???;???;???;S|
000006A0: 42 43 35 49 4E 43 35 3F 3F 3F 3B 53 45 44 3B 53 |BC5INC5???;SED;S|
000006B0: 42 43 36 3F 3F 3F 3B 3F 3F 3F 3B 3F 3F 3F 3B 53 |BC6???;???;???;S|
000006C0: 42 43 37 49 4E 43 37 3F 3F 3F 3B 22 00 02 0F 40 |BC7INC7???;"...@|
000006D0: 01 42 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 |.B$." |
000006E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006F0: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 89 33 | ":.3|
00000700: 34 30 00 2F 0F 4A 01 99 22 11 20 20 20 20 20 50 |40./.J..". P|
00000710: 52 45 53 53 20 12 53 92 50 41 43 45 20 54 4F 20 |RESS .S.PACE TO |
00000720: 43 4F 4E 54 49 4E 55 45 20 22 3A 8D 38 33 30 00 |CONTINUE ":.830.|
00000730: 48 0F 54 01 99 22 93 20 12 44 92 49 53 41 53 53 |H.T..". .D.ISASS|
00000740: 45 4D 42 4C 45 20 20 22 00 7C 0F 7C 01 99 42 24 |EMBLE ".|.|..B$|
00000750: 2C 42 24 3A 99 22 91 91 22 3B 3A 85 22 12 44 92 |,B$:."..";:.".D.|
00000760: 53 4D 42 4C 20 41 44 44 52 53 20 22 3B 41 24 3A |SMBL ADDRS ";A$:|
00000770: 4B B2 31 3A 8D 37 34 30 3A 53 B2 41 00 93 0F 86 |K.1:.740:S.A....|
00000780: 01 85 22 20 23 20 49 4E 53 54 52 55 43 53 20 22 |.." # INSTRUCS "|
00000790: 3B 4E 31 00 B1 0F 87 01 99 22 55 49 54 56 2E 20 |;N1......"UITV. |
000007A0: 4E 41 41 52 20 50 52 49 4E 54 45 52 20 4A 2F 4E |NAAR PRINTER J/N|
000007B0: 22 00 BA 0F 88 01 85 20 5A 24 00 CB 0F 89 01 8B |"...... Z$......|
000007C0: 20 5A 24 B2 22 4E 22 A7 34 30 30 00 DC 0F 8A 01 | Z$."N".400.....|
000007D0: 8B 5A 24 B2 22 4A 22 A7 20 38 35 30 00 F5 0F 8B |.Z$."J". 850....|
000007E0: 01 8B 5A 24 B3 B1 22 4A 22 B0 5A 24 B3 B1 22 4E |..Z$.."J".Z$.."N|
000007F0: 22 A7 33 39 31 00 0A 10 90 01 99 22 93 11 11 20 |".391......"... |
00000800: 20 22 3A 81 49 B2 31 A4 4E 31 00 17 10 95 01 81 | ":.I.1.N1......|
00000810: 20 49 B2 31 A4 4E 31 00 2B 10 9A 01 42 B2 B5 28 | I.1.N1.+...B..(|
00000820: 53 AD 32 35 36 29 3A 8D 37 30 30 00 45 10 A4 01 |S.256):.700.E...|
00000830: 42 B2 53 AB B5 28 53 AD 32 35 36 29 AC 32 35 36 |B.S..(S.256).256|
00000840: 3A 8D 37 30 30 00 4F 10 AE 01 99 22 20 22 3B 00 |:.700.O...." ";.|
00000850: 75 10 B8 01 4A B2 C2 28 53 29 3A 4B B2 B5 28 4A |u...J..(S):K..(J|
00000860: AD 31 36 29 3A 4C B2 4A AB 4B AC 31 36 AA 31 3A |.16):L.J.K.16.1:|
00000870: 8D 31 30 30 30 00 96 10 C2 01 4D B2 C6 28 CA 28 |.1000.....M..(.(|
00000880: 4F 24 28 4B 29 2C 4C AC 34 2C 31 29 29 AB C6 28 |O$(K),L.4,1))..(|
00000890: 22 30 22 29 AA 31 00 B0 10 CC 01 4E B2 C5 28 CA |"0").1.....N..(.|
000008A0: 28 4C 24 2C 4D 2C 31 29 29 3A 81 50 B2 31 A4 4E |(L$,M,1)):.P.1.N|
000008B0: 00 CA 10 D6 01 42 B2 C2 28 53 AA 50 AB 31 29 3A |.....B..(S.P.1):|
000008C0: 99 22 20 22 3B 3A 8D 37 30 30 00 D1 10 E0 01 82 |." ";:.700......|
000008D0: 50 00 F3 10 EA 01 99 A6 31 32 AB 4E AC 33 29 CA |P.......12.N.3).|
000008E0: 28 4F 24 28 4B 29 2C 4C AC 34 AB 33 2C 33 29 22 |(O$(K),L.4.3,3)"|
000008F0: 20 22 3B 00 00 11 F4 01 42 B2 C2 28 53 AA 31 29 | ";.....B..(S.1)|
00000900: 00 47 11 FE 01 91 4D 8D 35 32 30 2C 35 33 30 2C |.G....M.520,530,|
00000910: 35 34 30 2C 35 35 30 2C 35 36 30 2C 35 37 30 2C |540,550,560,570,|
00000920: 35 38 30 2C 35 39 30 2C 36 30 30 2C 36 31 30 2C |580,590,600,610,|
00000930: 36 32 30 2C 36 33 30 2C 36 34 30 3A 99 A3 32 30 |620,630,640:..20|
00000940: 29 3B 3A 89 36 38 30 00 60 11 08 02 99 22 28 22 |);:.680.`...."("|
00000950: 3B 3A 8D 37 30 30 3A 99 22 2C 58 29 22 3B 3A 8E |;:.700:.",X)";:.|
00000960: 00 6B 11 12 02 8D 37 30 30 3A 8E 00 7C 11 1C 02 |.k....700:..|...|
00000970: 99 22 23 22 3B 3A 8D 37 30 30 3A 8E 00 87 11 26 |."#";:.700:....&|
00000980: 02 8D 37 31 30 3A 8E 00 A0 11 30 02 99 22 28 22 |..710:....0.."("|
00000990: 3B 3A 8D 37 30 30 3A 99 22 29 2C 59 22 3B 3A 8E |;:.700:."),Y";:.|
000009A0: 00 B2 11 3A 02 8D 37 30 30 3A 99 22 2C 58 22 3B |...:..700:.",X";|
000009B0: 3A 8E 00 C4 11 44 02 8D 37 31 30 3A 99 22 2C 59 |:....D..710:.",Y|
000009C0: 22 3B 3A 8E 00 D6 11 4E 02 8D 37 31 30 3A 99 22 |";:....N..710:."|
000009D0: 2C 58 22 3B 3A 8E 00 ED 11 58 02 99 22 28 22 3B |,X";:....X.."(";|
000009E0: 3A 8D 37 31 30 3A 99 22 29 22 3B 3A 8E 00 FF 11 |:.710:.")";:....|
000009F0: 62 02 8D 37 30 30 3A 99 22 2C 59 22 3B 3A 8E 00 |b..700:.",Y";:..|
00000A00: 0B 12 6C 02 99 22 41 22 3B 3A 8E 00 14 12 76 02 |..l.."A";:....v.|
00000A10: 99 3B 3A 8E 00 33 12 80 02 8B 42 B1 31 32 37 A7 |.;:..3....B.127.|
00000A20: 42 B2 28 28 A8 42 29 AF 32 35 35 29 AA 31 3A 42 |B.((.B).255).1:B|
00000A30: B2 AB 42 00 3F 12 8A 02 54 B2 53 AA 32 AA 42 00 |..B.?...T.S.2.B.|
00000A40: 53 12 94 02 42 B2 B5 28 54 AD 32 35 36 29 3A 8D |S...B..(T.256):.|
00000A50: 37 30 30 00 6F 12 9E 02 42 B2 54 AB B5 28 54 AD |700.o...B.T..(T.|
00000A60: 32 35 36 29 AC 32 35 36 3A 8D 37 30 30 3A 8E 00 |256).256:.700:..|
00000A70: 8A 12 A8 02 8B C3 28 50 24 29 B1 30 A7 99 22 3B |......(P$).0..";|
00000A80: 22 50 24 3B 3A 50 24 B2 22 22 00 99 12 A9 02 99 |"P$;:P$.""......|
00000A90: 3A 53 B2 53 AA 4E 3A 82 49 00 AC 12 B2 02 8B 20 |:S.S.N:.I...... |
00000AA0: C2 28 31 35 34 29 B2 33 A7 33 33 30 00 BB 12 B4 |.(154).3.330....|
00000AB0: 02 98 34 3A A0 34 3A 89 33 33 30 00 EC 12 BC 02 |..4:.4:.330.....|
00000AC0: 99 CA 28 58 24 2C B5 28 42 AD 31 36 29 AA 31 2C |..(X$,.(B.16).1,|
00000AD0: 31 29 3B CA 28 58 24 2C 42 AB B5 28 42 AD 31 36 |1);.(X$,B..(B.16|
00000AE0: 29 AC 31 36 AA 31 2C 31 29 3B 3A 8E 00 FE 12 C6 |).16.1,1);:.....|
00000AF0: 02 42 B2 C2 28 53 AA 32 29 3A 8D 37 30 30 00 10 |.B..(S.2):.700..|
00000B00: 13 D0 02 42 B2 C2 28 53 AA 31 29 3A 8D 37 30 30 |...B..(S.1):.700|
00000B10: 00 16 13 DA 02 8E 00 30 13 E4 02 41 24 B2 C9 28 |.......0...A$..(|
00000B20: 22 30 30 30 30 22 AA 41 24 2C 34 29 3A 41 B2 30 |"0000".A$,4):A.0|
00000B30: 00 3C 13 EE 02 81 4A 31 B2 4B A4 34 00 4E 13 F8 |.<....J1.K.4.N..|
00000B40: 02 43 24 B2 CA 28 41 24 2C 4A 31 2C 31 29 00 75 |.C$..(A$,J1,1).u|
00000B50: 13 02 03 8B 43 24 B1 B2 22 41 22 AF 43 24 B3 B2 |....C$.."A".C$..|
00000B60: 22 46 22 A7 43 B2 C6 28 43 24 29 AB C6 28 22 41 |"F".C..(C$)..("A|
00000B70: 22 29 AA 31 30 00 99 13 0C 03 8B 43 24 B1 B2 22 |").10......C$.."|
00000B80: 30 22 AF 43 24 B3 B2 22 39 22 A7 43 B2 C6 28 43 |0".C$.."9".C..(C|
00000B90: 24 29 AB C6 28 22 30 22 29 00 A6 13 16 03 41 B2 |$)..("0").....A.|
00000BA0: 41 AC 31 36 AA 43 00 AE 13 20 03 82 4A 31 00 B4 |A.16.C... ..J1..|
00000BB0: 13 2A 03 8E 00 C7 13 3E 03 A1 41 24 3A 8B 41 24 |.*.....>..A$:.A$|
00000BC0: B2 22 22 A7 38 33 30 00 CD 13 48 03 8E 00 DF 13 |."".830...H.....|
00000BD0: 52 03 9F 34 2C 34 3A 9D 34 3A 89 20 34 30 35 00 |R..4,4:.4:. 405.|
00000BE0: F0 13 E8 03 8B 4A B2 31 30 31 A7 8D 32 30 30 30 |.....J.101..2000|
00000BF0: 00 00 14 EA 03 8B 4A B2 33 37 A7 8D 32 30 30 30 |......J.37..2000|
00000C00: 00 10 14 EC 03 8B 4A B2 30 36 A7 8D 32 30 30 30 |......J.06..2000|
00000C10: 00 20 14 EE 03 8B 4A B2 33 36 A7 8D 32 30 30 30 |. ....J.36..2000|
00000C20: 00 31 14 F0 03 8B 4A B2 31 39 37 A7 8D 32 30 30 |.1....J.197..200|
00000C30: 30 00 42 14 F2 03 8B 4A B2 32 32 38 A7 8D 32 30 |0.B....J.228..20|
00000C40: 30 30 00 53 14 F4 03 8B 4A B2 31 39 36 A7 8D 32 |00.S....J.196..2|
00000C50: 30 30 30 00 64 14 F6 03 8B 4A B2 31 39 38 A7 8D |000.d....J.198..|
00000C60: 32 30 30 30 00 74 14 F8 03 8B 4A B2 36 39 A7 8D |2000.t....J.69..|
00000C70: 32 30 30 30 00 85 14 FA 03 8B 4A B2 32 33 30 A7 |2000......J.230.|
00000C80: 8D 32 30 30 30 00 96 14 FC 03 8B 4A B2 31 36 35 |.2000......J.165|
00000C90: A7 8D 32 30 30 30 00 A7 14 FE 03 8B 4A B2 31 36 |..2000......J.16|
00000CA0: 36 A7 8D 32 30 30 30 00 B8 14 00 04 8B 4A B2 31 |6..2000......J.1|
00000CB0: 36 34 A7 8D 32 30 30 30 00 C8 14 02 04 8B 4A B2 |64..2000......J.|
00000CC0: 37 30 A7 8D 32 30 30 30 00 D8 14 04 04 8B 4A B2 |70..2000......J.|
00000CD0: 30 35 A7 8D 32 30 30 30 00 E8 14 06 04 8B 4A B2 |05..2000......J.|
00000CE0: 33 38 A7 8D 32 30 30 30 00 F9 14 08 04 8B 4A B2 |38..2000......J.|
00000CF0: 31 30 32 A7 8D 32 30 30 30 00 0A 15 0A 04 8B 4A |102..2000......J|
00000D00: B2 32 32 39 A7 8D 32 30 30 30 00 1B 15 0C 04 8B |.229..2000......|
00000D10: 4A B2 31 33 33 A7 8D 32 30 30 30 00 2C 15 0E 04 |J.133..2000.,...|
00000D20: 8B 4A B2 31 33 34 A7 8D 32 30 30 30 00 3D 15 10 |.J.134..2000.=..|
00000D30: 04 8B 4A B2 31 33 32 A7 8D 32 30 30 30 00 43 15 |..J.132..2000.C.|
00000D40: 1A 04 8E 00 59 15 D0 07 50 4F B2 28 53 AA 31 29 |....Y...PO.(S.1)|
00000D50: 3A 56 41 B2 C2 28 50 4F 29 00 67 15 DA 07 50 24 |:VA..(PO).g...P$|
00000D60: B2 52 24 28 56 41 29 00 6D 15 E4 07 8E 00 B4 15 |.R$(VA).m.......|
00000D70: B8 0B 83 36 35 31 30 20 44 44 52 2C 36 35 31 30 |...6510 DDR,6510|
00000D80: 20 49 2F 4F 2C 46 52 45 45 20 24 30 32 2C 56 45 | I/O,FREE $02,VE|
00000D90: 43 54 20 46 4C 4F 41 54 2F 49 4E 54 2E 4C 4F 57 |CT FLOAT/INT.LOW|
00000DA0: 2C 56 45 43 54 20 46 4C 4F 41 54 2F 49 4E 54 2E |,VECT FLOAT/INT.|
00000DB0: 48 49 47 48 00 F1 15 BB 0B 83 56 45 43 54 20 49 |HIGH......VECT I|
00000DC0: 4E 54 2F 46 4C 4F 41 54 20 4C 4F 57 2C 56 45 43 |NT/FLOAT LOW,VEC|
00000DD0: 54 20 49 4E 54 2F 46 4C 4F 41 54 20 48 49 47 48 |T INT/FLOAT HIGH|
00000DE0: 2C 53 45 41 52 43 48 20 43 48 41 52 41 43 54 45 |,SEARCH CHARACTE|
00000DF0: 52 00 26 16 BC 0B 83 46 4C 41 47 53 43 41 4E 20 |R.&....FLAGSCAN |
00000E00: 46 4F 52 20 45 4E 44 20 51 55 4F 54 45 2C 53 43 |FOR END QUOTE,SC|
00000E10: 52 45 45 4E 20 43 4F 4C 20 46 52 4F 4D 20 4C 41 |REEN COL FROM LA|
00000E20: 53 54 20 54 41 42 00 40 16 BE 0B 83 46 4C 41 47 |ST TAB.@....FLAG|
00000E30: 20 30 3D 4C 4F 41 44 20 31 3D 56 45 52 49 46 59 | 0=LOAD 1=VERIFY|
00000E40: 00 86 16 C2 0B 83 49 4E 50 55 54 20 42 55 46 46 |......INPUT BUFF|
00000E50: 45 52 20 50 4F 49 4E 54 45 52 2C 46 4C 41 47 20 |ER POINTER,FLAG |
00000E60: 44 45 46 2E 41 52 52 41 59 20 44 49 4D 2C 44 41 |DEF.ARRAY DIM,DA|
00000E70: 54 41 20 54 59 50 20 24 46 46 3D 53 54 52 20 24 |TA TYP $FF=STR $|
00000E80: 30 30 3D 4E 55 4D 00 C8 16 CC 0B 83 44 41 54 41 |00=NUM......DATA|
00000E90: 54 59 50 20 24 38 30 3D 49 4E 54 20 24 30 30 3D |TYP $80=INT $00=|
00000EA0: 46 4C 4F 41 54 2E 2C 46 4C 41 47 20 44 41 54 41 |FLOAT.,FLAG DATA|
00000EB0: 20 53 43 41 4E 2F 4C 49 53 54 20 51 55 4F 54 45 | SCAN/LIST QUOTE|
00000EC0: 20 47 41 52 2E 43 4F 4C 00 12 17 D6 0B 83 46 4C | GAR.COL......FL|
00000ED0: 41 47 20 53 55 42 53 43 52 49 50 54 20 52 45 46 |AG SUBSCRIPT REF|
00000EE0: 2C 46 4C 41 47 20 24 30 30 3D 49 4E 50 20 24 34 |,FLAG $00=INP $4|
00000EF0: 30 3D 47 45 54 20 24 39 38 3D 52 45 41 44 2C 46 |0=GET $98=READ,F|
00000F00: 4C 41 47 20 54 41 4E 2C 46 4C 41 47 20 49 4E 50 |LAG TAN,FLAG INP|
00000F10: 55 54 00 5A 17 E0 0B 83 54 45 4D 50 20 49 4E 54 |UT.Z....TEMP INT|
00000F20: 20 56 41 4C 31 2C 54 45 4D 50 20 49 4E 54 20 56 | VAL1,TEMP INT V|
00000F30: 41 4C 32 2C 54 45 4D 50 20 53 54 52 4E 47 20 53 |AL2,TEMP STRNG S|
00000F40: 54 41 43 4B 2C 4C 53 54 20 54 45 4D 50 20 53 54 |TACK,LST TEMP ST|
00000F50: 52 4E 47 20 41 44 20 4C 4F 57 00 74 17 EA 0B 83 |RNG AD LOW.t....|
00000F60: 4C 53 54 20 54 45 4D 50 20 53 54 52 4E 47 20 41 |LST TEMP STRNG A|
00000F70: 44 20 48 49 00 8C 17 EB 0B 83 53 54 41 43 4B 20 |D HI......STACK |
00000F80: 54 45 4D 50 20 53 54 52 49 4E 47 31 00 A4 17 EC |TEMP STRING1....|
00000F90: 0B 83 53 54 41 43 4B 20 54 45 4D 50 20 53 54 52 |..STACK TEMP STR|
00000FA0: 49 4E 47 32 00 BC 17 ED 0B 83 53 54 41 43 4B 20 |ING2......STACK |
00000FB0: 54 45 4D 50 20 53 54 52 49 4E 47 33 00 D4 17 EE |TEMP STRING3....|
00000FC0: 0B 83 53 54 41 43 4B 20 54 45 4D 50 20 53 54 52 |..STACK TEMP STR|
00000FD0: 49 4E 47 34 00 EC 17 EF 0B 83 53 54 41 43 4B 20 |ING4......STACK |
00000FE0: 54 45 4D 50 20 53 54 52 49 4E 47 35 00 04 18 F0 |TEMP STRING5....|
00000FF0: 0B 83 53 54 41 43 4B 20 54 45 4D 50 20 53 54 52 |..STACK TEMP STR|
00001000: 49 4E 47 36 00 1C 18 F1 0B 83 53 54 41 43 4B 20 |ING6......STACK |
00001010: 54 45 4D 50 20 53 54 52 49 4E 47 37 00 34 18 F2 |TEMP STRING7.4..|
00001020: 0B 83 53 54 41 43 4B 20 54 45 4D 50 20 53 54 52 |..STACK TEMP STR|
00001030: 49 4E 47 38 00 4C 18 F3 0B 83 53 54 41 43 4B 20 |ING8.L....STACK |
00001040: 54 45 4D 50 20 53 54 52 49 4E 47 39 00 67 18 F9 |TEMP STRING9.g..|
00001050: 0B 83 20 55 54 49 4C 49 54 59 20 50 4E 54 52 20 |.. UTILITY PNTR |
00001060: 41 52 45 41 20 23 31 00 82 18 FA 0B 83 20 55 54 |AREA #1...... UT|
00001070: 49 4C 49 54 59 20 50 4E 54 52 20 41 52 45 41 2E |ILITY PNTR AREA.|
00001080: 23 32 00 9D 18 FB 0B 83 20 55 54 49 4C 49 54 59 |#2...... UTILITY|
00001090: 20 50 4E 54 52 20 41 52 45 41 2E 23 33 00 B8 18 | PNTR AREA.#3...|
000010A0: FC 0B 83 20 55 54 49 4C 49 54 59 20 50 4E 54 52 |... UTILITY PNTR|
000010B0: 20 41 52 45 41 2E 23 34 00 D0 18 FE 0B 83 50 52 | AREA.#4......PR|
000010C0: 4F 44 2E 4F 46 46 4D 55 4C 2E 50 4C 59 20 23 31 |OD.OFFMUL.PLY #1|
000010D0: 00 E8 18 FF 0B 83 50 52 4F 44 2E 4F 46 46 4D 55 |......PROD.OFFMU|
000010E0: 4C 2E 50 4C 59 20 23 32 00 00 19 00 0C 83 50 52 |L.PLY #2......PR|
000010F0: 4F 44 2E 4F 46 46 4D 55 4C 2E 50 4C 59 20 23 33 |OD.OFFMUL.PLY #3|
00001100: 00 18 19 01 0C 83 50 52 4F 44 2E 4F 46 46 4D 55 |......PROD.OFFMU|
00001110: 4C 2E 50 4C 59 20 23 34 00 30 19 02 0C 83 50 52 |L.PLY #4.0....PR|
00001120: 4F 44 2E 4F 46 46 4D 55 4C 2E 50 4C 59 20 23 35 |OD.OFFMUL.PLY #5|
00001130: 00 7B 19 08 0C 83 53 54 41 52 54 20 4F 46 20 42 |.{....START OF B|
00001140: 41 53 49 43 20 4C 4F 57 2C 53 54 41 52 54 20 4F |ASIC LOW,START O|
00001150: 46 20 42 41 53 49 43 20 48 49 2C 53 54 41 52 54 |F BASIC HI,START|
00001160: 20 4F 46 20 56 41 52 20 4C 4F 57 2C 53 54 41 52 | OF VAR LOW,STAR|
00001170: 54 20 4F 46 20 56 41 52 20 48 49 00 C0 19 12 0C |T OF VAR HI.....|
00001180: 83 53 54 41 52 54 4F 46 20 41 52 52 20 4C 4F 57 |.STARTOF ARR LOW|
00001190: 2C 53 54 41 52 54 20 4F 46 20 41 52 52 20 48 49 |,START OF ARR HI|
000011A0: 2C 45 4E 44 20 4F 46 20 41 52 52 20 4C 4F 57 2C |,END OF ARR LOW,|
000011B0: 45 4E 44 20 4F 46 20 41 52 52 20 48 49 20 2B 31 |END OF ARR HI +1|
000011C0: 00 F6 19 1C 0C 83 42 4F 54 54 4F 4D 20 4F 46 20 |......BOTTOM OF |
000011D0: 53 54 52 4E 47 20 53 54 4F 52 20 4C 4F 57 2C 42 |STRNG STOR LOW,B|
000011E0: 4F 54 54 4F 4D 20 4F 46 20 53 54 52 4E 47 20 53 |OTTOM OF STRNG S|
000011F0: 54 4F 52 20 48 49 00 26 1A 26 0C 55 54 49 4C 49 |TOR HI.&.&.UTILI|
00001200: 54 59 20 53 54 52 4E 47 20 50 4E 54 52 20 4C 4F |TY STRNG PNTR LO|
00001210: 2C 55 54 49 4C 49 54 59 20 53 54 52 4E 47 20 50 |,UTILITY STRNG P|
00001220: 4E 54 52 20 48 49 00 5A 1A 2B 0C 83 55 54 49 4C |NTR HI.Z.+..UTIL|
00001230: 49 54 59 20 53 54 52 49 4E 47 20 50 4E 54 20 4C |ITY STRING PNT L|
00001240: 4F 57 2C 55 54 49 4C 49 54 59 20 53 54 52 49 4E |OW,UTILITY STRIN|
00001250: 47 20 50 4E 54 20 48 49 47 48 00 97 1A 30 0C 83 |G PNT HIGH...0..|
00001260: 20 4D 45 4D 54 4F 50 20 4C 4F 57 2C 4D 45 4D 54 | MEMTOP LOW,MEMT|
00001270: 4F 50 20 48 49 2C 43 55 52 52 20 42 53 43 20 4C |OP HI,CURR BSC L|
00001280: 49 4E 45 20 4C 4F 2C 43 55 52 52 20 42 53 43 20 |INE LO,CURR BSC |
00001290: 4C 49 4E 45 20 48 49 00 DF 1A 3A 0C 83 50 52 45 |LINE HI...:..PRE|
000012A0: 56 2E 42 53 43 20 4C 49 4E 45 20 4E 52 20 4C 4F |V.BSC LINE NR LO|
000012B0: 57 2C 50 52 45 56 2E 42 53 43 20 4C 49 4E 45 20 |W,PREV.BSC LINE |
000012C0: 4E 52 20 48 49 2C 43 4F 4E 54 2E 50 4E 54 52 20 |NR HI,CONT.PNTR |
000012D0: 4C 4F 2C 43 4F 4E 54 2E 50 4E 54 52 20 48 49 00 |LO,CONT.PNTR HI.|
000012E0: 26 1B 44 0C 83 43 55 52 52 2E 44 41 54 41 20 4C |&.D..CURR.DATA L|
000012F0: 49 4E 45 20 4E 52 20 4C 4F 2C 43 55 52 52 2E 44 |INE NR LO,CURR.D|
00001300: 41 54 41 20 4C 49 4E 45 20 4E 52 20 48 49 2C 44 |ATA LINE NR HI,D|
00001310: 41 54 41 20 41 44 52 20 4C 4F 2C 44 41 54 41 20 |ATA ADR LO,DATA |
00001320: 41 44 52 20 48 49 00 6D 1B 4E 0C 83 49 4E 50 55 |ADR HI.m.N..INPU|
00001330: 54 20 56 45 43 54 2E 4C 4F 2C 49 4E 50 55 54 20 |T VECT.LO,INPUT |
00001340: 56 45 43 54 2E 48 49 2C 43 55 52 20 42 53 43 20 |VECT.HI,CUR BSC |
00001350: 56 41 52 20 4E 41 4D 20 4C 4F 2C 43 55 52 20 42 |VAR NAM LO,CUR B|
00001360: 53 43 20 56 41 52 20 4E 41 4D 20 48 49 00 A5 1B |SC VAR NAM HI...|
00001370: 53 0C 83 50 4E 54 20 43 55 52 52 20 42 41 53 49 |S..PNT CURR BASI|
00001380: 43 20 56 41 52 20 44 41 54 41 20 4C 4F 57 2C 43 |C VAR DATA LOW,C|
00001390: 55 52 52 20 42 41 53 49 43 20 56 41 52 20 44 41 |URR BASIC VAR DA|
000013A0: 54 41 20 48 49 00 F3 1B 58 0C 83 46 4F 52 2F 4E |TA HI...X..FOR/N|
000013B0: 45 58 20 4C 4F 2C 46 4F 52 2F 4E 45 58 20 48 49 |EX LO,FOR/NEX HI|
000013C0: 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C |,,,,,,,,,,,,,,,,|
000013D0: 2C 2C 2C 2C 2C 2C 2C 46 50 20 41 43 43 23 31 2E |,,,,,,,FP ACC#1.|
000013E0: 45 58 50 4F 4E 2C 46 50 20 41 43 43 23 31 2E 4D |EXPON,FP ACC#1.M|
000013F0: 41 4E 54 00 07 1C 5A 0C 83 46 50 20 41 43 43 23 |ANT...Z..FP ACC#|
00001400: 31 2E 4D 41 4E 54 32 00 1B 1C 5B 0C 83 46 50 20 |1.MANT2...[..FP |
00001410: 41 43 43 23 31 2E 4D 41 4E 54 33 00 2F 1C 5C 0C |ACC#1.MANT3./.\.|
00001420: 83 46 50 20 41 43 43 23 31 2E 4D 41 4E 54 34 00 |.FP ACC#1.MANT4.|
00001430: 42 1C 5D 0C 83 46 50 20 41 43 43 23 31 2E 53 49 |B.]..FP ACC#1.SI|
00001440: 47 4E 00 61 1C 62 0C 83 53 45 52 49 45 53 20 45 |GN.a.b..SERIES E|
00001450: 56 41 4C 2E 50 4E 54 52 2C 41 43 43 23 31 20 48 |VAL.PNTR,ACC#1 H|
00001460: 49 00 73 1C 64 0C 83 20 41 43 43 23 32 2E 45 58 |I.s.d.. ACC#2.EX|
00001470: 50 4F 4E 00 84 1C 66 0C 83 41 43 43 23 32 2E 4D |PON...f..ACC#2.M|
00001480: 41 4E 54 31 00 95 1C 67 0C 83 41 43 43 23 32 2E |ANT1...g..ACC#2.|
00001490: 4D 41 4E 54 32 00 A6 1C 68 0C 83 41 43 43 23 32 |MANT2...h..ACC#2|
000014A0: 2E 4D 41 4E 54 33 00 C2 1C 69 0C 83 41 43 43 23 |.MANT3...i..ACC#|
000014B0: 32 2E 4D 41 4E 54 34 2C 41 43 43 23 32 2E 53 49 |2.MANT4,ACC#2.SI|
000014C0: 47 4E 00 D6 1C 6A 0C 83 41 43 43 23 32 20 56 53 |GN...j..ACC#2 VS|
000014D0: 20 41 43 43 23 31 00 E5 1C 6C 0C 83 41 43 43 23 | ACC#1...l..ACC#|
000014E0: 31 20 4C 4F 57 00 0D 1D 76 0C 83 43 41 53 53 2E |1 LOW...v..CASS.|
000014F0: 42 55 46 46 20 50 4E 54 20 4C 4F 57 2C 43 41 53 |BUFF PNT LOW,CAS|
00001500: 53 2E 42 55 46 46 20 50 4E 54 20 48 49 00 57 1D |S.BUFF PNT HI.W.|
00001510: 80 0C 83 43 48 41 52 47 45 54 20 45 4E 54 52 59 |...CHARGET ENTRY|
00001520: 2C 49 4E 20 43 48 41 52 47 45 54 2C 49 4E 20 43 |,IN CHARGET,IN C|
00001530: 48 41 52 47 45 54 2C 49 4E 20 43 48 41 52 47 45 |HARGET,IN CHARGE|
00001540: 54 2C 49 4E 20 43 48 41 52 47 45 54 2C 49 4E 20 |T,IN CHARGET,IN |
00001550: 43 48 41 52 47 45 54 00 A3 1D 8A 0C 83 49 4E 20 |CHARGET......IN |
00001560: 43 48 41 52 47 4F 54 2C 43 55 52 2E 42 59 54 45 |CHARGOT,CUR.BYTE|
00001570: 20 42 41 53 49 43 2C 43 55 52 20 42 59 54 45 50 | BASIC,CUR BYTEP|
00001580: 54 52 2C 49 4E 20 43 48 41 52 47 4F 54 2C 49 4E |TR,IN CHARGOT,IN|
00001590: 20 43 48 41 52 47 4F 54 2C 49 4E 20 43 48 41 52 | CHARGOT,IN CHAR|
000015A0: 47 4F 54 00 EB 1D 94 0C 83 20 49 4E 20 43 48 41 |GOT...... IN CHA|
000015B0: 52 47 4F 54 2C 49 4E 20 43 48 41 52 47 4F 54 2C |RGOT,IN CHARGOT,|
000015C0: 49 4E 20 43 48 41 52 47 4F 54 2C 49 4E 20 43 48 |IN CHARGOT,IN CH|
000015D0: 41 52 47 4F 54 2C 49 4E 20 43 48 41 52 47 4F 54 |ARGOT,IN CHARGOT|
000015E0: 2C 49 4E 20 43 48 41 52 47 4F 54 00 32 1E 9E 0C |,IN CHARGOT.2...|
000015F0: 83 20 49 4E 20 43 48 41 52 47 4F 54 2C 49 4E 43 |. IN CHARGOT,INC|
00001600: 48 41 52 47 4F 54 2C 49 4E 20 43 48 41 52 47 4F |HARGOT,IN CHARGO|
00001610: 54 2C 49 4E 20 43 48 41 52 47 4F 54 2C 49 4E 20 |T,IN CHARGOT,IN |
00001620: 43 48 41 52 47 4F 54 2C 49 4E 20 43 48 41 52 47 |CHARGOT,IN CHARG|
00001630: 4F 54 00 64 1E A3 0C 83 52 4E 44 20 53 45 45 44 |OT.d....RND SEED|
00001640: 20 56 41 4C 20 31 2C 52 4E 44 20 53 45 45 44 20 | VAL 1,RND SEED |
00001650: 56 41 4C 20 32 2C 52 4E 44 20 53 45 45 44 20 56 |VAL 2,RND SEED V|
00001660: 41 4C 20 33 00 A5 1E A8 0C 83 52 4E 44 20 53 45 |AL 3......RND SE|
00001670: 45 44 20 56 41 4C 20 34 2C 52 4E 44 20 53 45 45 |ED VAL 4,RND SEE|
00001680: 44 20 56 41 4C 20 35 2C 53 54 41 54 55 53 20 57 |D VAL 5,STATUS W|
00001690: 4F 52 44 2C 46 4C 41 47 20 53 54 4F 50 20 4B 45 |ORD,FLAG STOP KE|
000016A0: 59 2F 52 56 53 00 E5 1E B2 0C 83 20 54 49 4D 49 |Y/RVS...... TIMI|
000016B0: 4E 47 20 43 4F 4E 53 54 41 4E 54 45 20 54 41 50 |NG CONSTANTE TAP|
000016C0: 45 2C 4C 4F 41 44 3D 30 20 2F 56 45 52 49 46 59 |E,LOAD=0 /VERIFY|
000016D0: 3D 31 2C 53 45 52 49 41 4C 20 4F 55 54 50 55 54 |=1,SERIAL OUTPUT|
000016E0: 20 46 4C 41 47 00 31 1F BC 0C 83 20 53 45 52 49 | FLAG.1.... SERI|
000016F0: 41 4C 20 44 45 46 46 45 52 45 44 20 46 4C 41 47 |AL DEFFERED FLAG|
00001700: 2C 54 41 50 45 20 45 4F 54 2C 52 45 47 49 53 54 |,TAPE EOT,REGIST|
00001710: 45 52 20 53 41 56 45 2C 23 20 4F 50 45 4E 20 46 |ER SAVE,# OPEN F|
00001720: 49 4C 45 53 2C 49 4E 50 55 54 20 44 45 56 49 43 |ILES,INPUT DEVIC|
00001730: 45 00 77 1F C6 0C 83 4F 55 54 50 55 54 27 43 4D |E.w....OUTPUT'CM|
00001740: 44 27 56 41 4C 55 45 2C 54 41 50 45 20 43 48 41 |D'VALUE,TAPE CHA|
00001750: 52 20 50 41 52 49 54 59 2C 42 59 54 45 20 52 45 |R PARITY,BYTE RE|
00001760: 43 49 45 56 45 44 2C 44 49 52 45 43 54 3D 24 38 |CIEVED,DIRECT=$8|
00001770: 30 2F 52 55 4E 3D 30 00 C2 1F D0 0C 83 54 50 20 |0/RUN=0......TP |
00001780: 50 41 53 53 20 31 20 45 52 52 4F 52 2C 54 50 20 |PASS 1 ERROR,TP |
00001790: 50 41 53 53 20 32 20 45 52 52 4F 52 2C 4A 49 46 |PASS 2 ERROR,JIF|
000017A0: 46 59 20 43 4C 4F 43 4B 20 31 2C 4A 49 46 46 59 |FY CLOCK 1,JIFFY|
000017B0: 20 43 4C 4F 43 4B 20 32 2C 4A 49 46 46 20 43 4C | CLOCK 2,JIFF CL|
000017C0: 20 33 00 08 20 DA 0C 83 53 45 52 49 41 4C 20 42 | 3.. ...SERIAL B|
000017D0: 54 20 43 4E 54 2C 43 59 43 4C 45 20 43 4F 55 4E |T CNT,CYCLE COUN|
000017E0: 54 2C 43 41 53 53 2E 53 59 4E 43 20 43 4F 55 4E |T,CASS.SYNC COUN|
000017F0: 54 44 4F 57 4E 2C 50 4E 54 52 20 54 41 50 45 20 |TDOWN,PNTR TAPE |
00001800: 49 2F 4F 20 42 55 46 46 00 52 20 E4 0C 83 52 53 |I/O BUFF.R ...RS|
00001810: 20 32 33 32 20 49 4E 50 55 54 20 42 49 54 53 2C | 232 INPUT BITS,|
00001820: 52 53 20 32 33 32 20 49 4E 42 49 54 20 43 4F 55 |RS 232 INBIT COU|
00001830: 4E 54 2C 52 53 20 32 33 32 20 53 54 20 42 49 54 |NT,RS 232 ST BIT|
00001840: 2C 52 53 20 32 33 32 20 49 4E 50 55 54 20 42 59 |,RS 232 INPUT BY|
00001850: 54 45 00 9F 20 EE 0C 83 52 53 20 32 33 32 20 49 |TE.. ...RS 232 I|
00001860: 4E 50 55 54 20 50 41 52 49 54 59 2C 50 4E 54 52 |NPUT PARITY,PNTR|
00001870: 2E 54 50 20 42 55 46 46 45 52 2F 53 43 52 45 45 |.TP BUFFER/SCREE|
00001880: 4E 20 53 43 52 4F 4C 4C 20 4C 2C 50 4E 54 52 2F |N SCROLL L,PNTR/|
00001890: 54 50 20 42 46 2F 53 43 52 2F 53 43 52 4F 4C 00 |TP BF/SCR/SCROL.|
000018A0: EC 20 F8 0C 83 54 41 50 45 20 45 4E 44 20 41 44 |. ...TAPE END AD|
000018B0: 52 45 53 20 4C 2C 54 41 50 45 20 45 4E 44 20 41 |RES L,TAPE END A|
000018C0: 44 52 45 53 20 48 2C 54 41 50 45 20 54 49 4D 49 |DRES H,TAPE TIMI|
000018D0: 4E 47 20 43 4F 4E 53 54 31 2C 54 41 50 45 20 54 |NG CONST1,TAPE T|
000018E0: 49 4D 49 4E 47 20 43 4F 4E 53 54 32 00 2F 21 02 |IMING CONST2./!.|
000018F0: 0D 83 53 54 41 52 54 20 54 41 50 45 20 42 55 46 |..START TAPE BUF|
00001900: 46 2E 4C 2C 53 54 41 52 54 20 54 41 50 45 20 42 |F.L,START TAPE B|
00001910: 55 46 46 2E 48 2C 52 53 20 32 33 32 20 4F 55 54 |UFF.H,RS 232 OUT|
00001920: 42 54 2C 52 53 32 33 32 20 4E 58 54 20 42 54 00 |BT,RS232 NXT BT.|
00001930: 7C 21 0C 0D 83 52 45 41 44 20 43 48 41 52 20 45 ||!...READ CHAR E|
00001940: 52 52 4F 52 2F 4F 55 54 42 59 54 20 42 46 46 2C |RROR/OUTBYT BFF,|
00001950: 23 20 43 48 41 52 20 49 4E 20 46 49 4C 45 4E 41 |# CHAR IN FILENA|
00001960: 4D 45 2C 43 55 52 52 2E 4C 4F 47 49 43 41 4C 20 |ME,CURR.LOGICAL |
00001970: 46 49 4C 45 2C 53 45 43 20 41 44 52 00 BE 21 16 |FILE,SEC ADR..!.|
00001980: 0D 83 43 55 52 52 2E 44 45 56 49 43 45 2C 50 4E |..CURR.DEVICE,PN|
00001990: 54 20 46 49 4C 45 4E 41 4D 45 20 4C 4F 57 2C 50 |T FILENAME LOW,P|
000019A0: 4E 54 20 46 49 4C 45 4E 41 4D 45 20 48 49 2C 52 |NT FILENAME HI,R|
000019B0: 45 41 44 20 49 4E 50 55 54 20 43 48 41 52 00 00 |EAD INPUT CHAR..|
000019C0: 22 20 0D 83 42 4C 4F 43 4B 53 20 52 45 4D 41 49 |" ..BLOCKS REMAI|
000019D0: 4E 49 4E 47 20 54 4F 20 57 52 2F 52 44 2C 53 45 |NING TO WR/RD,SE|
000019E0: 52 49 41 4C 20 57 4F 52 44 20 42 55 46 46 45 52 |RIAL WORD BUFFER|
000019F0: 2C 54 41 50 45 20 4D 4F 54 4F 52 20 4C 4F 43 4B |,TAPE MOTOR LOCK|
00001A00: 00 45 22 2A 0D 83 49 2F 4F 20 53 54 41 52 54 20 |.E"*..I/O START |
00001A10: 4C 4F 57 2C 49 2F 4F 20 53 54 41 52 54 20 48 49 |LOW,I/O START HI|
00001A20: 47 48 2C 4B 45 52 4E 41 4C 20 53 45 54 55 50 20 |GH,KERNAL SETUP |
00001A30: 4C 4F 57 2C 4B 45 52 4E 41 4C 20 53 45 54 55 50 |LOW,KERNAL SETUP|
00001A40: 20 48 49 47 48 00 91 22 34 0D 83 4C 41 53 54 20 | HIGH.."4..LAST |
00001A50: 50 52 45 53 53 45 44 20 4B 45 59 2C 23 20 43 48 |PRESSED KEY,# CH|
00001A60: 41 52 20 49 4E 20 4B 45 59 42 52 44 20 42 55 46 |AR IN KEYBRD BUF|
00001A70: 46 45 52 2C 53 43 52 45 45 4E 20 52 45 56 20 46 |FER,SCREEN REV F|
00001A80: 4C 41 47 2C 45 4F 4C 20 49 4E 50 55 54 20 50 54 |LAG,EOL INPUT PT|
00001A90: 52 00 D8 22 3E 0D 83 49 4E 50 55 54 20 43 55 52 |R..">..INPUT CUR|
00001AA0: 53 4F 52 20 52 4F 57 2C 49 4E 50 55 54 20 43 55 |SOR ROW,INPUT CU|
00001AB0: 52 53 4F 52 20 43 4F 4C 4F 4D 2C 57 49 43 48 20 |RSOR COLOM,WICH |
00001AC0: 4B 45 59 20 36 34 3D 4E 4F 4E 45 2C 46 4C 41 53 |KEY 64=NONE,FLAS|
00001AD0: 48 20 43 55 52 53 4F 52 00 19 23 48 0D 83 43 55 |H CURSOR..#H..CU|
00001AE0: 52 53 4F 52 20 54 49 4D 49 4E 47 20 43 4F 55 4E |RSOR TIMING COUN|
00001AF0: 54 44 4F 57 4E 2C 43 48 41 52 20 55 4E 44 45 52 |TDOWN,CHAR UNDER|
00001B00: 20 43 55 52 53 4F 52 2C 43 55 52 53 4F 52 20 42 | CURSOR,CURSOR B|
00001B10: 4C 49 4E 4B 50 48 41 53 45 00 5B 23 52 0D 83 49 |LINKPHASE.[#R..I|
00001B20: 4E 50 55 54 20 4F 52 20 47 45 54 20 46 52 4F 4D |NPUT OR GET FROM|
00001B30: 20 4B 45 59 42 52 44 2C 50 4E 54 20 54 4F 20 53 | KEYBRD,PNT TO S|
00001B40: 43 52 45 45 4E 4C 4E 20 4C 2C 50 4E 54 20 54 4F |CREENLN L,PNT TO|
00001B50: 20 53 43 52 45 45 4E 4C 20 48 49 00 9A 23 5C 0D | SCREENL HI..#\.|
00001B60: 83 50 4F 53 49 54 49 4F 4E 20 43 55 52 53 2E 49 |.POSITION CURS.I|
00001B70: 4E 20 53 43 52 45 45 4E 4C 4E 2C 30 3D 44 49 52 |N SCREENLN,0=DIR|
00001B80: 45 43 54 20 43 55 52 53 4F 52 20 45 4C 53 45 20 |ECT CURSOR ELSE |
00001B90: 50 52 4F 47 52 41 4D 4D 45 44 00 DB 23 66 0D 83 |PROGRAMMED..#f..|
00001BA0: 4C 45 4E 47 54 48 20 53 43 52 45 45 4E 4C 49 4E |LENGTH SCREENLIN|
00001BB0: 45 2C 43 55 52 52 45 4E 54 20 52 4F 57 20 4E 55 |E,CURRENT ROW NU|
00001BC0: 4D 42 45 52 2C 54 45 4D 50 20 44 41 54 41 2C 23 |MBER,TEMP DATA,#|
00001BD0: 20 4F 46 20 49 4E 53 45 52 54 53 00 23 24 70 0D | OF INSERTS.#$p.|
00001BE0: 83 53 43 52 45 45 4E 20 4C 49 4E 45 20 4C 49 4E |.SCREEN LINE LIN|
00001BF0: 4B 20 54 41 42 45 4C 2C 2C 2C 2C 2C 2C 2C 2C 2C |K TABEL,,,,,,,,,|
00001C00: 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C 2C |,,,,,,,,,,,,,,,,|
00001C10: 2C 53 43 52 45 45 4E 20 43 4F 4C 20 50 4E 54 20 |,SCREEN COL PNT |
00001C20: 4C 4F 57 00 70 24 7A 0D 83 53 43 52 45 45 4E 20 |LOW.p$z..SCREEN |
00001C30: 43 4F 4C 20 50 4E 54 20 48 49 2C 4B 45 59 42 52 |COL PNT HI,KEYBR|
00001C40: 44 20 42 55 46 46 20 4C 4F 57 2C 4B 45 59 20 42 |D BUFF LOW,KEY B|
00001C50: 52 44 20 42 55 46 46 20 48 49 2C 52 53 32 33 32 |RD BUFF HI,RS232|
00001C60: 20 52 43 56 4C 2C 52 53 32 33 32 20 52 43 56 48 | RCVL,RS232 RCVH|
00001C70: 00 8B 24 7F 0D 83 52 53 32 33 32 20 54 58 20 4C |..$...RS232 TX L|
00001C80: 2C 52 53 32 33 32 20 54 58 20 48 00 B4 24 84 0D |,RS232 TX H..$..|
00001C90: 83 20 46 52 45 45 20 31 2C 46 52 45 45 20 32 2C |. FREE 1,FREE 2,|
00001CA0: 46 52 45 45 20 33 2C 46 52 45 45 20 34 2C 46 52 |FREE 3,FREE 4,FR|
00001CB0: 45 45 20 35 00 00 00 |EE 5... |
..'.Z..********************************.
M.[..** AN EXPLAINING DISASSEMBLER **.S.
\..* *...].
.* FOR THE C 64 COMPUTER *...^..*
*******************************..._..*BA
SED ON AN PUB DOMAIN DISASS *...`..*
*.1.A..* ID
EA EN COPYRIGHTS *.W.B..* JOH
N HOLLENBERG *.}.C..***********
*********************......O$(16),R$(300
),A$(15),VA(255):R$(0)."".C...X$."012345
6789ABCDEF".Z...L$."2223223332112"......
......I.0.255:.R$(I):..C. .O$(0)."BRK;OR
A0???;???;???;ORA1ASL1???;PHP;ORA2ASL:??
?;???;ORA3ASL3???;".....O$(1)."BPL<ORA4?
??;???;???;ORA5ASL5???;CLC;ORA6???;???;?
??;ORA7ASL7???;".....O$(2)."JSR3AND0???;
???;BIT1AND1ROL1???;PLP;AND2ROL:???;BIT3
AND3ROL3???;".*...O$(3)."BMI<AND4???;???
;???;AND5ROL5???;SEC;AND6???;???;???;AND
7ROL7???;".W.H.O$(4)."RTI;EOR0???;???;??
?;EOR1LSR1???;PHA;EOR2LSR:???;JMP3EOR3LS
R3???;".D.R.O$(5)."BVC<EOR4???;???;???;E
OR5LSR5???;CLI;EOR6???;???;???;EOR7LSR7?
??;".....O$(6)."RTS;ADC0???;???;???;ADC1
ROR1???;PLA;ADC2ROR:???;JMP8ADC3ROR3???;
".^...O$(7)."BVS<ADC4???;???;???;ADC5ROR
5???;SEI;ADC6???;???;???;ADC7ROR7???;"..
...O$(8)."???;STA0???;???;STY1STA1STX1??
?;DEY;???;TXA;???;STY3STA3STX3???;".....
O$(9)."BCC<STA4???;???;STY5STA5STX9???;T
YA;STA6TXS;???;???;STA7???;???;".F...O$(
10)."LDY2LDA0LDX2???;LDY1LDA1LDX1???;TAY
;LDA2TAX;???;LDY3LDA3LDX3???;".....O$(11
)."BCS<LDA4???;???;LDY5LDA5LDX9???;CLV;L
DA6TSX;???;LDY7LDA7LDX6???;".....O$(12).
"CPY2CMP0???;???;CPY1CMP1DEC1???;INY;CMP
2DEX;???;CPY3CMP3DEC3???;".0.".O$(13)."B
NE<CMP4???;???;???;CMP5DEC5???;CLD;CMP6?
??;???;???;CMP7DEC7???;".~.,.O$(14)."CPX
2SBC0???;???;CPX1SBC1INC1???;INX;SBC2NOP
;???;CPX3SBC3INC3???;".L.6.O$(15)."BEQ<S
BC4???;???;???;SBC5INC5???;SED;SBC6???;?
??;???;SBC7INC7???;"...@.B$."
":.340./.J..
". PRESS .S.PACE TO CONTINUE ":.830.
H.T..". .D.ISASSEMBLE ".|.|..B$,B$:."..
";:.".D.SMBL ADDRS ";A$:K.1:.740:S.A....
.." # INSTRUCS ";N1......"UITV. NAAR PRI
NTER J/N"...... Z$.K.... Z$."N".400.....
.Z$."J". 850......Z$.."J".Z$.."N".391...
..."... ":.I.1.N1...... I.1.N1.+...B..(
S.256):.700.E...B.S..(S.256).256:.700.O.
..." ";.U...J.B(S):K..(J.16):L.J.K.16.1:
.1000...B.M.F(J(O$(K),L.4,1)).F("0").1..
.L.N.E(J(L$,M,1)):.P.1.N.J.V.B.B(S.P.1):
." ";:.700.Q....P.......12.N.3)J(O$(K),L
.4.3,3)" ";.....B.B(S.1).G....M.520,530,
540,550,560,570,580,590,600,610,620,630,
640:..20);:.680.`...."(";:.700:.",X)";:.
.K....700:..|...."#";:.700:....&..710:..
.0.."(";:.700:."),Y";:....:..700:.",X";
:..D.D..710:.",Y";:..V.N..710:.",X";:...
.X.."(";:.710:.")";:....B..700:.",Y";:..
..L.."A";:....V..;:..3....B.127.B.((.B).
255).1:B..B.?...T.S.2.B.S...B..(T.256):.
700.O...B.T..(T.256).256:.700:.......C(P
$).0..";"P$;:P$.""......:S.S.N:.I......
B(154).3.330......4: 4:.330......J(X$,.(
B.16).1,1);J(X$,B..(B.16).16.1,1);:....F
.B.B(S.2):.700...P.B.B(S.1):.700...Z...0
...A$.I("0000".A$,4):A.0.<....J1.K.4.N..
.C$.J(A$,J1,1).U....C$.."A".C$.."F".C.F(
C$).F("A").10......C$.."0".C$.."9".C.F(C
$).F("0").....A.A.16.C... ..J1...*...G.>
..A$:.A$."".830.M.H.....R..4,4:.4:. 405.
.....J.101..2000......J.37..2000......J.
06..2000. ....J.36..2000.1....J.197..200
0.B....J.228..2000.S....J.196..2000.D...
.J.198..2000.T....J.69..2000......J.230.
.2000......J.165..2000......J.166..2000.
.....J.164..2000.H....J.70..2000.X....J.
05..2000......J.38..2000......J.102..200
0......J.229..2000......J.133..2000.,...
.J.134..2000.=....J.132..2000.C.....Y.P.
PO.(S.1):VA.B(PO).G.Z.P$.R$(VA).M.......
...6510 DDR,6510 I/O,FREE $02,VECT FLOAT
/INT.LOW,VECT FLOAT/INT.HIGH......VECT I
NT/FLOAT LOW,VECT INT/FLOAT HIGH,SEARCH
CHARACTER.&....FLAGSCAN FOR END QUOTE,SC
REEN COL FROM LAST TAB.@....FLAG 0=LOAD
1=VERIFY...B..INPUT BUFFER POINTER,FLAG
DEF.ARRAY DIM,DATA TYP $FF=STR $00=NUM.H
.L..DATATYP $80=INT $00=FLOAT.,FLAG DATA
SCAN/LIST QUOTE GAR.COL...V..FLAG SUBSC
RIPT REF,FLAG $00=INP $40=GET $98=READ,F
LAG TAN,FLAG INPUT.Z....TEMP INT VAL1,TE
MP INT VAL2,TEMP STRNG STACK,LST TEMP ST
RNG AD LOW.T....LST TEMP STRNG AD HI....
..STACK TEMP STRING1......STACK TEMP STR
ING2......STACK TEMP STRING3.T....STACK
TEMP STRING4......STACK TEMP STRING5....
..STACK TEMP STRING6......STACK TEMP STR
ING7.4....STACK TEMP STRING8.L....STACK
TEMP STRING9.G.... UTILITY PNTR AREA #1.
..... UTILITY PNTR AREA.#2...... UTILITY
PNTR AREA.#3...... UTILITY PNTR AREA.#4
.P....PROD.OFFMUL.PLY #1......PROD.OFFMU
L.PLY #2......PROD.OFFMUL.PLY #3......PR
OD.OFFMUL.PLY #4.0....PROD.OFFMUL.PLY #5
.{....START OF BASIC LOW,START OF BASIC
HI,START OF VAR LOW,START OF VAR HI.....
.STARTOF ARR LOW,START OF ARR HI,END OF
ARR LOW,END OF ARR HI +1......BOTTOM OF
STRNG STOR LOW,BOTTOM OF STRNG STOR HI.&
.&.UTILITY STRNG PNTR LO,UTILITY STRNG P
NTR HI.Z.+..UTILITY STRING PNT LOW,UTILI
TY STRING PNT HIGH...0.. MEMTOP LOW,MEMT
OP HI,CURR BSC LINE LO,CURR BSC LINE HI.
..:..PREV.BSC LINE NR LOW,PREV.BSC LINE
NR HI,CONT.PNTR LO,CONT.PNTR HI.&.D..CUR
R.DATA LINE NR LO,CURR.DATA LINE NR HI,D
ATA ADR LO,DATA ADR HI.M.N..INPUT VECT.L
O,INPUT VECT.HI,CUR BSC VAR NAM LO,CUR B
SC VAR NAM HI...S..PNT CURR BASIC VAR DA
TA LOW,CURR BASIC VAR DATA HI...X..FOR/N
EX LO,FOR/NEX HI,,,,,,,,,,,,,,,,,,,,,,,F
P ACC#1.EXPON,FP ACC#1.MANT...Z..FP ACC#
1.MANT2...[..FP ACC#1.MANT3./.\..FP ACC#
1.MANT4.B.]..FP ACC#1.SIGN.A.B..SERIES E
VAL.PNTR,ACC#1 HI.S.D.. ACC#2.EXPON...F.
.ACC#2.MANT1...G..ACC#2.MANT2...H..ACC#2
.MANT3.B.I..ACC#2.MANT4,ACC#2.SIGN.V.J..
ACC#2 VS ACC#1...L..ACC#1 LOW...V..CASS.
BUFF PNT LOW,CASS.BUFF PNT HI.W....CHARG
ET ENTRY,IN CHARGET,IN CHARGET,IN CHARGE
T,IN CHARGET,IN CHARGET......IN CHARGOT,
CUR.BYTE BASIC,CUR BYTEPTR,IN CHARGOT,IN
CHARGOT,IN CHARGOT...... IN CHARGOT,IN
CHARGOT,IN CHARGOT,IN CHARGOT,IN CHARGOT
,IN CHARGOT.2.... IN CHARGOT,INCHARGOT,I
N CHARGOT,IN CHARGOT,IN CHARGOT,IN CHARG
OT.D....RND SEED VAL 1,RND SEED VAL 2,RN
D SEED VAL 3......RND SEED VAL 4,RND SEE
D VAL 5,STATUS WORD,FLAG STOP KEY/RVS...
... TIMING CONSTANTE TAPE,LOAD=0 /VERIFY
=1,SERIAL OUTPUT FLAG.1.... SERIAL DEFFE
RED FLAG,TAPE EOT,REGISTER SAVE,# OPEN F
ILES,INPUT DEVICE.W.F..OUTPUT'CMD'VALUE,
TAPE CHAR PARITY,BYTE RECIEVED,DIRECT=$8
0/RUN=0.B.P..TP PASS 1 ERROR,TP PASS 2 E
RROR,JIFFY CLOCK 1,JIFFY CLOCK 2,JIFF CL
3.. Z..SERIAL BT CNT,CYCLE COUNT,CASS.S
YNC COUNTDOWN,PNTR TAPE I/O BUFF.R ...RS
232 INPUT BITS,RS 232 INBIT COUNT,RS 23
2 ST BIT,RS 232 INPUT BYTE.. ...RS 232 I
NPUT PARITY,PNTR.TP BUFFER/SCREEN SCROLL
L,PNTR/TP BF/SCR/SCROL.. ...TAPE END AD
RES L,TAPE END ADRES H,TAPE TIMING CONST
1,TAPE TIMING CONST2./!...START TAPE BUF
F.L,START TAPE BUFF.H,RS 232 OUTBT,RS232
NXT BT.|!...READ CHAR ERROR/OUTBYT BFF,
# CHAR IN FILENAME,CURR.LOGICAL FILE,SEC
ADR..!...CURR.DEVICE,PNT FILENAME LOW,P
NT FILENAME HI,READ INPUT CHAR.." ..BLOC
KS REMAINING TO WR/RD,SERIAL WORD BUFFER
,TAPE MOTOR LOCK.E"*..I/O START LOW,I/O
START HIGH,KERNAL SETUP LOW,KERNAL SETUP
HIGH.."4..LAST PRESSED KEY,# CHAR IN KE
YBRD BUFFER,SCREEN REV FLAG,EOL INPUT PT
R.X">..INPUT CURSOR ROW,INPUT CURSOR COL
OM,WICH KEY 64=NONE,FLASH CURSOR..#H..CU
RSOR TIMING COUNTDOWN,CHAR UNDER CURSOR,
CURSOR BLINKPHASE.[#R..INPUT OR GET FROM
KEYBRD,PNT TO SCREENLN L,PNT TO SCREENL
HI..#\..POSITION CURS.IN SCREENLN,0=DIR
ECT CURSOR ELSE PROGRAMMED..#F..LENGTH S
CREENLINE,CURRENT ROW NUMBER,TEMP DATA,#
OF INSERTS.#$P..SCREEN LINE LINK TABEL,
,,,,,,,,,,,,,,,,,,,,,,,,,SCREEN COL PNT
LOW.P$Z..SCREEN COL PNT HI,KEYBRD BUFF L
OW,KEY BRD BUFF HI,RS232 RCVL,RS232 RCVH
..$..RS232 TX L,RS232 TX H..$... FREE 1
,FREE 2,FREE 3,FREE 4,FREE 5...
> CLICK IMAGE PREVIEW FOR FULL MODAL