> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3E 08 01 00 58 B2 31 32 30 30 3A 86 4E 24 |..>...X.1200:.N$|
00000010: 28 58 29 3A 86 44 24 28 58 29 3A 86 42 24 28 58 |(X):.D$(X):.B$(X|
00000020: 29 3A 52 24 B2 C7 28 31 33 29 3A 58 24 B2 C7 28 |):R$..(13):X$..(|
00000030: 30 29 3A 54 24 B2 22 42 4C 4F 43 4B 53 22 00 8B |0):T$."BLOCKS"..|
00000040: 08 02 00 99 22 11 20 31 2D 4C 4F 41 44 20 20 32 |....". 1-LOAD 2|
00000050: 2D 53 41 56 45 20 20 33 2D 44 49 52 20 20 34 2D |-SAVE 3-DIR 4-|
00000060: 49 4E 50 55 54 20 20 35 2D 4C 4F 4F 4B 20 20 36 |INPUT 5-LOOK 6|
00000070: 2D 53 45 41 52 43 48 20 20 37 2D 50 52 49 4E 54 |-SEARCH 7-PRINT|
00000080: 22 52 24 22 44 41 54 41 3A 22 41 00 C6 08 03 00 |"R$"DATA:"A.....|
00000090: 5A B2 34 30 3A 9E 36 35 35 31 31 3A 85 48 3A 99 |Z.40:.65511:.H:.|
000000A0: 22 93 22 3A 91 48 89 34 2C 37 2C 39 2C 31 33 2C |".":.H.4,7,9,13,|
000000B0: 31 34 2C 31 36 3A 9F 31 2C 34 3A 9D 31 3A 5A B2 |14,16:.1,4:.1:Z.|
000000C0: 37 30 3A 89 31 34 00 F9 08 04 00 41 B2 30 3A 85 |70:.14.....A.0:.|
000000D0: 22 4C 4F 41 44 20 4E 41 4D 45 22 3B 41 24 3A 9F |"LOAD NAME";A$:.|
000000E0: 38 2C 38 2C 38 2C 41 24 AA 22 2C 53 2C 52 22 3A |8,8,8,A$.",S,R":|
000000F0: 8B 53 54 B3 B1 30 89 32 30 00 31 09 05 00 41 B2 |.ST..0.20.1...A.|
00000100: 41 AA 31 3A 99 22 13 22 41 3A 84 38 2C 4E 24 28 |A.1:."."A:.8,N$(|
00000110: 41 29 2C 44 24 28 41 29 2C 42 24 28 41 29 3A 8B |A),D$(A),B$(A):.|
00000120: 4E 24 28 41 29 B3 B1 22 2A 22 AF 53 54 B2 30 A7 |N$(A).."*".ST.0.|
00000130: 35 00 48 09 06 00 A0 38 3A 41 B2 41 AB 31 3A 8B |5.H....8:A.A.1:.|
00000140: 53 54 B3 B1 30 A7 32 30 00 79 09 07 00 85 22 53 |ST..0.20.y...."S|
00000150: 41 56 45 20 4E 41 4D 45 22 3B 41 24 3A 9F 38 2C |AVE NAME";A$:.8,|
00000160: 38 2C 38 2C 22 40 3A 22 AA 41 24 AA 22 2C 53 2C |8,8,"@:".A$.",S,|
00000170: 57 22 3A 81 49 B2 31 A4 41 00 AE 09 08 00 98 38 |W":.I.1.A......8|
00000180: 2C 4E 24 28 49 29 52 24 44 24 28 49 29 52 24 42 |,N$(I)R$D$(I)R$B|
00000190: 24 28 49 29 52 24 3A 82 3A 98 38 2C 22 2A 22 2C |$(I)R$:.:.8,"*",|
000001A0: 22 2A 22 2C 22 2A 22 3A A0 38 3A 89 32 30 00 E2 |"*","*":.8:.20..|
000001B0: 09 09 00 99 22 93 20 30 20 22 3B 3A 9F 31 2C 38 |....". 0 ";:.1,8|
000001C0: 2C 30 2C 22 24 22 3A 97 37 38 31 2C 31 3A 9E 36 |,0,"$":.781,1:.6|
000001D0: 35 34 37 38 3A A1 41 24 2C 41 24 2C 41 24 2C 41 |5478:.A$,A$,A$,A|
000001E0: 24 3A 00 09 0A 0A 00 81 49 B2 31 A4 37 3A A1 41 |$:......I.1.7:.A|
000001F0: 24 2C 42 24 2C 43 24 2C 44 24 3A 99 41 24 42 24 |$,B$,C$,D$:.A$B$|
00000200: 43 24 44 24 3B 3A 82 3A 99 00 2F 0A 0B 00 A1 41 |C$D$;:.:../....A|
00000210: 24 2C 41 24 2C 41 24 2C 42 24 3A 8B 53 54 B3 B1 |$,A$,A$,B$:.ST..|
00000220: 30 A7 9E 36 35 34 38 34 3A A0 31 3A 89 32 30 00 |0..65484:.1:.20.|
00000230: 4F 0A 0C 00 99 C6 28 41 24 AA 58 24 29 AA 32 35 |O.....(A$.X$).25|
00000240: 36 AC C6 28 42 24 AA 58 24 29 3B 3A 89 31 30 00 |6..(B$.X$);:.10.|
00000250: 8C 0A 0D 00 41 B2 41 AA 31 3A 85 22 50 52 47 2D |....A.A.1:."PRG-|
00000260: 4E 41 4D 45 22 3B 4E 24 28 41 29 3A 85 22 44 49 |NAME";N$(A):."DI|
00000270: 53 4B 22 3B 44 24 28 41 29 3A 85 22 42 4C 4F 43 |SK";D$(A):."BLOC|
00000280: 4B 53 22 3B 42 24 28 41 29 3A 89 32 00 C0 0A 0E |KS";B$(A):.2....|
00000290: 00 99 22 4E 41 4D 45 22 A3 31 37 29 22 44 49 53 |.."NAME".17)"DIS|
000002A0: 4B 22 A3 33 33 29 54 24 3A 81 49 B2 31 A4 5A 3A |K".33)T$:.I.1.Z:|
000002B0: 99 22 2D 22 3B 3A 82 3A 99 3A 81 49 B2 31 A4 41 |."-";:.:.:.I.1.A|
000002C0: 00 F7 0A 0F 00 99 4E 24 28 49 29 A3 31 37 29 44 |......N$(I).17)D|
000002D0: 24 28 49 29 A3 33 34 29 42 24 28 49 29 3A 97 31 |$(I).34)B$(I):.1|
000002E0: 39 38 2C 30 3A 92 31 39 38 2C 31 3A 82 3A 9E 36 |98,0:.198,1:.:.6|
000002F0: 35 35 31 31 3A 89 32 00 26 0B 10 00 85 22 50 41 |5511:.2.&...."PA|
00000300: 54 54 45 52 4E 22 3B 41 24 3A 81 49 B2 31 A4 41 |TTERN";A$:.I.1.A|
00000310: 3A 8B C8 28 4E 24 28 49 29 2C C3 28 41 24 29 29 |:..(N$(I),.(A$))|
00000320: B3 B1 41 24 A7 82 00 60 0B 11 00 99 49 22 20 3A |..A$...`....I" :|
00000330: 20 22 4E 24 28 49 29 22 2C 22 44 24 28 49 29 22 | "N$(I)","D$(I)"|
00000340: 2C 22 42 24 28 49 29 3A 8B 49 B2 41 AA 31 A7 99 |,"B$(I):.I.A.1..|
00000350: 22 45 4E 44 20 4F 46 20 4C 49 53 54 22 3A 89 32 |"END OF LIST":.2|
00000360: 00 77 0B 12 00 85 22 43 48 41 4E 47 45 20 28 59 |.w...."CHANGE (Y|
00000370: 2F 4E 29 22 3B 41 24 00 B6 0B 13 00 8B 41 24 B2 |/N)";A$......A$.|
00000380: 22 59 22 A7 85 22 50 52 47 2D 4E 41 4D 45 22 3B |"Y".."PRG-NAME";|
00000390: 4E 24 28 49 29 3A 85 22 44 49 53 4B 22 3B 44 24 |N$(I):."DISK";D$|
000003A0: 28 49 29 3A 85 22 42 4C 4F 43 4B 53 22 3B 42 24 |(I):."BLOCKS";B$|
000003B0: 28 49 29 3A 89 32 00 DF 0B 14 00 99 3A 9F 31 35 |(I):.2......:.15|
000003C0: 2C 38 2C 31 35 3A 84 31 35 2C 58 2C 41 24 2C 58 |,8,15:.15,X,A$,X|
000003D0: 2C 58 3A A0 31 35 3A 99 41 24 3A 99 3A 89 32 00 |,X:.15:.A$:.:.2.|
000003E0: 00 00 |.. |
..>...X.1200:.N$(X):.D$(X):.B$(X):R$.G(1
3):X$.G(0):T$."BLOCKS"......". 1-LOAD 2
-SAVE 3-DIR 4-INPUT 5-LOOK 6-SEARCH
7-PRINT"R$"DATA:"A.F...Z.40:.65511:.H:.
".":.H.4,7,9,13,14,16:.1,4:.1:Z.70:.14..
...A.0:."LOAD NAME";A$:.8,8,8,A$.",S,R":
.ST..0.20.1...A.A.1:."."A:.8,N$(A),D$(A)
,B$(A):.N$(A).."*".ST.0.5.H... 8:A.A.1:.
ST..0.20.Y...."SAVE NAME";A$:.8,8,8,"@:"
.A$.",S,W":.I.1.A......8,N$(I)R$D$(I)R$B
$(I)R$:.:.8,"*","*","*": 8:.20......". 0
";:.1,8,0,"$":.781,1:.65478:.A$,A$,A$,A
$:......I.1.7:.A$,B$,C$,D$:.A$B$C$D$;:.:
../....A$,A$,A$,B$:.ST..0..65484: 1:.20.
O....F(A$.X$).256.F(B$.X$);:.10.....A.A.
1:."PRG-NAME";N$(A):."DISK";D$(A):."BLOC
KS";B$(A):.2......"NAME".17)"DISK".33)T$
:.I.1.Z:."-";:.:.:.I.1.A......N$(I).17)D
$(I).34)B$(I):.198,0:.198,1:.:.65511:.2.
&...."PATTERN";A$:.I.1.A:.H(N$(I),C(A$))
..A$...`....I" : "N$(I)","D$(I)","B$(I):
.I.A.1.."END OF LIST":.2.W...."CHANGE (Y
/N)";A$......A$."Y".."PRG-NAME";N$(I):."
DISK";D$(I):."BLOCKS";B$(I):.2......:.15
,8,15:.15,X,A$,X,X: 15:.A$:.:.2...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL