> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 12 08 05 00 86 4E 28 35 30 29 2C 41 28 35 |.......N(50),A(5|
00000010: 30 29 00 1E 08 07 00 9E 20 35 38 36 39 32 00 39 |0)...... 58692.9|
00000020: 08 0A 00 97 35 33 32 38 30 2C 30 3A 97 35 33 32 |....53280,0:.532|
00000030: 38 31 2C 30 3A 99 22 98 22 00 52 08 0F 00 99 22 |81,0:.".".R...."|
00000040: 43 48 45 43 4B 42 4F 4F 4B 20 50 52 4F 47 52 41 |CHECKBOOK PROGRA|
00000050: 4D 22 00 7F 08 14 00 99 22 11 11 50 52 45 53 53 |M"......"..PRESS|
00000060: 20 12 20 46 31 20 92 20 46 4F 52 20 4F 55 54 53 | . F1 . FOR OUTS|
00000070: 54 41 4E 44 49 4E 47 20 43 48 45 43 4B 53 22 00 |TANDING CHECKS".|
00000080: A5 08 19 00 99 22 50 52 45 53 53 20 12 20 46 33 |....."PRESS . F3|
00000090: 20 92 20 46 4F 52 20 42 41 4C 41 4E 43 45 20 53 | . FOR BALANCE S|
000000A0: 48 45 45 54 22 00 C9 08 1E 00 99 22 50 52 45 53 |HEET"......"PRES|
000000B0: 53 20 12 20 46 35 20 92 20 54 4F 20 45 58 49 54 |S . F5 . TO EXIT|
000000C0: 20 50 52 4F 47 52 41 4D 22 00 02 09 20 00 99 22 | PROGRAM"... .."|
000000D0: 11 11 11 11 11 11 11 11 1C 12 20 20 20 20 20 4E |.......... N|
000000E0: 4F 54 45 3A 20 20 44 4F 20 4E 4F 54 20 55 53 45 |OTE: DO NOT USE|
000000F0: 20 44 4F 4C 4C 41 52 20 53 49 47 4E 53 2C 20 20 | DOLLAR SIGNS, |
00000100: 22 3B 00 3A 09 21 00 99 22 1C 12 20 20 20 20 20 |";.:.!..".. |
00000110: 20 20 20 20 20 44 45 43 49 4D 41 4C 20 50 4F 49 | DECIMAL POI|
00000120: 4E 54 53 2C 20 4F 52 20 4C 45 54 54 45 52 53 2E |NTS, OR LETTERS.|
00000130: 20 20 20 20 20 22 AA 22 98 22 00 55 09 28 00 A1 | ".".".U.(..|
00000140: 20 52 24 3A 8B 20 52 24 B2 C7 28 31 33 33 29 20 | R$:. R$..(133) |
00000150: A7 20 32 30 30 00 6B 09 32 00 8B 20 52 24 B2 C7 |. 200.k.2.. R$..|
00000160: 28 31 33 34 29 20 A7 20 34 30 30 00 81 09 3C 00 |(134) . 400...<.|
00000170: 8B 20 52 24 B2 C7 28 31 33 35 29 20 A7 20 36 30 |. R$..(135) . 60|
00000180: 30 00 8A 09 46 00 89 20 34 30 00 95 09 C8 00 9E |0...F.. 40......|
00000190: 35 38 36 39 32 00 AF 09 CD 00 99 22 4F 55 54 53 |58692......"OUTS|
000001A0: 54 41 4E 44 49 4E 47 20 43 48 45 43 4B 53 22 00 |TANDING CHECKS".|
000001B0: B7 09 D2 00 43 B2 31 00 C1 09 D9 00 99 22 11 11 |....C.1......"..|
000001C0: 22 00 DB 09 DC 00 85 22 43 48 45 43 4B 20 4E 55 |"......"CHECK NU|
000001D0: 4D 42 45 52 20 22 3B 4E 28 43 29 00 F5 09 E6 00 |MBER ";N(C).....|
000001E0: 85 22 43 48 45 43 4B 20 41 4D 4F 55 4E 54 20 22 |."CHECK AMOUNT "|
000001F0: 3B 41 28 43 29 00 12 0A F0 00 99 22 11 11 4D 4F |;A(C)......"..MO|
00000200: 52 45 20 45 4E 54 52 49 45 53 20 28 59 2F 4E 29 |RE ENTRIES (Y/N)|
00000210: 3F 22 00 2A 0A FA 00 A1 20 52 24 3A 8B 20 52 24 |?".*.... R$:. R$|
00000220: B2 22 59 22 20 A7 20 37 30 30 00 3D 0A 04 01 8B |."Y" . 700.=....|
00000230: 20 52 24 B2 22 4E 22 20 A7 20 38 30 30 00 5A 0A | R$."N" . 800.Z.|
00000240: 0E 01 8B 20 52 24 B3 B1 22 59 22 20 AF 20 52 24 |... R$.."Y" . R$|
00000250: B3 B1 22 4E 22 20 A7 32 35 30 00 65 0A 90 01 9E |.."N" .250.e....|
00000260: 35 38 36 39 32 00 7A 0A 9A 01 99 22 42 41 4C 41 |58692.z...."BALA|
00000270: 4E 43 45 20 53 48 45 45 54 22 00 94 0A A4 01 99 |NCE SHEET"......|
00000280: 22 11 11 22 3A 99 22 45 4E 54 45 52 20 42 41 4C |"..":."ENTER BAL|
00000290: 41 4E 43 45 00 AE 0A AE 01 85 22 46 52 4F 4D 20 |ANCE......"FROM |
000002A0: 43 48 45 43 4B 42 4F 4F 4B 3A 22 3B 42 43 00 C2 |CHECKBOOK:";BC..|
000002B0: 0A B8 01 99 22 11 41 44 44 20 49 4E 54 45 52 45 |....".ADD INTERE|
000002C0: 53 54 00 DE 0A BD 01 85 22 4F 52 20 4F 54 48 45 |ST......"OR OTHE|
000002D0: 52 20 43 52 45 44 49 54 53 3A 22 3B 43 52 00 F6 |R CREDITS:";CR..|
000002E0: 0A C2 01 99 22 11 53 55 42 54 4F 54 41 4C 3A 22 |....".SUBTOTAL:"|
000002F0: 3B 42 43 AA 43 52 00 15 0B CC 01 99 22 11 53 55 |;BC.CR......".SU|
00000300: 42 54 52 41 43 54 20 53 45 52 56 49 43 45 20 43 |BTRACT SERVICE C|
00000310: 48 41 52 47 45 00 30 0B D1 01 85 22 4F 52 20 4F |HARGE.0...."OR O|
00000320: 54 48 45 52 20 44 45 42 49 54 53 3A 22 3B 53 43 |THER DEBITS:";SC|
00000330: 00 57 0B D6 01 99 22 11 12 43 48 45 43 4B 42 4F |.W...."..CHECKBO|
00000340: 4F 4B 20 42 41 4C 41 4E 43 45 3A 22 3B 28 42 43 |OK BALANCE:";(BC|
00000350: AA 43 52 29 AB 53 43 00 67 0B E0 01 81 53 B2 31 |.CR).SC.g....S.1|
00000360: A4 31 30 30 30 3A 82 00 72 0B EA 01 9E 35 38 36 |.1000:..r....586|
00000370: 39 32 00 9D 0B EF 01 50 52 B2 28 42 43 AA 43 52 |92.....PR.(BC.CR|
00000380: 29 AB 53 43 3A 99 22 12 20 43 48 45 43 4B 42 4F |).SC:.". CHECKBO|
00000390: 4F 4B 20 42 41 4C 20 3D 20 22 3B 50 52 00 B6 0B |OK BAL = ";PR...|
000003A0: F4 01 99 22 11 11 11 11 11 45 4E 54 45 52 20 42 |...".....ENTER B|
000003B0: 41 4C 41 4E 43 45 00 D0 0B F9 01 85 22 46 52 4F |ALANCE......"FRO|
000003C0: 4D 20 53 54 41 54 45 4D 45 4E 54 3A 22 3B 42 53 |M STATEMENT:";BS|
000003D0: 00 E4 0B FE 01 99 22 11 41 44 44 20 44 45 50 4F |......".ADD DEPO|
000003E0: 53 49 54 53 00 F9 0B 03 02 85 22 4E 4F 54 20 53 |SITS......"NOT S|
000003F0: 48 4F 57 4E 3A 22 3B 44 50 00 10 0C 08 02 99 22 |HOWN:";DP......"|
00000400: 53 55 42 54 4F 54 41 4C 3A 22 3B 42 53 AA 44 50 |SUBTOTAL:";BS.DP|
00000410: 00 27 0C 12 02 99 22 11 53 55 42 54 52 41 43 54 |.'....".SUBTRACT|
00000420: 20 43 48 45 43 4B 53 00 3D 0C 17 02 99 22 4F 55 | CHECKS.=...."OU|
00000430: 54 53 54 41 4E 44 49 4E 47 3A 22 3B 54 00 59 0C |TSTANDING:";T.Y.|
00000440: 1C 02 99 22 11 12 42 41 4C 41 4E 43 45 3A 22 3B |..."..BALANCE:";|
00000450: 28 42 53 AA 44 50 29 AB 54 00 8D 0C 26 02 99 22 |(BS.DP).T...&.."|
00000460: 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 12 1C 20 |............... |
00000470: 50 52 45 53 53 20 41 4E 59 20 4B 45 59 20 54 4F |PRESS ANY KEY TO|
00000480: 20 43 4F 4E 54 49 4E 55 45 22 3B 52 24 00 A4 0C | CONTINUE";R$...|
00000490: 30 02 A1 20 52 24 3A 8B 20 52 24 B2 22 22 20 A7 |0.. R$:. R$."" .|
000004A0: 20 35 36 30 00 AB 0C 57 02 89 37 00 B7 0C 58 02 | 560...W..7...X.|
000004B0: 9E 20 35 38 36 39 32 00 D7 0C 62 02 99 22 12 20 |. 58692...b..". |
000004C0: 20 50 52 4F 47 52 41 4D 20 46 49 4C 45 20 43 4C | PROGRAM FILE CL|
000004D0: 4F 53 45 44 20 92 22 00 DD 0C 6C 02 80 00 E7 0C |OSED ."...l.....|
000004E0: BC 02 43 B2 43 AA 31 00 F2 0C C1 02 9E 35 38 36 |..C.C.1......586|
000004F0: 39 32 00 FD 0C C2 02 99 22 11 11 11 22 00 06 0D |92......"..."...|
00000500: C6 02 89 32 32 30 00 11 0D 20 03 9E 35 38 36 39 |...220... ..5869|
00000510: 32 00 31 0D 2A 03 99 22 43 48 45 43 4B 20 4E 55 |2.1.*.."CHECK NU|
00000520: 4D 42 45 52 22 A3 31 35 29 22 41 4D 4F 55 4E 54 |MBER".15)"AMOUNT|
00000530: 22 00 51 0D 34 03 99 22 3D 3D 3D 3D 3D 3D 3D 3D |".Q.4.."========|
00000540: 3D 3D 3D 3D 22 A3 31 35 29 22 3D 3D 3D 3D 3D 3D |====".15)"======|
00000550: 22 00 5D 0D 3E 03 81 20 49 B2 31 A4 43 00 71 0D |".].>.. I.1.C.q.|
00000560: 48 03 99 4E 28 49 29 3B A3 31 35 29 3B 41 28 49 |H..N(I);.15);A(I|
00000570: 29 00 78 0D 52 03 82 49 00 80 0D 53 03 54 B2 30 |).x.R..I...S.T.0|
00000580: 00 8B 0D 54 03 81 58 B2 31 A4 43 00 98 0D 55 03 |...T..X.1.C...U.|
00000590: 54 B2 54 AA 41 28 58 29 00 9F 0D 56 03 82 58 00 |T.T.A(X)...V..X.|
000005A0: BF 0D 57 03 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |..W.."==========|
000005B0: 3D 3D 22 A3 31 35 29 22 3D 3D 3D 3D 3D 3D 22 00 |==".15)"======".|
000005C0: D9 0D 58 03 99 22 20 20 20 20 20 54 4F 54 41 4C |..X.." TOTAL|
000005D0: 20 20 22 A3 31 35 29 3B 54 00 00 0E 5C 03 99 22 | ".15);T...\.."|
000005E0: 11 11 12 20 50 52 45 53 53 20 41 4E 59 20 4B 45 |... PRESS ANY KE|
000005F0: 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 20 92 22 |Y TO CONTINUE ."|
00000600: 00 17 0E 66 03 A1 20 52 24 3A 8B 20 52 24 B2 22 |...f.. R$:. R$."|
00000610: 22 20 A7 20 38 37 30 00 1E 0E 70 03 89 37 00 00 |" . 870...p..7..|
00000620: 00 |. |
.......N(50),A(50)...... 58692.9....5328
0,0:.53281,0:.".".R...."CHECKBOOK PROGRA
M"....."..PRESS . F1 . FOR OUTSTANDING
CHECKS"......"PRESS . F3 . FOR BALANCE S
HEET".I...."PRESS . F5 . TO EXIT PROGRAM
"... ..".......... NOTE: DO NOT USE
DOLLAR SIGNS, ";.:.!..".. DEC
IMAL POINTS, OR LETTERS. ".".".U.(..
R$:. R$.G(133) . 200.K.2.. R$.G(134) .
400...<.. R$.G(135) . 600...F.. 40...H..
58692...M.."OUTSTANDING CHECKS"...R.C.1.
A.Y..".."......"CHECK NUMBER ";N(C).....
."CHECK AMOUNT ";A(C)......"..MORE ENTRI
ES (Y/N)?".*.... R$:. R$."Y" . 700.=....
R$."N" . 800.Z.... R$.."Y" . R$.."N" .2
50.E....58692.Z...."BALANCE SHEET"......
"..":."ENTER BALANCE......"FROM CHECKBOO
K:";BC.B....".ADD INTEREST......"OR OTHE
R CREDITS:";CR...B..".SUBTOTAL:";BC.CR..
.L..".SUBTRACT SERVICE CHARGE.0.Q.."OR O
THER DEBITS:";SC.W.V.."..CHECKBOOK BALAN
CE:";(BC.CR).SC.G....S.1.1000:..R....586
92.....PR.(BC.CR).SC:.". CHECKBOOK BAL =
";PR......".....ENTER BALANCE.P...."FRO
M STATEMENT:";BS......".ADD DEPOSITS....
.."NOT SHOWN:";DP......"SUBTOTAL:";BS.DP
.'....".SUBTRACT CHECKS.=...."OUTSTANDIN
G:";T.Y...."..BALANCE:";(BS.DP).T...&.."
............... PRESS ANY KEY TO CONTINU
E";R$...0.. R$:. R$."" . 560...W..7...X.
. 58692.W.B..". PROGRAM FILE CLOSED .".
..L.......C.C.1...A..58692...B.."..."...
F..220... ..58692.1.*.."CHECK NUMBER".15
)"AMOUNT".Q.4.."============".15)"======
".].>.. I.1.C.Q.H..N(I);.15);A(I).X.R..I
...S.T.0...T..X.1.C...U.T.T.A(X)...V..X.
..W.."============".15)"======".Y.X.."
TOTAL ".15);T...\.."... PRESS ANY KE
Y TO CONTINUE ."...F.. R$:. R$."" . 870.
..P..7...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL