BUDGETEER/64
FILE INFORMATION
FILENAME(S): BUDGETEER/64
FILE TYPE(S): PRG
FILE SIZE: 3.6K
FIRST SEEN: 2025-10-19 22:48:23
APPEARS ON: 2 disk(s)
FILE HASH
455126c3d14f28c42508619ee705cb2f0ecfa1c704b6135b4cfe6f7dfc689010
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GAZETTE JAN 85 | BUDGETEER/64 | PRG | Radd Maxx | 30 | 9 | DOWNLOAD FILE |
| NOVEMBER DISK | BUDGETEER/64 | PRG | Sailor, Ganheden | 8 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 30 08 64 00 58 B2 31 3A 8F 20 4D 41 4B 45 |..0.d.X.1:. MAKE| 00000010: 20 58 3D 30 20 46 4F 52 20 54 41 50 45 2C 4F 52 | X=0 FOR TAPE,OR| 00000020: 20 58 3D 31 20 54 4F 20 55 53 45 20 44 49 53 4B | X=1 TO USE DISK| 00000030: 00 51 08 69 00 97 20 35 33 32 38 30 2C 31 32 3A |.Q.i.. 53280,12:| 00000040: 97 20 35 33 32 38 31 2C 31 31 3A 99 C7 28 31 34 |. 53281,11:..(14| 00000050: 29 00 8B 08 6E 00 54 24 B2 22 93 12 9A 20 20 20 |)...n.T$."... | 00000060: 20 20 20 20 20 20 20 20 20 20 92 9B 20 20 C2 D5 | .. ..| 00000070: C4 C7 C5 D4 C5 C5 D2 20 20 12 9A 20 20 20 20 20 |....... .. | 00000080: 20 20 20 20 20 20 20 20 20 9B 22 00 AC 08 73 00 | ."...s.| 00000090: 53 B2 35 34 32 37 32 3A 81 20 51 B2 53 20 A4 20 |S.54272:. Q.S . | 000000A0: 53 AA 32 33 3A 97 20 51 2C 30 3A 82 00 EB 08 78 |S.23:. Q,0:....x| 000000B0: 00 86 20 41 24 28 31 31 29 2C 41 28 31 31 29 2C |.. A$(11),A(11),| 000000C0: 42 25 28 31 31 29 3A 96 20 A5 52 28 58 29 B2 B5 |B%(11):. .R(X)..| 000000D0: 28 58 AC 31 30 30 AA 2E 35 29 AD 31 30 30 3A 99 |(X.100..5).100:.| 000000E0: 20 54 24 22 11 11 11 11 11 11 22 00 13 09 82 00 | T$"......".....| 000000F0: 99 22 D4 4F 44 41 59 27 53 20 C4 41 54 45 22 3B |.".ODAY'S .ATE";| 00000100: 3A 8D 31 30 38 30 3A 85 20 44 44 24 3A 99 3A 89 |:.1080:. DD$:.:.| 00000110: 32 33 30 00 41 09 8C 00 99 20 54 24 3A 99 22 9B |230.A.... T$:.".| 00000120: 20 20 C4 41 54 45 3A 98 22 44 24 3A 99 22 9B 20 | .ATE:."D$:.". | 00000130: 20 CC 41 53 54 20 C1 4D 4F 55 4E 54 3A 24 98 22 | .AST .MOUNT:$."| 00000140: 41 00 79 09 96 00 8D 31 39 30 3A 99 3A 81 20 52 |A.y....190:.:. R| 00000150: B2 31 A4 39 3A 99 22 20 20 9B 22 52 22 9D 2E 2E |.1.9:." ."R"...| 00000160: 22 41 24 28 52 29 22 2E 2E 24 98 22 A3 42 25 28 |"A$(R)"..$.".B%(| 00000170: 52 29 29 41 28 52 29 3A 82 00 A3 09 A0 00 99 22 |R))A(R):......."| 00000180: 20 20 9B 31 30 2E 2E 22 41 24 28 31 30 29 22 2E | .10.."A$(10)".| 00000190: 2E 24 98 22 A3 42 25 28 31 30 29 29 41 28 31 30 |.$.".B%(10))A(10| 000001A0: 29 3A 99 00 CF 09 AA 00 99 22 20 20 9B 31 31 2E |):......." .11.| 000001B0: 2E 22 41 24 28 31 31 29 22 2E 2E 24 98 22 A3 42 |."A$(11)"..$.".B| 000001C0: 25 28 31 31 29 29 41 28 31 31 29 3A 99 3A 8E 00 |%(11))A(11):.:..| 000001D0: DC 09 BE 00 81 20 52 B2 31 A4 31 31 00 09 0A C8 |..... R.1.11....| 000001E0: 00 8B 20 B6 28 41 28 52 29 29 B2 B1 31 20 A7 20 |.. .(A(R))..1 . | 000001F0: 42 25 28 52 29 B2 33 32 AB C3 28 C4 28 B5 28 B6 |B%(R).32..(.(.(.| 00000200: 28 41 28 52 29 29 29 29 29 00 24 0A D2 00 8B 20 |(A(R))))).$.... | 00000210: B6 28 41 28 52 29 29 B3 31 20 A7 20 42 25 28 52 |.(A(R)).1 . B%(R| 00000220: 29 B2 33 31 00 2C 0A DC 00 82 3A 8E 00 43 0A E6 |).31.,....:..C..| 00000230: 00 81 20 52 B2 31 A4 31 31 3A 87 20 41 24 28 52 |.. R.1.11:. A$(R| 00000240: 29 3A 82 00 6C 0A F0 00 83 22 C8 CF D5 D3 C9 CE |):..l...."......| 00000250: C7 2E 2E 2E 2E 2E 2E 2E 2E 22 2C 22 D5 D4 C9 CC |.........","....| 00000260: C9 D4 C9 C5 D3 2E 2E 2E 2E 2E 2E 22 00 95 0A F3 |..........."....| 00000270: 00 83 22 C9 CE D3 D5 D2 C1 CE C3 C5 2E 2E 2E 2E |..".............| 00000280: 2E 2E 22 2C 22 D3 C5 D2 D6 C9 C3 C5 20 C3 C8 C1 |..","....... ...| 00000290: D2 C7 C5 D3 22 00 AC 0A F7 00 83 22 C3 D2 C5 C4 |...."......"....| 000002A0: C9 D4 A0 C3 C1 D2 C4 D3 2E 2E 2E 22 00 D5 0A FA |..........."....| 000002B0: 00 83 22 D6 C1 C3 C1 D4 C9 CF CE 2E 2E 2E 2E 2E |..".............| 000002C0: 2E 2E 22 2C 22 CD C5 C4 C9 C3 C1 CC 2E 2E 2E 2E |..","...........| 000002D0: 2E 2E 2E 2E 22 00 FE 0A FD 00 83 22 C2 CF CF CB |...."......"....| 000002E0: D3 26 CD C1 C7 C1 DA C9 CE C5 D3 22 2C 22 D3 D4 |.&.........","..| 000002F0: CF D2 C5 20 C3 C8 C1 D2 C7 C5 D3 2E 2E 22 00 27 |... .........".'| 00000300: 0B 01 01 83 22 CD C9 D3 C3 C5 CC CC C1 CE C5 CF |...."...........| 00000310: D5 D3 2E 2E 22 2C 22 D4 CF D4 C1 CC A0 C2 C1 CC |....",".........| 00000320: C1 CE C3 C5 2E 2E 22 00 31 0B 0E 01 8D 31 30 35 |......".1....105| 00000330: 30 00 5A 0B 18 01 8B 20 58 20 A7 20 9F 31 2C 38 |0.Z.... X . .1,8| 00000340: 2C 32 2C 22 30 3A 43 48 42 4B 46 49 4C 45 2C 52 |,2,"0:CHBKFILE,R| 00000350: 45 41 44 22 3A 89 20 33 35 30 00 92 0B 22 01 99 |EAD":. 350..."..| 00000360: 22 C9 4E 53 45 52 54 20 44 41 54 41 20 43 41 53 |".NSERT DATA CAS| 00000370: 53 45 54 54 45 20 41 4E 44 20 52 45 57 49 4E 44 |SETTE AND REWIND| 00000380: 20 54 4F 20 52 45 41 44 20 42 41 4C 41 4E 43 45 | TO READ BALANCE| 00000390: 53 2E 00 AB 0B 2C 01 99 3A 99 22 D2 45 41 44 59 |S....,..:.".EADY| 000003A0: 3F 2E 2E 2E D0 52 45 53 53 20 D9 00 C1 0B 36 01 |?....RESS ....6.| 000003B0: A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 33 31 |. A$:. A$."" .31| 000003C0: 30 00 D2 0B 40 01 8B 20 41 24 B2 22 4E 22 20 A7 |0...@.. A$."N" .| 000003D0: 20 80 00 E5 0B 4A 01 8B 20 41 24 B3 B1 22 59 22 | ....J.. A$.."Y"| 000003E0: 20 A7 32 39 30 00 FB 0B 54 01 9F 31 2C 31 2C 30 | .290...T..1,1,0| 000003F0: 2C 22 43 48 42 4B 46 49 4C 45 22 00 1B 0C 5E 01 |,"CHBKFILE"...^.| 00000400: 81 20 52 B2 31 A4 31 31 3A 84 31 2C 41 28 52 29 |. R.1.11:.1,A(R)| 00000410: 3A 82 3A 84 31 2C 44 24 3A A0 31 00 24 0C 68 01 |:.:.1,D$:.1.$.h.| 00000420: 8D 31 34 30 00 3E 0C 72 01 99 22 9B D4 52 41 4E |.140.>.r.."..RAN| 00000430: 53 41 43 54 49 4F 4E 3F 20 20 D9 2F CE 22 00 48 |SACTION? ./.".H| 00000440: 0C 77 01 8D 31 30 38 30 00 5E 0C 7C 01 A1 20 41 |.w..1080.^.|.. A| 00000450: 24 3A 8B 20 41 24 B2 22 22 20 A7 33 38 30 00 70 |$:. A$."" .380.p| 00000460: 0C 86 01 8B 20 41 24 B2 22 59 22 20 A7 34 35 30 |.... A$."Y" .450| 00000470: 00 82 0C 90 01 8B 20 41 24 B2 22 4E 22 20 A7 37 |...... A$."N" .7| 00000480: 34 30 00 94 0C 9A 01 8D 31 31 36 30 3A 81 20 52 |40......1160:. R| 00000490: B2 31 A4 33 00 C4 0C A4 01 99 22 13 11 11 11 11 |.1.3......".....| 000004A0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 A6 |..............".| 000004B0: 31 34 29 22 20 20 20 22 3A 81 20 4D B2 31 A4 33 |14)" ":. M.1.3| 000004C0: 30 30 3A 82 00 F4 0C AE 01 99 22 13 11 11 11 11 |00:.......".....| 000004D0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 A6 |..............".| 000004E0: 31 34 29 22 D9 2F CE 22 3A 81 20 4D B2 31 A4 33 |14)"./.":. M.1.3| 000004F0: 30 30 3A 82 00 FF 0C B8 01 82 3A 89 33 38 30 00 |00:.......:.380.| 00000500: 18 0D C2 01 54 B2 54 AA 31 3A 8B 20 54 B2 31 20 |....T.T.1:. T.1 | 00000510: A7 20 44 24 B2 44 44 24 00 47 0D CC 01 99 22 13 |. D$.DD$.G....".| 00000520: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000530: 11 11 CD 45 4E 55 3A 20 D4 3D 41 43 43 54 20 D4 |...ENU: .=ACCT .| 00000540: 52 41 4E 53 46 45 52 00 5E 0D D6 01 99 A6 36 29 |RANSFER.^.....6)| 00000550: 22 C3 3D 57 52 49 54 45 20 C3 48 45 43 4B 00 76 |".=WRITE .HECK.v| 00000560: 0D E0 01 99 A6 36 29 22 C4 3D 4D 41 4B 45 20 C4 |.....6)".=MAKE .| 00000570: 45 50 4F 53 49 54 00 80 0D E5 01 8D 31 30 38 30 |EPOSIT......1080| 00000580: 00 95 0D EA 01 A1 20 41 24 3A 8B 20 41 24 B2 22 |...... A$:. A$."| 00000590: 22 A7 34 39 30 00 A6 0D F4 01 8B 20 41 24 B2 22 |".490...... A$."| 000005A0: 43 22 A7 35 39 30 00 B7 0D FE 01 8B 20 41 24 B2 |C".590...... A$.| 000005B0: 22 44 22 A7 36 32 30 00 C8 0D 08 02 8B 20 41 24 |"D".620...... A$| 000005C0: B2 22 54 22 A7 36 35 30 00 DA 0D 12 02 8D 31 31 |."T".650......11| 000005D0: 36 30 3A 81 20 52 B2 31 A4 33 00 FB 0D 1C 02 99 |60:. R.1.3......| 000005E0: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............| 000005F0: 11 11 11 11 22 A6 36 29 22 20 22 00 1B 0E 26 02 |....".6)" "...&.| 00000600: 99 A6 36 29 22 20 22 3A 99 A6 36 29 22 20 22 3A |..6)" ":..6)" ":| 00000610: 81 20 4D B2 31 A4 33 30 30 3A 82 00 3C 0E 30 02 |. M.1.300:..<.0.| 00000620: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............| 00000630: 11 11 11 11 11 22 A6 36 29 22 D4 22 00 5C 0E 3A |.....".6)".".\.:| 00000640: 02 99 A6 36 29 22 C3 22 3A 99 A6 36 29 22 C4 22 |...6)".":..6)"."| 00000650: 3A 81 20 4D B2 31 A4 33 30 30 3A 82 00 67 0E 44 |:. M.1.300:..g.D| 00000660: 02 82 3A 89 34 39 30 00 85 0E 4E 02 99 22 13 11 |..:.490...N.."..| 00000670: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000680: 11 11 11 11 22 00 AD 0E 4F 02 99 22 C1 4D 54 20 |...."...O..".MT | 00000690: 4F 46 20 C3 48 45 43 4B 2C C1 43 43 54 20 23 22 |OF .HECK,.CCT #"| 000006A0: 3B 3A 8D 31 30 38 30 3A 85 20 41 2C 4C 00 D6 0E |;:.1080:. A,L...| 000006B0: 58 02 8B 20 4C B1 31 30 20 B0 20 4C B3 31 20 B0 |X.. L.10 . L.1 .| 000006C0: 20 4C AB B5 28 4C 29 B1 30 20 A7 20 8D 31 31 36 | L..(L).0 . .116| 000006D0: 30 3A 89 35 39 30 00 01 0F 62 02 41 28 31 31 29 |0:.590...b.A(11)| 000006E0: B2 A5 52 28 41 28 31 31 29 AB 41 29 3A 41 28 4C |..R(A(11).A):A(L| 000006F0: 29 B2 A5 52 28 41 28 4C 29 AB 41 29 3A 89 36 34 |)..R(A(L).A):.64| 00000700: 30 00 24 0F 6C 02 99 3A 99 22 C1 4D 54 20 4F 46 |0.$.l..:.".MT OF| 00000710: 20 C4 45 50 4F 53 49 54 22 3B 3A 8D 31 30 38 30 | .EPOSIT";:.1080| 00000720: 3A 85 20 41 00 4F 0F 76 02 4C B2 31 30 3A 41 28 |:. A.O.v.L.10:A(| 00000730: 31 31 29 B2 A5 52 28 41 28 31 31 29 AA 41 29 3A |11)..R(A(11).A):| 00000740: 41 28 4C 29 B2 A5 52 28 41 28 4C 29 AA 41 29 00 |A(L)..R(A(L).A).| 00000750: 66 0F 80 02 8D 31 34 30 3A 45 B2 4C 3A 46 B2 31 |f....140:E.L:F.1| 00000760: 32 3A 89 36 39 30 00 84 0F 8A 02 99 22 13 11 11 |2:.690......"...| 00000770: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000780: 11 11 11 22 00 AC 0F 8B 02 99 22 C1 4D 54 2C 46 |..."......".MT,F| 00000790: 52 4F 4D 20 23 2C 54 4F 20 23 22 3B 3A 8D 31 30 |ROM #,TO #";:.10| 000007A0: 38 30 3A 85 20 41 2C 41 31 2C 41 32 00 D9 0F 8D |80:. A,A1,A2....| 000007B0: 02 8B 20 41 31 B1 31 30 20 B0 20 41 31 B3 31 20 |.. A1.10 . A1.1 | 000007C0: B0 20 41 31 AB B5 28 41 31 29 B1 30 20 A7 20 8D |. A1..(A1).0 . .| 000007D0: 31 31 36 30 3A 89 36 35 30 00 06 10 94 02 8B 20 |1160:.650...... | 000007E0: 41 32 B1 31 30 20 B0 20 41 32 B3 31 20 B0 20 41 |A2.10 . A2.1 . A| 000007F0: 32 AB B5 28 41 32 29 B1 30 20 A7 20 8D 31 31 36 |2..(A2).0 . .116| 00000800: 30 3A 89 36 35 30 00 2E 10 9E 02 41 28 41 31 29 |0:.650.....A(A1)| 00000810: B2 A5 52 28 41 28 41 31 29 AB 41 29 3A 41 28 41 |..R(A(A1).A):A(A| 00000820: 32 29 B2 A5 52 28 41 28 41 32 29 AA 41 29 00 41 |2)..R(A(A2).A).A| 00000830: 10 A8 02 8D 31 34 30 3A 45 B2 41 31 3A 46 B2 41 |....140:E.A1:F.A| 00000840: 32 00 6E 10 B2 02 8B 20 45 B1 36 20 A7 20 99 22 |2.n.... E.6 . ."| 00000850: 13 22 A6 32 35 35 29 A6 31 39 38 29 A6 45 AC 34 |.".255).198).E.4| 00000860: 30 AB 32 35 35 29 22 2A 22 3A 89 37 31 30 00 85 |0.255)"*":.710..| 00000870: 10 BC 02 99 22 13 22 A6 31 39 38 29 A6 45 AC 34 |....".".198).E.4| 00000880: 30 29 22 2A 22 00 B2 10 C6 02 8B 20 46 B1 36 20 |0)"*"...... F.6 | 00000890: A7 20 99 22 13 22 A6 32 35 35 29 A6 31 39 38 29 |. .".".255).198)| 000008A0: A6 46 AC 34 30 AB 32 35 35 29 22 2A 22 3A 89 37 |.F.40.255)"*":.7| 000008B0: 33 30 00 C9 10 D0 02 99 22 13 22 A6 31 39 38 29 |30......".".198)| 000008C0: A6 46 AC 34 30 29 22 2A 22 00 F4 10 DA 02 81 20 |.F.40)"*"...... | 000008D0: 4D B2 31 A4 37 35 30 3A 82 3A 99 22 13 11 11 11 |M.1.750:.:."....| 000008E0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 3A |..............":| 000008F0: 89 33 37 30 00 03 11 E4 02 8B 20 54 B2 30 20 A7 |.370...... T.0 .| 00000900: 38 37 30 00 1F 11 EE 02 5A B2 30 3A 81 20 52 B2 |870.....Z.0:. R.| 00000910: 31 A4 31 30 3A 5A B2 5A AA 41 28 52 29 3A 82 00 |1.10:Z.Z.A(R):..| 00000920: 3A 11 F8 02 8B 20 B6 28 5A AB 41 28 31 31 29 29 |:.... .(Z.A(11))| 00000930: B2 B1 2E 30 31 20 A7 39 34 30 00 6C 11 02 03 8D |...01 .940.l....| 00000940: 20 31 34 30 3A 99 22 D3 55 4D 20 4F 46 20 C1 43 | 140:.".UM OF .C| 00000950: 43 4F 55 4E 54 53 3D D4 4F 54 41 4C 20 C2 41 4C |COUNTS=.OTAL .AL| 00000960: 41 4E 43 45 22 3A 8D 20 31 30 30 30 00 96 11 0C |ANCE":. 1000....| 00000970: 03 8B 20 58 20 A7 20 9F 31 2C 38 2C 32 2C 22 40 |.. X . .1,8,2,"@| 00000980: 30 3A 43 48 42 4B 46 49 4C 45 2C 57 52 49 54 45 |0:CHBKFILE,WRITE| 00000990: 22 3A 89 38 34 30 00 AF 11 16 03 99 3A 99 22 D2 |":.840......:.".| 000009A0: 45 41 44 59 3F 2E 2E 2E 50 52 45 53 53 20 D9 00 |EADY?...PRESS ..| 000009B0: C4 11 20 03 A1 20 41 24 3A 8B 20 41 24 B2 22 22 |.. .. A$:. A$.""| 000009C0: A7 38 30 30 00 D6 11 2A 03 8B 20 41 24 B2 22 4E |.800...*.. A$."N| 000009D0: 22 20 A7 38 38 30 00 E9 11 34 03 8B 20 41 24 B3 |" .880...4.. A$.| 000009E0: B1 22 59 22 20 A7 37 38 30 00 FF 11 3E 03 9F 31 |."Y" .780...>..1| 000009F0: 2C 31 2C 31 2C 22 43 48 42 4B 46 49 4C 45 22 00 |,1,1,"CHBKFILE".| 00000A00: 23 12 48 03 52 24 B2 C7 28 31 33 29 3A 81 20 52 |#.H.R$..(13):. R| 00000A10: B2 31 A4 31 31 3A 98 31 2C 41 28 52 29 3B 52 24 |.1.11:.1,A(R);R$| 00000A20: 3B 3A 82 00 34 12 52 03 98 31 2C 44 24 3B 52 24 |;:..4.R..1,D$;R$| 00000A30: 3B 3A A0 31 00 5E 12 57 03 99 20 54 24 3A 99 22 |;:.1.^.W.. T$:."| 00000A40: C4 41 54 45 3A 22 44 24 3A 99 22 C8 41 44 22 54 |.ATE:"D$:.".AD"T| 00000A50: 22 20 54 52 41 4E 53 2E 22 3A 8D 31 35 30 00 76 |" TRANS.":.150.v| 00000A60: 12 5C 03 99 22 CE 45 57 20 46 49 4C 45 20 44 4F |.\..".EW FILE DO| 00000A70: 4E 45 2E 22 3A 80 00 AA 12 66 03 8D 31 34 30 3A |NE.":....f..140:| 00000A80: 99 22 CE 4F 20 54 52 41 4E 53 41 43 54 49 4F 4E |.".O TRANSACTION| 00000A90: 53 2E 22 3A 99 22 C6 49 4C 45 20 4E 4F 54 20 43 |S.":.".ILE NOT C| 00000AA0: 48 41 4E 47 45 44 2E 22 3A 80 00 CD 12 70 03 8D |HANGED.":....p..| 00000AB0: 31 34 30 3A 99 22 C2 41 4C 41 4E 43 45 53 20 48 |140:.".ALANCES H| 00000AC0: 41 56 45 20 43 48 41 4E 47 45 44 2E 22 00 E4 12 |AVE CHANGED."...| 00000AD0: 7A 03 99 22 D7 52 49 54 45 20 4E 45 57 20 46 49 |z..".RITE NEW FI| 00000AE0: 4C 45 3F 22 00 FA 12 84 03 A1 20 41 24 3A 8B 20 |LE?"...... A$:. | 00000AF0: 41 24 B2 22 22 20 A7 39 30 30 00 0B 13 8E 03 8B |A$."" .900......| 00000B00: 20 41 24 B2 22 4E 22 20 A7 20 80 00 1E 13 98 03 | A$."N" . ......| 00000B10: 8B 20 41 24 B3 B1 22 59 22 20 A7 38 38 30 00 27 |. A$.."Y" .880.'| 00000B20: 13 A2 03 89 33 36 30 00 55 13 A7 03 8D 31 34 30 |....360.U....140| 00000B30: 3A 99 22 C5 52 52 4F 52 20 2D 20 CE 4F 20 42 41 |:.".RROR - .O BA| 00000B40: 4C 41 4E 43 45 2E 22 3A 99 22 C1 43 43 54 20 D3 |LANCE.":.".CCT .| 00000B50: 55 4D 3D 22 5A 00 6F 13 AC 03 99 22 C3 48 42 4B |UM="Z.o....".HBK| 00000B60: 20 C2 41 4C 41 4E 43 45 3D 22 41 28 31 31 29 00 | .ALANCE="A(11).| 00000B70: 8F 13 B6 03 99 22 C4 4F 20 59 4F 55 20 57 49 53 |.....".O YOU WIS| 00000B80: 48 20 54 4F 20 43 4F 4E 54 49 4E 55 45 3F 22 00 |H TO CONTINUE?".| 00000B90: A5 13 C0 03 A1 20 41 24 3A 8B 20 41 24 B2 22 22 |..... A$:. A$.""| 00000BA0: 20 A7 39 36 30 00 B5 13 CA 03 8B 20 41 24 B2 22 | .960...... A$."| 00000BB0: 4E 22 20 A7 80 00 C8 13 D4 03 8B 20 41 24 B3 B1 |N" ........ A$..| 00000BC0: 22 59 22 20 A7 39 34 30 00 D1 13 DE 03 89 33 36 |"Y" .940......36| 00000BD0: 30 00 F1 13 E8 03 99 22 C9 4E 53 45 52 54 20 44 |0......".NSERT D| 00000BE0: 41 54 41 20 44 49 53 4B 20 4F 52 20 54 41 50 45 |ATA DISK OR TAPE| 00000BF0: 22 00 1B 14 EA 03 99 22 D0 52 45 53 53 49 4E 47 |"......".RESSING| 00000C00: 20 27 D3 D4 CF D0 27 20 57 49 4C 4C 20 41 42 4F | '....' WILL ABO| 00000C10: 52 54 20 53 45 53 53 49 4F 4E 22 00 3E 14 ED 03 |RT SESSION".>...| 00000C20: 99 22 20 28 54 52 41 4E 53 41 43 54 49 4F 4E 53 |." (TRANSACTIONS| 00000C30: 20 57 49 4C 4C 20 42 45 20 4C 4F 53 54 29 00 64 | WILL BE LOST).d| 00000C40: 14 F0 03 99 22 20 41 4E 59 20 4F 54 48 45 52 20 |...." ANY OTHER | 00000C50: 4B 45 59 20 57 49 4C 4C 20 53 41 56 45 20 44 41 |KEY WILL SAVE DA| 00000C60: 54 41 2E 22 00 6E 14 F1 03 8D 31 30 38 30 00 85 |TA.".n....1080..| 00000C70: 14 F2 03 A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 |.... A$:. A$."" | 00000C80: A7 31 30 31 30 00 8B 14 06 04 8E 00 AB 14 1A 04 |.1010...........| 00000C90: 99 22 C9 4E 53 45 52 54 20 44 41 54 41 20 44 49 |.".NSERT DATA DI| 00000CA0: 53 4B 20 4F 52 20 54 41 50 45 22 00 CE 14 1F 04 |SK OR TAPE".....| 00000CB0: 99 22 D0 52 45 53 53 20 41 4E 59 20 4B 45 59 20 |.".RESS ANY KEY | 00000CC0: 54 4F 20 4C 4F 41 44 20 44 41 54 41 2E 22 00 D8 |TO LOAD DATA."..| 00000CD0: 14 22 04 8D 31 30 38 30 00 EF 14 24 04 A1 20 41 |."..1080...$.. A| 00000CE0: 24 3A 8B 20 41 24 B2 22 22 20 A7 31 30 36 30 00 |$:. A$."" .1060.| 00000CF0: F5 14 2E 04 8E 00 0E 15 38 04 81 20 51 B2 53 20 |........8.. Q.S | 00000D00: A4 20 53 AA 32 32 3A 97 20 51 2C 30 3A 82 00 23 |. S.22:. Q,0:..#| 00000D10: 15 42 04 97 20 53 AA 35 2C 30 3A 97 20 53 AA 31 |.B.. S.5,0:. S.1| 00000D20: 39 2C 30 00 38 15 47 04 97 20 53 AA 36 2C 37 3A |9,0.8.G.. S.6,7:| 00000D30: 97 20 53 AA 32 30 2C 37 00 46 15 4C 04 97 20 53 |. S.20,7.F.L.. S| 00000D40: AA 32 34 2C 31 35 00 5C 15 56 04 97 20 53 AA 34 |.24,15.\.V.. S.4| 00000D50: 2C 33 33 3A 97 53 AA 31 38 2C 31 39 00 6F 15 60 |,33:.S.18,19.o.`| 00000D60: 04 97 20 53 2C 30 3A 97 20 53 AA 31 2C 37 35 00 |.. S,0:. S.1,75.| 00000D70: 86 15 6A 04 97 20 53 AA 31 34 2C 31 3A 97 20 53 |..j.. S.14,1:. S| 00000D80: AA 31 35 2C 37 35 00 9C 15 6F 04 97 20 53 AA 34 |.15,75...o.. S.4| 00000D90: 2C 33 32 3A 97 53 AA 31 38 2C 31 38 00 AC 15 74 |,32:.S.18,18...t| 00000DA0: 04 81 20 51 B2 31 A4 31 35 30 3A 82 00 C3 15 7E |.. Q.1.150:....~| 00000DB0: 04 97 20 53 AA 31 2C 30 3A 97 20 53 AA 31 35 2C |.. S.1,0:. S.15,| 00000DC0: 30 3A 8E 00 DC 15 88 04 81 20 51 B2 53 20 A4 20 |0:....... Q.S . | 00000DD0: 53 AA 32 32 3A 97 20 51 2C 30 3A 82 00 F3 15 92 |S.22:. Q,0:.....| 00000DE0: 04 97 20 53 AA 35 2C 31 35 3A 97 20 53 AA 31 32 |.. S.5,15:. S.12| 00000DF0: 2C 31 35 00 07 16 97 04 97 20 53 AA 33 2C 34 3A |,15...... S.3,4:| 00000E00: 97 33 AA 31 30 2C 34 00 14 16 9C 04 97 20 53 AA |.3.10,4...... S.| 00000E10: 32 34 2C 36 00 2A 16 A6 04 97 20 53 AA 34 2C 36 |24,6.*.... S.4,6| 00000E20: 35 3A 97 53 AA 31 38 2C 36 35 00 40 16 B0 04 97 |5:.S.18,65.@....| 00000E30: 20 53 AA 31 2C 31 32 3A 97 20 53 AA 38 2C 31 34 | S.1,12:. S.8,14| 00000E40: 00 50 16 BA 04 81 20 51 B2 31 A4 32 35 30 3A 82 |.P.... Q.1.250:.| 00000E50: 00 66 16 C4 04 97 20 53 AA 31 2C 30 3A 97 20 53 |.f.... S.1,0:. S| 00000E60: AA 38 2C 30 3A 8E 00 00 00 |.8,0:.... |
..0.D.X.1:. MAKE X=0 FOR TAPE,OR X=1 TO USE DISK.Q.I.. 53280,12:. 53281,11:.G(14 )...N.T$."... .. BUDGETEER .. ."...S.S.54272:. Q.S . S.23:. Q,0:....X.. A$(11),A(11),B%(11):. .R(X)..(X.100..5).100:. T$"......"..... ."TODAY'S DATE";:.1080:. DD$:.:.230.A... . T$:.". DATE:."D$:.". LAST AMOUNT:$." A.Y....190:.:. R.1.9:." ."R"..."A$(R)". .$.".B%(R))A(R):.... .." .10.."A$(10)". .$.".B%(10))A(10):..O...." .11.."A$(11) "..$.".B%(11))A(11):.:....... R.1.11...H .. .(A(R))..1 . B%(R).32.C(D(.(.(A(R)))) ).$.R.. .(A(R)).1 . B%(R).31.,....:..C.. .. R.1.11:. A$(R):..L...."HOUSING....... .","UTILITIES......"......"INSURANCE.... ..","SERVICE CHARGES"......"CREDIT CARDS ...".U...."VACATION.......","MEDICAL.... ...."......"BOOKS&MAGAZINES","STORE CHAR GES..".'...."MISCELLANEOUS..","TOTAL BAL ANCE..".1....1050.Z.... X . .1,8,2,"0:CH BKFILE,READ":. 350...".."INSERT DATA CAS SETTE AND REWIND TO READ BALANCES....,.. :."READY?...PRESS Y.A.6.. A$:. A$."" .31 0.R.@.. A$."N" . ....J.. A$.."Y" .290... T..1,1,0,"CHBKFILE"...^.. R.1.11:.1,A(R) :.:.1,D$: 1.$.H..140.>.R..".TRANSACTION? Y/N".H.W..1080.^.|.. A$:. A$."" .380.P .... A$."Y" .450...... A$."N" .740...... 1160:. R.1.3.D...."...................". 14)" ":. M.1.300:......."............. ......".14)"Y/N":. M.1.300:.......:.380. ..B.T.T.1:. T.1 . D$.DD$.G.L.."......... ..........MENU: T=ACCT TRANSFER.^.V...6) "C=WRITE CHECK.V.....6)"D=MAKE DEPOSIT.. ....1080...... A$:. A$."".490...... A$." C".590...... A$."D".620.H.... A$."T".650 .Z....1160:. R.1.3......"............... ....".6)" "...&...6)" ":..6)" ":. M.1.30 0:..<.0.."...................".6)"T".\.: ...6)"C":..6)"D":. M.1.300:..G.D..:.490. ..N.."......................"...O.."AMT OF CHECK,ACCT #";:.1080:. A,L.V.X.. L.10 . L.1 . L..(L).0 . .1160:.590...B.A(11) ..R(A(11).A):A(L)..R(A(L).A):.640.$.L..: ."AMT OF DEPOSIT";:.1080:. A.O.V.L.10:A( 11)..R(A(11).A):A(L)..R(A(L).A).F....140 :E.L:F.12:.690......"................... ..."......"AMT,FROM #,TO #";:.1080:. A,A 1,A2.Y.... A1.10 . A1.1 . A1..(A1).0 . . 1160:.650...... A2.10 . A2.1 . A2..(A2). 0 . .1160:.650.....A(A1)..R(A(A1).A):A(A 2)..R(A(A2).A).A....140:E.A1:F.A2.N.... E.6 . .".".255).198).E.40.255)"*":.710.. ....".".198).E.40)"*"...F.. F.6 . .".".2 55).198).F.40.255)"*":.730.I.P..".".198) .F.40)"*"...Z.. M.1.750:.:."............ ......":.370...... T.0 .870.....Z.0:. R. 1.10:Z.Z.A(R):..:.... .(Z.A(11))...01 .9 40.L.... 140:."SUM OF ACCOUNTS=TOTAL BAL ANCE":. 1000...... X . .1,8,2,"@0:CHBKFI LE,WRITE":.840......:."READY?...PRESS Y. D. .. A$:. A$."".800.V.*.. A$."N" .880.. .4.. A$.."Y" .780...>..1,1,1,"CHBKFILE". #.H.R$.G(13):. R.1.11:.1,A(R);R$;:..4.R. .1,D$;R$;: 1.^.W.. T$:."DATE:"D$:."HAD"T " TRANS.":.150.V.\.."NEW FILE DONE.":... .F..140:."NO TRANSACTIONS.":."FILE NOT C HANGED.":..M.P..140:."BALANCES HAVE CHAN GED."...Z.."WRITE NEW FILE?"...... A$:. A$."" .900...... A$."N" . ....... A$.."Y " .880.'....360.U....140:."ERROR - NO BA LANCE.":."ACCT SUM="Z.O...."CHBK BALANCE ="A(11)......"DO YOU WISH TO CONTINUE?". ..... A$:. A$."" .960...J.. A$."N" ...H. T.. A$.."Y" .940.Q....360......"INSERT D ATA DISK OR TAPE"......"PRESSING 'STOP' WILL ABORT SESSION".>...." (TRANSACTIONS WILL BE LOST).D...." ANY OTHER KEY WILL SAVE DATA.".N....1080...... A$:. A$."" .1010............"INSERT DATA DISK OR TA PE".N...."PRESS ANY KEY TO LOAD DATA.".X ."..1080...$.. A$:. A$."" .1060......... 8.. Q.S . S.22:. Q,0:..#.B.. S.5,0:. S.1 9,0.8.G.. S.6,7:. S.20,7.F.L.. S.24,15.\ .V.. S.4,33:.S.18,19.O.`.. S,0:. S.1,75. ..J.. S.14,1:. S.15,75...O.. S.4,32:.S.1 8,18...T.. Q.1.150:..C.~.. S.1,0:. S.15, 0:....... Q.S . S.22:. Q,0:....... S.5,1 5:. S.12,15...... S.3,4:.3.10,4...... S. 24,6.*.... S.4,65:.S.18,65.@.... S.1,12: . S.8,14.P.... Q.1.250:..F.D.. S.1,0:. S .8,0:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL