PRG MANAGEMENT
FILE INFORMATION
FILENAME(S): PRG MANAGEMENT
FILE TYPE(S): PRG
FILE SIZE: 6.4K
FIRST SEEN: 2025-11-30 21:12:21
APPEARS ON: 2 disk(s)
FILE HASH
5ec3c31cba484f1524044a36cd25be373b9d41ddf825d8ef29324fc513158edc
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RANS ISK1 | PRG MANAGEMENT | PRG | DuncanTwain | 8 | 7 | DOWNLOAD FILE |
| RANS ISK2 | PRG MANAGEMENT | PRG | DuncanTwain | 8 | 15 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 00 00 8F 20 50 52 47 20 4D 41 4E 41 |..).... PRG MANA|
00000010: 47 45 4D 45 4E 54 20 28 44 2E 20 53 50 52 55 59 |GEMENT (D. SPRUY|
00000020: 54 20 31 39 38 35 29 20 3A 00 2F 08 01 00 3A 00 |T 1985) :./...:.|
00000030: 4F 08 02 00 8F 20 33 20 53 54 41 54 45 4D 45 4E |O.... 3 STATEMEN|
00000040: 54 53 2C 20 30 20 46 55 4E 43 54 49 4F 4E 53 00 |TS, 0 FUNCTIONS.|
00000050: 55 08 03 00 3A 00 6D 08 04 00 8F 20 4B 45 59 57 |U...:.m.... KEYW|
00000060: 4F 52 44 20 43 48 41 52 53 3A 20 31 30 00 73 08 |ORD CHARS: 10.s.|
00000070: 05 00 3A 00 9A 08 06 00 8F 20 4B 45 59 57 4F 52 |..:...... KEYWOR|
00000080: 44 20 20 20 20 52 4F 55 54 49 4E 45 20 20 4C 49 |D ROUTINE LI|
00000090: 4E 45 20 20 20 53 45 52 20 23 00 C0 08 07 00 8F |NE SER #......|
000000A0: 20 53 2F 41 55 54 4F 20 20 20 20 20 43 41 52 20 | S/AUTO CAR |
000000B0: 20 20 20 20 20 39 34 30 36 20 20 20 20 31 33 36 | 9406 136|
000000C0: 00 E6 08 08 00 8F 20 53 2F 44 45 4C 20 20 20 20 |...... S/DEL |
000000D0: 20 20 44 4C 54 20 20 20 20 20 20 39 32 33 34 20 | DLT 9234 |
000000E0: 20 20 20 31 33 37 00 0C 09 09 00 8F 20 53 2F 52 | 137...... S/R|
000000F0: 45 4E 20 20 20 20 20 20 52 4E 55 4D 20 20 20 20 |EN RNUM |
00000100: 20 39 34 38 32 20 20 20 20 31 33 38 00 12 09 0A | 9482 138....|
00000110: 00 3A 00 39 09 0B 00 8F 20 3D 3D 3D 3D 3D 3D 3D |.:.9.... =======|
00000120: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000130: 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 3F 09 0C 00 3A 00 |=========.?...:.|
00000140: 53 09 8B 00 2E C6 20 22 41 55 54 CF 44 45 CC 52 |S..... "AUT.DE.R|
00000150: 45 CE 22 00 6F 09 73 04 2E 57 B0 44 20 43 41 52 |E.".o.s..W.D CAR|
00000160: AB 31 2C 44 4C 54 AB 31 2C 52 4E 55 4D AB 31 00 |.1,DLT.1,RNUM.1.|
00000170: 7D 09 4D 08 4A 53 52 20 4D B0 56 45 43 00 8C 09 |}.M.JSR M.VEC...|
00000180: FB 09 4A 53 52 20 4B 49 4C 56 45 43 00 9C 09 3C |..JSR KILVEC...<|
00000190: 0A 55 53 46 50 20 4C 44 58 20 23 30 00 A8 09 3E |.USFP LDX #0...>|
000001A0: 0A 53 54 58 20 24 30 44 00 B4 09 40 0A 53 54 41 |.STX $0D...@.STA|
000001B0: 20 24 36 32 00 C0 09 42 0A 53 54 59 20 24 36 33 | $62...B.STY $63|
000001C0: 00 CD 09 44 0A 4C 44 58 20 23 24 39 30 00 D5 09 |...D.LDX #$90...|
000001D0: 46 0A 53 45 43 00 E3 09 48 0A 4A 4D 50 20 24 42 |F.SEC...H.JMP $B|
000001E0: 43 34 39 00 E9 09 4A 0A 3B 00 FC 09 BE 23 45 52 |C49...J.;....#ER|
000001F0: 52 50 47 4D 20 4C 44 58 20 24 33 41 00 04 0A C0 |RPGM LDX $3A....|
00000200: 23 49 4E 58 00 11 0A C2 23 42 4E 45 20 45 50 47 |#INX....#BNE EPG|
00000210: 31 00 19 0A C4 23 52 54 53 00 2C 0A C6 23 45 50 |1....#RTS.,..#EP|
00000220: 47 31 20 4A 4D 50 20 24 41 46 30 38 00 32 0A C8 |G1 JMP $AF08.2..|
00000230: 23 3B 00 3F 0A CA 23 4D B0 56 45 43 20 B2 AC 00 |#;.?..#M.VEC ...|
00000240: 4C 0A CC 23 4A 53 52 20 41 55 A4 4E 00 54 0A DA |L..#JSR AU.N.T..|
00000250: 23 52 54 53 00 5A 0A DC 23 3B 00 68 0A DE 23 4B |#RTS.Z..#;.h..#K|
00000260: 49 4C 56 45 43 20 B2 AC 00 76 0A E0 23 4A 53 52 |ILVEC ...v..#JSR|
00000270: 20 41 55 A4 46 46 00 7E 0A EE 23 52 54 53 00 84 | AU.FF.~..#RTS..|
00000280: 0A F0 23 3B 00 99 0A F2 23 41 55 A4 46 46 20 4C |..#;....#AU.FF L|
00000290: 44 41 20 57 52 4D 53 52 54 00 A6 0A F4 23 53 54 |DA WRMSRT....#ST|
000002A0: 41 20 24 33 30 32 00 B7 0A F6 23 4C 44 41 20 57 |A $302....#LDA W|
000002B0: 52 4D 53 52 54 AA 31 00 C4 0A F8 23 53 54 41 20 |RMSRT.1....#STA |
000002C0: 24 33 30 33 00 CC 0A FA 23 52 54 53 00 D2 0A FC |$303....#RTS....|
000002D0: 23 3B 00 E4 0A FE 23 41 55 A4 4E 20 4C 44 41 20 |#;....#AU.N LDA |
000002E0: 24 33 30 32 00 F3 0A 00 24 53 54 41 20 57 52 4D |$302....$STA WRM|
000002F0: 53 52 54 00 00 0B 02 24 4C 44 41 20 24 33 30 33 |SRT....$LDA $303|
00000300: 00 11 0B 04 24 53 54 41 20 57 52 4D 53 52 54 AA |....$STA WRMSRT.|
00000310: 31 00 1F 0B 06 24 4C 44 41 20 23 B1 41 55 A4 00 |1....$LDA #.AU..|
00000320: 2C 0B 08 24 53 54 41 20 24 33 30 33 00 3A 0B 0A |,..$STA $303.:..|
00000330: 24 4C 44 41 20 23 B3 41 55 A4 00 47 0B 0C 24 53 |$LDA #.AU..G..$S|
00000340: 54 41 20 24 33 30 32 00 4F 0B 0E 24 52 54 53 00 |TA $302.O..$RTS.|
00000350: 55 0B 10 24 3B 00 68 0B 12 24 44 4C 54 20 4A 53 |U..$;.h..$DLT JS|
00000360: 52 20 45 52 52 50 47 4D 00 76 0B 14 24 4A 53 52 |R ERRPGM.v..$JSR|
00000370: 20 24 41 39 36 42 00 83 0B 16 24 4C 44 58 20 23 | $A96B....$LDX #|
00000380: 24 35 30 00 90 0B 18 24 4A 53 52 20 53 A4 52 45 |$50....$JSR S.RE|
00000390: 00 9D 0B 1A 24 43 4D 50 20 23 24 41 42 00 AA 0B |....$CMP #$AB...|
000003A0: 1C 24 42 4E 45 20 44 4C 54 32 00 B6 0B 1E 24 4A |.$BNE DLT2....$J|
000003B0: 53 52 20 24 37 33 00 C3 0B 20 24 42 4E 45 20 44 |SR $73... $BNE D|
000003C0: 4C 54 31 00 D0 0B 22 24 4C 44 41 20 23 24 46 46 |LT1..."$LDA #$FF|
000003D0: 00 DC 0B 24 24 53 54 41 20 24 35 32 00 E8 0B 26 |...$$STA $52...&|
000003E0: 24 53 54 41 20 24 35 33 00 F5 0B 28 24 42 4E 45 |$STA $53...($BNE|
000003F0: 20 44 4C 54 34 00 08 0C 2A 24 44 4C 54 31 20 4A | DLT4...*$DLT1 J|
00000400: 53 52 20 24 41 39 36 42 00 15 0C 2C 24 44 4C 54 |SR $A96B...,$DLT|
00000410: 32 20 53 45 43 00 21 0C 2E 24 4C 44 41 20 24 31 |2 SEC.!..$LDA $1|
00000420: 34 00 2D 0C 30 24 53 54 41 20 24 35 32 00 39 0C |4.-.0$STA $52.9.|
00000430: 32 24 53 42 43 20 24 35 30 00 45 0C 34 24 4C 44 |2$SBC $50.E.4$LD|
00000440: 41 20 24 31 35 00 51 0C 36 24 53 54 41 20 24 35 |A $15.Q.6$STA $5|
00000450: 33 00 5D 0C 38 24 53 42 43 20 24 35 31 00 6A 0C |3.].8$SBC $51.j.|
00000460: 3A 24 42 43 53 20 44 4C 54 33 00 78 0C 3C 24 4A |:$BCS DLT3.x.<$J|
00000470: 4D 50 20 24 41 46 30 38 00 89 0C 3E 24 44 4C 54 |MP $AF08...>$DLT|
00000480: 33 20 49 4E 43 20 24 35 32 00 96 0C 40 24 42 4E |3 INC $52...@$BN|
00000490: 45 20 44 4C 54 34 00 A2 0C 42 24 49 4E 43 20 24 |E DLT4...B$INC $|
000004A0: 35 33 00 B4 0C 44 24 44 4C 54 34 20 4C 44 58 20 |53...D$DLT4 LDX |
000004B0: 23 24 35 30 00 C0 0C 46 24 4A 53 52 20 55 4E 53 |#$50...F$JSR UNS|
000004C0: 00 CE 0C 48 24 4A 53 52 20 24 41 36 31 33 00 DA |...H$JSR $A613..|
000004D0: 0C 4A 24 4C 44 41 20 24 35 46 00 E6 0C 4C 24 53 |.J$LDA $5F...L$S|
000004E0: 54 41 20 24 32 32 00 F2 0C 4E 24 4C 44 41 20 24 |TA $22...N$LDA $|
000004F0: 36 30 00 FE 0C 50 24 53 54 41 20 24 32 33 00 0B |60...P$STA $23..|
00000500: 0D 52 24 4C 44 58 20 23 24 35 32 00 17 0D 54 24 |.R$LDX #$52...T$|
00000510: 4A 53 52 20 55 4E 53 00 25 0D 56 24 4A 53 52 20 |JSR UNS.%.V$JSR |
00000520: 24 41 36 31 33 00 33 0D 58 24 4A 4D 50 20 44 4C |$A613.3.X$JMP DL|
00000530: 54 31 31 00 40 0D 5A 24 44 4C 54 35 20 53 45 43 |T11.@.Z$DLT5 SEC|
00000540: 00 4C 0D 5C 24 4C 44 41 20 24 32 44 00 58 0D 5E |.L.\$LDA $2D.X.^|
00000550: 24 53 42 43 20 24 35 46 00 63 0D 60 24 53 54 41 |$SBC $5F.c.`$STA|
00000560: 20 54 32 00 6F 0D 62 24 4C 44 41 20 24 32 45 00 | T2.o.b$LDA $2E.|
00000570: 7B 0D 64 24 53 42 43 20 24 36 30 00 83 0D 66 24 |{.d$SBC $60...f$|
00000580: 54 41 58 00 8B 0D 68 24 49 4E 58 00 96 0D 6A 24 |TAX...h$INX...j$|
00000590: 4C 44 59 20 23 30 00 A3 0D 6C 24 42 45 51 20 44 |LDY #0...l$BEQ D|
000005A0: 4C 54 37 00 B8 0D 6E 24 44 4C 54 36 20 4C 44 41 |LT7...n$DLT6 LDA|
000005B0: 20 28 24 35 46 29 2C 59 00 C8 0D 70 24 53 54 41 | ($5F),Y...p$STA|
000005C0: 20 28 24 32 32 29 2C 59 00 D0 0D 72 24 49 4E 59 | ($22),Y...r$INY|
000005D0: 00 DD 0D 74 24 42 4E 45 20 44 4C 54 36 00 E9 0D |...t$BNE DLT6...|
000005E0: 76 24 49 4E 43 20 24 36 30 00 F5 0D 78 24 49 4E |v$INC $60...x$IN|
000005F0: 43 20 24 32 33 00 02 0E 7A 24 44 4C 54 37 20 44 |C $23...z$DLT7 D|
00000600: 45 58 00 0F 0E 7C 24 42 4E 45 20 44 4C 54 36 00 |EX...|$BNE DLT6.|
00000610: 21 0E 7E 24 44 4C 54 38 20 20 43 50 59 20 24 30 |!.~$DLT8 CPY $0|
00000620: 32 00 2E 0E 80 24 42 45 51 20 44 4C 54 39 00 3E |2....$BEQ DLT9.>|
00000630: 0E 82 24 4C 44 41 20 28 24 35 46 29 2C 59 00 4E |..$LDA ($5F),Y.N|
00000640: 0E 84 24 53 54 41 20 28 24 32 32 29 2C 59 00 56 |..$STA ($22),Y.V|
00000650: 0E 86 24 49 4E 59 00 63 0E 88 24 42 4E 45 20 44 |..$INY.c..$BNE D|
00000660: 4C 54 38 00 70 0E 8A 24 44 4C 54 39 20 54 59 41 |LT8.p..$DLT9 TYA|
00000670: 00 78 0E 8C 24 43 4C 43 00 84 0E 8E 24 41 44 43 |.x..$CLC....$ADC|
00000680: 20 24 32 32 00 90 0E 90 24 53 54 41 20 24 32 44 | $22....$STA $2D|
00000690: 00 9E 0E 92 24 42 43 43 20 44 4C 54 31 30 00 AA |....$BCC DLT10..|
000006A0: 0E 94 24 49 4E 43 20 24 32 33 00 BC 0E 96 24 44 |..$INC $23....$D|
000006B0: 4C 54 31 30 20 4C 44 41 20 24 32 33 00 C8 0E 98 |LT10 LDA $23....|
000006C0: 24 53 54 41 20 24 32 45 00 D0 0E 9A 24 52 54 53 |$STA $2E....$RTS|
000006D0: 00 E3 0E 9C 24 44 4C 54 31 31 20 4A 53 52 20 44 |....$DLT11 JSR D|
000006E0: 4C 54 35 00 F1 0E 9E 24 4A 53 52 20 24 41 35 33 |LT5....$JSR $A53|
000006F0: 33 00 FF 0E A0 24 4A 53 52 20 24 41 36 35 39 00 |3....$JSR $A659.|
00000700: 0D 0F A2 24 4A 4D 50 20 24 41 34 37 34 00 13 0F |...$JMP $A474...|
00000710: A4 24 3B 00 24 0F A6 24 53 A4 52 45 20 4C 44 59 |.$;.$..$S.RE LDY|
00000720: 20 24 31 34 00 30 0F A8 24 53 54 59 20 30 2C 58 | $14.0..$STY 0,X|
00000730: 00 3C 0F AA 24 4C 44 59 20 24 31 35 00 48 0F AC |.<..$LDY $15.H..|
00000740: 24 53 54 59 20 31 2C 58 00 50 0F AE 24 52 54 53 |$STY 1,X.P..$RTS|
00000750: 00 56 0F B0 24 3B 00 66 0F B2 24 55 4E 53 20 4C |.V..$;.f..$UNS L|
00000760: 44 59 20 30 2C 58 00 72 0F B4 24 53 54 59 20 24 |DY 0,X.r..$STY $|
00000770: 31 34 00 7E 0F B6 24 4C 44 59 20 31 2C 58 00 8A |14.~..$LDY 1,X..|
00000780: 0F B8 24 53 54 59 20 24 31 35 00 92 0F BA 24 52 |..$STY $15....$R|
00000790: 54 53 00 98 0F BC 24 3B 00 AB 0F BE 24 43 41 52 |TS....$;....$CAR|
000007A0: 20 4A 53 52 20 45 52 52 50 47 4D 00 B9 0F C0 24 | JSR ERRPGM....$|
000007B0: 4A 53 52 20 24 41 39 36 42 00 C6 0F C2 24 4A 53 |JSR $A96B....$JS|
000007C0: 52 20 41 4E 45 C5 00 D0 0F C4 24 53 54 41 20 A9 |R ANE.....$STA .|
000007D0: 00 DC 0F C6 24 4C 44 41 20 24 35 31 00 E8 0F C8 |....$LDA $51....|
000007E0: 24 4C 44 59 20 24 35 30 00 F3 0F CA 24 4C 44 58 |$LDY $50....$LDX|
000007F0: 20 23 31 00 FD 0F CC 24 53 54 58 20 9A 00 0A 10 | #1....$STX ....|
00000800: CE 24 4A 4D 50 20 41 55 54 33 00 10 10 D0 24 3B |.$JMP AUT3....$;|
00000810: 00 21 10 D2 24 41 55 A4 20 4C 44 59 20 24 32 30 |.!..$AU. LDY $20|
00000820: 30 00 2E 10 D4 24 42 4E 45 20 41 55 54 31 00 38 |0....$BNE AUT1.8|
00000830: 10 D6 24 53 54 59 20 9A 00 47 10 D8 24 41 55 54 |..$STY ..G..$AUT|
00000840: 31 20 4C 44 59 20 9A 00 54 10 DA 24 42 45 51 20 |1 LDY ..T..$BEQ |
00000850: 41 55 54 35 00 60 10 DC 24 4C 44 41 20 24 31 34 |AUT5.`..$LDA $14|
00000860: 00 68 10 DE 24 43 4C 43 00 72 10 E0 24 41 44 43 |.h..$CLC.r..$ADC|
00000870: 20 A9 00 7F 10 E2 24 42 43 43 20 41 55 54 32 00 | .....$BCC AUT2.|
00000880: 8B 10 E4 24 49 4E 43 20 24 31 35 00 98 10 E6 24 |...$INC $15....$|
00000890: 41 55 54 32 20 54 41 59 00 A4 10 E8 24 4C 44 41 |AUT2 TAY....$LDA|
000008A0: 20 24 31 35 00 B7 10 EA 24 41 55 54 33 20 4A 53 | $15....$AUT3 JS|
000008B0: 52 20 53 54 52 4E 47 00 C4 10 EC 24 4C 44 59 20 |R STRNG....$LDY |
000008C0: 23 24 46 46 00 D1 10 EE 24 41 55 54 34 20 49 4E |#$FF....$AUT4 IN|
000008D0: 59 00 E0 10 F0 24 4C 44 41 20 24 31 30 30 2C 59 |Y....$LDA $100,Y|
000008E0: 00 EF 10 F2 24 53 54 41 20 24 32 37 37 2C 59 00 |....$STA $277,Y.|
000008F0: FC 10 F4 24 42 4E 45 20 41 55 54 34 00 09 11 F6 |...$BNE AUT4....|
00000900: 24 4C 44 41 20 23 24 32 30 00 18 11 F8 24 53 54 |$LDA #$20....$ST|
00000910: 41 20 24 32 37 37 2C 59 00 20 11 FA 24 49 4E 59 |A $277,Y. ..$INY|
00000920: 00 2C 11 FC 24 53 54 59 20 24 43 36 00 40 11 FE |.,..$STY $C6.@..|
00000930: 24 41 55 54 35 20 4C 44 41 20 57 52 4D 53 52 54 |$AUT5 LDA WRMSRT|
00000940: 00 4C 11 00 25 53 54 41 20 24 31 34 00 5D 11 02 |.L..%STA $14.]..|
00000950: 25 4C 44 41 20 57 52 4D 53 52 54 AA 31 00 69 11 |%LDA WRMSRT.1.i.|
00000960: 04 25 53 54 41 20 24 31 35 00 77 11 06 25 4A 4D |.%STA $15.w..%JM|
00000970: 50 20 28 24 31 34 29 00 7D 11 08 25 3B 00 91 11 |P ($14).}..%;...|
00000980: 0A 25 52 4E 55 4D 20 4A 53 52 20 45 52 52 50 47 |.%RNUM JSR ERRPG|
00000990: 4D 00 9F 11 0C 25 4A 53 52 20 24 41 39 36 42 00 |M....%JSR $A96B.|
000009A0: AC 11 0E 25 43 4D 50 20 23 24 41 42 00 B9 11 10 |...%CMP #$AB....|
000009B0: 25 42 4E 45 20 52 4E 4D 33 00 C6 11 12 25 4C 44 |%BNE RNM3....%LD|
000009C0: 58 20 23 24 34 35 00 D3 11 14 25 4A 53 52 20 53 |X #$45....%JSR S|
000009D0: A4 52 45 00 DF 11 16 25 4A 53 52 20 24 37 33 00 |.RE....%JSR $73.|
000009E0: EC 11 18 25 43 4D 50 20 23 24 32 43 00 F9 11 1A |...%CMP #$2C....|
000009F0: 25 42 4E 45 20 52 4E 4D 32 00 0C 12 1C 25 52 4E |%BNE RNM2....%RN|
00000A00: 4D 31 20 4A 4D 50 20 24 41 46 30 38 00 1D 12 1E |M1 JMP $AF08....|
00000A10: 25 52 4E 4D 32 20 4A 53 52 20 24 37 39 00 2B 12 |%RNM2 JSR $79.+.|
00000A20: 20 25 4A 53 52 20 24 41 39 36 42 00 38 12 22 25 | %JSR $A96B.8."%|
00000A30: 43 4D 50 20 23 24 32 43 00 45 12 24 25 42 4E 45 |CMP #$2C.E.$%BNE|
00000A40: 20 52 4E 4D 31 00 50 12 26 25 4C 44 58 20 23 35 | RNM1.P.&%LDX #5|
00000A50: 00 5D 12 28 25 4A 53 52 20 53 A4 52 45 00 69 12 |.].(%JSR S.RE.i.|
00000A60: 2A 25 4A 53 52 20 24 37 33 00 77 12 2C 25 4A 53 |*%JSR $73.w.,%JS|
00000A70: 52 20 24 41 39 36 42 00 84 12 2E 25 43 4D 50 20 |R $A96B....%CMP |
00000A80: 23 24 32 43 00 91 12 30 25 42 4E 45 20 52 4E 4D |#$2C...0%BNE RNM|
00000A90: 31 00 9E 12 32 25 42 45 51 20 52 4E 4D 34 00 AE |1...2%BEQ RNM4..|
00000AA0: 12 34 25 52 4E 4D 33 20 4C 44 59 20 23 30 00 BA |.4%RNM3 LDY #0..|
00000AB0: 12 36 25 53 54 59 20 24 34 35 00 C6 12 38 25 53 |.6%STY $45...8%S|
00000AC0: 54 59 20 24 34 36 00 CE 12 3A 25 44 45 59 00 D6 |TY $46...:%DEY..|
00000AD0: 12 3C 25 44 45 59 00 E1 12 3E 25 53 54 59 20 54 |.<%DEY...>%STY T|
00000AE0: 35 00 EC 12 40 25 53 54 59 20 54 36 00 FE 12 42 |5...@%STY T6...B|
00000AF0: 25 52 4E 4D 34 20 4A 53 52 20 41 4E 45 C5 00 09 |%RNM4 JSR ANE...|
00000B00: 13 44 25 49 4E 43 20 54 35 00 16 13 46 25 42 4E |.D%INC T5...F%BN|
00000B10: 45 20 52 4E 4D 35 00 21 13 48 25 49 4E 43 20 54 |E RNM5.!.H%INC T|
00000B20: 36 00 32 13 4A 25 52 4E 4D 35 20 4C 44 41 20 24 |6.2.J%RNM5 LDA $|
00000B30: 34 35 00 3E 13 4C 25 53 54 41 20 24 31 34 00 4A |45.>.L%STA $14.J|
00000B40: 13 4E 25 4C 44 41 20 24 34 36 00 56 13 50 25 53 |.N%LDA $46.V.P%S|
00000B50: 54 41 20 24 31 35 00 64 13 52 25 4A 53 52 20 24 |TA $15.d.R%JSR $|
00000B60: 41 36 31 33 00 70 13 54 25 4C 44 41 20 24 35 46 |A613.p.T%LDA $5F|
00000B70: 00 7C 13 56 25 53 54 41 20 24 41 43 00 88 13 58 |.|.V%STA $AC...X|
00000B80: 25 4C 44 41 20 24 36 30 00 94 13 5A 25 53 54 41 |%LDA $60...Z%STA|
00000B90: 20 24 41 44 00 9F 13 5C 25 4C 44 41 20 54 35 00 | $AD...\%LDA T5.|
00000BA0: AB 13 5E 25 53 54 41 20 24 31 34 00 B6 13 60 25 |..^%STA $14...`%|
00000BB0: 4C 44 41 20 54 36 00 C2 13 62 25 53 54 41 20 24 |LDA T6...b%STA $|
00000BC0: 31 35 00 D0 13 64 25 4A 53 52 20 A5 44 4C 49 4E |15...d%JSR .DLIN|
00000BD0: 00 DB 13 66 25 4C 44 59 20 23 31 00 EB 13 68 25 |...f%LDY #1...h%|
00000BE0: 4C 44 41 20 28 24 35 46 29 2C 59 00 F8 13 6A 25 |LDA ($5F),Y...j%|
00000BF0: 42 45 51 20 52 4E 4D 37 00 03 14 6C 25 4C 44 59 |BEQ RNM7...l%LDY|
00000C00: 20 23 33 00 13 14 6E 25 4C 44 41 20 28 24 35 46 | #3...n%LDA ($5F|
00000C10: 29 2C 59 00 1F 14 70 25 43 4D 50 20 24 41 42 00 |),Y...p%CMP $AB.|
00000C20: 2C 14 72 25 42 4E 45 20 52 4E 4D 36 00 34 14 74 |,.r%BNE RNM6.4.t|
00000C30: 25 44 45 59 00 44 14 76 25 4C 44 41 20 28 24 35 |%DEY.D.v%LDA ($5|
00000C40: 46 29 2C 59 00 50 14 78 25 43 4D 50 20 24 41 41 |F),Y.P.x%CMP $AA|
00000C50: 00 62 14 7A 25 52 4E 4D 36 20 42 43 53 20 52 4E |.b.z%RNM6 BCS RN|
00000C60: 4D 37 00 70 14 7C 25 4A 4D 50 20 24 42 32 34 38 |M7.p.|%JMP $B248|
00000C70: 00 80 14 7E 25 52 4E 4D 37 20 4C 44 41 20 23 30 |...~%RNM7 LDA #0|
00000C80: 00 8D 14 80 25 53 54 41 20 91 46 4C 47 00 99 14 |....%STA .FLG...|
00000C90: 82 25 4C 44 41 20 24 32 42 00 A5 14 84 25 53 54 |.%LDA $2B....%ST|
00000CA0: 41 20 24 33 46 00 B1 14 86 25 4C 44 41 20 24 32 |A $3F....%LDA $2|
00000CB0: 43 00 BD 14 88 25 53 54 41 20 24 34 30 00 CD 14 |C....%STA $40...|
00000CC0: 8A 25 52 4E 4D 38 20 4C 44 59 20 23 32 00 DD 14 |.%RNM8 LDY #2...|
00000CD0: 8C 25 4C 44 41 20 28 24 33 46 29 2C 59 00 E9 14 |.%LDA ($3F),Y...|
00000CE0: 8E 25 53 54 41 20 24 33 39 00 F1 14 90 25 49 4E |.%STA $39....%IN|
00000CF0: 59 00 01 15 92 25 4C 44 41 20 28 24 33 46 29 2C |Y....%LDA ($3F),|
00000D00: 59 00 0D 15 94 25 53 54 41 20 24 33 41 00 1A 15 |Y....%STA $3A...|
00000D10: 96 25 52 4E 4D 39 20 49 4E 59 00 30 15 98 25 52 |.%RNM9 INY.0..%R|
00000D20: 4E 4D 31 30 20 4C 44 41 20 28 24 33 46 29 2C 59 |NM10 LDA ($3F),Y|
00000D30: 00 3E 15 9A 25 42 45 51 20 52 4E 4D 31 34 00 4B |.>..%BEQ RNM14.K|
00000D40: 15 9C 25 43 4D 50 20 23 24 33 41 00 59 15 9E 25 |..%CMP #$3A.Y..%|
00000D50: 42 45 51 20 52 4E 4D 31 34 00 66 15 A0 25 43 4D |BEQ RNM14.f..%CM|
00000D60: 50 20 23 24 38 39 00 74 15 A2 25 42 45 51 20 52 |P #$89.t..%BEQ R|
00000D70: 4E 4D 31 36 00 81 15 A4 25 43 4D 50 20 23 24 38 |NM16....%CMP #$8|
00000D80: 44 00 8F 15 A6 25 42 45 51 20 52 4E 4D 31 36 00 |D....%BEQ RNM16.|
00000D90: 9C 15 A8 25 43 4D 50 20 23 24 43 42 00 AA 15 AA |...%CMP #$CB....|
00000DA0: 25 42 4E 45 20 52 4E 4D 31 31 00 B9 15 AC 25 4A |%BNE RNM11....%J|
00000DB0: 53 52 20 4E 58 54 43 48 31 00 C6 15 AE 25 43 4D |SR NXTCH1....%CM|
00000DC0: 50 20 23 24 41 34 00 D4 15 B0 25 42 45 51 20 52 |P #$A4....%BEQ R|
00000DD0: 4E 4D 31 36 00 E2 15 B2 25 42 4E 45 20 52 4E 4D |NM16....%BNE RNM|
00000DE0: 31 30 00 F5 15 B4 25 52 4E 4D 31 31 20 43 4D 50 |10....%RNM11 CMP|
00000DF0: 20 23 24 41 37 00 03 16 B6 25 42 4E 45 20 52 4E | #$A7....%BNE RN|
00000E00: 4D 31 32 00 12 16 B8 25 4A 53 52 20 4E 58 54 43 |M12....%JSR NXTC|
00000E10: 48 31 00 1F 16 BA 25 43 4D 50 20 23 24 33 30 00 |H1....%CMP #$30.|
00000E20: 2D 16 BC 25 42 43 43 20 52 4E 4D 31 30 00 3A 16 |-..%BCC RNM10.:.|
00000E30: BE 25 43 4D 50 20 23 24 33 41 00 48 16 C0 25 42 |.%CMP #$3A.H..%B|
00000E40: 43 43 20 52 4E 4D 31 37 00 56 16 C2 25 42 43 53 |CC RNM17.V..%BCS|
00000E50: 20 52 4E 4D 31 30 00 69 16 C4 25 52 4E 4D 31 32 | RNM10.i..%RNM12|
00000E60: 20 43 4D 50 20 23 24 39 31 00 77 16 C6 25 42 4E | CMP #$91.w..%BN|
00000E70: 45 20 52 4E 4D 31 33 00 84 16 C8 25 53 54 41 20 |E RNM13....%STA |
00000E80: 91 46 4C 47 00 91 16 CA 25 4A 4D 50 20 52 4E 4D |.FLG....%JMP RNM|
00000E90: 39 00 A4 16 CC 25 52 4E 4D 31 33 20 43 4D 50 20 |9....%RNM13 CMP |
00000EA0: 23 24 32 43 00 B1 16 CE 25 42 4E 45 20 52 4E 4D |#$2C....%BNE RNM|
00000EB0: 39 00 BE 16 D0 25 4C 44 41 20 91 46 4C 47 00 CB |9....%LDA .FLG..|
00000EC0: 16 D2 25 42 45 51 20 52 4E 4D 39 00 D9 16 D4 25 |..%BEQ RNM9....%|
00000ED0: 42 4E 45 20 52 4E 4D 31 36 00 EA 16 D6 25 52 4E |BNE RNM16....%RN|
00000EE0: 4D 31 34 20 4C 44 58 20 23 30 00 F7 16 D8 25 53 |M14 LDX #0....%S|
00000EF0: 54 58 20 91 46 4C 47 00 04 17 DA 25 43 4D 50 20 |TX .FLG....%CMP |
00000F00: 23 24 33 41 00 11 17 DC 25 42 45 51 20 52 4E 4D |#$3A....%BEQ RNM|
00000F10: 39 00 1C 17 DE 25 4C 44 59 20 23 31 00 2C 17 E0 |9....%LDY #1.,..|
00000F20: 25 4C 44 41 20 28 24 33 46 29 2C 59 00 3A 17 E2 |%LDA ($3F),Y.:..|
00000F30: 25 42 45 51 20 52 4E 4D 31 35 00 42 17 E4 25 54 |%BEQ RNM15.B..%T|
00000F40: 41 58 00 4A 17 E6 25 44 45 59 00 5A 17 E8 25 4C |AX.J..%DEY.Z..%L|
00000F50: 44 41 20 28 24 33 46 29 2C 59 00 66 17 EA 25 53 |DA ($3F),Y.f..%S|
00000F60: 54 41 20 24 33 46 00 72 17 EC 25 53 54 58 20 24 |TA $3F.r..%STX $|
00000F70: 34 30 00 7F 17 EE 25 4A 4D 50 20 52 4E 4D 38 00 |40....%JMP RNM8.|
00000F80: 90 17 F0 25 52 4E 4D 31 35 20 4C 44 58 20 23 35 |...%RNM15 LDX #5|
00000F90: 00 9C 17 F2 25 4A 53 52 20 55 4E 53 00 AB 17 F4 |....%JSR UNS....|
00000FA0: 25 4A 53 52 20 4E 55 4D 42 45 52 00 B9 17 F6 25 |%JSR NUMBER....%|
00000FB0: 4A 53 52 20 24 41 36 35 39 00 C7 17 F8 25 4A 4D |JSR $A659....%JM|
00000FC0: 50 20 24 41 34 37 34 00 D5 17 FA 25 52 4E 4D 31 |P $A474....%RNM1|
00000FD0: 36 20 49 4E 59 00 E9 17 FC 25 52 4E 4D 31 37 20 |6 INY....%RNM17 |
00000FE0: 4A 53 52 20 52 4E 4D 31 38 00 F5 17 FE 25 4C 44 |JSR RNM18....%LD|
00000FF0: 59 20 24 39 37 00 03 18 00 26 4A 4D 50 20 52 4E |Y $97....&JMP RN|
00001000: 4D 31 30 00 17 18 02 26 3B 4D 41 54 43 48 20 81 |M10....&;MATCH .|
00001010: 20 43 48 41 4E 47 45 00 29 18 04 26 52 4E 4D 31 | CHANGE.)..&RNM1|
00001020: 38 20 4A 53 52 20 82 43 48 00 35 18 06 26 53 54 |8 JSR .CH.5..&ST|
00001030: 59 20 24 39 37 00 3D 18 08 26 43 4C 43 00 45 18 |Y $97.=..&CLC.E.|
00001040: 0A 26 54 59 41 00 51 18 0C 26 41 44 43 20 24 33 |.&TYA.Q..&ADC $3|
00001050: 46 00 5D 18 0E 26 53 54 41 20 24 37 41 00 69 18 |F.]..&STA $7A.i.|
00001060: 10 26 53 54 41 20 24 34 31 00 75 18 12 26 4C 44 |.&STA $41.u..&LD|
00001070: 41 20 24 34 30 00 80 18 14 26 41 44 43 20 23 30 |A $40....&ADC #0|
00001080: 00 8C 18 16 26 53 54 41 20 24 34 32 00 98 18 18 |....&STA $42....|
00001090: 26 53 54 41 20 24 37 42 00 A4 18 1A 26 4A 53 52 |&STA $7B....&JSR|
000010A0: 20 24 37 39 00 B2 18 1C 26 4A 53 52 20 24 41 39 | $79....&JSR $A9|
000010B0: 36 42 00 BA 18 1E 26 53 45 43 00 C6 18 20 26 4C |6B....&SEC... &L|
000010C0: 44 41 20 24 37 41 00 D2 18 22 26 53 42 43 20 24 |DA $7A..."&SBC $|
000010D0: 34 31 00 DD 18 24 26 53 54 41 20 54 32 00 E5 18 |41...$&STA T2...|
000010E0: 26 26 53 45 43 00 F1 18 28 26 4C 44 41 20 24 31 |&&SEC...(&LDA $1|
000010F0: 34 00 FC 18 2A 26 53 42 43 20 54 35 00 08 19 2C |4...*&SBC T5...,|
00001100: 26 4C 44 41 20 24 31 35 00 13 19 2E 26 53 42 43 |&LDA $15....&SBC|
00001110: 20 54 36 00 21 19 30 26 42 43 53 20 52 4E 4D 31 | T6.!.0&BCS RNM1|
00001120: 39 00 29 19 32 26 53 45 43 00 35 19 34 26 4C 44 |9.).2&SEC.5.4&LD|
00001130: 41 20 24 31 34 00 41 19 36 26 53 42 43 20 24 34 |A $14.A.6&SBC $4|
00001140: 35 00 4D 19 38 26 4C 44 41 20 24 31 35 00 59 19 |5.M.8&LDA $15.Y.|
00001150: 3A 26 53 42 43 20 24 34 36 00 67 19 3C 26 42 43 |:&SBC $46.g.<&BC|
00001160: 53 20 52 4E 4D 32 30 00 86 19 3E 26 3B 4C 49 4E |S RNM20...>&;LIN|
00001170: 45 20 A4 20 42 45 20 52 45 4E 55 4D 42 45 52 45 |E . BE RENUMBERE|
00001180: 44 20 48 45 52 45 00 9A 19 40 26 52 4E 4D 31 39 |D HERE...@&RNM19|
00001190: 20 4A 4D 50 20 52 4E 4D 33 31 00 AE 19 42 26 52 | JMP RNM31...B&R|
000011A0: 4E 4D 32 30 20 4A 53 52 20 A5 44 4C 49 4E 00 BB |NM20 JSR .DLIN..|
000011B0: 19 44 26 4C 44 59 20 23 24 46 46 00 C9 19 46 26 |.D&LDY #$FF...F&|
000011C0: 52 4E 4D 32 31 20 49 4E 59 00 D8 19 48 26 4C 44 |RNM21 INY...H&LD|
000011D0: 41 20 24 31 30 30 2C 59 00 E6 19 4A 26 42 4E 45 |A $100,Y...J&BNE|
000011E0: 20 52 4E 4D 32 31 00 EE 19 4C 26 54 59 41 00 F6 | RNM21...L&TYA..|
000011F0: 19 4E 26 53 45 43 00 01 1A 50 26 53 42 43 20 54 |.N&SEC...P&SBC T|
00001200: 32 00 0F 1A 52 26 42 4D 49 20 52 4E 4D 32 36 00 |2...R&BMI RNM26.|
00001210: 1D 1A 54 26 42 45 51 20 52 4E 4D 32 38 00 33 1A |..T&BEQ RNM28.3.|
00001220: 56 26 3B 41 44 44 20 49 4E 20 2E 41 20 53 50 41 |V&;ADD IN .A SPA|
00001230: 43 45 53 00 3E 1A 58 26 53 54 41 20 54 32 00 46 |CES.>.X&STA T2.F|
00001240: 1A 5A 26 53 45 43 00 52 1A 5C 26 4C 44 41 20 24 |.Z&SEC.R.\&LDA $|
00001250: 33 38 00 5E 1A 5E 26 53 42 43 20 24 32 45 00 6C |38.^.^&SBC $2E.l|
00001260: 1A 60 26 42 4E 45 20 52 4E 4D 32 32 00 74 1A 62 |.`&BNE RNM22.t.b|
00001270: 26 53 45 43 00 80 1A 64 26 4C 44 41 20 24 33 37 |&SEC...d&LDA $37|
00001280: 00 8C 1A 66 26 53 42 43 20 24 32 44 00 97 1A 68 |...f&SBC $2D...h|
00001290: 26 43 4D 50 20 54 32 00 A5 1A 6A 26 42 43 53 20 |&CMP T2...j&BCS |
000012A0: 52 4E 4D 32 32 00 B3 1A 6C 26 4A 4D 50 20 24 41 |RNM22...l&JMP $A|
000012B0: 34 33 35 00 C5 1A 6E 26 52 4E 4D 32 32 20 4C 44 |435...n&RNM22 LD|
000012C0: 41 20 24 34 31 00 D1 1A 70 26 53 54 41 20 24 35 |A $41...p&STA $5|
000012D0: 46 00 DD 1A 72 26 4C 44 41 20 24 34 32 00 E9 1A |F...r&LDA $42...|
000012E0: 74 26 53 54 41 20 24 36 30 00 F5 1A 76 26 4C 44 |t&STA $60...v&LD|
000012F0: 41 20 24 32 44 00 01 1B 78 26 53 54 41 20 24 35 |A $2D...x&STA $5|
00001300: 41 00 0D 1B 7A 26 4C 44 58 20 24 32 45 00 19 1B |A...z&LDX $2E...|
00001310: 7C 26 53 54 58 20 24 35 42 00 21 1B 7E 26 43 4C ||&STX $5B.!.~&CL|
00001320: 43 00 2C 1B 80 26 41 44 43 20 54 32 00 3A 1B 82 |C.,..&ADC T2.:..|
00001330: 26 42 43 43 20 52 4E 4D 32 33 00 42 1B 84 26 49 |&BCC RNM23.B..&I|
00001340: 4E 58 00 54 1B 86 26 52 4E 4D 32 33 20 53 54 58 |NX.T..&RNM23 STX|
00001350: 20 24 32 45 00 60 1B 88 26 53 54 41 20 24 32 44 | $2E.`..&STA $2D|
00001360: 00 6C 1B 8A 26 53 54 41 20 24 35 38 00 78 1B 8C |.l..&STA $58.x..|
00001370: 26 53 54 58 20 24 35 39 00 84 1B 8E 26 49 4E 43 |&STX $59....&INC|
00001380: 20 24 35 41 00 92 1B 90 26 42 4E 45 20 52 4E 4D | $5A....&BNE RNM|
00001390: 32 34 00 9E 1B 92 26 49 4E 43 20 24 35 42 00 B0 |24....&INC $5B..|
000013A0: 1B 94 26 52 4E 4D 32 34 20 49 4E 43 20 24 35 38 |..&RNM24 INC $58|
000013B0: 00 BE 1B 96 26 42 4E 45 20 52 4E 4D 32 35 00 CA |....&BNE RNM25..|
000013C0: 1B 98 26 49 4E 43 20 24 35 39 00 DE 1B 9A 26 52 |..&INC $59....&R|
000013D0: 4E 4D 32 35 20 4A 53 52 20 24 41 33 42 46 00 EC |NM25 JSR $A3BF..|
000013E0: 1B 9C 26 4A 4D 50 20 52 4E 4D 32 38 00 FE 1B 9E |..&JMP RNM28....|
000013F0: 26 52 4E 4D 32 36 20 45 B0 20 23 24 46 46 00 06 |&RNM26 E. #$FF..|
00001400: 1C A0 26 43 4C 43 00 11 1C A2 26 41 44 43 20 23 |..&CLC....&ADC #|
00001410: 31 00 1C 1C A4 26 53 54 41 20 54 32 00 28 1C A6 |1....&STA T2.(..|
00001420: 26 4C 44 41 20 24 34 31 00 34 1C A8 26 53 54 41 |&LDA $41.4..&STA|
00001430: 20 24 32 32 00 40 1C AA 26 4C 44 58 20 24 34 32 | $22.@..&LDX $42|
00001440: 00 4C 1C AC 26 53 54 58 20 24 32 33 00 54 1C AE |.L..&STX $23.T..|
00001450: 26 43 4C 43 00 5F 1C B0 26 41 44 43 20 54 32 00 |&CLC._..&ADC T2.|
00001460: 6B 1C B2 26 53 54 41 20 24 35 46 00 79 1C B4 26 |k..&STA $5F.y..&|
00001470: 42 43 43 20 52 4E 4D 32 37 00 81 1C B6 26 49 4E |BCC RNM27....&IN|
00001480: 58 00 93 1C B8 26 52 4E 4D 32 37 20 53 54 58 20 |X....&RNM27 STX |
00001490: 24 36 30 00 A0 1C BA 26 4A 53 52 20 44 4C 54 35 |$60....&JSR DLT5|
000014A0: 00 B1 1C BC 26 52 4E 4D 32 38 20 4C 44 59 20 23 |....&RNM28 LDY #|
000014B0: 30 00 C6 1C BE 26 52 4E 4D 32 39 20 4C 44 41 20 |0....&RNM29 LDA |
000014C0: 24 31 30 30 2C 59 00 D4 1C C0 26 42 45 51 20 52 |$100,Y....&BEQ R|
000014D0: 4E 4D 33 30 00 E4 1C C2 26 53 54 41 20 28 24 34 |NM30....&STA ($4|
000014E0: 31 29 2C 59 00 EC 1C C4 26 49 4E 59 00 FA 1C C6 |1),Y....&INY....|
000014F0: 26 42 4E 45 20 52 4E 4D 32 39 00 0E 1D C8 26 52 |&BNE RNM29....&R|
00001500: 4E 4D 33 30 20 4A 53 52 20 24 41 35 33 33 00 1C |NM30 JSR $A533..|
00001510: 1D CA 26 52 4E 4D 33 31 20 52 54 53 00 22 1D CC |..&RNM31 RTS."..|
00001520: 26 3B 00 33 1D CE 26 A5 44 4C 49 4E 20 4C 44 41 |&;.3..&.DLIN LDA|
00001530: 20 23 30 00 3E 1D D0 26 4C 44 41 20 23 30 00 4C | #0.>..&LDA #0.L|
00001540: 1D D2 26 2E 42 59 54 45 20 24 32 43 00 60 1D D4 |..&.BYTE $2C.`..|
00001550: 26 4E 55 4D 42 45 52 20 4C 44 41 20 23 24 38 30 |&NUMBER LDA #$80|
00001560: 00 6D 1D D6 26 53 54 41 20 4E 55 4D 42 00 79 1D |.m..&STA NUMB.y.|
00001570: D8 26 4C 44 41 20 24 35 30 00 85 1D DA 26 53 54 |.&LDA $50....&ST|
00001580: 41 20 24 41 41 00 91 1D DC 26 4C 44 41 20 24 35 |A $AA....&LDA $5|
00001590: 31 00 9D 1D DE 26 53 54 41 20 24 41 42 00 A9 1D |1....&STA $AB...|
000015A0: E0 26 4C 44 41 20 24 41 44 00 B5 1D E2 26 4C 44 |.&LDA $AD....&LD|
000015B0: 58 20 24 41 43 00 C7 1D E4 26 46 44 4C 4E 31 20 |X $AC....&FDLN1 |
000015C0: 53 54 58 20 24 35 46 00 D3 1D E6 26 53 54 41 20 |STX $5F....&STA |
000015D0: 24 36 30 00 F2 1D E8 26 3B 41 53 53 55 4D 45 44 |$60....&;ASSUMED|
000015E0: 20 4C 49 4E 45 23 20 49 53 20 49 4E 20 28 24 31 | LINE# IS IN ($1|
000015F0: 34 29 00 FD 1D EA 26 4C 44 59 20 23 33 00 0D 1E |4)....&LDY #3...|
00001600: EC 26 4C 44 41 20 28 24 35 46 29 2C 59 00 19 1E |.&LDA ($5F),Y...|
00001610: EE 26 43 4D 50 20 24 31 35 00 27 1E F0 26 42 4E |.&CMP $15.'..&BN|
00001620: 45 20 46 44 4C 4E 32 00 2F 1E F2 26 44 45 59 00 |E FDLN2./..&DEY.|
00001630: 3F 1E F4 26 4C 44 41 20 28 24 35 46 29 2C 59 00 |?..&LDA ($5F),Y.|
00001640: 4B 1E F6 26 43 4D 50 20 24 31 34 00 59 1E F8 26 |K..&CMP $14.Y..&|
00001650: 42 45 51 20 46 44 4C 4E 36 00 6E 1E FA 26 46 44 |BEQ FDLN6.n..&FD|
00001660: 4C 4E 32 20 20 42 43 53 20 46 44 4C 4E 35 00 7B |LN2 BCS FDLN5.{|
00001670: 1E FC 26 42 49 54 20 4E 55 4D 42 00 89 1E FE 26 |..&BIT NUMB....&|
00001680: 42 50 4C 20 46 44 4C 4E 33 00 94 1E 00 27 4C 44 |BPL FDLN3....'LD|
00001690: 59 20 23 32 00 A0 1E 02 27 4C 44 41 20 24 41 41 |Y #2....'LDA $AA|
000016A0: 00 B0 1E 04 27 53 54 41 20 28 24 35 46 29 2C 59 |....'STA ($5F),Y|
000016B0: 00 BC 1E 06 27 4C 44 41 20 24 41 42 00 C4 1E 08 |....'LDA $AB....|
000016C0: 27 49 4E 59 00 D4 1E 0A 27 53 54 41 20 28 24 35 |'INY....'STA ($5|
000016D0: 46 29 2C 59 00 E6 1E 0C 27 46 44 4C 4E 33 20 4C |F),Y....'FDLN3 L|
000016E0: 44 41 20 24 41 41 00 EE 1E 0E 27 43 4C 43 00 FA |DA $AA....'CLC..|
000016F0: 1E 10 27 41 44 43 20 24 35 32 00 06 1F 12 27 53 |..'ADC $52....'S|
00001700: 54 41 20 24 41 41 00 14 1F 14 27 42 43 43 20 46 |TA $AA....'BCC F|
00001710: 44 4C 4E 34 00 20 1F 16 27 49 4E 43 20 24 41 42 |DLN4. ..'INC $AB|
00001720: 00 2C 1F 18 27 4C 44 41 20 24 41 42 00 39 1F 1A |.,..'LDA $AB.9..|
00001730: 27 43 4D 50 20 23 24 46 41 00 47 1F 1C 27 42 43 |'CMP #$FA.G..'BC|
00001740: 43 20 46 44 4C 4E 34 00 55 1F 1E 27 4A 4D 50 20 |C FDLN4.U..'JMP |
00001750: 24 42 32 34 38 00 66 1F 20 27 46 44 4C 4E 34 20 |$B248.f. 'FDLN4 |
00001760: 4C 44 59 20 23 30 00 76 1F 22 27 4C 44 41 20 28 |LDY #0.v."'LDA (|
00001770: 24 35 46 29 2C 59 00 7E 1F 24 27 54 41 58 00 86 |$5F),Y.~.$'TAX..|
00001780: 1F 26 27 49 4E 59 00 96 1F 28 27 4C 44 41 20 28 |.&'INY...('LDA (|
00001790: 24 35 46 29 2C 59 00 A4 1F 2A 27 42 4E 45 20 46 |$5F),Y...*'BNE F|
000017A0: 44 4C 4E 31 00 B7 1F 2C 27 46 44 4C 4E 35 20 4C |DLN1...,'FDLN5 L|
000017B0: 44 41 20 23 24 46 39 00 C4 1F 2E 27 4C 44 59 20 |DA #$F9....'LDY |
000017C0: 23 24 46 46 00 CA 1F 30 27 3B 00 DD 1F 32 27 53 |#$FF...0';...2'S|
000017D0: 54 52 4E 47 20 4A 53 52 20 55 53 46 50 00 EB 1F |TRNG JSR USFP...|
000017E0: 34 27 4A 4D 50 20 24 42 44 44 46 00 FC 1F 36 27 |4'JMP $BDDF...6'|
000017F0: 46 44 4C 4E 36 20 4C 44 41 20 54 32 00 0A 20 38 |FDLN6 LDA T2.. 8|
00001800: 27 42 45 51 20 46 44 4C 4E 35 00 16 20 3A 27 4C |'BEQ FDLN5.. :'L|
00001810: 44 41 20 24 41 42 00 22 20 3C 27 4C 44 59 20 24 |DA $AB." <'LDY $|
00001820: 41 41 00 30 20 3E 27 4A 4D 50 20 53 54 52 4E 47 |AA.0 >'JMP STRNG|
00001830: 00 36 20 40 27 3B 00 48 20 42 27 41 4E 45 C5 20 |.6 @';.H B'ANE. |
00001840: 4C 44 58 20 23 24 35 30 00 55 20 44 27 4A 53 52 |LDX #$50.U D'JSR|
00001850: 20 53 A4 52 45 00 61 20 46 27 4A 53 52 20 24 37 | S.RE.a F'JSR $7|
00001860: 33 00 6F 20 48 27 4A 53 52 20 24 42 37 39 45 00 |3.o H'JSR $B79E.|
00001870: 7B 20 4A 27 53 54 58 20 24 35 32 00 83 20 4C 27 |{ J'STX $52.. L'|
00001880: 54 58 41 00 91 20 4E 27 42 4E 45 20 41 4E 45 56 |TXA.. N'BNE ANEV|
00001890: 31 00 9F 20 50 27 4A 4D 50 20 24 42 32 34 38 00 |1.. P'JMP $B248.|
000018A0: AD 20 52 27 41 4E 45 56 31 20 52 54 53 00 B3 20 |. R'ANEV1 RTS.. |
000018B0: 54 27 3B 00 C2 20 56 27 4E 58 54 43 48 31 20 49 |T';.. V'NXTCH1 I|
000018C0: 4E 59 00 D6 20 58 27 82 43 48 20 4C 44 41 20 28 |NY.. X'.CH LDA (|
000018D0: 24 33 46 29 2C 59 00 E3 20 5A 27 43 4D 50 20 23 |$3F),Y.. Z'CMP #|
000018E0: 24 32 30 00 F2 20 5C 27 42 45 51 20 4E 58 54 43 |$20.. \'BEQ NXTC|
000018F0: 48 31 00 FA 20 5E 27 52 54 53 00 00 21 60 27 3B |H1.. ^'RTS..!`';|
00001900: 00 09 21 62 27 2E 50 41 44 00 1B 21 64 27 57 52 |..!b'.PAD..!d'WR|
00001910: 4D 53 52 54 20 2E 57 B0 44 20 30 00 21 21 66 27 |MSRT .W.D 0.!!f'|
00001920: 3B 00 2F 21 68 27 9A 20 2E 42 59 54 45 20 30 00 |;./!h'. .BYTE 0.|
00001930: 3F 21 6A 27 A9 20 2E 42 59 54 45 20 24 30 41 00 |?!j'. .BYTE $0A.|
00001940: 50 21 6C 27 91 46 4C 47 20 2E 42 59 54 45 20 30 |P!l'.FLG .BYTE 0|
00001950: 00 61 21 6E 27 4E 55 4D 42 20 2E 42 59 54 45 20 |.a!n'NUMB .BYTE |
00001960: 30 00 67 21 70 27 3B 00 00 00 |0.g!p';... |
..).... PRG MANAGEMENT (D. SPRUYT 1985)
:./...:.O.... 3 STATEMENTS, 0 FUNCTIONS.
U...:.M.... KEYWORD CHARS: 10.S...:.....
. KEYWORD ROUTINE LINE SER #......
S/AUTO CAR 9406 136...... S
/DEL DLT 9234 137...... S/R
EN RNUM 9482 138.....:.9....
================================.?...:.
S....F "AUTODELREN".O.S..W.D CAR.1,DLT.1
,RNUM.1.}.M.JSR M.VEC.....JSR KILVEC...<
.USFP LDX #0...>.STX $0D...@.STA $62...B
.STY $63.M.D.LDX #$90.U.F.SEC...H.JMP $B
C49...J.;....#ERRPGM LDX $3A....#INX...B
#BNE EPG1...D#RTS.,.F#EPG1 JMP $AF08.2.H
#;.?.J#M.VEC ...L.L#JSR AU.N.T.Z#RTS.Z..
#;.H..#KILVEC ...V..#JSR AU.FF.~..#RTS..
..#;....#AU.FF LDA WRMSRT....#STA $302..
..#LDA WRMSRT.1.D..#STA $303.L..#RTS.R..
#;....#AU.N LDA $302....$STA WRMSRT....$
LDA $303....$STA WRMSRT.1....$LDA #.AU..
,..$STA $303.:..$LDA #.AU..G..$STA $302.
O..$RTS.U..$;.H..$DLT JSR ERRPGM.V..$JSR
$A96B....$LDX #$50....$JSR S.RE....$CMP
#$AB....$BNE DLT2....$JSR $73.C. $BNE D
LT1.P."$LDA #$FF...$$STA $52...&$STA $53
...($BNE DLT4...*$DLT1 JSR $A96B...,$DLT
2 SEC.!..$LDA $14.-.0$STA $52.9.2$SBC $5
0.E.4$LDA $15.Q.6$STA $53.].8$SBC $51.J.
:$BCS DLT3.X.<$JMP $AF08...>$DLT3 INC $5
2...@$BNE DLT4...B$INC $53...D$DLT4 LDX
#$50...F$JSR UNS.N.H$JSR $A613.Z.J$LDA $
5F...L$STA $22...N$LDA $60...P$STA $23..
.R$LDX #$52...T$JSR UNS.%.V$JSR $A613.3.
X$JMP DLT11.@.Z$DLT5 SEC.L.\$LDA $2D.X.^
$SBC $5F.C.`$STA T2.O.B$LDA $2E.{.D$SBC
$60...F$TAX...H$INX...J$LDY #0...L$BEQ D
LT7...N$DLT6 LDA ($5F),Y.H.P$STA ($22),Y
.P.R$INY...T$BNE DLT6...V$INC $60...X$IN
C $23...Z$DLT7 DEX...|$BNE DLT6.!.~$DLT8
CPY $02....$BEQ DLT9.>..$LDA ($5F),Y.N
..$STA ($22),Y.V..$INY.C..$BNE DLT8.P..$
DLT9 TYA.X..$CLC....$ADC $22....$STA $2D
....$BCC DLT10....$INC $23....$DLT10 LDA
$23.H..$STA $2E.P..$RTS....$DLT11 JSR D
LT5....$JSR $A533... $JSR $A659....$JMP
$A474....$;.$..$S.RE LDY $14.0..$STY 0,X
.<..$LDY $15.H..$STY 1,X.P..$RTS.V..$;.F
..$UNS LDY 0,X.R..$STY $14.~..$LDY 1,X..
..$STY $15....$RTS....$;....$CAR JSR ERR
PGM....$JSR $A96B.F.B$JSR ANEE.P.D$STA .
...F$LDA $51...H$LDY $50...J$LDX #1...L$
STX ....N$JMP AUT3...P$;.!.R$AU. LDY $20
0...T$BNE AUT1.8.V$STY ..G.X$AUT1 LDY ..
T.Z$BEQ AUT5.`..$LDA $14.H..$CLC.R..$ADC
....$BCC AUT2....$INC $15....$AUT2 TAY
....$LDA $15....$AUT3 JSR STRNG.D..$LDY
#$FF.Q..$AUT4 INY....$LDA $100,Y....$STA
$277,Y....$BNE AUT4....$LDA #$20....$ST
A $277,Y. ..$INY.,..$STY $C6.@..$AUT5 LD
A WRMSRT.L..%STA $14.]..%LDA WRMSRT.1.I.
.%STA $15.W..%JMP ($14).}..%;....%RNUM J
SR ERRPGM....%JSR $A96B....%CMP #$AB....
%BNE RNM3.F..%LDX #$45.S..%JSR S.RE....%
JSR $73....%CMP #$2C....%BNE RNM2....%RN
M1 JMP $AF08....%RNM2 JSR $79.+. %JSR $A
96B.8."%CMP #$2C.E.$%BNE RNM1.P.&%LDX #5
.].(%JSR S.RE.I.*%JSR $73.W.,%JSR $A96B.
...%CMP #$2C...0%BNE RNM1...2%BEQ RNM4..
.4%RNM3 LDY #0...6%STY $45.F.8%STY $46.N
.:%DEY.V.<%DEY...>%STY T5...@%STY T6...B
%RNM4 JSR ANEE...D%INC T5...F%BNE RNM5.!
.H%INC T6.2.J%RNM5 LDA $45.>.L%STA $14.J
.N%LDA $46.V.P%STA $15.D.R%JSR $A613.P.T
%LDA $5F.|.V%STA $AC...X%LDA $60...Z%STA
$AD...\%LDA T5...^%STA $14...`%LDA T6.B
.B%STA $15.P.D%JSR .DLIN...F%LDY #1...H%
LDA ($5F),Y...J%BEQ RNM7...L%LDY #3...N%
LDA ($5F),Y...P%CMP $AB.,.R%BNE RNM6.4.T
%DEY.D.V%LDA ($5F),Y.P.X%CMP $AA.B.Z%RNM
6 BCS RNM7.P.|%JMP $B248...~%RNM7 LDA #0
....%STA .FLG....%LDA $2B....%STA $3F...
.%LDA $2C....%STA $40.M..%RNM8 LDY #2...
.%LDA ($3F),Y....%STA $39....%INY....%LD
A ($3F),Y....%STA $3A....%RNM9 INY.0..%R
NM10 LDA ($3F),Y.>..%BEQ RNM14.K..%CMP #
$3A.Y..%BEQ RNM14.F. %CMP #$89.T..%BEQ R
NM16....%CMP #$8D....%BEQ RNM16....%CMP
#$CB....%BNE RNM11....%JSR NXTCH1.F..%CM
P #$A4.T..%BEQ RNM16....%BNE RNM10....%R
NM11 CMP #$A7....%BNE RNM12....%JSR NXTC
H1....%CMP #$30.-..%BCC RNM10.:..%CMP #$
3A.H..%BCC RNM17.V.B%BCS RNM10.I.D%RNM12
CMP #$91.W.F%BNE RNM13...H%STA .FLG...J
%JMP RNM9...L%RNM13 CMP #$2C...N%BNE RNM
9...P%LDA .FLG.K.R%BEQ RNM9.Y.T%BNE RNM1
6...V%RNM14 LDX #0...X%STX .FLG...Z%CMP
#$3A....%BEQ RNM9....%LDY #1.,..%LDA ($3
F),Y.:..%BEQ RNM15.B..%TAX.J..%DEY.Z..%L
DA ($3F),Y.F..%STA $3F.R..%STX $40...%J
MP RNM8....%RNM15 LDX #5....%JSR UNS....
%JSR NUMBER....%JSR $A659.G..%JMP $A474.
U..%RNM16 INY....%RNM17 JSR RNM18....%LD
Y $97....&JMP RNM10....&;MATCH . CHANGE.
)..&RNM18 JSR .CH.5..&STY $97.=..&CLC.E.
.&TYA.Q..&ADC $3F.]..&STA $7A.I..&STA $4
1.U..&LDA $40....&ADC #0....&STA $42....
&STA $7B....&JSR $79....&JSR $A96B....&S
EC.F. &LDA $7A.R."&SBC $41...$&STA T2...
&&SEC...(&LDA $14...*&SBC T5...,&LDA $15
....&SBC T6.!.0&BCS RNM19.).2&SEC.5.4&LD
A $14.A.6&SBC $45.M.8&LDA $15.Y.:&SBC $4
6.G.<&BCS RNM20...>&;LINE . BE RENUMBERE
D HERE...@&RNM19 JMP RNM31...B&RNM20 JSR
.DLIN...D&LDY #$FF.I.F&RNM21 INY.X.H&LD
A $100,Y...J&BNE RNM21...L&TYA...N&SEC..
.P&SBC T2...R&BMI RNM26...T&BEQ RNM28.3.
V&;ADD IN .A SPACES.>.X&STA T2.F.Z&SEC.R
.\&LDA $38.^.^&SBC $2E.L.`&BNE RNM22.T.B
&SEC...D&LDA $37...F&SBC $2D...H&CMP T2.
..J&BCS RNM22...L&JMP $A435.E.N&RNM22 LD
A $41.Q.P&STA $5F...R&LDA $42...T&STA $6
0...V&LDA $2D...X&STA $5A...Z&LDX $2E...
|&STX $5B.!.~&CLC.,..&ADC T2.:..&BCC RNM
23.B..&INX.T..&RNM23 STX $2E.`..&STA $2D
.L..&STA $58.X..&STX $59....&INC $5A....
&BNE RNM24....&INC $5B....&RNM24 INC $58
....&BNE RNM25.J..&INC $59....&RNM25 JSR
$A3BF....&JMP RNM28....&RNM26 E. #$FF..
. &CLC....&ADC #1....&STA T2.(..&LDA $41
.4..&STA $22.@..&LDX $42.L..&STX $23.T..
&CLC._..&ADC T2.K..&STA $5F.Y..&BCC RNM2
7....&INX....&RNM27 STX $60. ..&JSR DLT5
....&RNM28 LDY #0.F..&RNM29 LDA $100,Y.T
..&BEQ RNM30...B&STA ($41),Y...D&INY...F
&BNE RNM29...H&RNM30 JSR $A533...J&RNM31
RTS.".L&;.3.N&.DLIN LDA #0.>.P&LDA #0.L
.R&.BYTE $2C.`.T&NUMBER LDA #$80.M.V&STA
NUMB.Y.X&LDA $50...Z&STA $AA....&LDA $5
1....&STA $AB....&LDA $AD....&LDX $AC.G.
.&FDLN1 STX $5F.S..&STA $60....&;ASSUMED
LINE# IS IN ($14)....&LDY #3....&LDA ($
5F),Y....&CMP $15.'..&BNE FDLN2./..&DEY.
?..&LDA ($5F),Y.K..&CMP $14.Y..&BEQ FDLN
6.N..&FDLN2 BCS FDLN5.{..&BIT NUMB....&
BPL FDLN3....'LDY #2. ..'LDA $AA....'STA
($5F),Y....'LDA $AB.D..'INY.T..'STA ($5
F),Y....'FDLN3 LDA $AA....'CLC....'ADC $
52....'STA $AA....'BCC FDLN4. ..'INC $AB
.,..'LDA $AB.9..'CMP #$FA.G..'BCC FDLN4.
U..'JMP $B248.F. 'FDLN4 LDY #0.V."'LDA (
$5F),Y.~.$'TAX...&'INY...('LDA ($5F),Y..
.*'BNE FDLN1...,'FDLN5 LDA #$F9.D..'LDY
#$FF.J.0';...2'STRNG JSR USFP...4'JMP $B
DDF...6'FDLN6 LDA T2.. 8'BEQ FDLN5.. :'L
DA $AB." <'LDY $AA.0 >'JMP STRNG.6 @';.H
B'ANEE LDX #$50.U D'JSR S.RE.A F'JSR $7
3.O H'JSR $B79E.{ J'STX $52.. L'TXA.. N'
BNE ANEV1.. P'JMP $B248.. R'ANEV1 RTS..
T';.B V'NXTCH1 INY.V X'.CH LDA ($3F),Y..
Z'CMP #$20.. \'BEQ NXTCH1.. ^'RTS..!`';
..!B'.PAD..!D'WRMSRT .W.D 0.!!F';./!H'.
.BYTE 0.?!J'. .BYTE $0A.P!L'.FLG .BYTE 0
.A!N'NUMB .BYTE 0.G!P';...
> CLICK IMAGE PREVIEW FOR FULL MODAL