> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 00 00 8F 22 41 52 43 32 33 30 20 20 |......."ARC230 |
00000010: 20 20 20 20 20 20 20 20 22 00 3C 08 01 00 97 35 | ".<....5|
00000020: 33 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 3A |3280,0:.53281,0:|
00000030: 97 36 37 2C C2 28 36 37 29 AA 32 32 00 54 08 02 |.67,.(67).22.T..|
00000040: 00 4D 53 B2 4D 53 AA 31 3A 8B 20 4D 53 B2 32 20 |.MS.MS.1:. MS.2 |
00000050: A7 20 36 34 00 7E 08 03 00 43 28 30 29 B2 30 3A |. 64.~...C(0).0:|
00000060: 43 28 31 29 B2 31 31 3A 43 28 32 29 B2 31 32 3A |C(1).11:C(2).12:|
00000070: 43 28 33 29 B2 31 35 3A 43 28 34 29 B2 31 00 88 |C(3).15:C(4).1..|
00000080: 08 04 00 54 4D B2 34 30 00 C7 08 0A 00 8F 20 44 |...TM.40...... D|
00000090: 45 46 49 4E 45 20 4B 45 59 42 44 20 42 41 53 45 |EFINE KEYBD BASE|
000000A0: 44 20 4F 4E 20 46 41 53 54 4C 4F 41 44 45 52 20 |D ON FASTLOADER |
000000B0: 42 45 49 4E 47 20 55 53 45 44 20 4F 52 20 4E 4F |BEING USED OR NO|
000000C0: 4E 45 20 55 53 45 44 00 DD 08 0B 00 8F 20 2A 2A |NE USED...... **|
000000D0: 20 4E 4F 4E 45 20 55 53 45 44 20 2A 2A 00 FC 08 | NONE USED **...|
000000E0: 0C 00 4B 42 24 B2 22 41 3A 4D 41 49 4E 22 AA C7 |..KB$."A:MAIN"..|
000000F0: 28 31 33 29 3A 54 24 B2 22 34 38 22 00 11 09 0D |(13):T$."48"....|
00000100: 00 8F 20 2A 2A 20 46 41 53 54 4C 4F 41 44 20 2A |.. ** FASTLOAD *|
00000110: 2A 00 55 09 0E 00 8B 20 C2 28 37 37 30 29 B2 31 |*.U.... .(770).1|
00000120: 30 36 20 A7 20 4B 42 24 B2 22 4C CF 22 AA C7 28 |06 . KB$."L."..(|
00000130: 33 34 29 AA 22 4D 41 49 4E 22 AA C7 28 33 34 29 |34)."MAIN"..(34)|
00000140: AA 22 2C 38 3A 22 AA C7 28 31 33 31 29 3A 54 24 |.",8:"..(131):T$|
00000150: B2 22 32 35 22 00 6C 09 0F 00 8F 20 2A 2A 20 4D |."25".l.... ** M|
00000160: 41 43 48 20 35 2F 31 32 38 20 2A 2A 00 A5 09 10 |ACH 5/128 **....|
00000170: 00 8B 20 C2 28 38 31 36 29 B2 31 39 37 20 A7 20 |.. .(816).197 . |
00000180: 4B 42 24 B2 22 5F 44 22 AA C7 28 31 33 29 AA 22 |KB$."_D"..(13)."|
00000190: 41 3A 4D 41 49 4E 22 AA C7 28 31 33 29 3A 54 24 |A:MAIN"..(13):T$|
000001A0: B2 22 32 35 22 00 C5 09 14 00 8F 20 43 4F 4D 50 |."25"...... COMP|
000001B0: 55 54 45 20 41 52 43 20 56 45 52 53 49 4F 4E 20 |UTE ARC VERSION |
000001C0: 54 49 54 4C 45 00 01 0A 15 00 81 20 49 B2 30 A4 |TITLE...... I.0.|
000001D0: 31 35 3A 8B 20 C7 28 C2 28 32 30 35 35 AA 49 29 |15:. .(.(2055.I)|
000001E0: 29 B3 B1 C7 28 33 32 29 20 A7 20 41 52 43 24 B2 |)...(32) . ARC$.|
000001F0: 41 52 43 24 AA C7 28 C2 28 32 30 35 35 AA 49 29 |ARC$..(.(2055.I)|
00000200: 29 00 07 0A 16 00 82 00 30 0A 1E 00 8F 20 43 48 |).......0.... CH|
00000210: 45 43 4B 20 54 4F 20 53 45 45 20 49 46 20 43 48 |ECK TO SEE IF CH|
00000220: 41 4E 47 45 20 49 4E 20 46 49 4C 45 4E 41 4D 45 |ANGE IN FILENAME|
00000230: 00 5F 0A 1F 00 99 22 93 05 11 11 11 11 0E D4 48 |._...."........H|
00000240: 49 53 20 49 53 20 54 48 45 20 43 55 52 52 45 4E |IS IS THE CURREN|
00000250: 54 20 C1 D2 C3 20 56 45 52 53 49 4F 4E 2E 22 00 |T ... VERSION.".|
00000260: 8A 0A 20 00 99 22 C3 48 41 4E 47 45 20 49 54 20 |.. ..".HANGE IT |
00000270: 49 46 20 4E 45 43 45 53 53 41 52 59 2E 20 20 CF |IF NECESSARY. .|
00000280: 54 48 45 52 57 49 53 45 2C 22 00 A3 0A 21 00 99 |THERWISE,"...!..|
00000290: 22 50 52 45 53 53 20 12 9E D2 C5 D4 D5 D2 CE 92 |"PRESS .........|
000002A0: 05 2E 22 00 D1 0A 22 00 99 22 11 11 C3 55 52 52 |.."...".."...URR|
000002B0: 45 4E 54 20 C1 D2 C3 20 56 45 52 53 49 4F 4E 20 |ENT ... VERSION |
000002C0: 46 49 4C 45 4E 41 4D 45 3A 20 22 3B 41 52 43 24 |FILENAME: ";ARC$|
000002D0: 3B 00 EB 0A 23 00 81 20 49 B2 31 A4 C3 28 41 52 |;...#.. I.1..(AR|
000002E0: 43 24 29 3A 99 22 9D 22 3B 3A 82 00 02 0B 24 00 |C$):.".";:....$.|
000002F0: 97 31 39 2C 36 34 3A 85 41 24 3A 99 3A 97 31 39 |.19,64:.A$:.:.19|
00000300: 2C 30 00 15 0B 25 00 8B 20 41 52 43 24 B2 41 24 |,0...%.. ARC$.A$|
00000310: 20 A7 20 35 30 00 21 0B 26 00 41 52 43 24 B2 41 | . 50.!.&.ARC$.A|
00000320: 24 00 46 0B 28 00 8F 20 53 41 56 45 20 42 4F 4F |$.F.(.. SAVE BOO|
00000330: 54 20 57 49 54 48 20 46 49 4C 45 4E 41 4D 45 20 |T WITH FILENAME |
00000340: 43 48 41 4E 47 45 00 6D 0B 29 00 81 20 49 B2 31 |CHANGE.m.).. I.1|
00000350: A4 31 36 AB C3 28 41 52 43 24 29 3A 41 52 43 24 |.16..(ARC$):ARC$|
00000360: B2 41 52 43 24 AA C7 28 33 32 29 3A 82 00 92 0B |.ARC$..(32):....|
00000370: 2A 00 81 49 B2 31 A4 31 36 3A 97 32 30 35 34 AA |*..I.1.16:.2054.|
00000380: 49 2C C6 28 CA 28 41 52 43 24 2C 49 2C 31 29 29 |I,.(.(ARC$,I,1))|
00000390: 3A 82 00 B7 0B 2B 00 9F 31 35 2C 38 2C 31 35 2C |:....+..15,8,15,|
000003A0: 22 53 30 3A 42 4F 4F 54 22 3A A0 31 35 3A 94 22 |"S0:BOOT":.15:."|
000003B0: 42 4F 4F 54 22 2C 38 00 C3 0B 2C 00 41 52 43 24 |BOOT",8...,.ARC$|
000003C0: B2 41 24 00 D4 0B 32 00 8F 20 50 4F 4B 45 20 49 |.A$...2.. POKE I|
000003D0: 4E 20 4D 4C 00 EF 0B 33 00 81 49 B2 38 33 30 A4 |N ML...3..I.830.|
000003E0: 38 35 33 3A 87 4D 4C 3A 97 49 2C 4D 4C 3A 82 00 |853:.ML:.I,ML:..|
000003F0: 37 0C 34 00 83 20 31 36 39 2C 32 31 36 2C 31 33 |7.4.. 169,216,13|
00000400: 33 2C 33 2C 31 36 39 2C 30 2C 31 33 33 2C 32 2C |3,3,169,0,133,2,|
00000410: 31 36 38 2C 31 36 32 2C 34 2C 31 36 39 2C 37 2C |168,162,4,169,7,|
00000420: 31 34 35 2C 32 2C 32 30 30 2C 32 30 38 2C 32 35 |145,2,200,208,25|
00000430: 31 2C 32 33 30 2C 33 00 4C 0C 35 00 83 20 32 30 |1,230,3.L.5.. 20|
00000440: 32 2C 32 30 38 2C 32 34 36 2C 39 36 00 62 0C 3C |2,208,246,96.b.<|
00000450: 00 8F 20 44 49 53 50 4C 41 59 20 4D 45 53 53 41 |.. DISPLAY MESSA|
00000460: 47 45 00 90 0C 3D 00 97 38 34 32 2C 30 3A 9E 38 |GE...=..842,0:.8|
00000470: 33 30 3A 97 36 34 36 2C 30 3A 99 22 93 12 9E 20 |30:.646,0:."... |
00000480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B | ";|
00000490: 00 B4 0C 3E 00 99 22 D7 4F 52 4B 49 4E 47 2E 2E |...>..".ORKING..|
000004A0: 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000004B0: 90 92 22 3B 00 CC 0C 3F 00 93 22 41 52 43 2E 4D |..";...?.."ARC.M|
000004C0: 53 47 2E 56 37 2E 30 22 2C 38 2C 31 00 E1 0C 40 |SG.V7.0",8,1...@|
000004D0: 00 8F 20 2A 2A 20 53 55 52 50 52 49 53 45 20 2A |.. ** SURPRISE *|
000004E0: 2A 00 0C 0D 41 00 81 49 B2 31 A4 34 3A 97 38 34 |*...A..I.1.4:.84|
000004F0: 32 2C 43 28 49 29 3A 9E 38 33 30 3A 81 20 44 45 |2,C(I):.830:. DE|
00000500: 4C 41 59 B2 31 A4 54 4D 3A 82 3A 82 00 2D 0D 42 |LAY.1.TM:.:..-.B|
00000510: 00 99 22 13 22 3B A6 31 34 29 22 12 9E D0 52 45 |..".";.14)"...RE|
00000520: 53 53 20 41 4E 59 20 4B 45 59 92 22 3B 00 3F 0D |SS ANY KEY.";.?.|
00000530: 43 00 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 00 |C..198,0:.198,1.|
00000540: 55 0D 46 00 8F 20 2A 2A 20 46 41 44 45 20 41 57 |U.F.. ** FADE AW|
00000550: 41 59 20 2A 2A 00 83 0D 47 00 81 49 B2 34 A4 30 |AY **...G..I.4.0|
00000560: A9 AB 31 3A 97 38 34 32 2C 43 28 49 29 3A 9E 38 |..1:.842,C(I):.8|
00000570: 33 30 3A 81 20 44 45 4C 41 59 B2 31 A4 54 4D 3A |30:. DELAY.1.TM:|
00000580: 82 3A 82 00 9E 0D 48 00 8D 20 31 30 30 30 3A 20 |.:....H.. 1000: |
00000590: 8F 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 00 B6 |. INSTRUCTIONS..|
000005A0: 0D 50 00 8F 20 46 49 4C 4C 20 4B 45 59 42 44 20 |.P.. FILL KEYBD |
000005B0: 42 55 46 46 45 52 00 DD 0D 51 00 81 49 B2 31 A4 |BUFFER...Q..I.1.|
000005C0: C3 28 4B 42 24 29 3A 97 36 33 30 AA 49 2C C6 28 |.(KB$):.630.I,.(|
000005D0: CA 28 4B 42 24 2C 49 2C 31 29 29 3A 82 00 ED 0D |.(KB$,I,1)):....|
000005E0: 52 00 97 31 39 38 2C C3 28 4B 42 24 29 00 07 0E |R..198,.(KB$)...|
000005F0: 5A 00 8F 20 53 48 4F 57 20 4C 4F 41 44 49 4E 47 |Z.. SHOW LOADING|
00000600: 20 53 43 52 45 45 4E 00 24 0E 5B 00 99 22 93 05 | SCREEN.$.[.."..|
00000610: 11 11 11 22 A6 31 35 29 22 CC 4F 41 44 49 4E 47 |...".15)".OADING|
00000620: 2E 2E 2E 22 00 5D 0E 5C 00 99 22 11 11 11 11 11 |...".].\..".....|
00000630: 11 11 20 20 C1 50 50 52 4F 58 49 4D 41 54 45 20 |.. .PPROXIMATE |
00000640: 4C 4F 41 44 49 4E 47 20 54 49 4D 45 3A 20 9E 22 |LOADING TIME: ."|
00000650: 54 24 22 20 53 45 43 4F 4E 44 53 2E 22 00 92 0E |T$" SECONDS."...|
00000660: 5D 00 99 22 11 11 11 11 05 C5 50 59 58 20 C6 41 |].."......PYX .A|
00000670: 53 54 4C 4F 41 44 20 41 4E 44 20 CD 41 43 48 20 |STLOAD AND .ACH |
00000680: 35 2F 31 32 38 20 43 4F 4D 50 41 54 49 42 4C 45 |5/128 COMPATIBLE|
00000690: 21 22 00 9F 0E 5E 00 93 20 41 52 43 24 2C 38 00 |!"...^.. ARC$,8.|
000006A0: BA 0E E8 03 8F 20 2A 20 41 52 43 2F 53 44 41 20 |..... * ARC/SDA |
000006B0: 41 49 44 20 44 4F 43 53 20 2A 00 C5 0E E9 03 97 |AID DOCS *......|
000006C0: 31 39 38 2C 30 00 0F 0F ED 03 99 22 93 11 11 11 |198,0......"....|
000006D0: C4 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 53 |.O YOU WANT TO S|
000006E0: 45 45 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 |EE INSTRUCTIONS |
000006F0: 20 20 20 20 20 20 20 20 28 59 45 53 2F 4E 4F 29 | (YES/NO)|
00000700: 20 20 4E 4F 9D 9D 9D 9D 22 3B 3A 85 59 4E 24 00 | NO....";:.YN$.|
00000710: 2D 0F EE 03 8B 20 59 4E 24 B2 22 4E 4F 22 20 B0 |-.... YN$."NO" .|
00000720: 20 59 4E 24 B2 22 CE CF 22 20 A7 20 8E 00 54 0F | YN$.".." . ..T.|
00000730: F2 03 9F 32 2C 38 2C 32 2C 22 41 52 43 2F 53 44 |...2,8,2,"ARC/SD|
00000740: 41 2E 41 49 44 2E 54 58 54 2C 53 2C 52 22 3A 99 |A.AID.TXT,S,R":.|
00000750: 22 93 22 3B 00 7F 0F F3 03 A1 23 32 2C 41 24 3A |".";......#2,A$:|
00000760: 8B 20 41 24 B2 22 5C 22 20 A7 20 97 31 39 38 2C |. A$."\" . .198,|
00000770: 30 3A 92 20 31 39 38 2C 31 3A 99 22 93 22 3B 00 |0:. 198,1:.".";.|
00000780: A5 0F F4 03 8B 20 41 24 B2 22 5C 22 20 A7 20 A1 |..... A$."\" . .|
00000790: 23 32 2C 41 24 3A 8B 20 41 24 B2 22 5C 22 20 A7 |#2,A$:. A$."\" .|
000007A0: 20 A0 32 3A 8E 00 B4 0F F5 03 99 41 24 3B 3A 89 | .2:.......A$;:.|
000007B0: 31 30 31 31 00 00 00 |1011... |
......."ARC230 ".<....53280,0:.
53281,0:.67,B(67).22.T...MS.MS.1:. MS.2
. 64.~...C(0).0:C(1).11:C(2).12:C(3).15:
C(4).1.....TM.40.G.... DEFINE KEYBD BASE
D ON FASTLOADER BEING USED OR NONE USED.
..... ** NONE USED **.....KB$."A:MAIN".G
(13):T$."48"...... ** FASTLOAD **.U....
B(770).106 . KB$."LO".G(34)."MAIN".G(34)
.",8:".G(131):T$."25".L.... ** MACH 5/12
8 **...... B(816).197 . KB$."_D".G(13)."
A:MAIN".G(13):T$."25".E.... COMPUTE ARC
VERSION TITLE...... I.0.15:. G(B(2055.I)
)..G(32) . ARC$.ARC$.G(B(2055.I)).......
0.... CHECK TO SEE IF CHANGE IN FILENAME
._....".......THIS IS THE CURRENT ARC VE
RSION."... .."CHANGE IT IF NECESSARY. O
THERWISE,"...!.."PRESS ..RETURN...".Q.".
."..CURRENT ARC VERSION FILENAME: ";ARC$
;...#.. I.1.C(ARC$):.".";:....$..19,64:.
A$:.:.19,0...%.. ARC$.A$ . 50.!.&.ARC$.A
$.F.(.. SAVE BOOT WITH FILENAME CHANGE.M
.).. I.1.16.C(ARC$):ARC$.ARC$.G(32):....
*..I.1.16:.2054.I,F(J(ARC$,I,1)):....+..
15,8,15,"S0:BOOT": 15:."BOOT",8.C.,.ARC$
.A$.T.2.. POKE IN ML...3..I.830.853:.ML:
.I,ML:..7.4.. 169,216,133,3,169,0,133,2,
168,162,4,169,7,145,2,200,208,251,230,3.
L.5.. 202,208,246,96.B.<.. DISPLAY MESSA
GE...=..842,0:.830:.646,0:."...
";...>.."WORKING...
..";.L.?.."ARC.MSG.V7.0",8,1...@.. ** SU
RPRISE **...A..I.1.4:.842,C(I):.830:. DE
LAY.1.TM:.:..-.B..".";.14)"..PRESS ANY K
EY.";.?.C..198,0:.198,1.U.F.. ** FADE AW
AY **...G..I.4.0..1:.842,C(I):.830:. DEL
AY.1.TM:.:....H.. 1000: . INSTRUCTIONS..
.P.. FILL KEYBD BUFFER...Q..I.1.C(KB$):.
630.I,F(J(KB$,I,1)):....R..198,C(KB$)...
Z.. SHOW LOADING SCREEN.$.[..".....".15)
"LOADING...".].\.."....... APPROXIMATE
LOADING TIME: ."T$" SECONDS."...].."....
.EPYX FASTLOAD AND MACH 5/128 COMPATIBLE
!"...^.. ARC$,8...... * ARC/SDA AID DOCS
*.E....198,0......"....DO YOU WANT TO S
EE INSTRUCTIONS (YES/NO) NO....
";:.YN$.-.... YN$."NO" . YN$."NO" . ..T.
...2,8,2,"ARC/SDA.AID.TXT,S,R":.".";...
..#2,A$:. A$."\" . .198,0:. 198,1:.".";.
..... A$."\" . .#2,A$:. A$."\" . 2:....
...A$;:.1011...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL