GRAPHCMDS
FILE INFORMATION
FILENAME(S): GRAPHCMDS
FILE TYPE(S): PRG
FILE SIZE: 14.1K
FIRST SEEN: 2025-11-30 21:12:22
APPEARS ON: 1 disk(s)
FILE HASH
5059704715db0f47628fcadb86fad922f75a17ba674f6c137c2bde2c2876ce7f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RANS ISK2 | GRAPHCMDS | PRG | DuncanTwain | 3 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 00 00 8F 20 47 52 41 50 48 43 4D 44 |..).... GRAPHCMD|
00000010: 53 20 28 50 41 55 4C 20 41 44 41 4D 53 29 20 20 |S (PAUL ADAMS) |
00000020: 20 20 20 20 20 20 20 20 3A 00 2F 08 01 00 3A 00 | :./...:.|
00000030: 50 08 02 00 8F 20 32 34 20 53 54 41 54 45 4D 45 |P.... 24 STATEME|
00000040: 4E 54 53 2C 20 30 20 46 55 4E 43 54 49 4F 4E 53 |NTS, 0 FUNCTIONS|
00000050: 00 56 08 03 00 3A 00 74 08 04 00 8F 20 4B 45 59 |.V...:.t.... KEY|
00000060: 57 4F 52 44 20 43 48 41 52 41 43 54 45 52 53 3A |WORD CHARACTERS:|
00000070: 20 31 31 33 00 7A 08 05 00 3A 00 96 08 06 00 8F | 113.z...:......|
00000080: 20 4B 45 59 57 4F 52 44 53 20 23 31 37 35 20 54 | KEYWORDS #175 T|
00000090: 4F 20 23 31 39 38 00 9C 08 07 00 3A 00 C4 08 08 |O #198.....:....|
000000A0: 00 8F 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |..==============|
000000B0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000000C0: 3D 3D 3D 3D 00 CA 08 09 00 3A 00 DD 08 27 00 53 |====.....:...'.S|
000000D0: 45 54 4C 46 53 20 B2 20 24 46 46 42 41 00 F0 08 |ETLFS . $FFBA...|
000000E0: 28 00 53 45 54 4E 41 4D 20 B2 20 24 46 46 42 44 |(.SETNAM . $FFBD|
000000F0: 00 00 09 29 00 9F 20 20 20 B2 20 24 46 46 43 30 |...).. . $FFC0|
00000100: 00 13 09 2A 00 43 48 4B 49 4E 20 20 B2 20 24 46 |...*.CHKIN . $F|
00000110: 46 43 36 00 22 09 2B 00 A0 20 20 B2 20 24 46 46 |FC6.".+.. . $FF|
00000120: 43 33 00 33 09 2C 00 9C 43 48 4E 20 B2 20 24 46 |C3.3.,..CHN . $F|
00000130: 46 43 43 00 44 09 2D 00 A1 49 4E 20 20 B2 20 24 |FCC.D.-..IN . $|
00000140: 46 46 45 34 00 57 09 2E 00 43 48 4B 4F 55 54 20 |FFE4.W...CHKOUT |
00000150: B2 20 24 46 46 43 39 00 6A 09 2F 00 43 48 52 4F |. $FFC9.j./.CHRO|
00000160: 55 54 20 B2 20 24 46 46 44 32 00 70 09 30 00 3B |UT . $FFD2.p.0.;|
00000170: 00 81 09 31 00 54 4D 50 20 20 20 20 B2 20 24 35 |...1.TMP . $5|
00000180: 37 00 92 09 32 00 54 4D 50 32 20 20 20 B2 20 24 |7...2.TMP2 . $|
00000190: 35 39 00 A3 09 33 00 54 4D 50 33 20 20 20 B2 20 |59...3.TMP3 . |
000001A0: 24 35 41 00 B4 09 34 00 54 4D 50 34 20 20 20 B2 |$5A...4.TMP4 .|
000001B0: 20 24 35 43 00 CF 09 90 01 2E C6 20 22 50 4C 4F | $5C....... "PLO|
000001C0: D4 47 43 4C D2 47 43 4F CC 55 50 50 45 D2 22 00 |.GCL.GCO.UPPE.".|
000001D0: E9 09 91 01 2E C6 20 22 4C 4F 57 45 D2 44 45 46 |...... "LOWE.DEF|
000001E0: 41 55 4C D4 4C 49 4E C5 22 00 02 0A 92 01 2E C6 |AUL.LIN.".......|
000001F0: 20 22 53 4C 49 4E C5 44 4C 49 4E C5 4E 4C 49 4E | "SLIN.DLIN.NLIN|
00000200: C5 22 00 1A 0A 93 01 2E C6 20 22 51 4C 49 4E C5 |."....... "QLIN.|
00000210: 43 48 41 D2 53 43 48 41 D2 22 00 33 0A 94 01 2E |CHA.SCHA.".3....|
00000220: C6 20 22 42 41 D2 53 42 41 D2 44 42 41 D2 4E 42 |. "BA.SBA.DBA.NB|
00000230: 41 D2 22 00 4B 0A 95 01 2E C6 20 22 47 53 41 56 |A.".K..... "GSAV|
00000240: C5 47 4C 4F 41 C4 53 49 5A C5 22 00 64 0A 96 01 |.GLOA.SIZ.".d...|
00000250: 2E C6 20 22 4C 4D 41 D2 47 50 52 49 4E D4 45 52 |.. "LMA.GPRIN.ER|
00000260: 41 53 C5 22 00 74 0A 97 01 2E C6 20 22 50 41 54 |AS.".t..... "PAT|
00000270: 54 45 52 CE 00 96 0A 78 05 2E 57 B0 44 20 50 4C |TER....x..W.D PL|
00000280: 4F AB 31 2C 47 43 4C AB 31 2C 47 43 4F AB 31 2C |O.1,GCL.1,GCO.1,|
00000290: 55 50 50 45 AB 31 00 B3 0A 79 05 2E 57 B0 44 20 |UPPE.1...y..W.D |
000002A0: 4C 4F 57 45 AB 31 2C 96 4C 54 AB 31 2C 50 4C 49 |LOWE.1,.LT.1,PLI|
000002B0: 4E AB 31 00 D1 0A 7A 05 2E 57 B0 44 20 53 4C 49 |N.1...z..W.D SLI|
000002C0: 4E AB 31 2C 44 4C 49 4E AB 31 2C 4E 4C 49 4E AB |N.1,DLIN.1,NLIN.|
000002D0: 31 00 EE 0A 7B 05 2E 57 B0 44 20 51 4C 49 4E AB |1...{..W.D QLIN.|
000002E0: 31 2C 43 48 41 AB 31 2C 53 43 48 41 AB 31 00 0F |1,CHA.1,SCHA.1..|
000002F0: 0B 7C 05 2E 57 B0 44 20 42 42 41 AB 31 2C 53 42 |.|..W.D BBA.1,SB|
00000300: 41 AB 31 2C 44 42 41 AB 31 2C 4E 42 41 AB 31 00 |A.1,DBA.1,NBA.1.|
00000310: 2C 0B 7D 05 2E 57 B0 44 20 47 53 41 56 AB 31 2C |,.}..W.D GSAV.1,|
00000320: 47 4C 4F 41 AB 31 2C 53 49 5A AB 31 00 4A 0B 7E |GLOA.1,SIZ.1.J.~|
00000330: 05 2E 57 B0 44 20 4C 4D 41 AB 31 2C 47 50 52 49 |..W.D LMA.1,GPRI|
00000340: 4E AB 31 2C 45 52 41 53 AB 31 00 5A 0B 80 05 2E |N.1,ERAS.1.Z....|
00000350: 57 B0 44 20 50 41 54 54 AB 31 00 6A 0B 3C 0A 55 |W.D PATT.1.j.<.U|
00000360: 53 46 50 20 4C 44 58 20 23 30 00 76 0B 3E 0A 53 |SFP LDX #0.v.>.S|
00000370: 54 58 20 24 30 44 00 82 0B 40 0A 53 54 41 20 24 |TX $0D...@.STA $|
00000380: 36 32 00 8E 0B 42 0A 53 54 59 20 24 36 33 00 9B |62...B.STY $63..|
00000390: 0B 44 0A 4C 44 58 20 23 24 39 30 00 A3 0B 46 0A |.D.LDX #$90...F.|
000003A0: 53 45 43 00 B1 0B 48 0A 4A 4D 50 20 24 42 43 34 |SEC...H.JMP $BC4|
000003B0: 39 00 B7 0B 4A 0A 3B 00 DD 0B 6E 0E 50 4F 57 45 |9...J.;...n.POWE|
000003C0: 52 53 20 2E 42 59 54 45 20 31 2C 32 2C 34 2C 38 |RS .BYTE 1,2,4,8|
000003D0: 2C 31 36 2C 33 32 2C 36 34 2C 31 32 38 00 E3 0B |,16,32,64,128...|
000003E0: 70 0E 3B 00 F2 0B 96 31 50 4C 4F 20 4A 53 52 20 |p.;....1PLO JSR |
000003F0: A1 32 00 FF 0B 98 31 50 4C 4F 31 20 53 45 43 00 |.2....1PLO1 SEC.|
00000400: 0C 0C 9A 31 4C 44 41 20 23 24 38 46 00 16 0C 9C |...1LDA #$8F....|
00000410: 31 53 42 43 20 59 00 21 0C 9E 31 53 54 41 20 54 |1SBC Y.!..1STA T|
00000420: 59 00 2C 0C A0 31 4C 44 41 20 23 31 00 38 0C A2 |Y.,..1LDA #1.8..|
00000430: 31 53 42 43 20 59 AA 31 00 45 0C A4 31 53 54 41 |1SBC Y.1.E..1STA|
00000440: 20 54 59 AA 31 00 52 0C A6 31 42 43 53 20 50 4C | TY.1.R..1BCS PL|
00000450: 4F 32 00 5A 0C A8 31 52 54 53 00 6C 0C AA 31 50 |O2.Z..1RTS.l..1P|
00000460: 4C 4F 32 20 4C 44 58 20 23 24 43 30 00 79 0C AC |LO2 LDX #$C0.y..|
00000470: 31 4C 44 59 20 23 24 43 30 00 85 0C AE 31 4C 44 |1LDY #$C0....1LD|
00000480: 41 20 59 AA 31 00 92 0C B0 31 42 4E 45 20 50 4C |A Y.1....1BNE PL|
00000490: 4F 33 00 9F 0C B2 31 4C 44 41 20 23 24 43 37 00 |O3....1LDA #$C7.|
000004A0: A9 0C B4 31 43 4D 50 20 59 00 B6 0C B6 31 42 43 |...1CMP Y....1BC|
000004B0: 53 20 50 4C 4F 34 00 C6 0C B8 31 50 4C 4F 33 20 |S PLO4....1PLO3 |
000004C0: 4C 44 58 20 23 30 00 D3 0C BA 31 4C 44 59 20 23 |LDX #0....1LDY #|
000004D0: 24 41 30 00 E4 0C BC 31 50 4C 4F 34 20 53 54 58 |$A0....1PLO4 STX|
000004E0: 20 54 4D 50 00 F2 0C BE 31 53 54 59 20 54 4D 50 | TMP....1STY TMP|
000004F0: AA 31 00 FC 0C C0 31 4C 44 58 20 58 00 08 0D C2 |.1....1LDX X....|
00000500: 31 4C 44 41 20 58 AA 31 00 15 0D C4 31 42 45 51 |1LDA X.1....1BEQ|
00000510: 20 50 4C 4F 35 00 20 0D C6 31 43 4D 50 20 23 31 | PLO5. ..1CMP #1|
00000520: 00 2D 0D C8 31 42 4E 45 20 50 4C 4F 32 00 3A 0D |.-..1BNE PLO2.:.|
00000530: CA 31 43 50 58 20 23 24 34 30 00 47 0D CC 31 42 |.1CPX #$40.G..1B|
00000540: 43 53 20 50 4C 4F 32 00 53 0D CE 31 50 4C 4F 35 |CS PLO2.S..1PLO5|
00000550: 20 52 B0 00 5B 0D D0 31 54 58 41 00 62 0D D2 31 | R..[..1TXA.b..1|
00000560: 52 B0 00 6A 0D D4 31 4C 53 52 00 72 0D D6 31 4C |R..j..1LSR.r..1L|
00000570: 53 52 00 7E 0D D8 31 53 54 41 20 43 4F 4C 00 86 |SR.~..1STA COL..|
00000580: 0D DA 31 54 58 41 00 8F 0D DC 31 AF 20 23 37 00 |..1TXA....1. #7.|
00000590: 99 0D DE 31 45 B0 20 23 37 00 A1 0D E0 31 54 41 |...1E. #7....1TA|
000005A0: 58 00 B2 0D E2 31 4C 44 41 20 50 4F 57 45 52 53 |X....1LDA POWERS|
000005B0: 2C 58 00 BF 0D E4 31 53 54 41 20 42 49 54 50 00 |,X....1STA BITP.|
000005C0: CA 0D E6 31 4C 44 58 20 54 59 00 D7 0D E8 31 4C |...1LDX TY....1L|
000005D0: 44 41 20 54 59 AA 31 00 DE 0D EA 31 52 B0 00 E6 |DA TY.1....1R...|
000005E0: 0D EC 31 54 58 41 00 ED 0D EE 31 52 B0 00 F5 0D |..1TXA....1R....|
000005F0: F0 31 4C 53 52 00 FD 0D F2 31 4C 53 52 00 09 0E |.1LSR....1LSR...|
00000600: F4 31 53 54 41 20 52 4F 57 00 11 0E F6 31 54 58 |.1STA ROW....1TX|
00000610: 41 00 1A 0E F8 31 AF 20 23 37 00 27 0E FA 31 53 |A....1. #7.'..1S|
00000620: 54 41 20 52 41 53 54 00 33 0E FC 31 4C 44 41 20 |TA RAST.3..1LDA |
00000630: 52 4F 57 00 3E 0E FE 31 4C 44 58 20 23 36 00 4D |ROW.>..1LDX #6.M|
00000640: 0E 00 32 4A 53 52 20 43 4D 4C 54 41 44 00 58 0E |..2JSR CMLTAD.X.|
00000650: 02 32 4C 44 58 20 23 32 00 67 0E 04 32 4A 53 52 |.2LDX #2.g..2JSR|
00000660: 20 4D 4C 54 41 44 44 00 73 0E 06 32 4C 44 41 20 | MLTADD.s..2LDA |
00000670: 43 4F 4C 00 7E 0E 08 32 4C 44 58 20 23 33 00 8D |COL.~..2LDX #3..|
00000680: 0E 0A 32 4A 53 52 20 43 4D 4C 54 41 44 00 98 0E |..2JSR CMLTAD...|
00000690: 0C 32 4C 44 59 20 23 30 00 A5 0E 0E 32 53 54 59 |.2LDY #0....2STY|
000006A0: 20 54 4D 50 32 00 B2 0E 10 32 4C 44 41 20 52 41 | TMP2....2LDA RA|
000006B0: 53 54 00 BE 0E 12 32 4A 53 52 20 41 44 44 00 C6 |ST....2JSR ADD..|
000006C0: 0E 14 32 53 45 49 00 D0 0E 16 32 4C 44 41 20 31 |..2SEI....2LDA 1|
000006D0: 00 DB 0E 18 32 AF 20 23 24 46 43 00 E5 0E 1A 32 |....2. #$FC....2|
000006E0: 53 54 41 20 31 00 F5 0E 1C 32 4C 44 41 20 28 54 |STA 1....2LDA (T|
000006F0: 4D 50 29 2C 59 00 02 0F 1E 32 45 B0 20 45 52 46 |MP),Y....2E. ERF|
00000700: 4C 47 00 0E 0F 20 32 B0 41 20 42 49 54 50 00 1B |LG... 2.A BITP..|
00000710: 0F 22 32 45 B0 20 45 52 46 4C 47 00 2B 0F 24 32 |."2E. ERFLG.+.$2|
00000720: 53 54 41 20 28 54 4D 50 29 2C 59 00 35 0F 26 32 |STA (TMP),Y.5.&2|
00000730: 4C 44 41 20 31 00 3F 0F 28 32 B0 41 20 23 33 00 |LDA 1.?.(2.A #3.|
00000740: 49 0F 2A 32 53 54 41 20 31 00 51 0F 2C 32 43 4C |I.*2STA 1.Q.,2CL|
00000750: 49 00 5F 0F 2E 32 4C 44 59 20 24 44 44 30 30 00 |I._..2LDY $DD00.|
00000760: 6D 0F 30 32 4C 44 41 20 24 30 32 38 44 00 75 0F |m.02LDA $028D.u.|
00000770: 32 32 54 41 58 00 7E 0F 34 32 AF 20 23 32 00 8B |22TAX.~.42. #2..|
00000780: 0F 36 32 42 45 51 20 50 4C 4F 37 00 97 0F 38 32 |.62BEQ PLO7...82|
00000790: 4A 53 52 20 96 4C 54 00 AA 0F 3A 32 50 4C 4F 36 |JSR .LT...:2PLO6|
000007A0: 20 4C 44 41 20 24 30 32 38 44 00 B2 0F 3C 32 54 | LDA $028D...<2T|
000007B0: 41 58 00 BB 0F 3E 32 AF 20 23 32 00 C8 0F 40 32 |AX...>2. #2...@2|
000007C0: 42 4E 45 20 50 4C 4F 36 00 D0 0F 42 32 54 59 41 |BNE PLO6...B2TYA|
000007D0: 00 D9 0F 44 32 AF 20 23 33 00 E4 0F 46 32 43 4D |...D2. #3...F2CM|
000007E0: 50 20 23 33 00 F2 0F 48 32 42 45 51 20 50 4C 4F |P #3...H2BEQ PLO|
000007F0: 31 31 00 FC 0F 4A 32 45 B0 20 23 31 00 09 10 4C |11...J2E. #1...L|
00000800: 32 42 43 43 20 50 4C 4F 39 00 16 10 4E 32 50 4C |2BCC PLO9...N2PL|
00000810: 4F 37 20 54 58 41 00 1F 10 50 32 AF 20 23 34 00 |O7 TXA...P2. #4.|
00000820: 2D 10 52 32 42 45 51 20 50 4C 4F 31 31 00 40 10 |-.R2BEQ PLO11.@.|
00000830: 54 32 50 4C 4F 38 20 4C 44 41 20 24 30 32 38 44 |T2PLO8 LDA $028D|
00000840: 00 49 10 56 32 AF 20 23 34 00 56 10 58 32 42 4E |.I.V2. #4.V.X2BN|
00000850: 45 20 50 4C 4F 38 00 5E 10 5A 32 54 59 41 00 67 |E PLO8.^.Z2TYA.g|
00000860: 10 5C 32 AF 20 23 33 00 7A 10 5E 32 50 4C 4F 39 |.\2. #3.z.^2PLO9|
00000870: 20 42 4E 45 20 50 4C 4F 31 30 00 87 10 60 32 4A | BNE PLO10...`2J|
00000880: 4D 50 20 55 50 50 45 00 98 10 62 32 50 4C 4F 31 |MP UPPE...b2PLO1|
00000890: 30 20 43 4D 50 20 23 31 00 A6 10 64 32 42 4E 45 |0 CMP #1...d2BNE|
000008A0: 20 50 4C 4F 31 31 00 B3 10 66 32 4A 4D 50 20 4C | PLO11...f2JMP L|
000008B0: 4F 57 45 00 C1 10 68 32 50 4C 4F 31 31 20 52 54 |OWE...h2PLO11 RT|
000008C0: 53 00 C7 10 6A 32 3B 00 D6 10 6C 32 43 4D 4C 54 |S...j2;...l2CMLT|
000008D0: 41 44 20 50 48 41 00 E1 10 6E 32 4C 44 41 20 23 |AD PHA...n2LDA #|
000008E0: 30 00 EE 10 70 32 53 54 41 20 54 4D 50 32 00 F6 |0...p2STA TMP2..|
000008F0: 10 72 32 50 4C 41 00 FC 10 74 32 3B 00 0B 11 76 |.r2PLA...t2;...v|
00000900: 32 4D 4C 54 41 44 44 20 41 53 4C 00 18 11 78 32 |2MLTADD ASL...x2|
00000910: 52 4F 4C 20 54 4D 50 32 00 20 11 7A 32 44 45 58 |ROL TMP2. .z2DEX|
00000920: 00 2F 11 7C 32 42 4E 45 20 4D 4C 54 41 44 44 00 |./.|2BNE MLTADD.|
00000930: 35 11 7E 32 3B 00 41 11 80 32 41 44 44 20 50 48 |5.~2;.A..2ADD PH|
00000940: 41 00 49 11 82 32 43 4C 43 00 55 11 84 32 41 44 |A.I..2CLC.U..2AD|
00000950: 43 20 54 4D 50 00 61 11 86 32 53 54 41 20 54 4D |C TMP.a..2STA TM|
00000960: 50 00 6E 11 88 32 4C 44 41 20 54 4D 50 32 00 7C |P.n..2LDA TMP2.||
00000970: 11 8A 32 41 44 43 20 54 4D 50 AA 31 00 8A 11 8C |..2ADC TMP.1....|
00000980: 32 53 54 41 20 54 4D 50 AA 31 00 92 11 8E 32 50 |2STA TMP.1....2P|
00000990: 4C 41 00 9A 11 90 32 52 54 53 00 A0 11 92 32 3B |LA....2RTS....2;|
000009A0: 00 B1 11 94 32 A1 32 20 4A 53 52 20 24 41 44 38 |....2.2 JSR $AD8|
000009B0: 41 00 BF 11 96 32 4A 53 52 20 24 41 45 46 44 00 |A....2JSR $AEFD.|
000009C0: CC 11 98 32 4A 53 52 20 43 4F 4D 58 00 DA 11 9A |...2JSR COMX....|
000009D0: 32 4A 53 52 20 24 42 37 46 37 00 E4 11 9C 32 53 |2JSR $B7F7....2S|
000009E0: 54 59 20 58 00 F0 11 9E 32 53 54 41 20 58 AA 31 |TY X....2STA X.1|
000009F0: 00 FE 11 A0 32 4A 53 52 20 24 41 44 38 41 00 0B |....2JSR $AD8A..|
00000A00: 12 A2 32 4A 53 52 20 43 4F 4D 59 00 19 12 A4 32 |..2JSR COMY....2|
00000A10: 4A 53 52 20 24 42 37 46 37 00 23 12 A6 32 53 54 |JSR $B7F7.#..2ST|
00000A20: 59 20 59 00 2F 12 A8 32 53 54 41 20 59 AA 31 00 |Y Y./..2STA Y.1.|
00000A30: 37 12 AA 32 52 54 53 00 3D 12 AC 32 3B 00 4E 12 |7..2RTS.=..2;.N.|
00000A40: AE 32 47 43 4C 20 4C 44 41 20 23 24 42 46 00 59 |.2GCL LDA #$BF.Y|
00000A50: 12 B0 32 53 54 41 20 54 33 00 66 12 B2 32 4C 44 |..2STA T3.f..2LD|
00000A60: 41 20 23 24 46 46 00 71 12 B4 32 53 54 41 20 54 |A #$FF.q..2STA T|
00000A70: 35 00 7E 12 B6 32 4C 44 58 20 23 24 32 30 00 8B |5.~..2LDX #$20..|
00000A80: 12 B8 32 4C 44 59 20 23 24 34 30 00 96 12 BA 32 |..2LDY #$40....2|
00000A90: 4C 44 41 20 23 30 00 A3 12 BC 32 47 43 4C 31 20 |LDA #0....2GCL1 |
00000AA0: 50 48 41 00 AE 12 BE 32 4C 44 41 20 23 30 00 B9 |PHA....2LDA #0..|
00000AB0: 12 C0 32 53 54 41 20 54 32 00 C4 12 C2 32 53 54 |..2STA T2....2ST|
00000AC0: 41 20 54 34 00 CC 12 C4 32 50 4C 41 00 D9 12 C6 |A T4....2PLA....|
00000AD0: 32 47 43 4C 32 20 44 45 59 00 E8 12 C8 32 53 54 |2GCL2 DEY....2ST|
00000AE0: 41 20 28 54 32 29 2C 59 00 F7 12 CA 32 53 54 41 |A (T2),Y....2STA|
00000AF0: 20 28 54 34 29 2C 59 00 04 13 CC 32 42 4E 45 20 | (T4),Y....2BNE |
00000B00: 47 43 4C 32 00 0F 13 CE 32 44 45 43 20 54 33 00 |GCL2....2DEC T3.|
00000B10: 1A 13 D0 32 44 45 43 20 54 35 00 22 13 D2 32 44 |...2DEC T5."..2D|
00000B20: 45 58 00 2F 13 D4 32 42 4E 45 20 47 43 4C 32 00 |EX./..2BNE GCL2.|
00000B30: 37 13 D6 32 52 54 53 00 3D 13 D8 32 3B 00 4F 13 |7..2RTS.=..2;.O.|
00000B40: DA 32 47 43 4F 20 4A 53 52 20 24 42 37 39 45 00 |.2GCO JSR $B79E.|
00000B50: 5C 13 DC 32 4C 44 41 20 23 24 38 46 00 67 13 DE |\..2LDA #$8F.g..|
00000B60: 32 53 54 41 20 54 33 00 74 13 E0 32 4C 44 41 20 |2STA T3.t..2LDA |
00000B70: 23 24 43 46 00 7F 13 E2 32 53 54 41 20 54 35 00 |#$CF....2STA T5.|
00000B80: 87 13 E4 32 54 58 41 00 92 13 E6 32 4C 44 58 20 |...2TXA....2LDX |
00000B90: 23 34 00 9F 13 E8 32 4C 44 59 20 23 24 45 38 00 |#4....2LDY #$E8.|
00000BA0: AC 13 EA 32 42 4E 45 20 47 43 4C 31 00 B2 13 EC |...2BNE GCL1....|
00000BB0: 32 3B 00 C2 13 EE 32 55 50 50 45 20 4C 44 58 20 |2;....2UPPE LDX |
00000BC0: 23 30 00 D0 13 F0 32 2E 42 59 54 45 20 24 32 43 |#0....2.BYTE $2C|
00000BD0: 00 E0 13 F2 32 4C 4F 57 45 20 4C 44 58 20 23 33 |....2LOWE LDX #3|
00000BE0: 00 EE 13 F4 32 2E 42 59 54 45 20 24 32 43 00 FD |....2.BYTE $2C..|
00000BF0: 13 F6 32 96 4C 54 20 4C 44 58 20 23 36 00 0E 14 |..2.LT LDX #6...|
00000C00: F8 32 4C 44 41 20 53 43 52 44 41 54 2C 58 00 1C |.2LDA SCRDAT,X..|
00000C10: 14 FA 32 53 54 41 20 24 44 30 31 31 00 24 14 FC |..2STA $D011.$..|
00000C20: 32 49 4E 58 00 35 14 FE 32 4C 44 41 20 53 43 52 |2INX.5..2LDA SCR|
00000C30: 44 41 54 2C 58 00 43 14 00 33 53 54 41 20 24 44 |DAT,X.C..3STA $D|
00000C40: 30 31 38 00 51 14 02 33 4C 44 41 20 24 44 44 30 |018.Q..3LDA $DD0|
00000C50: 32 00 5B 14 04 33 B0 41 20 23 33 00 69 14 06 33 |2.[..3.A #3.i..3|
00000C60: 53 54 41 20 24 44 44 30 32 00 71 14 08 33 49 4E |STA $DD02.q..3IN|
00000C70: 58 00 79 14 0A 33 53 45 49 00 8A 14 0C 33 96 31 |X.y..3SEI....3.1|
00000C80: 20 4C 44 41 20 24 44 30 31 32 00 95 14 0E 33 42 | LDA $D012....3B|
00000C90: 4E 45 20 96 31 00 A3 14 10 33 4C 44 41 20 24 44 |NE .1....3LDA $D|
00000CA0: 44 30 30 00 AE 14 12 33 AF 20 23 24 46 43 00 BE |D00....3. #$FC..|
00000CB0: 14 14 33 B0 41 20 53 43 52 44 41 54 2C 58 00 CC |..3.A SCRDAT,X..|
00000CC0: 14 16 33 53 54 41 20 24 44 44 30 30 00 D4 14 18 |..3STA $DD00....|
00000CD0: 33 43 4C 49 00 DC 14 1A 33 52 54 53 00 E2 14 1C |3CLI....3RTS....|
00000CE0: 33 3B 00 F0 14 1E 33 53 43 52 44 41 54 20 B2 AC |3;....3SCRDAT ..|
00000CF0: 00 06 15 20 33 2E 42 59 54 45 20 24 33 42 2C 24 |... 3.BYTE $3B,$|
00000D00: 33 38 2C 24 30 31 00 1C 15 22 33 2E 42 59 54 45 |38,$01..."3.BYTE|
00000D10: 20 24 33 42 2C 24 33 38 2C 24 30 30 00 32 15 24 | $3B,$38,$00.2.$|
00000D20: 33 2E 42 59 54 45 20 24 31 42 2C 24 31 37 2C 24 |3.BYTE $1B,$17,$|
00000D30: 30 33 00 38 15 26 33 3B 00 4A 15 28 33 53 4C 49 |03.8.&3;.J.(3SLI|
00000D40: 4E 20 4C 44 41 20 23 24 35 35 00 58 15 2A 33 2E |N LDA #$55.X.*3.|
00000D50: 42 59 54 45 20 24 32 43 00 6A 15 2C 33 44 4C 49 |BYTE $2C.j.,3DLI|
00000D60: 4E 20 4C 44 41 20 23 24 33 33 00 78 15 2E 33 2E |N LDA #$33.x..3.|
00000D70: 42 59 54 45 20 24 32 43 00 8A 15 30 33 4E 4C 49 |BYTE $2C...03NLI|
00000D80: 4E 20 4C 44 41 20 23 24 46 46 00 98 15 32 33 2E |N LDA #$FF...23.|
00000D90: 42 59 54 45 20 24 32 43 00 AA 15 34 33 51 4C 49 |BYTE $2C...43QLI|
00000DA0: 4E 20 4C 44 41 20 23 24 30 46 00 B6 15 36 33 53 |N LDA #$0F...63S|
00000DB0: 54 41 20 44 4F 54 00 BC 15 38 33 3B 00 CF 15 3A |TA DOT...83;...:|
00000DC0: 33 50 4C 49 4E 20 4A 53 52 20 24 41 44 38 41 00 |3PLIN JSR $AD8A.|
00000DD0: DD 15 3C 33 4A 53 52 20 24 41 45 46 44 00 EA 15 |..<3JSR $AEFD...|
00000DE0: 3E 33 4A 53 52 20 43 4F 4D 58 00 F7 15 40 33 4C |>3JSR COMX...@3L|
00000DF0: 44 58 20 23 B3 59 4F 00 04 16 42 33 4C 44 59 20 |DX #.YO...B3LDY |
00000E00: 23 B1 59 4F 00 12 16 44 33 4A 53 52 20 24 42 42 |#.YO...D3JSR $BB|
00000E10: 44 34 00 20 16 46 33 4A 53 52 20 24 42 37 46 37 |D4. .F3JSR $B7F7|
00000E20: 00 2B 16 48 33 53 54 59 20 58 31 00 38 16 4A 33 |.+.H3STY X1.8.J3|
00000E30: 53 54 41 20 58 31 AA 31 00 46 16 4C 33 4A 53 52 |STA X1.1.F.L3JSR|
00000E40: 20 24 41 44 38 41 00 54 16 4E 33 4A 53 52 20 24 | $AD8A.T.N3JSR $|
00000E50: 41 45 46 44 00 61 16 50 33 4A 53 52 20 43 4F 4D |AEFD.a.P3JSR COM|
00000E60: 59 00 70 16 52 33 4C 44 58 20 23 B3 54 4D 50 46 |Y.p.R3LDX #.TMPF|
00000E70: 00 7F 16 54 33 4C 44 59 20 23 B1 54 4D 50 46 00 |...T3LDY #.TMPF.|
00000E80: 8D 16 56 33 4A 53 52 20 24 42 42 44 34 00 9B 16 |..V3JSR $BBD4...|
00000E90: 58 33 4A 53 52 20 24 42 37 46 37 00 A6 16 5A 33 |X3JSR $B7F7...Z3|
00000EA0: 53 54 59 20 59 31 00 B3 16 5C 33 53 54 41 20 59 |STY Y1...\3STA Y|
00000EB0: 31 AA 31 00 C1 16 5E 33 4A 53 52 20 24 41 44 38 |1.1...^3JSR $AD8|
00000EC0: 41 00 CF 16 60 33 4A 53 52 20 24 41 45 46 44 00 |A...`3JSR $AEFD.|
00000ED0: DC 16 62 33 4A 53 52 20 43 4F 4D 58 00 E9 16 64 |..b3JSR COMX...d|
00000EE0: 33 4C 44 58 20 23 B3 58 4F 00 F6 16 66 33 4C 44 |3LDX #.XO...f3LD|
00000EF0: 59 20 23 B1 58 4F 00 04 17 68 33 4A 53 52 20 24 |Y #.XO...h3JSR $|
00000F00: 42 42 44 34 00 12 17 6A 33 4A 53 52 20 24 42 37 |BBD4...j3JSR $B7|
00000F10: 46 37 00 1D 17 6C 33 53 54 59 20 58 32 00 2A 17 |F7...l3STY X2.*.|
00000F20: 6E 33 53 54 41 20 58 32 AA 31 00 37 17 70 33 4C |n3STA X2.1.7.p3L|
00000F30: 44 41 20 23 B3 58 4F 00 44 17 72 33 4C 44 59 20 |DA #.XO.D.r3LDY |
00000F40: 23 B1 58 4F 00 52 17 74 33 4A 53 52 20 24 42 42 |#.XO.R.t3JSR $BB|
00000F50: 41 32 00 5F 17 76 33 4C 44 41 20 23 B3 59 4F 00 |A2._.v3LDA #.YO.|
00000F60: 6C 17 78 33 4C 44 59 20 23 B1 59 4F 00 7A 17 7A |l.x3LDY #.YO.z.z|
00000F70: 33 4A 53 52 20 24 42 38 35 30 00 87 17 7C 33 4C |3JSR $B850...|3L|
00000F80: 44 58 20 23 B3 44 58 00 94 17 7E 33 4C 44 59 20 |DX #.DX...~3LDY |
00000F90: 23 B1 44 58 00 A2 17 80 33 4A 53 52 20 24 42 42 |#.DX....3JSR $BB|
00000FA0: 44 34 00 B0 17 82 33 4A 53 52 20 24 41 44 38 41 |D4....3JSR $AD8A|
00000FB0: 00 BD 17 84 33 4A 53 52 20 43 4F 4D 59 00 CA 17 |....3JSR COMY...|
00000FC0: 86 33 4C 44 58 20 23 B3 58 4F 00 D7 17 88 33 4C |.3LDX #.XO....3L|
00000FD0: 44 59 20 23 B1 58 4F 00 E5 17 8A 33 4A 53 52 20 |DY #.XO....3JSR |
00000FE0: 24 42 42 44 34 00 F3 17 8C 33 4A 53 52 20 24 42 |$BBD4....3JSR $B|
00000FF0: 37 46 37 00 FE 17 8E 33 53 54 59 20 59 32 00 0B |7F7....3STY Y2..|
00001000: 18 90 33 53 54 41 20 59 32 AA 31 00 18 18 92 33 |..3STA Y2.1....3|
00001010: 4C 44 41 20 23 B3 58 4F 00 25 18 94 33 4C 44 59 |LDA #.XO.%..3LDY|
00001020: 20 23 B1 58 4F 00 33 18 96 33 4A 53 52 20 24 42 | #.XO.3..3JSR $B|
00001030: 42 41 32 00 42 18 98 33 4C 44 41 20 23 B3 54 4D |BA2.B..3LDA #.TM|
00001040: 50 46 00 51 18 9A 33 4C 44 59 20 23 B1 54 4D 50 |PF.Q..3LDY #.TMP|
00001050: 46 00 5F 18 9C 33 4A 53 52 20 24 42 38 35 30 00 |F._..3JSR $B850.|
00001060: 6C 18 9E 33 4C 44 58 20 23 B3 44 59 00 79 18 A0 |l..3LDX #.DY.y..|
00001070: 33 4C 44 59 20 23 B1 44 59 00 87 18 A2 33 4A 53 |3LDY #.DY....3JS|
00001080: 52 20 24 42 42 44 34 00 93 18 A4 33 4C 44 41 20 |R $BBD4....3LDA |
00001090: 24 36 31 00 A0 18 A6 33 42 45 51 20 4C 49 4E 31 |$61....3BEQ LIN1|
000010A0: 00 AD 18 A8 33 4C 44 41 20 23 B3 44 58 00 BA 18 |....3LDA #.DX...|
000010B0: AA 33 4C 44 59 20 23 B1 44 58 00 C8 18 AC 33 4A |.3LDY #.DX....3J|
000010C0: 53 52 20 24 42 42 30 46 00 D5 18 AE 33 4C 44 58 |SR $BB0F....3LDX|
000010D0: 20 23 B3 53 58 00 E2 18 B0 33 4C 44 59 20 23 B1 | #.SX....3LDY #.|
000010E0: 53 58 00 F0 18 B2 33 4A 53 52 20 24 42 42 44 34 |SX....3JSR $BBD4|
000010F0: 00 FF 18 B4 33 4C 44 41 20 23 B3 54 4D 50 46 00 |....3LDA #.TMPF.|
00001100: 0E 19 B6 33 4C 44 59 20 23 B1 54 4D 50 46 00 1C |...3LDY #.TMPF..|
00001110: 19 B8 33 4A 53 52 20 24 42 41 32 38 00 2A 19 BA |..3JSR $BA28.*..|
00001120: 33 4A 53 52 20 24 42 46 42 34 00 37 19 BC 33 4C |3JSR $BFB4.7..3L|
00001130: 44 41 20 23 B3 59 4F 00 44 19 BE 33 4C 44 59 20 |DA #.YO.D..3LDY |
00001140: 23 B1 59 4F 00 52 19 C0 33 4A 53 52 20 24 42 38 |#.YO.R..3JSR $B8|
00001150: 36 37 00 5F 19 C2 33 4C 44 58 20 23 B3 58 4F 00 |67._..3LDX #.XO.|
00001160: 6C 19 C4 33 4C 44 59 20 23 B1 58 4F 00 7A 19 C6 |l..3LDY #.XO.z..|
00001170: 33 4A 53 52 20 24 42 42 44 34 00 8C 19 C8 33 4C |3JSR $BBD4....3L|
00001180: 49 4E 31 20 4C 44 41 20 23 B3 44 58 00 99 19 CA |IN1 LDA #.DX....|
00001190: 33 4C 44 59 20 23 B1 44 58 00 A7 19 CC 33 4A 53 |3LDY #.DX....3JS|
000011A0: 52 20 24 42 42 41 32 00 B3 19 CE 33 4C 44 41 20 |R $BBA2....3LDA |
000011B0: 24 36 31 00 C0 19 D0 33 42 45 51 20 4C 49 4E 32 |$61....3BEQ LIN2|
000011C0: 00 CD 19 D2 33 4C 44 41 20 23 B3 44 59 00 DA 19 |....3LDA #.DY...|
000011D0: D4 33 4C 44 59 20 23 B1 44 59 00 E8 19 D6 33 4A |.3LDY #.DY....3J|
000011E0: 53 52 20 24 42 42 30 46 00 F5 19 D8 33 4C 44 58 |SR $BB0F....3LDX|
000011F0: 20 23 B3 53 59 00 02 1A DA 33 4C 44 59 20 23 B1 | #.SY....3LDY #.|
00001200: 53 59 00 10 1A DC 33 4A 53 52 20 24 42 42 44 34 |SY....3JSR $BBD4|
00001210: 00 1D 1A DE 33 4C 44 41 20 23 B3 59 4F 00 2A 1A |....3LDA #.YO.*.|
00001220: E0 33 4C 44 59 20 23 B1 59 4F 00 38 1A E2 33 4A |.3LDY #.YO.8..3J|
00001230: 53 52 20 24 42 41 32 38 00 46 1A E4 33 4A 53 52 |SR $BA28.F..3JSR|
00001240: 20 24 42 46 42 34 00 55 1A E6 33 4C 44 41 20 23 | $BFB4.U..3LDA #|
00001250: B3 54 4D 50 46 00 64 1A E8 33 4C 44 59 20 23 B1 |.TMPF.d..3LDY #.|
00001260: 54 4D 50 46 00 72 1A EA 33 4A 53 52 20 24 42 38 |TMPF.r..3JSR $B8|
00001270: 36 37 00 7F 1A EC 33 4C 44 58 20 23 B3 59 4F 00 |67....3LDX #.YO.|
00001280: 8C 1A EE 33 4C 44 59 20 23 B1 59 4F 00 9A 1A F0 |...3LDY #.YO....|
00001290: 33 4A 53 52 20 24 42 42 44 34 00 AC 1A F2 33 4C |3JSR $BBD4....3L|
000012A0: 49 4E 32 20 4C 44 41 20 23 B3 44 58 00 B9 1A F4 |IN2 LDA #.DX....|
000012B0: 33 4C 44 59 20 23 B1 44 58 00 C7 1A F6 33 4A 53 |3LDY #.DX....3JS|
000012C0: 52 20 24 42 42 41 32 00 D3 1A F8 33 4C 53 52 20 |R $BBA2....3LSR |
000012D0: 24 36 36 00 E2 1A FA 33 4C 44 58 20 23 B3 54 4D |$66....3LDX #.TM|
000012E0: 50 46 00 F1 1A FC 33 4C 44 59 20 23 B1 54 4D 50 |PF....3LDY #.TMP|
000012F0: 46 00 FF 1A FE 33 4A 53 52 20 24 42 42 44 34 00 |F....3JSR $BBD4.|
00001300: 0C 1B 00 34 4C 44 41 20 23 B3 44 59 00 19 1B 02 |...4LDA #.DY....|
00001310: 34 4C 44 59 20 23 B1 44 59 00 27 1B 04 34 4A 53 |4LDY #.DY.'..4JS|
00001320: 52 20 24 42 42 41 32 00 33 1B 06 34 4C 53 52 20 |R $BBA2.3..4LSR |
00001330: 24 36 36 00 42 1B 08 34 4C 44 41 20 23 B3 54 4D |$66.B..4LDA #.TM|
00001340: 50 46 00 51 1B 0A 34 4C 44 59 20 23 B1 54 4D 50 |PF.Q..4LDY #.TMP|
00001350: 46 00 5F 1B 0C 34 4A 53 52 20 24 42 43 35 42 00 |F._..4JSR $BC5B.|
00001360: 6C 1B 0E 34 42 4D 49 20 4C 49 4E 37 00 79 1B 10 |l..4BMI LIN7.y..|
00001370: 34 4C 44 41 20 44 59 AA 31 00 86 1B 12 34 42 4D |4LDA DY.1....4BM|
00001380: 49 20 4C 49 4E 33 00 93 1B 14 34 4A 53 52 20 53 |I LIN3....4JSR S|
00001390: 57 41 50 00 A3 1B 16 34 4C 49 4E 33 20 4C 44 41 |WAP....4LIN3 LDA|
000013A0: 20 59 31 00 AD 1B 18 34 53 54 41 20 59 00 BA 1B | Y1....4STA Y...|
000013B0: 1A 34 4C 44 41 20 59 31 AA 31 00 C6 1B 1C 34 53 |.4LDA Y1.1....4S|
000013C0: 54 41 20 59 AA 31 00 D1 1B 1E 34 4C 44 41 20 44 |TA Y.1....4LDA D|
000013D0: 59 00 DE 1B 20 34 42 4E 45 20 4C 49 4E 34 00 E9 |Y... 4BNE LIN4..|
000013E0: 1B 22 34 4C 44 41 20 58 31 00 F3 1B 24 34 53 54 |."4LDA X1...$4ST|
000013F0: 41 20 58 00 00 1C 26 34 4C 44 41 20 58 31 AA 31 |A X...&4LDA X1.1|
00001400: 00 0C 1C 28 34 53 54 41 20 58 AA 31 00 19 1C 2A |...(4STA X.1...*|
00001410: 34 4A 4D 50 20 4C 49 4E 36 00 28 1C 2C 34 4C 49 |4JMP LIN6.(.,4LI|
00001420: 4E 34 20 4C 44 59 20 59 00 34 1C 2E 34 4C 44 41 |N4 LDY Y.4..4LDA|
00001430: 20 59 AA 31 00 40 1C 30 34 53 54 59 20 24 36 33 | Y.1.@.04STY $63|
00001440: 00 4C 1C 32 34 53 54 41 20 24 36 32 00 59 1C 34 |.L.24STA $62.Y.4|
00001450: 34 4C 44 58 20 23 24 39 30 00 61 1C 36 34 53 45 |4LDX #$90.a.64SE|
00001460: 43 00 6F 1C 38 34 4A 53 52 20 24 42 43 34 39 00 |C.o.84JSR $BC49.|
00001470: 7C 1C 3A 34 4C 44 41 20 23 B3 53 58 00 89 1C 3C ||.:4LDA #.SX...<|
00001480: 34 4C 44 59 20 23 B1 53 58 00 97 1C 3E 34 4A 53 |4LDY #.SX...>4JS|
00001490: 52 20 24 42 41 32 38 00 A4 1C 40 34 4C 44 41 20 |R $BA28...@4LDA |
000014A0: 23 B3 58 4F 00 B1 1C 42 34 4C 44 59 20 23 B1 58 |#.XO...B4LDY #.X|
000014B0: 4F 00 BF 1C 44 34 4A 53 52 20 24 42 38 36 37 00 |O...D4JSR $B867.|
000014C0: CD 1C 46 34 4A 53 52 20 24 42 38 34 39 00 DB 1C |..F4JSR $B849...|
000014D0: 48 34 4A 53 52 20 24 42 37 46 37 00 E5 1C 4A 34 |H4JSR $B7F7...J4|
000014E0: 53 54 59 20 58 00 F1 1C 4C 34 53 54 41 20 58 AA |STY X...L4STA X.|
000014F0: 31 00 FF 1C 4E 34 4A 53 52 20 44 50 4C 4F 54 00 |1...N4JSR DPLOT.|
00001500: 0B 1D 50 34 4C 44 41 20 59 AA 31 00 18 1D 52 34 |..P4LDA Y.1...R4|
00001510: 43 4D 50 20 59 32 AA 31 00 25 1D 54 34 42 4E 45 |CMP Y2.1.%.T4BNE|
00001520: 20 4C 49 4E 35 00 2F 1D 56 34 4C 44 41 20 59 00 | LIN5./.V4LDA Y.|
00001530: 3A 1D 58 34 43 4D 50 20 59 32 00 47 1D 5A 34 42 |:.X4CMP Y2.G.Z4B|
00001540: 45 51 20 4C 49 4E 36 00 56 1D 5C 34 4C 49 4E 35 |EQ LIN6.V.\4LIN5|
00001550: 20 49 4E 43 20 59 00 63 1D 5E 34 42 4E 45 20 4C | INC Y.c.^4BNE L|
00001560: 49 4E 34 00 6F 1D 60 34 49 4E 43 20 59 AA 31 00 |IN4.o.`4INC Y.1.|
00001570: 7C 1D 62 34 42 4E 45 20 4C 49 4E 34 00 8E 1D 64 ||.b4BNE LIN4...d|
00001580: 34 4C 49 4E 36 20 4A 4D 50 20 50 4C 4F 31 00 A0 |4LIN6 JMP PLO1..|
00001590: 1D 66 34 4C 49 4E 37 20 4C 44 41 20 44 58 AA 31 |.f4LIN7 LDA DX.1|
000015A0: 00 AD 1D 68 34 42 4D 49 20 4C 49 4E 38 00 BA 1D |...h4BMI LIN8...|
000015B0: 6A 34 4A 53 52 20 53 57 41 50 00 CA 1D 6C 34 4C |j4JSR SWAP...l4L|
000015C0: 49 4E 38 20 4C 44 41 20 58 31 00 D4 1D 6E 34 53 |IN8 LDA X1...n4S|
000015D0: 54 41 20 58 00 E1 1D 70 34 4C 44 41 20 58 31 AA |TA X...p4LDA X1.|
000015E0: 31 00 ED 1D 72 34 53 54 41 20 58 AA 31 00 FC 1D |1...r4STA X.1...|
000015F0: 74 34 4C 49 4E 39 20 4C 44 59 20 58 00 08 1E 76 |t4LIN9 LDY X...v|
00001600: 34 4C 44 41 20 58 AA 31 00 15 1E 78 34 4A 53 52 |4LDA X.1...x4JSR|
00001610: 20 55 53 46 50 00 22 1E 7A 34 4C 44 41 20 23 B3 | USFP.".z4LDA #.|
00001620: 53 59 00 2F 1E 7C 34 4C 44 59 20 23 B1 53 59 00 |SY./.|4LDY #.SY.|
00001630: 3D 1E 7E 34 4A 53 52 20 24 42 41 32 38 00 4A 1E |=.~4JSR $BA28.J.|
00001640: 80 34 4C 44 41 20 23 B3 59 4F 00 57 1E 82 34 4C |.4LDA #.YO.W..4L|
00001650: 44 59 20 23 B1 59 4F 00 65 1E 84 34 4A 53 52 20 |DY #.YO.e..4JSR |
00001660: 24 42 38 36 37 00 73 1E 86 34 4A 53 52 20 24 42 |$B867.s..4JSR $B|
00001670: 38 34 39 00 81 1E 88 34 4A 53 52 20 24 42 37 46 |849....4JSR $B7F|
00001680: 37 00 8B 1E 8A 34 53 54 59 20 59 00 97 1E 8C 34 |7....4STY Y....4|
00001690: 53 54 41 20 59 AA 31 00 A5 1E 8E 34 4A 53 52 20 |STA Y.1....4JSR |
000016A0: 44 50 4C 4F 54 00 B1 1E 90 34 4C 44 41 20 58 AA |DPLOT....4LDA X.|
000016B0: 31 00 BE 1E 92 34 43 4D 50 20 58 32 AA 31 00 CC |1....4CMP X2.1..|
000016C0: 1E 94 34 42 4E 45 20 4C 49 4E 31 30 00 D6 1E 96 |..4BNE LIN10....|
000016D0: 34 4C 44 41 20 58 00 E1 1E 98 34 43 4D 50 20 58 |4LDA X....4CMP X|
000016E0: 32 00 EF 1E 9A 34 42 45 51 20 4C 49 4E 31 31 00 |2....4BEQ LIN11.|
000016F0: FF 1E 9C 34 4C 49 4E 31 30 20 49 4E 43 20 58 00 |...4LIN10 INC X.|
00001700: 0C 1F 9E 34 42 4E 45 20 4C 49 4E 39 00 18 1F A0 |...4BNE LIN9....|
00001710: 34 49 4E 43 20 58 AA 31 00 25 1F A2 34 42 4E 45 |4INC X.1.%..4BNE|
00001720: 20 4C 49 4E 39 00 38 1F A4 34 4C 49 4E 31 31 20 | LIN9.8..4LIN11 |
00001730: 4A 4D 50 20 50 4C 4F 31 00 3E 1F A6 34 3B 00 4E |JMP PLO1.>..4;.N|
00001740: 1F A8 34 53 57 41 50 20 4C 44 58 20 23 33 00 60 |..4SWAP LDX #3.`|
00001750: 1F AA 34 53 57 41 31 20 4C 44 59 20 58 31 2C 58 |..4SWA1 LDY X1,X|
00001760: 00 6D 1F AC 34 4C 44 41 20 58 32 2C 58 00 7A 1F |.m..4LDA X2,X.z.|
00001770: AE 34 53 54 41 20 58 31 2C 58 00 82 1F B0 34 54 |.4STA X1,X....4T|
00001780: 59 41 00 8F 1F B2 34 53 54 41 20 58 32 2C 58 00 |YA....4STA X2,X.|
00001790: 97 1F B4 34 44 45 58 00 A4 1F B6 34 42 50 4C 20 |...4DEX....4BPL |
000017A0: 53 57 41 31 00 AC 1F B8 34 52 54 53 00 B2 1F BA |SWA1....4RTS....|
000017B0: 34 3B 00 D5 1F BC 34 46 33 32 30 20 2E 42 59 54 |4;....4F320 .BYT|
000017C0: 45 20 24 39 30 2C 24 32 30 2C 24 30 30 2C 24 30 |E $90,$20,$00,$0|
000017D0: 30 2C 24 30 30 00 F8 1F BE 34 46 34 30 30 20 2E |0,$00....4F400 .|
000017E0: 42 59 54 45 20 24 39 30 2C 24 34 38 2C 24 30 30 |BYTE $90,$48,$00|
000017F0: 2C 24 30 30 2C 24 30 30 00 FE 1F C0 34 3B 00 12 |,$00,$00....4;..|
00001800: 20 C2 34 43 4F 4D 58 20 4C 44 41 20 23 B3 46 33 | .4COMX LDA #.F3|
00001810: 32 30 00 21 20 C4 34 4C 44 59 20 23 B1 46 33 32 |20.! .4LDY #.F32|
00001820: 30 00 2E 20 C6 34 42 4E 45 20 43 48 45 4B 00 34 |0.. .4BNE CHEK.4|
00001830: 20 C8 34 3B 00 48 20 CA 34 43 4F 4D 59 20 4C 44 | .4;.H .4COMY LD|
00001840: 41 20 23 B3 46 34 30 30 00 57 20 CC 34 4C 44 59 |A #.F400.W .4LDY|
00001850: 20 23 B1 46 34 30 30 00 5D 20 CE 34 3B 00 6E 20 | #.F400.] .4;.n |
00001860: D0 34 43 48 45 4B 20 4C 44 58 20 24 36 36 00 7B |.4CHEK LDX $66.{|
00001870: 20 D2 34 42 4D 49 20 43 48 45 31 00 89 20 D4 34 | .4BMI CHE1.. .4|
00001880: 4A 53 52 20 24 42 43 35 42 00 96 20 D6 34 42 50 |JSR $BC5B.. .4BP|
00001890: 4C 20 43 48 45 32 00 A3 20 D8 34 43 48 45 31 20 |L CHE2.. .4CHE1 |
000018A0: 52 54 53 00 B6 20 DA 34 43 48 45 32 20 4A 4D 50 |RTS.. .4CHE2 JMP|
000018B0: 20 24 42 32 34 38 00 BC 20 DC 34 3B 00 CD 20 DE | $B248.. .4;.. .|
000018C0: 34 44 50 4C 4F 54 20 52 B0 20 44 4F 54 00 D5 20 |4DPLOT R. DOT.. |
000018D0: E0 34 50 48 50 00 E1 20 E2 34 52 4F 4C 20 44 4F |.4PHP.. .4ROL DO|
000018E0: 54 00 E9 20 E4 34 50 4C 50 00 F4 20 E6 34 52 B0 |T.. .4PLP.. .4R.|
000018F0: 20 44 4F 54 00 01 21 E8 34 42 43 43 20 43 48 45 | DOT..!.4BCC CHE|
00001900: 31 00 0E 21 EA 34 4A 4D 50 20 50 4C 4F 31 00 14 |1..!.4JMP PLO1..|
00001910: 21 EC 34 3B 00 23 21 EE 34 43 48 41 20 4A 53 52 |!.4;.#!.4CHA JSR|
00001920: 20 A1 32 00 31 21 F0 34 4A 53 52 20 24 41 45 46 | .2.1!.4JSR $AEF|
00001930: 44 00 3F 21 F2 34 4A 53 52 20 24 41 44 39 45 00 |D.?!.4JSR $AD9E.|
00001940: 4D 21 F4 34 4A 53 52 20 24 42 36 41 33 00 57 21 |M!.4JSR $B6A3.W!|
00001950: F6 34 53 54 41 20 C3 00 67 21 F8 34 43 48 41 31 |.4STA ..g!.4CHA1|
00001960: 20 4C 44 59 20 23 30 00 77 21 FA 34 4C 44 41 20 | LDY #0.w!.4LDA |
00001970: 28 24 32 32 29 2C 59 00 7F 21 FC 34 54 41 58 00 |($22),Y..!.4TAX.|
00001980: 8A 21 FE 34 AF 20 23 24 37 46 00 97 21 00 35 43 |.!.4. #$7F..!.5C|
00001990: 4D 50 20 23 24 32 30 00 9F 21 02 35 54 58 41 00 |MP #$20..!.5TXA.|
000019A0: AC 21 04 35 42 43 53 20 43 48 41 36 00 B7 21 06 |.!.5BCS CHA6..!.|
000019B0: 35 4C 44 59 20 23 39 00 CC 21 08 35 43 48 41 32 |5LDY #9..!.5CHA2|
000019C0: 20 43 4D 50 20 43 54 52 4C 53 2C 59 00 D9 21 0A | CMP CTRLS,Y..!.|
000019D0: 35 42 45 51 20 43 48 41 33 00 E1 21 0C 35 44 45 |5BEQ CHA3..!.5DE|
000019E0: 59 00 EE 21 0E 35 42 50 4C 20 43 48 41 32 00 FB |Y..!.5BPL CHA2..|
000019F0: 21 10 35 42 4D 49 20 43 48 41 34 00 08 22 12 35 |!.5BMI CHA4..".5|
00001A00: 43 48 41 33 20 54 59 41 00 10 22 14 35 41 53 4C |CHA3 TYA..".5ASL|
00001A10: 00 18 22 16 35 54 41 58 00 29 22 18 35 4C 44 41 |..".5TAX.)".5LDA|
00001A20: 20 43 43 52 54 4E 53 2C 58 00 34 22 1A 35 53 54 | CCRTNS,X.4".5ST|
00001A30: 41 20 54 32 00 47 22 1C 35 4C 44 41 20 43 43 52 |A T2.G".5LDA CCR|
00001A40: 54 4E 53 AA 31 2C 58 00 52 22 1E 35 53 54 41 20 |TNS.1,X.R".5STA |
00001A50: 54 33 00 5F 22 20 35 4A 53 52 20 43 48 41 35 00 |T3._" 5JSR CHA5.|
00001A60: 72 22 22 35 43 48 41 34 20 4A 4D 50 20 43 48 41 |r""5CHA4 JMP CHA|
00001A70: 32 30 00 84 22 24 35 43 48 41 35 20 4A 4D 50 20 |20.."$5CHA5 JMP |
00001A80: 28 54 32 29 00 8A 22 26 35 3B 00 AE 22 28 35 43 |(T2).."&5;.."(5C|
00001A90: 54 52 4C 53 20 2E 42 59 54 45 20 24 31 32 2C 24 |TRLS .BYTE $12,$|
00001AA0: 39 32 2C 24 31 46 2C 24 39 45 2C 24 39 30 00 CC |92,$1F,$9E,$90..|
00001AB0: 22 2A 35 2E 42 59 54 45 20 24 30 35 2C 24 31 31 |"*5.BYTE $05,$11|
00001AC0: 2C 24 31 44 2C 24 39 31 2C 24 39 44 00 D2 22 2C |,$1D,$91,$9D..",|
00001AD0: 35 3B 00 F7 22 2E 35 43 43 52 54 4E 53 20 2E 57 |5;..".5CCRTNS .W|
00001AE0: B0 44 20 43 43 52 2C 43 43 52 58 2C 43 43 4C 2C |.D CCR,CCRX,CCL,|
00001AF0: 43 43 55 2C 43 43 45 00 19 23 30 35 2E 57 B0 44 |CCU,CCE..#05.W.D|
00001B00: 20 43 43 45 58 2C 43 43 44 4E 2C 43 43 52 54 2C | CCEX,CCDN,CCRT,|
00001B10: 43 43 55 50 2C 43 43 4C 54 00 1F 23 32 35 3B 00 |CCUP,CCLT..#25;.|
00001B20: 2E 23 34 35 43 43 52 20 4C 44 41 20 23 34 00 3C |.#45CCR LDA #4.<|
00001B30: 23 36 35 2E 42 59 54 45 20 24 32 43 00 4B 23 38 |#65.BYTE $2C.K#8|
00001B40: 35 43 43 4C 20 4C 44 41 20 23 38 00 58 23 3A 35 |5CCL LDA #8.X#:5|
00001B50: B0 41 20 43 48 4F 46 46 00 65 23 3C 35 42 4E 45 |.A CHOFF.e#<5BNE|
00001B60: 20 43 43 55 31 00 6B 23 3E 35 3B 00 7D 23 40 35 | CCU1.k#>5;.}#@5|
00001B70: 43 43 52 58 20 4C 44 41 20 23 24 44 42 00 8B 23 |CCRX LDA #$DB..#|
00001B80: 42 35 2E 42 59 54 45 20 24 32 43 00 9C 23 44 35 |B5.BYTE $2C..#D5|
00001B90: 43 43 55 20 4C 44 41 20 23 24 44 37 00 A8 23 46 |CCU LDA #$D7..#F|
00001BA0: 35 AF 20 43 48 4F 46 46 00 BB 23 48 35 43 43 55 |5. CHOFF..#H5CCU|
00001BB0: 31 20 53 54 41 20 43 48 4F 46 46 00 C3 23 4A 35 |1 STA CHOFF..#J5|
00001BC0: 52 54 53 00 C9 23 4C 35 3B 00 DA 23 4E 35 43 43 |RTS..#L5;..#N5CC|
00001BD0: 45 20 4C 44 41 20 23 24 46 46 00 E8 23 50 35 2E |E LDA #$FF..#P5.|
00001BE0: 42 59 54 45 20 24 32 43 00 F8 23 52 35 43 43 45 |BYTE $2C..#R5CCE|
00001BF0: 58 20 4C 44 41 20 23 30 00 06 24 54 35 53 54 41 |X LDA #0..$T5STA|
00001C00: 20 45 52 46 4C 47 00 0E 24 56 35 52 54 53 00 14 | ERFLG..$V5RTS..|
00001C10: 24 58 35 3B 00 26 24 5A 35 43 43 44 4E 20 4C 44 |$X5;.&$Z5CCDN LD|
00001C20: 41 20 23 24 46 38 00 34 24 5C 35 2E 42 59 54 45 |A #$F8.4$\5.BYTE|
00001C30: 20 24 32 43 00 44 24 5E 35 43 43 55 50 20 4C 44 | $2C.D$^5CCUP LD|
00001C40: 41 20 23 38 00 51 24 60 35 4A 4D 50 20 59 4F 46 |A #8.Q$`5JMP YOF|
00001C50: 46 00 57 24 62 35 3B 00 67 24 64 35 43 43 52 54 |F.W$b5;.g$d5CCRT|
00001C60: 20 4C 44 41 20 23 38 00 75 24 66 35 2E 42 59 54 | LDA #8.u$f5.BYT|
00001C70: 45 20 24 32 43 00 87 24 68 35 43 43 4C 54 20 4C |E $2C..$h5CCLT L|
00001C80: 44 41 20 23 24 46 38 00 94 24 6A 35 4A 4D 50 20 |DA #$F8..$j5JMP |
00001C90: 58 4F 46 46 00 9A 24 6C 35 3B 00 AA 24 6E 35 43 |XOFF..$l5;..$n5C|
00001CA0: 48 41 36 20 AF 20 23 24 45 30 00 B7 24 70 35 43 |HA6 . #$E0..$p5C|
00001CB0: 4D 50 20 23 24 36 30 00 C4 24 72 35 42 4E 45 20 |MP #$60..$r5BNE |
00001CC0: 43 48 41 37 00 CC 24 74 35 54 58 41 00 D4 24 76 |CHA7..$t5TXA..$v|
00001CD0: 35 53 45 43 00 E1 24 78 35 53 42 43 20 23 24 32 |5SEC..$x5SBC #$2|
00001CE0: 30 00 E9 24 7A 35 54 41 58 00 F6 24 7C 35 42 4E |0..$z5TAX..$|5BN|
00001CF0: 45 20 43 48 41 39 00 08 25 7E 35 43 48 41 37 20 |E CHA9..%~5CHA7 |
00001D00: 43 4D 50 20 23 24 38 30 00 13 25 80 35 AF 20 23 |CMP #$80..%.5. #|
00001D10: 24 34 30 00 20 25 82 35 42 43 43 20 43 48 41 38 |$40. %.5BCC CHA8|
00001D20: 00 2D 25 84 35 41 44 43 20 23 24 33 46 00 3D 25 |.-%.5ADC #$3F.=%|
00001D30: 86 35 43 48 41 38 20 53 54 41 20 54 32 00 45 25 |.5CHA8 STA T2.E%|
00001D40: 88 35 53 45 43 00 4D 25 8A 35 54 58 41 00 58 25 |.5SEC.M%.5TXA.X%|
00001D50: 8C 35 53 42 43 20 54 32 00 60 25 8E 35 54 41 58 |.5SBC T2.`%.5TAX|
00001D60: 00 70 25 90 35 43 48 41 39 20 4C 44 41 20 23 30 |.p%.5CHA9 LDA #0|
00001D70: 00 7C 25 92 35 53 54 41 20 54 4D 50 00 84 25 94 |.|%.5STA TMP..%.|
00001D80: 35 54 58 41 00 8F 25 96 35 4C 44 58 20 23 33 00 |5TXA..%.5LDX #3.|
00001D90: 9D 25 98 35 43 48 41 31 30 20 41 53 4C 00 A9 25 |.%.5CHA10 ASL..%|
00001DA0: 9A 35 52 4F 4C 20 54 4D 50 00 B1 25 9C 35 44 45 |.5ROL TMP..%.5DE|
00001DB0: 58 00 BF 25 9E 35 42 4E 45 20 43 48 41 31 30 00 |X..%.5BNE CHA10.|
00001DC0: CC 25 A0 35 53 54 41 20 54 4D 50 34 00 DA 25 A2 |.%.5STA TMP4..%.|
00001DD0: 35 4C 44 41 20 43 48 4F 46 46 00 E2 25 A4 35 43 |5LDA CHOFF..%.5C|
00001DE0: 4C 43 00 EE 25 A6 35 41 44 43 20 54 4D 50 00 FD |LC..%.5ADC TMP..|
00001DF0: 25 A8 35 53 54 41 20 54 4D 50 34 AA 31 00 0A 26 |%.5STA TMP4.1..&|
00001E00: AA 35 4C 44 41 20 23 24 46 39 00 17 26 AC 35 4A |.5LDA #$F9..&.5J|
00001E10: 53 52 20 59 4F 46 46 00 22 26 AE 35 4C 44 59 20 |SR YOFF."&.5LDY |
00001E20: 23 37 00 30 26 B0 35 43 48 41 31 31 20 53 45 49 |#7.0&.5CHA11 SEI|
00001E30: 00 3A 26 B2 35 4C 44 41 20 31 00 45 26 B4 35 AF |.:&.5LDA 1.E&.5.|
00001E40: 20 23 24 46 42 00 4F 26 B6 35 53 54 41 20 31 00 | #$FB.O&.5STA 1.|
00001E50: 60 26 B8 35 4C 44 41 20 28 54 4D 50 34 29 2C 59 |`&.5LDA (TMP4),Y|
00001E60: 00 68 26 BA 35 54 41 58 00 72 26 BC 35 4C 44 41 |.h&.5TAX.r&.5LDA|
00001E70: 20 31 00 7C 26 BE 35 B0 41 20 23 34 00 86 26 C0 | 1.|&.5.A #4..&.|
00001E80: 35 53 54 41 20 31 00 8E 26 C2 35 43 4C 49 00 96 |5STA 1..&.5CLI..|
00001E90: 26 C4 35 54 59 41 00 9E 26 C6 35 50 48 41 00 A6 |&.5TYA..&.5PHA..|
00001EA0: 26 C8 35 54 58 41 00 AE 26 CA 35 50 48 41 00 B9 |&.5TXA..&.5PHA..|
00001EB0: 26 CC 35 4C 44 58 20 23 37 00 C7 26 CE 35 43 48 |&.5LDX #7..&.5CH|
00001EC0: 41 31 32 20 50 4C 41 00 CF 26 D0 35 41 53 4C 00 |A12 PLA..&.5ASL.|
00001ED0: D7 26 D2 35 50 48 41 00 E5 26 D4 35 42 43 43 20 |.&.5PHA..&.5BCC |
00001EE0: 43 48 41 31 37 00 F1 26 D6 35 4C 44 41 20 58 AA |CHA17..&.5LDA X.|
00001EF0: 31 00 FF 26 D8 35 42 4D 49 20 43 48 41 31 34 00 |1..&.5BMI CHA14.|
00001F00: 12 27 DA 35 43 48 41 31 33 20 4C 44 41 20 23 24 |.'.5CHA13 LDA #$|
00001F10: 46 45 00 1E 27 DC 35 53 54 41 20 54 4D 50 00 2B |FE..'.5STA TMP.+|
00001F20: 27 DE 35 4C 44 41 20 23 24 43 30 00 39 27 E0 35 |'.5LDA #$C0.9'.5|
00001F30: 4A 53 52 20 58 4F 46 46 32 00 47 27 E2 35 42 50 |JSR XOFF2.G'.5BP|
00001F40: 4C 20 43 48 41 31 33 00 58 27 E4 35 43 48 41 31 |L CHA13.X'.5CHA1|
00001F50: 34 20 4C 44 41 20 23 31 00 64 27 E6 35 53 54 41 |4 LDA #1.d'.5STA|
00001F60: 20 54 4D 50 00 71 27 E8 35 4C 44 41 20 23 24 34 | TMP.q'.5LDA #$4|
00001F70: 30 00 7F 27 EA 35 4A 53 52 20 58 4F 46 46 32 00 |0..'.5JSR XOFF2.|
00001F80: 8D 27 EC 35 42 4D 49 20 43 48 41 31 34 00 99 27 |.'.5BMI CHA14..'|
00001F90: EE 35 4C 44 41 20 59 AA 31 00 A7 27 F0 35 42 4D |.5LDA Y.1..'.5BM|
00001FA0: 49 20 43 48 41 31 36 00 BA 27 F2 35 43 48 41 31 |I CHA16..'.5CHA1|
00001FB0: 35 20 4C 44 41 20 23 24 46 45 00 C6 27 F4 35 53 |5 LDA #$FE..'.5S|
00001FC0: 54 41 20 54 4D 50 00 D3 27 F6 35 4C 44 41 20 23 |TA TMP..'.5LDA #|
00001FD0: 24 37 30 00 E1 27 F8 35 4A 53 52 20 59 4F 46 46 |$70..'.5JSR YOFF|
00001FE0: 32 00 EF 27 FA 35 42 50 4C 20 43 48 41 31 35 00 |2..'.5BPL CHA15.|
00001FF0: 00 28 FC 35 43 48 41 31 36 20 4C 44 41 20 23 31 |.(.5CHA16 LDA #1|
00002000: 00 0C 28 FE 35 53 54 41 20 54 4D 50 00 19 28 00 |..(.5STA TMP..(.|
00002010: 36 4C 44 41 20 23 24 39 30 00 27 28 02 36 4A 53 |6LDA #$90.'(.6JS|
00002020: 52 20 59 4F 46 46 32 00 35 28 04 36 42 4D 49 20 |R YOFF2.5(.6BMI |
00002030: 43 48 41 31 36 00 3D 28 06 36 54 58 41 00 45 28 |CHA16.=(.6TXA.E(|
00002040: 08 36 50 48 41 00 52 28 0A 36 4A 53 52 20 50 4C |.6PHA.R(.6JSR PL|
00002050: 4F 31 00 5A 28 0C 36 50 4C 41 00 62 28 0E 36 54 |O1.Z(.6PLA.b(.6T|
00002060: 41 58 00 70 28 10 36 43 48 41 31 37 20 44 45 58 |AX.p(.6CHA17 DEX|
00002070: 00 7E 28 12 36 42 4D 49 20 43 48 41 31 38 00 89 |.~(.6BMI CHA18..|
00002080: 28 14 36 4C 44 41 20 23 31 00 96 28 16 36 4A 53 |(.6LDA #1..(.6JS|
00002090: 52 20 58 4F 46 46 00 A4 28 18 36 4A 4D 50 20 43 |R XOFF..(.6JMP C|
000020A0: 48 41 31 32 00 B2 28 1A 36 43 48 41 31 38 20 50 |HA12..(.6CHA18 P|
000020B0: 4C 41 00 BA 28 1C 36 50 4C 41 00 C2 28 1E 36 54 |LA..(.6PLA..(.6T|
000020C0: 41 59 00 CA 28 20 36 44 45 59 00 D8 28 22 36 42 |AY..( 6DEY..("6B|
000020D0: 4D 49 20 43 48 41 31 39 00 E5 28 24 36 4C 44 41 |MI CHA19..($6LDA|
000020E0: 20 23 24 46 39 00 F2 28 26 36 4A 53 52 20 58 4F | #$F9..(&6JSR XO|
000020F0: 46 46 00 FD 28 28 36 4C 44 41 20 23 31 00 0A 29 |FF..((6LDA #1..)|
00002100: 2A 36 4A 53 52 20 59 4F 46 46 00 18 29 2C 36 4A |*6JSR YOFF..),6J|
00002110: 4D 50 20 43 48 41 31 31 00 29 29 2E 36 43 48 41 |MP CHA11.)).6CHA|
00002120: 31 39 20 4C 44 41 20 23 31 00 36 29 30 36 4A 53 |19 LDA #1.6)06JS|
00002130: 52 20 58 4F 46 46 00 48 29 32 36 43 48 41 32 30 |R XOFF.H)26CHA20|
00002140: 20 49 4E 43 20 24 32 32 00 56 29 34 36 42 4E 45 | INC $22.V)46BNE|
00002150: 20 43 48 41 32 31 00 62 29 36 36 49 4E 43 20 24 | CHA21.b)66INC $|
00002160: 32 33 00 72 29 38 36 43 48 41 32 31 20 44 45 43 |23.r)86CHA21 DEC|
00002170: 20 C3 00 80 29 3A 36 42 45 51 20 43 48 41 32 32 | ...):6BEQ CHA22|
00002180: 00 8D 29 3C 36 4A 4D 50 20 43 48 41 31 00 9B 29 |..)<6JMP CHA1..)|
00002190: 3E 36 43 48 41 32 32 20 52 54 53 00 A1 29 40 36 |>6CHA22 RTS..)@6|
000021A0: 3B 00 AE 29 42 36 58 4F 46 46 20 50 48 41 00 BB |;..)B6XOFF PHA..|
000021B0: 29 44 36 43 4D 50 20 23 24 38 30 00 C8 29 46 36 |)D6CMP #$80..)F6|
000021C0: 42 43 53 20 58 4F 46 31 00 D3 29 48 36 4C 44 41 |BCS XOF1..)H6LDA|
000021D0: 20 23 30 00 E1 29 4A 36 2E 42 59 54 45 20 24 32 | #0..)J6.BYTE $2|
000021E0: 43 00 F3 29 4C 36 58 4F 46 31 20 4C 44 41 20 23 |C..)L6XOF1 LDA #|
000021F0: 24 46 46 00 FF 29 4E 36 53 54 41 20 54 4D 50 00 |$FF..)N6STA TMP.|
00002200: 07 2A 50 36 50 4C 41 00 0D 2A 52 36 3B 00 1B 2A |.*P6PLA..*R6;..*|
00002210: 54 36 58 4F 46 46 32 20 43 4C 43 00 25 2A 56 36 |T6XOFF2 CLC.%*V6|
00002220: 41 44 43 20 58 00 2F 2A 58 36 53 54 41 20 58 00 |ADC X./*X6STA X.|
00002230: 3B 2A 5A 36 4C 44 41 20 54 4D 50 00 47 2A 5C 36 |;*Z6LDA TMP.G*\6|
00002240: 41 44 43 20 58 AA 31 00 53 2A 5E 36 53 54 41 20 |ADC X.1.S*^6STA |
00002250: 58 AA 31 00 5B 2A 60 36 52 54 53 00 61 2A 62 36 |X.1.[*`6RTS.a*b6|
00002260: 3B 00 6E 2A 64 36 59 4F 46 46 20 50 48 41 00 7B |;.n*d6YOFF PHA.{|
00002270: 2A 66 36 43 4D 50 20 23 24 38 30 00 88 2A 68 36 |*f6CMP #$80..*h6|
00002280: 42 43 53 20 59 4F 46 31 00 93 2A 6A 36 4C 44 41 |BCS YOF1..*j6LDA|
00002290: 20 23 30 00 A1 2A 6C 36 2E 42 59 54 45 20 24 32 | #0..*l6.BYTE $2|
000022A0: 43 00 B3 2A 6E 36 59 4F 46 31 20 4C 44 41 20 23 |C..*n6YOF1 LDA #|
000022B0: 24 46 46 00 BF 2A 70 36 53 54 41 20 54 4D 50 00 |$FF..*p6STA TMP.|
000022C0: C7 2A 72 36 50 4C 41 00 CD 2A 74 36 3B 00 DB 2A |.*r6PLA..*t6;..*|
000022D0: 76 36 59 4F 46 46 32 20 43 4C 43 00 E5 2A 78 36 |v6YOFF2 CLC..*x6|
000022E0: 41 44 43 20 59 00 EF 2A 7A 36 53 54 41 20 59 00 |ADC Y..*z6STA Y.|
000022F0: FB 2A 7C 36 4C 44 41 20 54 4D 50 00 07 2B 7E 36 |.*|6LDA TMP..+~6|
00002300: 41 44 43 20 59 AA 31 00 13 2B 80 36 53 54 41 20 |ADC Y.1..+.6STA |
00002310: 59 AA 31 00 1B 2B 82 36 52 54 53 00 21 2B 84 36 |Y.1..+.6RTS.!+.6|
00002320: 3B 00 31 2B 86 36 53 43 48 41 20 4A 53 52 20 A1 |;.1+.6SCHA JSR .|
00002330: 32 00 3F 2B 88 36 4A 53 52 20 24 41 45 46 44 00 |2.?+.6JSR $AEFD.|
00002340: 4C 2B 8A 36 4C 44 41 20 23 24 46 45 00 59 2B 8C |L+.6LDA #$FE.Y+.|
00002350: 36 4A 53 52 20 58 4F 46 46 00 66 2B 8E 36 4C 44 |6JSR XOFF.f+.6LD|
00002360: 41 20 23 24 46 45 00 73 2B 90 36 4A 53 52 20 59 |A #$FE.s+.6JSR Y|
00002370: 4F 46 46 00 81 2B 92 36 4A 53 52 20 24 42 37 39 |OFF..+.6JSR $B79|
00002380: 45 00 89 2B 94 36 54 58 41 00 96 2B 96 36 53 54 |E..+.6TXA..+.6ST|
00002390: 41 20 54 4D 50 33 00 9E 2B 98 36 41 53 4C 00 A6 |A TMP3..+.6ASL..|
000023A0: 2B 9A 36 41 53 4C 00 B3 2B 9C 36 41 44 43 20 54 |+.6ASL..+.6ADC T|
000023B0: 4D 50 33 00 C0 2B 9E 36 53 54 41 20 54 4D 50 33 |MP3..+.6STA TMP3|
000023C0: 00 CB 2B A0 36 4C 44 59 20 23 35 00 DD 2B A2 36 |..+.6LDY #5..+.6|
000023D0: 53 43 48 31 20 4C 44 41 20 54 4D 50 33 00 E5 2B |SCH1 LDA TMP3..+|
000023E0: A4 36 54 41 58 00 F2 2B A6 36 49 4E 43 20 54 4D |.6TAX..+.6INC TM|
000023F0: 50 33 00 00 2C A8 36 4C 44 41 20 53 43 58 2C 58 |P3..,.6LDA SCX,X|
00002400: 00 0B 2C AA 36 4C 44 58 20 23 35 00 18 2C AC 36 |..,.6LDX #5..,.6|
00002410: 53 43 48 32 20 41 53 4C 00 20 2C AE 36 50 48 41 |SCH2 ASL. ,.6PHA|
00002420: 00 2D 2C B0 36 42 43 43 20 53 43 48 35 00 39 2C |.-,.6BCC SCH5.9,|
00002430: B2 36 4C 44 41 20 58 AA 31 00 46 2C B4 36 42 45 |.6LDA X.1.F,.6BE|
00002440: 51 20 53 43 48 33 00 50 2C B6 36 4C 44 41 20 58 |Q SCH3.P,.6LDA X|
00002450: 00 5D 2C B8 36 43 4D 50 20 23 24 34 30 00 6A 2C |.],.6CMP #$40.j,|
00002460: BA 36 42 43 53 20 53 43 48 35 00 7B 2C BC 36 53 |.6BCS SCH5.{,.6S|
00002470: 43 48 33 20 4C 44 41 20 59 AA 31 00 88 2C BE 36 |CH3 LDA Y.1..,.6|
00002480: 42 45 51 20 53 43 48 34 00 92 2C C0 36 4C 44 41 |BEQ SCH4..,.6LDA|
00002490: 20 59 00 9F 2C C2 36 43 4D 50 20 23 24 39 30 00 | Y..,.6CMP #$90.|
000024A0: AC 2C C4 36 42 43 53 20 53 43 48 35 00 B9 2C C6 |.,.6BCS SCH5..,.|
000024B0: 36 53 43 48 34 20 54 58 41 00 C1 2C C8 36 50 48 |6SCH4 TXA..,.6PH|
000024C0: 41 00 C9 2C CA 36 54 59 41 00 D1 2C CC 36 50 48 |A..,.6TYA..,.6PH|
000024D0: 41 00 DE 2C CE 36 4A 53 52 20 50 4C 4F 31 00 E6 |A..,.6JSR PLO1..|
000024E0: 2C D0 36 50 4C 41 00 EE 2C D2 36 54 41 59 00 F6 |,.6PLA..,.6TAY..|
000024F0: 2C D4 36 50 4C 41 00 FE 2C D6 36 54 41 58 00 0E |,.6PLA..,.6TAX..|
00002500: 2D D8 36 53 43 48 35 20 4C 44 41 20 23 31 00 1B |-.6SCH5 LDA #1..|
00002510: 2D DA 36 4A 53 52 20 58 4F 46 46 00 23 2D DC 36 |-.6JSR XOFF.#-.6|
00002520: 50 4C 41 00 2B 2D DE 36 44 45 58 00 38 2D E0 36 |PLA.+-.6DEX.8-.6|
00002530: 42 4E 45 20 53 43 48 32 00 43 2D E2 36 4C 44 41 |BNE SCH2.C-.6LDA|
00002540: 20 23 31 00 50 2D E4 36 4A 53 52 20 59 4F 46 46 | #1.P-.6JSR YOFF|
00002550: 00 5D 2D E6 36 4C 44 41 20 23 24 46 42 00 6A 2D |.]-.6LDA #$FB.j-|
00002560: E8 36 4A 53 52 20 58 4F 46 46 00 72 2D EA 36 44 |.6JSR XOFF.r-.6D|
00002570: 45 59 00 7F 2D EC 36 42 4E 45 20 53 43 48 31 00 |EY..-.6BNE SCH1.|
00002580: 87 2D EE 36 52 54 53 00 8D 2D F0 36 3B 00 B1 2D |.-.6RTS..-.6;..-|
00002590: F2 36 3B 43 48 41 52 53 20 AB 20 35 20 4C 45 46 |.6;CHARS . 5 LEF|
000025A0: 54 20 42 49 54 53 20 4F 46 20 35 20 42 59 54 45 |T BITS OF 5 BYTE|
000025B0: 53 00 BC 2D F4 36 53 43 58 20 B2 AC 00 DA 2D F6 |S..-.6SCX ....-.|
000025C0: 36 2E 42 59 54 45 20 24 38 38 2C 24 35 30 2C 24 |6.BYTE $88,$50,$|
000025D0: 32 30 2C 24 35 30 2C 24 38 38 00 F8 2D F8 36 2E |20,$50,$88..-.6.|
000025E0: 42 59 54 45 20 24 32 30 2C 24 32 30 2C 24 46 43 |BYTE $20,$20,$FC|
000025F0: 2C 24 32 30 2C 24 32 30 00 16 2E FA 36 2E 42 59 |,$20,$20....6.BY|
00002600: 54 45 20 24 46 43 2C 24 38 38 2C 24 38 38 2C 24 |TE $FC,$88,$88,$|
00002610: 38 38 2C 24 46 43 00 34 2E FC 36 2E 42 59 54 45 |88,$FC.4..6.BYTE|
00002620: 20 24 32 30 2C 24 35 30 2C 24 38 38 2C 24 35 30 | $20,$50,$88,$50|
00002630: 2C 24 32 30 00 52 2E FE 36 2E 42 59 54 45 20 24 |,$20.R..6.BYTE $|
00002640: 30 30 2C 24 35 30 2C 24 32 30 2C 24 35 30 2C 24 |00,$50,$20,$50,$|
00002650: 30 30 00 70 2E 00 37 2E 42 59 54 45 20 24 30 30 |00.p..7.BYTE $00|
00002660: 2C 24 32 30 2C 24 37 30 2C 24 32 30 2C 24 30 30 |,$20,$70,$20,$00|
00002670: 00 8E 2E 02 37 2E 42 59 54 45 20 24 30 30 2C 24 |....7.BYTE $00,$|
00002680: 37 30 2C 24 35 30 2C 24 37 30 2C 24 30 30 00 AC |70,$50,$70,$00..|
00002690: 2E 04 37 2E 42 59 54 45 20 24 30 30 2C 24 32 30 |..7.BYTE $00,$20|
000026A0: 2C 24 35 30 2C 24 32 30 2C 24 30 30 00 CA 2E 06 |,$50,$20,$00....|
000026B0: 37 2E 42 59 54 45 20 24 46 43 2C 24 46 43 2C 24 |7.BYTE $FC,$FC,$|
000026C0: 46 43 2C 24 46 43 2C 24 46 43 00 E8 2E 08 37 2E |FC,$FC,$FC....7.|
000026D0: 42 59 54 45 20 24 32 30 2C 24 37 30 2C 24 46 43 |BYTE $20,$70,$FC|
000026E0: 2C 24 37 30 2C 24 32 30 00 06 2F 0A 37 2E 42 59 |,$70,$20../.7.BY|
000026F0: 54 45 20 24 30 30 2C 24 37 30 2C 24 37 30 2C 24 |TE $00,$70,$70,$|
00002700: 37 30 2C 24 30 30 00 24 2F 0C 37 2E 42 59 54 45 |70,$00.$/.7.BYTE|
00002710: 20 24 30 30 2C 24 32 30 2C 24 37 30 2C 24 32 30 | $00,$20,$70,$20|
00002720: 2C 24 30 30 00 2A 2F 0E 37 3B 00 3B 2F 10 37 53 |,$00.*/.7;.;/.7S|
00002730: 42 41 20 4C 44 58 20 23 24 35 35 00 48 2F 12 37 |BA LDX #$55.H/.7|
00002740: 4C 44 41 20 23 24 41 41 00 54 2F 14 37 42 4E 45 |LDA #$AA.T/.7BNE|
00002750: 20 4E 42 31 00 5A 2F 16 37 3B 00 6B 2F 18 37 44 | NB1.Z/.7;.k/.7D|
00002760: 42 41 20 4C 44 58 20 23 24 33 33 00 78 2F 1A 37 |BA LDX #$33.x/.7|
00002770: 4C 44 41 20 23 24 39 39 00 84 2F 1C 37 42 4E 45 |LDA #$99../.7BNE|
00002780: 20 4E 42 31 00 8A 2F 1E 37 3B 00 9B 2F 20 37 4E | NB1../.7;../ 7N|
00002790: 42 41 20 4C 44 41 20 23 24 46 46 00 A3 2F 22 37 |BA LDA #$FF../"7|
000027A0: 54 41 58 00 B3 2F 24 37 4E 42 31 20 53 54 58 20 |TAX../$7NB1 STX |
000027B0: 44 4F 54 00 C0 2F 26 37 53 54 41 20 4C 44 4F 54 |DOT../&7STA LDOT|
000027C0: 00 C6 2F 28 37 3B 00 D6 2F 2A 37 42 42 41 20 4C |../(7;../*7BBA L|
000027D0: 44 41 20 44 4F 54 00 E3 2F 2C 37 53 54 41 20 54 |DA DOT../,7STA T|
000027E0: 4D 50 33 00 F0 2F 2E 37 4C 44 41 20 4C 44 4F 54 |MP3../.7LDA LDOT|
000027F0: 00 F8 2F 30 37 50 48 41 00 03 30 32 37 4A 53 52 |../07PHA..027JSR|
00002800: 20 A1 32 00 0E 30 34 37 53 54 59 20 59 31 00 1B | .2..047STY Y1..|
00002810: 30 36 37 53 54 41 20 59 31 AA 31 00 25 30 38 37 |067STA Y1.1.%087|
00002820: 4C 44 41 20 58 00 30 30 3A 37 53 54 41 20 58 31 |LDA X.00:7STA X1|
00002830: 00 3C 30 3C 37 4C 44 41 20 58 AA 31 00 49 30 3E |.<0<7LDA X.1.I0>|
00002840: 37 53 54 41 20 58 31 AA 31 00 57 30 40 37 4A 53 |7STA X1.1.W0@7JS|
00002850: 52 20 24 41 45 46 44 00 62 30 42 37 4A 53 52 20 |R $AEFD.b0B7JSR |
00002860: A1 32 00 6D 30 44 37 53 54 59 20 59 32 00 7A 30 |.2.m0D7STY Y2.z0|
00002870: 46 37 53 54 41 20 59 32 AA 31 00 89 30 48 37 42 |F7STA Y2.1..0H7B|
00002880: 41 31 20 4C 44 59 20 59 32 00 96 30 4A 37 4C 44 |A1 LDY Y2..0J7LD|
00002890: 41 20 59 32 AA 31 00 A0 30 4C 37 53 54 59 20 59 |A Y2.1..0L7STY Y|
000028A0: 00 AC 30 4E 37 53 54 41 20 59 AA 31 00 B9 30 50 |..0N7STA Y.1..0P|
000028B0: 37 4C 44 41 20 54 4D 50 33 00 C5 30 52 37 53 54 |7LDA TMP3..0R7ST|
000028C0: 41 20 44 4F 54 00 D1 30 54 37 42 41 32 20 53 45 |A DOT..0T7BA2 SE|
000028D0: 43 00 DB 30 56 37 4C 44 41 20 58 00 E6 30 58 37 |C..0V7LDA X..0X7|
000028E0: 53 42 43 20 58 31 00 F2 30 5A 37 4C 44 41 20 58 |SBC X1..0Z7LDA X|
000028F0: AA 31 00 FF 30 5C 37 53 42 43 20 58 31 AA 31 00 |.1..0\7SBC X1.1.|
00002900: 0B 31 5E 37 42 43 43 20 42 41 35 00 17 31 60 37 |.1^7BCC BA5..1`7|
00002910: 52 B0 20 4C 44 4F 54 00 1F 31 62 37 50 48 50 00 |R. LDOT..1b7PHP.|
00002920: 2C 31 64 37 52 4F 4C 20 4C 44 4F 54 00 34 31 66 |,1d7ROL LDOT.41f|
00002930: 37 50 4C 50 00 40 31 68 37 52 B0 20 4C 44 4F 54 |7PLP.@1h7R. LDOT|
00002940: 00 4C 31 6A 37 42 43 43 20 42 41 34 00 58 31 6C |.L1j7BCC BA4.X1l|
00002950: 37 42 41 33 20 53 45 43 00 62 31 6E 37 4C 44 41 |7BA3 SEC.b1n7LDA|
00002960: 20 59 00 6D 31 70 37 53 42 43 20 59 31 00 79 31 | Y.m1p7SBC Y1.y1|
00002970: 72 37 4C 44 41 20 59 AA 31 00 86 31 74 37 53 42 |r7LDA Y.1..1t7SB|
00002980: 43 20 59 31 AA 31 00 92 31 76 37 42 43 43 20 42 |C Y1.1..1v7BCC B|
00002990: 41 34 00 A0 31 78 37 4A 53 52 20 44 50 4C 4F 54 |A4..1x7JSR DPLOT|
000029A0: 00 AD 31 7A 37 4C 44 41 20 23 24 46 46 00 BA 31 |..1z7LDA #$FF..1|
000029B0: 7C 37 4A 53 52 20 59 4F 46 46 00 C6 31 7E 37 42 ||7JSR YOFF..1~7B|
000029C0: 43 53 20 42 41 33 00 D7 31 80 37 42 41 34 20 4C |CS BA3..1.7BA4 L|
000029D0: 44 41 20 23 24 46 46 00 E4 31 82 37 4A 53 52 20 |DA #$FF..1.7JSR |
000029E0: 58 4F 46 46 00 F0 31 84 37 42 43 53 20 42 41 31 |XOFF..1.7BCS BA1|
000029F0: 00 FC 31 86 37 42 41 35 20 50 4C 41 00 09 32 88 |..1.7BA5 PLA..2.|
00002A00: 37 53 54 41 20 4C 44 4F 54 00 11 32 8A 37 52 54 |7STA LDOT..2.7RT|
00002A10: 53 00 17 32 8C 37 3B 00 27 32 8E 37 47 53 41 56 |S..2.7;.'2.7GSAV|
00002A20: 20 4C 44 58 20 23 30 00 34 32 90 37 4C 44 41 20 | LDX #0.42.7LDA |
00002A30: 23 22 57 22 00 40 32 92 37 42 4E 45 20 47 44 31 |#"W".@2.7BNE GD1|
00002A40: 00 46 32 94 37 3B 00 56 32 96 37 47 4C 4F 41 20 |.F2.7;.V2.7GLOA |
00002A50: 4C 44 58 20 23 31 00 63 32 98 37 4C 44 41 20 23 |LDX #1.c2.7LDA #|
00002A60: 22 52 22 00 69 32 9A 37 3B 00 7D 32 9C 37 47 44 |"R".i2.7;.}2.7GD|
00002A70: 31 20 53 54 41 20 47 4E 53 55 46 AA 35 00 8A 32 |1 STA GNSUF.5..2|
00002A80: 9E 37 53 54 58 20 54 4D 50 32 00 98 32 A0 37 4A |.7STX TMP2..2.7J|
00002A90: 53 52 20 24 41 44 39 45 00 A6 32 A2 37 4A 53 52 |SR $AD9E..2.7JSR|
00002AA0: 20 24 42 36 41 33 00 B3 32 A4 37 43 4D 50 20 23 | $B6A3..2.7CMP #|
00002AB0: 24 30 46 00 BF 32 A6 37 42 43 43 20 47 44 32 00 |$0F..2.7BCC GD2.|
00002AC0: CC 32 A8 37 4C 44 41 20 23 24 30 45 00 D8 32 AA |.2.7LDA #$0E..2.|
00002AD0: 37 47 44 32 20 50 48 41 00 E0 32 AC 37 54 41 58 |7GD2 PHA..2.7TAX|
00002AE0: 00 EB 32 AE 37 4C 44 59 20 23 30 00 FF 32 B0 37 |..2.7LDY #0..2.7|
00002AF0: 47 44 33 20 4C 44 41 20 28 24 32 32 29 2C 59 00 |GD3 LDA ($22),Y.|
00002B00: 10 33 B2 37 53 54 41 20 47 A5 41 4D AA 32 2C 59 |.3.7STA G.AM.2,Y|
00002B10: 00 18 33 B4 37 49 4E 59 00 20 33 B6 37 44 45 58 |..3.7INY. 3.7DEX|
00002B20: 00 2C 33 B8 37 42 4E 45 20 47 44 33 00 37 33 BA |.,3.7BNE GD3.73.|
00002B30: 37 4C 44 58 20 23 30 00 4B 33 BC 37 47 44 34 20 |7LDX #0.K3.7GD4 |
00002B40: 4C 44 41 20 47 4E 53 55 46 2C 58 00 5C 33 BE 37 |LDA GNSUF,X.\3.7|
00002B50: 53 54 41 20 47 A5 41 4D AA 32 2C 59 00 64 33 C0 |STA G.AM.2,Y.d3.|
00002B60: 37 49 4E 59 00 6C 33 C2 37 49 4E 58 00 77 33 C4 |7INY.l3.7INX.w3.|
00002B70: 37 43 50 58 20 23 36 00 83 33 C6 37 42 4E 45 20 |7CPX #6..3.7BNE |
00002B80: 47 44 34 00 8B 33 C8 37 50 4C 41 00 93 33 CA 37 |GD4..3.7PLA..3.7|
00002B90: 43 4C 43 00 9E 33 CC 37 41 44 43 20 23 38 00 AD |CLC..3.7ADC #8..|
00002BA0: 33 CE 37 4C 44 58 20 23 B3 47 A5 41 4D 00 BC 33 |3.7LDX #.G.AM..3|
00002BB0: D0 37 4C 44 59 20 23 B1 47 A5 41 4D 00 CB 33 D2 |.7LDY #.G.AM..3.|
00002BC0: 37 4A 53 52 20 53 45 54 4E 41 4D 00 D6 33 D4 37 |7JSR SETNAM..3.7|
00002BD0: 4C 44 41 20 23 32 00 DE 33 D6 37 54 41 59 00 E9 |LDA #2..3.7TAY..|
00002BE0: 33 D8 37 4C 44 58 20 23 38 00 F8 33 DA 37 4A 53 |3.7LDX #8..3.7JS|
00002BF0: 52 20 53 45 54 4C 46 53 00 02 34 DC 37 4A 53 52 |R SETLFS..4.7JSR|
00002C00: 20 9F 00 0E 34 DE 37 42 43 43 20 47 44 35 00 19 | ...4.7BCC GD5..|
00002C10: 34 E0 37 43 4D 50 20 23 34 00 25 34 E2 37 42 4E |4.7CMP #4.%4.7BN|
00002C20: 45 20 47 44 38 00 34 34 E4 37 47 44 35 20 4C 44 |E GD8.44.7GD5 LD|
00002C30: 59 20 23 30 00 40 34 E6 37 53 54 59 20 54 4D 50 |Y #0.@4.7STY TMP|
00002C40: 00 4B 34 E8 37 4C 44 58 20 23 32 00 58 34 EA 37 |.K4.7LDX #2.X4.7|
00002C50: 4C 44 41 20 54 4D 50 32 00 64 34 EC 37 42 4E 45 |LDA TMP2.d4.7BNE|
00002C60: 20 47 44 39 00 73 34 EE 37 4A 53 52 20 43 48 4B | GD9.s4.7JSR CHK|
00002C70: 4F 55 54 00 80 34 F0 37 4C 44 41 20 48 49 54 45 |OUT..4.7LDA HITE|
00002C80: 00 88 34 F2 37 54 41 59 00 97 34 F4 37 4A 53 52 |..4.7TAY..4.7JSR|
00002C90: 20 43 48 52 4F 55 54 00 A6 34 F6 37 4C 44 41 20 | CHROUT..4.7LDA |
00002CA0: 48 49 54 45 AA 31 00 B5 34 F8 37 4A 53 52 20 43 |HITE.1..4.7JSR C|
00002CB0: 48 52 4F 55 54 00 C7 34 FA 37 47 44 36 20 53 54 |HROUT..4.7GD6 ST|
00002CC0: 41 20 54 4D 50 AA 31 00 D3 34 FC 37 47 44 37 20 |A TMP.1..4.7GD7 |
00002CD0: 53 45 49 00 DD 34 FE 37 4C 44 41 20 31 00 E8 34 |SEI..4.7LDA 1..4|
00002CE0: 00 38 AF 20 23 24 46 43 00 F2 34 02 38 53 54 41 |.8. #$FC..4.8STA|
00002CF0: 20 31 00 02 35 04 38 4C 44 41 20 28 54 4D 50 29 | 1..5.8LDA (TMP)|
00002D00: 2C 59 00 0A 35 06 38 50 48 41 00 14 35 08 38 4C |,Y..5.8PHA..5.8L|
00002D10: 44 41 20 31 00 1E 35 0A 38 B0 41 20 23 33 00 28 |DA 1..5.8.A #3.(|
00002D20: 35 0C 38 53 54 41 20 31 00 30 35 0E 38 43 4C 49 |5.8STA 1.05.8CLI|
00002D30: 00 38 35 10 38 50 4C 41 00 47 35 12 38 4A 53 52 |.85.8PLA.G5.8JSR|
00002D40: 20 43 48 52 4F 55 54 00 53 35 14 38 4C 44 41 20 | CHROUT.S5.8LDA |
00002D50: 24 39 30 00 5F 35 16 38 42 4E 45 20 47 44 38 00 |$90._5.8BNE GD8.|
00002D60: 67 35 18 38 49 4E 59 00 73 35 1A 38 42 4E 45 20 |g5.8INY.s5.8BNE |
00002D70: 47 44 37 00 81 35 1C 38 49 4E 43 20 54 4D 50 AA |GD7..5.8INC TMP.|
00002D80: 31 00 8D 35 1E 38 42 45 51 20 47 44 38 00 9B 35 |1..5.8BEQ GD8..5|
00002D90: 20 38 4C 44 41 20 54 4D 50 AA 31 00 A8 35 22 38 | 8LDA TMP.1..5"8|
00002DA0: 43 4D 50 20 23 24 43 30 00 B4 35 24 38 42 4E 45 |CMP #$C0..5$8BNE|
00002DB0: 20 47 44 37 00 C1 35 26 38 4C 44 41 20 23 24 45 | GD7..5&8LDA #$E|
00002DC0: 30 00 CD 35 28 38 42 4E 45 20 47 44 36 00 DE 35 |0..5(8BNE GD6..5|
00002DD0: 2A 38 47 44 38 20 4A 53 52 20 9C 43 48 4E 00 E9 |*8GD8 JSR .CHN..|
00002DE0: 35 2C 38 4C 44 41 20 23 32 00 F3 35 2E 38 4A 4D |5,8LDA #2..5.8JM|
00002DF0: 50 20 A0 00 F9 35 30 38 3B 00 0B 36 32 38 47 44 |P ...508;..628GD|
00002E00: 39 20 4A 53 52 20 43 48 4B 49 4E 00 17 36 34 38 |9 JSR CHKIN..648|
00002E10: 4A 53 52 20 A1 49 4E 00 24 36 36 38 53 54 41 20 |JSR .IN.$668STA |
00002E20: 48 49 54 45 00 2C 36 38 38 54 41 59 00 38 36 3A |HITE.,688TAY.86:|
00002E30: 38 4C 44 41 20 24 39 30 00 44 36 3C 38 42 4E 45 |8LDA $90.D6<8BNE|
00002E40: 20 47 44 38 00 50 36 3E 38 4A 53 52 20 A1 49 4E | GD8.P6>8JSR .IN|
00002E50: 00 5F 36 40 38 53 54 41 20 48 49 54 45 AA 31 00 |._6@8STA HITE.1.|
00002E60: 6D 36 42 38 53 54 41 20 54 4D 50 AA 31 00 7E 36 |m6B8STA TMP.1.~6|
00002E70: 44 38 47 44 31 30 20 4A 53 52 20 A1 49 4E 00 8E |D8GD10 JSR .IN..|
00002E80: 36 46 38 53 54 41 20 28 54 4D 50 29 2C 59 00 9A |6F8STA (TMP),Y..|
00002E90: 36 48 38 4C 44 41 20 24 39 30 00 A6 36 4A 38 42 |6H8LDA $90..6J8B|
00002EA0: 4E 45 20 47 44 38 00 AE 36 4C 38 49 4E 59 00 BB |NE GD8..6L8INY..|
00002EB0: 36 4E 38 42 4E 45 20 47 44 31 30 00 C9 36 50 38 |6N8BNE GD10..6P8|
00002EC0: 49 4E 43 20 54 4D 50 AA 31 00 D5 36 52 38 42 45 |INC TMP.1..6R8BE|
00002ED0: 51 20 47 44 38 00 E3 36 54 38 4C 44 41 20 54 4D |Q GD8..6T8LDA TM|
00002EE0: 50 AA 31 00 F0 36 56 38 43 4D 50 20 23 24 43 30 |P.1..6V8CMP #$C0|
00002EF0: 00 FD 36 58 38 42 4E 45 20 47 44 31 30 00 0A 37 |..6X8BNE GD10..7|
00002F00: 5A 38 4C 44 41 20 23 24 45 30 00 18 37 5C 38 53 |Z8LDA #$E0..7\8S|
00002F10: 54 41 20 54 4D 50 AA 31 00 25 37 5E 38 42 4E 45 |TA TMP.1.%7^8BNE|
00002F20: 20 47 44 31 30 00 2B 37 60 38 3B 00 37 37 62 38 | GD10.+7`8;.77b8|
00002F30: 47 A5 41 4D 20 B2 AC 00 57 37 64 38 2E C6 20 22 |G.AM ...W7d8.. "|
00002F40: 30 3A 30 31 32 33 34 35 36 37 38 39 41 42 43 44 |0:0123456789ABCD|
00002F50: 2E 47 2C 53 2C 57 22 00 6D 37 66 38 47 4E 53 55 |.G,S,W".m7f8GNSU|
00002F60: 46 20 2E C6 20 22 2E 47 2C 53 2C 57 22 00 73 37 |F .. ".G,S,W".s7|
00002F70: 68 38 3B 00 84 37 6A 38 47 50 52 49 4E 20 4C 44 |h8;..7j8GPRIN LD|
00002F80: 41 20 23 30 00 93 37 6C 38 4A 53 52 20 53 45 54 |A #0..7l8JSR SET|
00002F90: 4E 41 4D 00 9E 37 6E 38 4C 44 41 20 23 33 00 A9 |NAM..7n8LDA #3..|
00002FA0: 37 70 38 4C 44 58 20 23 34 00 B6 37 72 38 4C 44 |7p8LDX #4..7r8LD|
00002FB0: 59 20 23 24 46 46 00 C5 37 74 38 4A 53 52 20 53 |Y #$FF..7t8JSR S|
00002FC0: 45 54 4C 46 53 00 CF 37 76 38 4A 53 52 20 9F 00 |ETLFS..7v8JSR ..|
00002FD0: DC 37 78 38 42 43 43 20 47 50 52 31 00 EA 37 7A |.7x8BCC GPR1..7z|
00002FE0: 38 4A 4D 50 20 47 50 52 31 32 00 FA 37 7C 38 47 |8JMP GPR12..7|8G|
00002FF0: 50 52 31 20 4C 44 58 20 23 33 00 09 38 7E 38 4A |PR1 LDX #3..8~8J|
00003000: 53 52 20 43 48 4B 4F 55 54 00 14 38 80 38 4C 44 |SR CHKOUT..8.8LD|
00003010: 58 20 23 36 00 28 38 82 38 47 50 52 32 20 4C 44 |X #6.(8.8GPR2 LD|
00003020: 41 20 50 54 52 53 2C 58 00 37 38 84 38 4A 53 52 |A PTRS,X.78.8JSR|
00003030: 20 43 48 52 4F 55 54 00 3F 38 86 38 44 45 58 00 | CHROUT.?8.8DEX.|
00003040: 4C 38 88 38 42 50 4C 20 47 50 52 32 00 57 38 8A |L8.8BPL GPR2.W8.|
00003050: 38 4C 44 41 20 23 30 00 63 38 8C 38 53 54 41 20 |8LDA #0.c8.8STA |
00003060: 54 4D 50 00 72 38 8E 38 4C 44 41 20 48 49 54 45 |TMP.r8.8LDA HITE|
00003070: AA 31 00 80 38 90 38 53 54 41 20 54 4D 50 AA 31 |.1..8.8STA TMP.1|
00003080: 00 8D 38 92 38 4C 44 59 20 48 49 54 45 00 9D 38 |..8.8LDY HITE..8|
00003090: 94 38 47 50 52 33 20 4C 44 58 20 23 35 00 B1 38 |.8GPR3 LDX #5..8|
000030A0: 96 38 47 50 52 34 20 4C 44 41 20 50 54 52 52 2C |.8GPR4 LDA PTRR,|
000030B0: 58 00 C0 38 98 38 4A 53 52 20 43 48 52 4F 55 54 |X..8.8JSR CHROUT|
000030C0: 00 C8 38 9A 38 44 45 58 00 D5 38 9C 38 42 50 4C |..8.8DEX..8.8BPL|
000030D0: 20 47 50 52 34 00 E2 38 9E 38 4C 44 41 20 23 24 | GPR4..8.8LDA #$|
000030E0: 32 38 00 EF 38 A0 38 53 54 41 20 54 4D 50 33 00 |28..8.8STA TMP3.|
000030F0: FF 38 A2 38 47 50 52 35 20 4C 44 58 20 23 37 00 |.8.8GPR5 LDX #7.|
00003100: 07 39 A4 38 53 45 49 00 14 39 A6 38 4C 44 41 20 |.9.8SEI..9.8LDA |
00003110: 23 24 46 43 00 1C 39 A8 38 AF 20 31 00 26 39 AA |#$FC..9.8. 1.&9.|
00003120: 38 53 54 41 20 31 00 3B 39 AC 38 47 50 52 36 20 |8STA 1.;9.8GPR6 |
00003130: 4C 44 41 20 28 54 4D 50 29 2C 59 00 4A 39 AE 38 |LDA (TMP),Y.J9.8|
00003140: 53 54 41 20 42 55 46 46 2C 58 00 52 39 B0 38 49 |STA BUFF,X.R9.8I|
00003150: 4E 59 00 5F 39 B2 38 42 4E 45 20 47 50 52 37 00 |NY._9.8BNE GPR7.|
00003160: 6D 39 B4 38 49 4E 43 20 54 4D 50 AA 31 00 7A 39 |m9.8INC TMP.1.z9|
00003170: B6 38 47 50 52 37 20 44 45 58 00 87 39 B8 38 42 |.8GPR7 DEX..9.8B|
00003180: 50 4C 20 47 50 52 36 00 92 39 BA 38 4C 44 41 20 |PL GPR6..9.8LDA |
00003190: 23 33 00 9B 39 BC 38 B0 41 20 31 00 A5 39 BE 38 |#3..9.8.A 1..9.8|
000031A0: 53 54 41 20 31 00 AD 39 C0 38 43 4C 49 00 B5 39 |STA 1..9.8CLI..9|
000031B0: C2 38 54 59 41 00 BD 39 C4 38 50 48 41 00 C8 39 |.8TYA..9.8PHA..9|
000031C0: C6 38 4C 44 59 20 23 37 00 D8 39 C8 38 47 50 52 |.8LDY #7..9.8GPR|
000031D0: 38 20 4C 44 58 20 23 37 00 EC 39 CA 38 47 50 52 |8 LDX #7..9.8GPR|
000031E0: 39 20 52 4F 4C 20 42 55 46 46 2C 58 00 F4 39 CC |9 ROL BUFF,X..9.|
000031F0: 38 52 4F 4C 00 FC 39 CE 38 44 45 58 00 09 3A D0 |8ROL..9.8DEX..:.|
00003200: 38 42 50 4C 20 47 50 52 39 00 18 3A D2 38 4A 53 |8BPL GPR9..:.8JS|
00003210: 52 20 43 48 52 4F 55 54 00 20 3A D4 38 44 45 59 |R CHROUT. :.8DEY|
00003220: 00 2D 3A D6 38 42 50 4C 20 47 50 52 38 00 35 3A |.-:.8BPL GPR8.5:|
00003230: D8 38 50 4C 41 00 3D 3A DA 38 54 41 59 00 4A 3A |.8PLA.=:.8TAY.J:|
00003240: DC 38 44 45 43 20 54 4D 50 33 00 57 3A DE 38 42 |.8DEC TMP3.W:.8B|
00003250: 4E 45 20 47 50 52 35 00 64 3A E0 38 43 50 59 20 |NE GPR5.d:.8CPY |
00003260: 23 24 34 30 00 71 3A E2 38 42 4E 45 20 47 50 52 |#$40.q:.8BNE GPR|
00003270: 33 00 7F 3A E4 38 4C 44 41 20 54 4D 50 AA 31 00 |3..:.8LDA TMP.1.|
00003280: 8C 3A E6 38 43 4D 50 20 23 24 46 46 00 9A 3A E8 |.:.8CMP #$FF..:.|
00003290: 38 42 45 51 20 47 50 52 31 30 00 A7 3A EA 38 43 |8BEQ GPR10..:.8C|
000032A0: 4D 50 20 23 24 42 46 00 B4 3A EC 38 42 4E 45 20 |MP #$BF..:.8BNE |
000032B0: 47 50 52 33 00 C1 3A EE 38 4C 44 41 20 23 24 45 |GPR3..:.8LDA #$E|
000032C0: 30 00 CF 3A F0 38 53 54 41 20 54 4D 50 AA 31 00 |0..:.8STA TMP.1.|
000032D0: DA 3A F2 38 4C 44 59 20 23 30 00 E7 3A F4 38 42 |.:.8LDY #0..:.8B|
000032E0: 45 51 20 47 50 52 33 00 F8 3A F6 38 47 50 52 31 |EQ GPR3..:.8GPR1|
000032F0: 30 20 4C 44 58 20 23 33 00 0D 3B F8 38 47 50 52 |0 LDX #3..;.8GPR|
00003300: 31 31 20 4C 44 41 20 50 54 52 46 2C 58 00 1C 3B |11 LDA PTRF,X..;|
00003310: FA 38 4A 53 52 20 43 48 52 4F 55 54 00 24 3B FC |.8JSR CHROUT.$;.|
00003320: 38 44 45 58 00 32 3B FE 38 42 50 4C 20 47 50 52 |8DEX.2;.8BPL GPR|
00003330: 31 31 00 45 3B 00 39 47 50 52 31 32 20 4A 53 52 |11.E;.9GPR12 JSR|
00003340: 20 9C 43 48 4E 00 50 3B 02 39 4C 44 41 20 23 33 | .CHN.P;.9LDA #3|
00003350: 00 5A 3B 04 39 4A 4D 50 20 A0 00 60 3B 06 39 3B |.Z;.9JMP ..`;.9;|
00003360: 00 7E 3B 08 39 3B 50 52 54 20 43 91 44 49 54 49 |.~;.9;PRT C.DITI|
00003370: 91 49 4E 47 20 83 20 53 54 52 49 4E 47 53 00 8A |.ING . STRINGS..|
00003380: 3B 0A 39 50 54 52 53 20 B2 AC 00 B0 3B 0C 39 2E |;.9PTRS ....;.9.|
00003390: 42 59 54 45 20 24 30 30 2C 24 30 44 2C 24 34 34 |BYTE $00,$0D,$44|
000033A0: 2C 24 31 42 2C 24 30 38 2C 24 34 31 2C 24 31 42 |,$1B,$08,$41,$1B|
000033B0: 00 BC 3B 0E 39 50 54 52 52 20 B2 AC 00 DE 3B 10 |..;.9PTRR ....;.|
000033C0: 39 2E 42 59 54 45 20 24 30 31 2C 24 34 30 2C 24 |9.BYTE $01,$40,$|
000033D0: 34 42 2C 24 31 42 2C 24 30 39 2C 24 30 44 00 F9 |4B,$1B,$09,$0D..|
000033E0: 3B 12 39 50 54 52 46 20 2E 42 59 54 45 20 24 33 |;.9PTRF .BYTE $3|
000033F0: 32 2C 24 31 42 2C 24 30 44 00 FF 3B 14 39 3B 00 |2,$1B,$0D..;.9;.|
00003400: 11 3C 98 3A 4C 4D 41 20 4A 53 52 20 24 42 37 39 |.<.:LMA JSR $B79|
00003410: 45 00 20 3C 9A 3A 53 54 58 20 50 54 52 53 AA 31 |E. <.:STX PTRS.1|
00003420: 00 2D 3C 9C 3A 4C 4D 41 31 20 52 54 53 00 33 3C |.-<.:LMA1 RTS.3<|
00003430: 9E 3A 3B 00 45 3C A0 3A 53 49 5A 20 4A 53 52 20 |.:;.E<.:SIZ JSR |
00003440: 24 41 44 38 41 00 52 3C A2 3A 4A 53 52 20 43 4F |$AD8A.R<.:JSR CO|
00003450: 4D 59 00 60 3C A4 3A 4A 53 52 20 24 42 37 46 37 |MY.`<.:JSR $B7F7|
00003460: 00 6D 3C A6 3A 53 54 59 20 54 4D 50 33 00 7C 3C |.m<.:STY TMP3.|<|
00003470: A8 3A 53 54 41 20 54 4D 50 33 AA 31 00 89 3C AA |.:STA TMP3.1..<.|
00003480: 3A 4C 44 58 20 23 24 41 30 00 98 3C AC 3A 53 54 |:LDX #$A0..<.:ST|
00003490: 58 20 48 49 54 45 AA 31 00 A4 3C AE 3A 53 5A 31 |X HITE.1..<.:SZ1|
000034A0: 20 53 45 43 00 B1 3C B0 3A 4C 44 41 20 23 24 36 | SEC..<.:LDA #$6|
000034B0: 46 00 BE 3C B2 3A 53 42 43 20 54 4D 50 33 00 C9 |F..<.:SBC TMP3..|
000034C0: 3C B4 3A 4C 44 41 20 23 31 00 D8 3C B6 3A 53 42 |<.:LDA #1..<.:SB|
000034D0: 43 20 54 4D 50 33 AA 31 00 E5 3C B8 3A 42 4D 49 |C TMP3.1..<.:BMI|
000034E0: 20 4C 4D 41 31 00 ED 3C BA 3A 43 4C 43 00 FA 3C | LMA1..<.:CLC..<|
000034F0: BC 3A 4C 44 41 20 23 24 32 30 00 07 3D BE 3A 41 |.:LDA #$20..=.:A|
00003500: 44 43 20 54 4D 50 33 00 14 3D C0 3A 53 54 41 20 |DC TMP3..=.:STA |
00003510: 54 4D 50 33 00 1F 3D C2 3A 4C 44 41 20 23 30 00 |TMP3..=.:LDA #0.|
00003520: 2E 3D C4 3A 41 44 43 20 54 4D 50 33 AA 31 00 3D |.=.:ADC TMP3.1.=|
00003530: 3D C6 3A 53 54 41 20 54 4D 50 33 AA 31 00 45 3D |=.:STA TMP3.1.E=|
00003540: C8 3A 43 4C 43 00 50 3D CA 3A 4C 44 41 20 23 35 |.:CLC.P=.:LDA #5|
00003550: 00 5F 3D CC 3A 41 44 43 20 48 49 54 45 AA 31 00 |._=.:ADC HITE.1.|
00003560: 6C 3D CE 3A 43 4D 50 20 23 24 43 30 00 78 3D D0 |l=.:CMP #$C0.x=.|
00003570: 3A 42 43 43 20 53 5A 32 00 85 3D D2 3A 43 4D 50 |:BCC SZ2..=.:CMP|
00003580: 20 23 24 45 30 00 91 3D D4 3A 42 43 53 20 53 5A | #$E0..=.:BCS SZ|
00003590: 32 00 9C 3D D6 3A B0 41 20 23 32 30 00 AF 3D D8 |2..=.:.A #20..=.|
000035A0: 3A 53 5A 32 20 53 54 41 20 48 49 54 45 AA 31 00 |:SZ2 STA HITE.1.|
000035B0: BB 3D DA 3A 42 4E 45 20 53 5A 31 00 C1 3D DC 3A |.=.:BNE SZ1..=.:|
000035C0: 3B 00 D4 3D DE 3A 45 52 41 53 20 4A 53 52 20 24 |;..=.:ERAS JSR $|
000035D0: 42 37 39 45 00 DC 3D E0 3A 54 58 41 00 E9 3D E2 |B79E..=.:TXA..=.|
000035E0: 3A 42 45 51 20 45 52 41 31 00 F6 3D E4 3A 4C 44 |:BEQ ERA1..=.:LD|
000035F0: 58 20 23 24 46 46 00 09 3E E6 3A 45 52 41 31 20 |X #$FF..>.:ERA1 |
00003600: 53 54 58 20 45 52 46 4C 47 00 11 3E E8 3A 52 54 |STX ERFLG..>.:RT|
00003610: 53 00 17 3E EA 3A 3B 00 2A 3E EC 3A 50 41 54 54 |S..>.:;.*>.:PATT|
00003620: 20 4A 53 52 20 24 42 37 39 45 00 36 3E EE 3A 53 | JSR $B79E.6>.:S|
00003630: 54 58 20 44 4F 54 00 44 3E F0 3A 4A 53 52 20 24 |TX DOT.D>.:JSR $|
00003640: 41 45 46 44 00 52 3E F2 3A 4A 53 52 20 24 42 37 |AEFD.R>.:JSR $B7|
00003650: 39 45 00 5F 3E F4 3A 53 54 58 20 4C 44 4F 54 00 |9E._>.:STX LDOT.|
00003660: 67 3E F6 3A 52 54 53 00 6D 3E F8 3A 3B 00 82 3E |g>.:RTS.m>.:;..>|
00003670: FA 3A 58 31 20 20 20 20 2E 57 B0 44 20 24 30 30 |.:X1 .W.D $00|
00003680: 34 30 00 97 3E FC 3A 59 31 20 20 20 20 2E 57 B0 |40..>.:Y1 .W.|
00003690: 44 20 24 30 30 34 30 00 AC 3E FE 3A 58 32 20 20 |D $0040..>.:X2 |
000036A0: 20 20 2E 57 B0 44 20 24 30 30 38 30 00 C1 3E 00 | .W.D $0080..>.|
000036B0: 3B 59 32 20 20 20 20 2E 57 B0 44 20 24 30 30 38 |;Y2 .W.D $008|
000036C0: 30 00 D2 3E 02 3B 44 58 20 20 20 20 20 AC B2 AC |0..>.;DX ...|
000036D0: AA 35 00 E3 3E 04 3B 44 59 20 20 20 20 20 AC B2 |.5..>.;DY ..|
000036E0: AC AA 35 00 F4 3E 06 3B 53 58 20 20 20 20 20 AC |..5..>.;SX .|
000036F0: B2 AC AA 35 00 05 3F 08 3B 53 59 20 20 20 20 20 |...5..?.;SY |
00003700: AC B2 AC AA 35 00 1A 3F 0A 3B 58 20 20 20 20 20 |....5..?.;X |
00003710: 2E 57 B0 44 20 24 30 30 38 30 00 2F 3F 0C 3B 59 |.W.D $0080./?.;Y|
00003720: 20 20 20 20 20 2E 57 B0 44 20 24 30 30 38 30 00 | .W.D $0080.|
00003730: 40 3F 0E 3B 54 4D 50 46 20 20 20 AC B2 AC AA 35 |@?.;TMPF ....5|
00003740: 00 51 3F 10 3B 58 4F 20 20 20 20 20 AC B2 AC AA |.Q?.;XO ....|
00003750: 35 00 62 3F 12 3B 59 4F 20 20 20 20 20 AC B2 AC |5.b?.;YO ...|
00003760: AA 35 00 73 3F 14 3B 54 59 20 20 20 20 20 AC B2 |.5.s?.;TY ..|
00003770: AC AA 32 00 84 3F 16 3B 42 49 54 50 20 20 20 AC |..2..?.;BITP .|
00003780: B2 AC AA 31 00 95 3F 18 3B 52 4F 57 20 20 20 20 |...1..?.;ROW |
00003790: AC B2 AC AA 31 00 A6 3F 1A 3B 52 41 53 54 20 20 |....1..?.;RAST |
000037A0: 20 AC B2 AC AA 31 00 B7 3F 1C 3B 43 4F 4C 20 20 | ....1..?.;COL |
000037B0: 20 20 AC B2 AC AA 31 00 CB 3F 1E 3B 44 4F 54 20 | ....1..?.;DOT |
000037C0: 20 20 2E 42 59 54 45 20 24 46 46 00 DF 3F 20 3B | .BYTE $FF..? ;|
000037D0: 4C 44 4F 54 20 20 2E 42 59 54 45 20 24 46 46 00 |LDOT .BYTE $FF.|
000037E0: F0 3F 22 3B 41 44 44 52 20 20 20 AC B2 AC AA 32 |.?";ADDR ....2|
000037F0: 00 04 40 24 3B 45 52 46 4C 47 20 2E 42 59 54 45 |..@$;ERFLG .BYTE|
00003800: 20 24 30 30 00 15 40 26 3B 54 58 20 20 20 20 20 | $00..@&;TX |
00003810: AC B2 AC AA 32 00 26 40 28 3B 54 59 32 20 20 20 |....2.&@(;TY2 |
00003820: 20 AC B2 AC AA 32 00 3B 40 2A 3B 48 49 54 45 20 | ....2.;@*;HITE |
00003830: 20 2E 57 B0 44 20 24 41 30 30 30 00 4C 40 2C 3B | .W.D $A000.L@,;|
00003840: 42 55 46 46 20 20 20 AC B2 AC AA 38 00 60 40 2E |BUFF ....8.`@.|
00003850: 3B 43 48 4F 46 46 20 2E 42 59 54 45 20 24 44 30 |;CHOFF .BYTE $D0|
00003860: 00 72 40 30 3B C3 20 20 20 2E 42 59 54 45 20 24 |.r@0;. .BYTE $|
00003870: 31 30 00 78 40 32 3B 3B 00 00 00 |10.x@2;;... |
..).... GRAPHCMDS (PAUL ADAMS)
:./...:.P.... 24 STATEMENTS, 0 FUNCTIONS
.V...:.T.... KEYWORD CHARACTERS: 113.Z..
.:...... KEYWORDS #175 TO #198.....:.D..
..==================================.J..
.:...'.SETLFS . $FFBA...(.SETNAM . $FFBD
...).. . $FFC0...*.CHKIN . $FFC6.".+.
. $FFC3.3.,..CHN . $FFCC.D.-..IN . $
FFE4.W...CHKOUT . $FFC9.J./.CHROUT . $FF
D2.P.0.;...1.TMP . $57...2.TMP2 . $
59...3.TMP3 . $5A...4.TMP4 . $5C.O..
..F "PLOTGCLRGCOLUPPER"......F "LOWERDEF
AULTLINE"......F "SLINEDLINENLINE"......
F "QLINECHARSCHAR".3....F "BARSBARDBARNB
AR".K....F "GSAVEGLOADSIZE".D....F "LMAR
GPRINTERASE".T....F "PATTERN...X..W.D PL
O.1,GCL.1,GCO.1,UPPE.1...Y..W.D LOWE.1,.
LT.1,PLIN.1.Q.Z..W.D SLIN.1,DLIN.1,NLIN.
1...{..W.D QLIN.1,CHA.1,SCHA.1...|..W.D
BBA.1,SBA.1,DBA.1,NBA.1.,.}..W.D GSAV.1,
GLOA.1,SIZ.1.J.~..W.D LMA.1,GPRIN.1,ERAS
.1.Z....W.D PATT.1.J.<.USFP LDX #0.V.>.S
TX $0D...@.STA $62...B.STY $63...D.LDX #
$90...F.SEC...H.JMP $BC49...J.;...N.POWE
RS .BYTE 1,2,4,8,16,32,64,128...P.;....1
PLO JSR .2....1PLO1 SEC....1LDA #$8F....
1SBC Y.!..1STA TY.,. 1LDA #1.8..1SBC Y.1
.E..1STA TY.1.R..1BCS PLO2.Z..1RTS.L..1P
LO2 LDX #$C0.Y..1LDY #$C0....1LDA Y.1...
.1BNE PLO3....1LDA #$C7....1CMP Y....1BC
S PLO4.F..1PLO3 LDX #0.S..1LDY #$A0....1
PLO4 STX TMP....1STY TMP.1....1LDX X...B
1LDA X.1...D1BEQ PLO5. .F1CMP #1.-.H1BNE
PLO2.:.J1CPX #$40.G.L1BCS PLO2.S.N1PLO5
R..[.P1TXA.B.R1R..J.T1LSR.R.V1LSR.~.X1S
TA COL...Z1TXA....1. #7....1E. #7....1TA
X....1LDA POWERS,X....1STA BITP.J..1LDX
TY.W..1LDA TY.1....1R.....1TXA....1R....
.1LSR....1LSR....1STA ROW....1TXA....1.
#7.'..1STA RAST.3..1LDA ROW.>..1LDX #6.M
..2JSR CMLTAD.X..2LDX #2.G..2JSR MLTADD.
S..2LDA COL.~..2LDX #3....2JSR CMLTAD...
.2LDY #0....2STY TMP2....2LDA RAST....2J
SR ADD.F..2SEI.P..2LDA 1....2. #$FC....2
STA 1....2LDA (TMP),Y....2E. ERFLG... 2.
A BITP..."2E. ERFLG.+.$2STA (TMP),Y.5.&2
LDA 1.?.(2.A #3.I.*2STA 1.Q.,2CLI._..2LD
Y $DD00.M.02LDA $028D.U.22TAX.~.42. #2..
.62BEQ PLO7...82JSR .LT...:2PLO6 LDA $02
8D...<2TAX...>2. #2.H.@2BNE PLO6.P.B2TYA
.Y.D2. #3...F2CMP #3...H2BEQ PLO11...J2E
. #1...L2BCC PLO9...N2PLO7 TXA...P2. #4.
-.R2BEQ PLO11.@.T2PLO8 LDA $028D.I.V2. #
4.V.X2BNE PLO8.^.Z2TYA.G.\2. #3.Z.^2PLO9
BNE PLO10...`2JMP UPPE...B2PLO10 CMP #1
...D2BNE PLO11...F2JMP LOWE.A.H2PLO11 RT
S.G.J2;.V.L2CMLTAD PHA...N2LDA #0...P2ST
A TMP2...R2PLA...T2;...V2MLTADD ASL...X2
ROL TMP2. .Z2DEX./.|2BNE MLTADD.5.~2;.A.
.2ADD PHA.I..2CLC.U..2ADC TMP.A..2STA TM
P.N..2LDA TMP2.|..2ADC TMP.1....2STA TMP
.1....2PLA....2RTS. ..2;....2.2 JSR $AD8
A....2JSR $AEFD.L..2JSR COMX.Z..2JSR $B7
F7....2STY X....2STA X.1... 2JSR $AD8A..
..2JSR COMY....2JSR $B7F7.#..2STY Y./..2
STA Y.1.7..2RTS.=..2;.N..2GCL LDA #$BF.Y
..2STA T3.F..2LDA #$FF.Q..2STA T5.~..2LD
X #$20....2LDY #$40....2LDA #0....2GCL1
PHA....2LDA #0....2STA T2.D.B2STA T4.L.D
2PLA.Y.F2GCL2 DEY...H2STA (T2),Y...J2STA
(T4),Y...L2BNE GCL2...N2DEC T3...P2DEC
T5.".R2DEX./.T2BNE GCL2.7.V2RTS.=.X2;.O.
Z2GCO JSR $B79E.\..2LDA #$8F.G..2STA T3.
T..2LDA #$CF...2STA T5....2TXA....2LDX
#4....2LDY #$E8....2BNE GCL1....2;.B..2U
PPE LDX #0.P..2.BYTE $2C....2LOWE LDX #3
....2.BYTE $2C....2.LT LDX #6....2LDA SC
RDAT,X....2STA $D011.$..2INX.5..2LDA SCR
DAT,X.C..3STA $D018.Q..3LDA $DD02.[..3.A
#3.I..3STA $DD02.Q..3INX.Y..3SEI....3.1
LDA $D012....3BNE .1....3LDA $DD00....3
. #$FC....3.A SCRDAT,X.L..3STA $DD00.T..
3CLI....3RTS....3;....3SCRDAT ..... 3.BY
TE $3B,$38,$01..."3.BYTE $3B,$38,$00.2.$
3.BYTE $1B,$17,$03.8.&3;.J.(3SLIN LDA #$
55.X.*3.BYTE $2C.J.,3DLIN LDA #$33.X..3.
BYTE $2C...03NLIN LDA #$FF...23.BYTE $2C
...43QLIN LDA #$0F...63STA DOT...83;.O.:
3PLIN JSR $AD8A...<3JSR $AEFD...>3JSR CO
MX...@3LDX #.YO...B3LDY #.YO...D3JSR $BB
D4. .F3JSR $B7F7.+.H3STY X1.8.J3STA X1.1
.F.L3JSR $AD8A.T.N3JSR $AEFD.A.P3JSR COM
Y.P.R3LDX #.TMPF..T3LDY #.TMPF...V3JSR
$BBD4...X3JSR $B7F7...Z3STY Y1...\3STA Y
1.1.A.^3JSR $AD8A.O.`3JSR $AEFD...B3JSR
COMX...D3LDX #.XO...F3LDY #.XO...H3JSR $
BBD4...J3JSR $B7F7...L3STY X2.*.N3STA X2
.1.7.P3LDA #.XO.D.R3LDY #.XO.R.T3JSR $BB
A2._.V3LDA #.YO.L.X3LDY #.YO.Z.Z3JSR $B8
50...|3LDX #.DX...~3LDY #.DX....3JSR $BB
D4....3JSR $AD8A....3JSR COMY.J..3LDX #.
XO.W..3LDY #.XO....3JSR $BBD4....3JSR $B
7F7....3STY Y2....3STA Y2.1....3LDA #.XO
.%..3LDY #.XO.3..3JSR $BBA2.B..3LDA #.TM
PF.Q..3LDY #.TMPF._..3JSR $B850.L..3LDX
#.DY.Y. 3LDY #.DY....3JSR $BBD4....3LDA
$61. ..3BEQ LIN1....3LDA #.DX....3LDY #.
DX.H..3JSR $BB0F.U..3LDX #.SX....3LDY #.
SX....3JSR $BBD4....3LDA #.TMPF....3LDY
#.TMPF....3JSR $BA28.*..3JSR $BFB4.7..3L
DA #.YO.D..3LDY #.YO.R..3JSR $B867._.B3L
DX #.XO.L.D3LDY #.XO.Z.F3JSR $BBD4...H3L
IN1 LDA #.DX...J3LDY #.DX...L3JSR $BBA2.
..N3LDA $61...P3BEQ LIN2.M.R3LDA #.DY.Z.
T3LDY #.DY...V3JSR $BB0F...X3LDX #.SY...
Z3LDY #.SY....3JSR $BBD4....3LDA #.YO.*.
.3LDY #.YO.8..3JSR $BA28.F..3JSR $BFB4.U
..3LDA #.TMPF.D..3LDY #.TMPF.R..3JSR $B8
67...3LDX #.YO....3LDY #.YO....3JSR $BB
D4....3LIN2 LDA #.DX....3LDY #.DX.G..3JS
R $BBA2.S..3LSR $66....3LDX #.TMPF....3L
DY #.TMPF....3JSR $BBD4....4LDA #.DY....
4LDY #.DY.'..4JSR $BBA2.3..4LSR $66.B..4
LDA #.TMPF.Q..4LDY #.TMPF._..4JSR $BC5B.
L..4BMI LIN7.Y..4LDA DY.1....4BMI LIN3..
..4JSR SWAP....4LIN3 LDA Y1....4STA Y...
.4LDA Y1.1.F..4STA Y.1.Q..4LDA DY... 4BN
E LIN4..."4LDA X1...$4STA X...&4LDA X1.1
...(4STA X.1...*4JMP LIN6.(.,4LIN4 LDY Y
.4..4LDA Y.1.@.04STY $63.L.24STA $62.Y.4
4LDX #$90.A.64SEC.O.84JSR $BC49.|.:4LDA
#.SX...<4LDY #.SX...>4JSR $BA28...@4LDA
#.XO...B4LDY #.XO...D4JSR $B867.M.F4JSR
$B849...H4JSR $B7F7...J4STY X...L4STA X.
1...N4JSR DPLOT...P4LDA Y.1...R4CMP Y2.1
.%.T4BNE LIN5./.V4LDA Y.:.X4CMP Y2.G.Z4B
EQ LIN6.V.\4LIN5 INC Y.C.^4BNE LIN4.O.`4
INC Y.1.|.B4BNE LIN4...D4LIN6 JMP PLO1.
.F4LIN7 LDA DX.1...H4BMI LIN8...J4JSR SW
AP.J.L4LIN8 LDA X1.T.N4STA X...P4LDA X1.
1...R4STA X.1...T4LIN9 LDY X...V4LDA X.1
...X4JSR USFP.".Z4LDA #.SY./.|4LDY #.SY.
=.~4JSR $BA28.J..4LDA #.YO.W..4LDY #.YO.
E..4JSR $B867.S..4JSR $B849....4JSR $B7F
7....4STY Y....4STA Y.1....4JSR DPLOT...
.4LDA X.1....4CMP X2.1.L..4BNE LIN10.V..
4LDA X....4CMP X2....4BEQ LIN11....4LIN1
0 INC X....4BNE LIN9... 4INC X.1.%..4BNE
LIN9.8..4LIN11 JMP PLO1.>..4;.N..4SWAP
LDX #3.`..4SWA1 LDY X1,X.M..4LDA X2,X.Z.
.4STA X1,X....4TYA....4STA X2,X....4DEX.
...4BPL SWA1....4RTS....4;.U..4F320 .BYT
E $90,$20,$00,$00,$00....4F400 .BYTE $90
,$48,$00,$00,$00....4;.. B4COMX LDA #.F3
20.! D4LDY #.F320.. F4BNE CHEK.4 H4;.H J
4COMY LDA #.F400.W L4LDY #.F400.] N4;.N
P4CHEK LDX $66.{ R4BMI CHE1.. T4JSR $BC5
B.. V4BPL CHE2.. X4CHE1 RTS.. Z4CHE2 JMP
$B248.. .4;.M .4DPLOT R. DOT.U .4PHP..
.4ROL DOT.. .4PLP.. .4R. DOT..!.4BCC CHE
1..!.4JMP PLO1..!.4;.#!.4CHA JSR .2.1!.4
JSR $AEFD.?!.4JSR $AD9E.M!.4JSR $B6A3.W!
.4STA C.G!.4CHA1 LDY #0.W!.4LDA ($22),Y.
!.4TAX..!.4. #$7F..!.5CMP #$20..!.5TXA.
.!.5BCS CHA6..!.5LDY #9.L!.5CHA2 CMP CTR
LS,Y.Y!.5BEQ CHA3..!.5DEY..!.5BPL CHA2..
!.5BMI CHA4..".5CHA3 TYA..".5ASL..".5TAX
.)".5LDA CCRTNS,X.4".5STA T2.G".5LDA CCR
TNS.1,X.R".5STA T3._" 5JSR CHA5.R""5CHA4
JMP CHA20.."$5CHA5 JMP (T2).."&5;.."(5C
TRLS .BYTE $12,$92,$1F,$9E,$90.L"*5.BYTE
$05,$11,$1D,$91,$9D.R",5;..".5CCRTNS .W
.D CCR,CCRX,CCL,CCU,CCE..#05.W.D CCEX,CC
DN,CCRT,CCUP,CCLT..#25;..#45CCR LDA #4.<
#65.BYTE $2C.K#85CCL LDA #8.X#:5.A CHOFF
.E#<5BNE CCU1.K#>5;.}#@5CCRX LDA #$DB..#
B5.BYTE $2C..#D5CCU LDA #$D7..#F5. CHOFF
..#H5CCU1 STA CHOFF.C#J5RTS.I#L5;.Z#N5CC
E LDA #$FF..#P5.BYTE $2C..#R5CCEX LDA #0
..$T5STA ERFLG..$V5RTS..$X5;.&$Z5CCDN LD
A #$F8.4$\5.BYTE $2C.D$^5CCUP LDA #8.Q$`
5JMP YOFF.W$B5;.G$D5CCRT LDA #8.U$F5.BYT
E $2C..$H5CCLT LDA #$F8..$J5JMP XOFF..$L
5;..$N5CHA6 . #$E0..$P5CMP #$60.D$R5BNE
CHA7.L$T5TXA.T$V5SEC..$X5SBC #$20..$Z5TA
X..$|5BNE CHA9..%~5CHA7 CMP #$80..%.5. #
$40. %.5BCC CHA8.-%.5ADC #$3F.=%.5CHA8 S
TA T2.E%.5SEC.M%.5TXA.X%.5SBC T2.`%.5TAX
.P%.5CHA9 LDA #0.|%.5STA TMP..%.5TXA..%.
5LDX #3..%.5CHA10 ASL..%.5ROL TMP..%.5DE
X..%.5BNE CHA10.L% 5STA TMP4.Z%.5LDA CHO
FF..%.5CLC..%.5ADC TMP..%.5STA TMP4.1..&
.5LDA #$F9..&.5JSR YOFF."&.5LDY #7.0&.5C
HA11 SEI.:&.5LDA 1.E&.5. #$FB.O&.5STA 1.
`&.5LDA (TMP4),Y.H&.5TAX.R&.5LDA 1.|&.5.
A #4..&.5STA 1..&B5CLI..&D5TYA..&F5PHA..
&H5TXA..&J5PHA..&L5LDX #7.G&N5CHA12 PLA.
O&P5ASL.W&R5PHA..&T5BCC CHA17..&V5LDA X.
1..&X5BMI CHA14..'Z5CHA13 LDA #$FE..'.5S
TA TMP.+'.5LDA #$C0.9'.5JSR XOFF2.G'.5BP
L CHA13.X'.5CHA14 LDA #1.D'.5STA TMP.Q'.
5LDA #$40.'.5JSR XOFF2..'.5BMI CHA14..'
.5LDA Y.1..'.5BMI CHA16..'.5CHA15 LDA #$
FE.F'.5STA TMP.S'.5LDA #$70..'.5JSR YOFF
2..'.5BPL CHA15..(.5CHA16 LDA #1..(.5STA
TMP..(.6LDA #$90.'(.6JSR YOFF2.5(.6BMI
CHA16.=(.6TXA.E(.6PHA.R(.6JSR PLO1.Z(.6P
LA.B(.6TAX.P(.6CHA17 DEX.~(.6BMI CHA18..
(.6LDA #1..(.6JSR XOFF..(.6JMP CHA12..(.
6CHA18 PLA..(.6PLA.B(.6TAY.J( 6DEY.X("6B
MI CHA19..($6LDA #$F9..(&6JSR XOFF..((6L
DA #1..)*6JSR YOFF..),6JMP CHA11.)).6CHA
19 LDA #1.6)06JSR XOFF.H)26CHA20 INC $22
.V)46BNE CHA21.B)66INC $23.R)86CHA21 DEC
C..):6BEQ CHA22..)<6JMP CHA1..)>6CHA22
RTS..)@6;..)B6XOFF PHA..)D6CMP #$80.H)F6
BCS XOF1.S)H6LDA #0..)J6.BYTE $2C..)L6XO
F1 LDA #$FF..)N6STA TMP..*P6PLA..*R6;..*
T6XOFF2 CLC.%*V6ADC X./*X6STA X.;*Z6LDA
TMP.G*\6ADC X.1.S*^6STA X.1.[*`6RTS.A*B6
;.N*D6YOFF PHA.{*F6CMP #$80..*H6BCS YOF1
..*J6LDA #0..*L6.BYTE $2C..*N6YOF1 LDA #
$FF..*P6STA TMP.G*R6PLA.M*T6;..*V6YOFF2
CLC..*X6ADC Y..*Z6STA Y..*|6LDA TMP..+~6
ADC Y.1..+.6STA Y.1..+.6RTS.!+.6;.1+.6SC
HA JSR .2.?+.6JSR $AEFD.L+.6LDA #$FE.Y+.
6JSR XOFF.F+.6LDA #$FE.S+.6JSR YOFF..+.6
JSR $B79E..+.6TXA..+.6STA TMP3..+.6ASL..
+.6ASL..+.6ADC TMP3..+.6STA TMP3.K+ 6LDY
#5..+.6SCH1 LDA TMP3..+.6TAX..+.6INC TM
P3..,.6LDA SCX,X..,.6LDX #5..,.6SCH2 ASL
. ,.6PHA.-,.6BCC SCH5.9,.6LDA X.1.F,.6BE
Q SCH3.P,.6LDA X.],.6CMP #$40.J,.6BCS SC
H5.{,.6SCH3 LDA Y.1..,.6BEQ SCH4..,.6LDA
Y..,B6CMP #$90..,D6BCS SCH5..,F6SCH4 TX
A.A,H6PHA.I,J6TYA.Q,L6PHA..,N6JSR PLO1..
,P6PLA..,R6TAY..,T6PLA..,V6TAX..-X6SCH5
LDA #1..-Z6JSR XOFF.#-.6PLA.+-.6DEX.8-.6
BNE SCH2.C-.6LDA #1.P-.6JSR YOFF.]-.6LDA
#$FB.J-.6JSR XOFF.R-.6DEY.-.6BNE SCH1.
.-.6RTS..-.6;..-.6;CHARS . 5 LEFT BITS O
F 5 BYTES..-.6SCX ...Z-.6.BYTE $88,$50,$
20,$50,$88..-.6.BYTE $20,$20,$FC,$20,$20
....6.BYTE $FC,$88,$88,$88,$FC.4..6.BYTE
$20,$50,$88,$50,$20.R..6.BYTE $00,$50,$
20,$50,$00.P..7.BYTE $00,$20,$70,$20,$00
....7.BYTE $00,$70,$50,$70,$00....7.BYTE
$00,$20,$50,$20,$00.J..7.BYTE $FC,$FC,$
FC,$FC,$FC....7.BYTE $20,$70,$FC,$70,$20
../.7.BYTE $00,$70,$70,$70,$00.$/.7.BYTE
$00,$20,$70,$20,$00.*/.7;.;/.7SBA LDX #
$55.H/.7LDA #$AA.T/.7BNE NB1.Z/.7;.K/.7D
BA LDX #$33.X/.7LDA #$99../.7BNE NB1../.
7;../ 7NBA LDA #$FF../"7TAX../$7NB1 STX
DOT../&7STA LDOT.F/(7;.V/*7BBA LDA DOT..
/,7STA TMP3../.7LDA LDOT../07PHA..027JSR
.2..047STY Y1..067STA Y1.1.%087LDA X.00
:7STA X1.<0<7LDA X.1.I0>7STA X1.1.W0@7JS
R $AEFD.B0B7JSR .2.M0D7STY Y2.Z0F7STA Y2
.1..0H7BA1 LDY Y2..0J7LDA Y2.1. 0L7STY Y
..0N7STA Y.1..0P7LDA TMP3.E0R7STA DOT.Q0
T7BA2 SEC..0V7LDA X..0X7SBC X1..0Z7LDA X
.1..0\7SBC X1.1..1^7BCC BA5..1`7R. LDOT.
.1B7PHP.,1D7ROL LDOT.41F7PLP.@1H7R. LDOT
.L1J7BCC BA4.X1L7BA3 SEC.B1N7LDA Y.M1P7S
BC Y1.Y1R7LDA Y.1..1T7SBC Y1.1..1V7BCC B
A4. 1X7JSR DPLOT..1Z7LDA #$FF..1|7JSR YO
FF.F1~7BCS BA3.W1.7BA4 LDA #$FF..1.7JSR
XOFF..1.7BCS BA1..1.7BA5 PLA..2.7STA LDO
T..2.7RTS..2.7;.'2.7GSAV LDX #0.42.7LDA
#"W".@2.7BNE GD1.F2.7;.V2.7GLOA LDX #1.C
2.7LDA #"R".I2.7;.}2.7GD1 STA GNSUF.5..2
.7STX TMP2..2 7JSR $AD9E..2.7JSR $B6A3..
2.7CMP #$0F..2.7BCC GD2.L2.7LDA #$0E.X2.
7GD2 PHA..2.7TAX..2.7LDY #0..2.7GD3 LDA
($22),Y..3.7STA G.AM.2,Y..3.7INY. 3.7DEX
.,3.7BNE GD3.73.7LDX #0.K3.7GD4 LDA GNSU
F,X.\3.7STA G.AM.2,Y.D3.7INY.L3B7INX.W3D
7CPX #6..3F7BNE GD4..3H7PLA..3J7CLC..3L7
ADC #8..3N7LDX #.G.AM..3P7LDY #.G.AM.K3R
7JSR SETNAM.V3T7LDA #2..3V7TAY..3X7LDX #
8..3Z7JSR SETLFS..4.7JSR ...4.7BCC GD5..
4.7CMP #4.%4.7BNE GD8.44.7GD5 LDY #0.@4.
7STY TMP.K4.7LDX #2.X4.7LDA TMP2.D4.7BNE
GD9.S4.7JSR CHKOUT..4.7LDA HITE..4.7TAY
..4.7JSR CHROUT..4.7LDA HITE.1..4.7JSR C
HROUT.G4.7GD6 STA TMP.1.S4.7GD7 SEI..4.7
LDA 1..4.8. #$FC..4.8STA 1..5.8LDA (TMP)
,Y..5.8PHA..5.8LDA 1..5.8.A #3.(5.8STA 1
.05.8CLI.85.8PLA.G5.8JSR CHROUT.S5.8LDA
$90._5.8BNE GD8.G5.8INY.S5.8BNE GD7..5.8
INC TMP.1..5.8BEQ GD8..5 8LDA TMP.1..5"8
CMP #$C0..5$8BNE GD7.A5&8LDA #$E0.M5(8BN
E GD6..5*8GD8 JSR .CHN..5,8LDA #2..5.8JM
P ..508;..628GD9 JSR CHKIN..648JSR .IN.
$668STA HITE.,688TAY.86:8LDA $90.D6<8BNE
GD8.P6>8JSR .IN._6@8STA HITE.1.M6B8STA
TMP.1.~6D8GD10 JSR .IN..6F8STA (TMP),Y..
6H8LDA $90..6J8BNE GD8..6L8INY..6N8BNE G
D10.I6P8INC TMP.1.U6R8BEQ GD8..6T8LDA TM
P.1..6V8CMP #$C0..6X8BNE GD10..7Z8LDA #$
E0..7\8STA TMP.1.%7^8BNE GD10.+7`8;.77B8
G.AM ...W7D8.F "0:0123456789ABCD.G,S,W".
M7F8GNSUF .F ".G,S,W".S7H8;..7J8GPRIN LD
A #0..7L8JSR SETNAM..7N8LDA #3..7P8LDX #
4..7R8LDY #$FF.E7T8JSR SETLFS.O7V8JSR ..
.7X8BCC GPR1..7Z8JMP GPR12..7|8GPR1 LDX
#3..8~8JSR CHKOUT..8.8LDX #6.(8.8GPR2 LD
A PTRS,X.78.8JSR CHROUT.?8.8DEX.L8.8BPL
GPR2.W8.8LDA #0.C8.8STA TMP.R8.8LDA HITE
.1..8.8STA TMP.1..8.8LDY HITE..8.8GPR3 L
DX #5..8.8GPR4 LDA PTRR,X..8.8JSR CHROUT
.H8.8DEX.U8.8BPL GPR4..8.8LDA #$28..8 8S
TA TMP3..8.8GPR5 LDX #7..9.8SEI..9.8LDA
#$FC..9.8. 1.&9.8STA 1.;9.8GPR6 LDA (TMP
),Y.J9.8STA BUFF,X.R9.8INY._9.8BNE GPR7.
M9.8INC TMP.1.Z9.8GPR7 DEX..9.8BPL GPR6.
.9.8LDA #3..9.8.A 1..9.8STA 1..9.8CLI..9
B8TYA..9D8PHA.H9F8LDY #7.X9H8GPR8 LDX #7
..9J8GPR9 ROL BUFF,X..9L8ROL..9N8DEX..:P
8BPL GPR9..:R8JSR CHROUT. :T8DEY.-:V8BPL
GPR8.5:X8PLA.=:Z8TAY.J:.8DEC TMP3.W:.8B
NE GPR5.D:.8CPY #$40.Q:.8BNE GPR3.:.8LD
A TMP.1..:.8CMP #$FF..:.8BEQ GPR10..:.8C
MP #$BF..:.8BNE GPR3.A:.8LDA #$E0.O:.8ST
A TMP.1.Z:.8LDY #0..:.8BEQ GPR3..:.8GPR1
0 LDX #3..;.8GPR11 LDA PTRF,X..;.8JSR CH
ROUT.$;.8DEX.2;.8BPL GPR11.E;.9GPR12 JSR
.CHN.P;.9LDA #3.Z;.9JMP .`;.9;.~;.9;PR
T C.DITI.ING . STRINGS..;.9PTRS ....;.9.
BYTE $00,$0D,$44,$1B,$08,$41,$1B..;.9PTR
R ....;.9.BYTE $01,$40,$4B,$1B,$09,$0D..
;.9PTRF .BYTE $32,$1B,$0D..;.9;..<.:LMA
JSR $B79E. <.:STX PTRS.1.-<.:LMA1 RTS.3<
.:;.E< :SIZ JSR $AD8A.R<.:JSR COMY.`<.:J
SR $B7F7.M<.:STY TMP3.|<.:STA TMP3.1..<.
:LDX #$A0..<.:STX HITE.1..<.:SZ1 SEC..<.
:LDA #$6F..<.:SBC TMP3.I<.:LDA #1.X<.:SB
C TMP3.1..<.:BMI LMA1..<.:CLC..<.:LDA #$
20..=.:ADC TMP3..=.:STA TMP3..=B:LDA #0.
.=D:ADC TMP3.1.==F:STA TMP3.1.E=H:CLC.P=
J:LDA #5._=L:ADC HITE.1.L=N:CMP #$C0.X=P
:BCC SZ2..=R:CMP #$E0..=T:BCS SZ2..=V:.A
#20..=X:SZ2 STA HITE.1..=Z:BNE SZ1.A=.:
;.T=.:ERAS JSR $B79E..=.:TXA..=.:BEQ ERA
1..=.:LDX #$FF..>.:ERA1 STX ERFLG..>.:RT
S..>.:;.*>.:PATT JSR $B79E.6>.:STX DOT.D
>.:JSR $AEFD.R>.:JSR $B79E._>.:STX LDOT.
G>.:RTS.M>.:;..>.:X1 .W.D $0040..>.:Y
1 .W.D $0040..>.:X2 .W.D $0080.A>.
;Y2 .W.D $0080.R>.;DX ....5..>.;D
Y ....5..>.;SX ....5..?.;SY
....5..?.;X .W.D $0080./?.;Y .W.
D $0080.@?.;TMPF ....5.Q?.;XO ....
5.B?.;YO ....5.S?.;TY ....2..?.;
BITP ....1..?.;ROW ....1..?.;RAST
....1..?.;COL ....1.K?.;DOT .BYTE
$FF..? ;LDOT .BYTE $FF..?";ADDR ....2
..@$;ERFLG .BYTE $00..@&;TX ....2.&@
(;TY2 ....2.;@*;HITE .W.D $A000.L@,;
BUFF ....8.`@.;CHOFF .BYTE $D0.R@0;C
.BYTE $10.X@2;;...
> CLICK IMAGE PREVIEW FOR FULL MODAL