> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 16 08 01 00 8B C6 28 54 52 24 29 B1 36 30 |........(TR$).60|
00000010: A7 8D 31 32 3A 8E 00 5A 08 02 00 41 24 B2 22 93 |..12:..Z...A$.".|
00000020: 8B 8B 20 2A 2A 20 C3 52 45 44 49 54 20 C5 58 43 |.. ** .REDIT .XC|
00000030: 48 41 4E 47 45 20 2A 2A 8B 8B 8B 20 20 C3 55 52 |HANGE **... .UR|
00000040: 52 45 4E 54 20 D2 41 54 45 20 CF 46 20 C5 58 43 |RENT .ATE .F .XC|
00000050: 48 41 4E 47 45 3A 22 3A 9E 4F 00 81 08 03 00 41 |HANGE:":.O.....A|
00000060: 24 B2 22 8B 20 20 35 20 C3 52 45 44 49 54 20 D0 |$.". 5 .REDIT .|
00000070: 54 53 20 2F 20 31 20 CD 49 4E 55 54 45 22 3A 9E |TS / 1 .INUTE":.|
00000080: 4F 00 B0 08 04 00 41 4E 24 B2 C4 28 C6 28 54 52 |O.....AN$..(.(TR|
00000090: 24 29 29 3A 41 24 B2 22 8B 8B CD 49 4E 55 54 45 |$)):A$."...INUTE|
000000A0: 53 20 CC 45 46 54 20 20 3A 5C 56 37 22 3A 9E 4F |S .EFT :\V7":.O|
000000B0: 00 DA 08 05 00 41 4E 24 B2 C4 28 43 52 29 3A 41 |.....AN$..(CR):A|
000000C0: 24 B2 22 8B C3 52 45 44 49 54 20 D0 4F 49 4E 54 |$."..REDIT .OINT|
000000D0: 53 20 3A 5C 56 37 22 3A 9E 4F 00 0D 09 06 00 41 |S :\V7":.O.....A|
000000E0: 24 B2 22 8B 8B C8 4F 57 20 CD 55 43 48 20 D4 49 |$."...OW .UCH .I|
000000F0: 4D 45 20 D7 4F 55 4C 44 20 D9 4F 55 20 CC 49 4B |ME .OULD .OU .IK|
00000100: 45 20 D4 4F 20 C2 55 59 3F 22 3A 9E 4F 00 45 09 |E .O .UY?":.O.E.|
00000110: 07 00 41 4E 24 B2 C4 28 36 30 AB C6 28 54 52 24 |..AN$..(60..(TR$|
00000120: 29 29 3A 41 24 B2 22 8B 28 D5 50 20 D4 4F 20 5C |)):A$.".(.P .O \|
00000130: 56 37 20 CD 4F 52 45 20 CD 49 4E 55 54 45 53 2E |V7 .ORE .INUTES.|
00000140: 29 22 3A 9E 4F 00 85 09 08 00 41 24 B2 22 8B 28 |)":.O.....A$.".(|
00000150: C5 4E 54 45 52 20 87 D1 87 20 D4 4F 20 D1 55 49 |.NTER ... .O .UI|
00000160: 54 29 8B 8B C5 D8 C3 3A 22 3A 9E 4F 3A 8D 31 30 |T).....:":.O:.10|
00000170: 30 36 3A 41 B2 B5 28 C5 28 41 4E 24 29 29 3A 8B |06:A..(.(AN$)):.|
00000180: 41 B3 31 A7 8E 00 9D 09 09 00 8B 41 AA C6 28 54 |A.1........A..(T|
00000190: 52 24 29 B1 36 30 A7 8D 31 32 3A 89 34 00 CA 09 |R$).60..12:.4...|
000001A0: 0A 00 8B 41 AC 35 B1 43 52 A7 41 24 B2 22 8B 8B |...A.5.CR.A$."..|
000001B0: CE 4F 54 20 C5 4E 4F 55 47 48 20 C3 52 45 44 49 |.OT .NOUGH .REDI|
000001C0: 54 53 2E 22 3A 9E 4F 3A 89 34 00 ED 09 0B 00 43 |TS.":.O:.4.....C|
000001D0: 52 B2 43 52 AB 41 AC 35 3A 97 35 33 32 35 31 2C |R.CR.A.5:.53251,|
000001E0: C2 28 35 33 32 35 31 29 AA 41 3A 89 34 00 2F 0A |.(53251).A:.4./.|
000001F0: 0C 00 8D 31 39 38 30 3A 41 24 B2 22 D9 4F 55 20 |...1980:A$.".OU |
00000200: C3 41 4E 4E 4F 54 20 C8 41 56 45 20 CD 4F 52 45 |.ANNOT .AVE .ORE|
00000210: 8B D4 48 41 4E 20 36 30 20 CD 49 4E 55 54 45 53 |..HAN 60 .INUTES|
00000220: 20 D4 4F 54 41 4C 2E 8B 8B 22 3A 9E 4F 3A 8E 00 | .OTAL...":.O:..|
00000230: 35 0A E7 03 8F 00 00 00 |5....... |
.......F(TR$).60..12:..Z...A$."... ** CR
EDIT EXCHANGE **... CURRENT RATE OF EXC
HANGE:":.O.....A$.". 5 CREDIT PTS / 1 M
INUTE":.O.....AN$.D(F(TR$)):A$."..MINUTE
S LEFT :\V7":.O.Z...AN$.D(CR):A$.".CRED
IT POINTS :\V7":.O.....A$."..HOW MUCH TI
ME WOULD YOU LIKE TO BUY?":.O.E...AN$.D(
60.F(TR$)):A$.".(UP TO \V7 MORE MINUTES.
)":.O.....A$.".(ENTER .Q. TO QUIT)..EXC:
":.O:.1006:A..(E(AN$)):.A.1........A.F(T
R$).60..12:.4.J....A.5.CR.A$."..NOT ENOU
GH CREDITS.":.O:.4.....CR.CR.A.5:.53251,
B(53251).A:.4./....1980:A$."YOU CANNOT H
AVE MORE.THAN 60 MINUTES TOTAL...":.O:..
5.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL