DISK CHECK BOOK
FILE INFORMATION
FILENAME(S): DISK CHECK BOOK
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-11-30 19:47:23
APPEARS ON: 1 disk(s)
FILE HASH
a50562a1c7da97f1b608483148e080143afaf10f0d984387efa733ba126d5c73
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HJ LPEDISK A6 1 | DISK CHECK BOOK | PRG | Curtcool, Frank | 23 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 70 00 8F 20 64 7C 42 4F 4F 4B 00 1D |....p.. d|BOOK..| 00000010: 08 78 00 9C 3A 99 20 C7 28 31 34 37 29 00 39 08 |.x..:. .(147).9.| 00000020: 82 00 99 22 20 20 20 2A 2A 20 43 48 45 43 4B 42 |..." ** CHECKB| 00000030: 4F 4F 4B 20 2A 2A 22 3A 99 00 43 08 96 00 4D 43 |OOK **":..C...MC| 00000040: B2 31 30 00 4F 08 A0 00 86 20 43 28 4D 43 29 00 |.10.O.... C(MC).| 00000050: 69 08 B4 00 45 24 B2 22 45 52 52 4F 52 2E 20 52 |i...E$."ERROR. R| 00000060: 45 2D 45 4E 54 45 52 2E 22 00 88 08 BE 00 99 22 |E-ENTER."......"| 00000070: 46 49 53 54 2E 20 42 45 20 53 55 52 45 20 59 4F |FIST. BE SURE YO| 00000080: 55 52 20 42 41 4E 4B 22 00 AC 08 C8 00 99 22 53 |UR BANK"......"S| 00000090: 54 41 54 45 4D 45 4E 54 20 41 4E 44 20 43 48 45 |TATEMENT AND CHE| 000000A0: 43 4B 42 4F 4F 4B 20 53 48 4F 57 22 00 D3 08 D2 |CKBOOK SHOW"....| 000000B0: 00 99 22 54 48 45 20 53 41 4D 45 20 46 49 47 55 |.."THE SAME FIGU| 000000C0: 52 45 53 20 46 4F 52 20 45 41 43 48 20 43 48 45 |RES FOR EACH CHE| 000000D0: 43 4B 22 00 F4 08 DC 00 99 22 41 4E 44 20 44 45 |CK"......"AND DE| 000000E0: 50 4F 53 49 54 20 4C 49 53 54 45 44 20 4F 4E 20 |POSIT LISTED ON | 000000F0: 54 48 45 22 00 08 09 E6 00 99 22 53 54 41 54 45 |THE"......"STATE| 00000100: 4D 45 4E 54 2E 22 3A 99 00 2F 09 18 01 99 22 57 |MENT.":../...."W| 00000110: 48 41 54 27 53 20 54 48 45 20 45 4E 44 49 4E 47 |HAT'S THE ENDING| 00000120: 20 42 41 4C 41 4E 43 45 20 53 48 4F 57 4E 22 00 | BALANCE SHOWN".| 00000130: 4E 09 22 01 99 22 4F 4E 20 54 48 45 20 53 54 41 |N.".."ON THE STA| 00000140: 54 45 4D 45 4E 54 20 3F 22 3A 85 20 53 42 00 74 |TEMENT ?":. SB.t| 00000150: 09 2C 01 99 22 4E 4F 57 20 46 49 4E 44 20 54 48 |.,.."NOW FIND TH| 00000160: 45 20 4D 4F 53 54 20 52 45 43 45 4E 54 20 43 48 |E MOST RECENT CH| 00000170: 45 43 4B 22 00 95 09 36 01 99 22 54 48 41 54 20 |ECK"...6.."THAT | 00000180: 57 41 53 20 4F 4E 20 54 48 45 20 53 54 41 54 4D |WAS ON THE STATM| 00000190: 45 4E 54 2E 22 00 BD 09 4A 01 99 22 57 48 41 54 |ENT."...J.."WHAT| 000001A0: 20 49 53 20 54 48 45 20 43 48 45 43 4B 20 4E 55 | IS THE CHECK NU| 000001B0: 4D 42 45 52 20 4F 46 20 49 54 20 3F 22 00 C6 09 |MBER OF IT ?"...| 000001C0: 54 01 85 20 4C 43 00 DD 09 5E 01 4C 24 B2 22 4E |T.. LC...^.L$."N| 000001D0: 4F 20 4D 4F 52 45 20 52 4F 4F 4D 2E 22 00 E3 09 |O MORE ROOM."...| 000001E0: 7C 01 99 00 08 0A 86 01 99 22 57 48 41 54 20 42 ||........"WHAT B| 000001F0: 41 4C 41 4E 43 45 20 49 53 20 53 48 4F 57 4E 20 |ALANCE IS SHOWN | 00000200: 49 4E 20 59 4F 55 52 22 00 2C 0A 90 01 99 22 43 |IN YOUR".,...."C| 00000210: 48 45 43 4B 42 4F 4F 4B 20 41 46 54 45 52 20 43 |HECKBOOK AFTER C| 00000220: 48 45 43 4B 20 4E 4F 2E 22 3B 4C 43 00 37 0A 9A |HECK NO.";LC.7..| 00000230: 01 85 20 43 42 3A 99 00 5E 0A AE 01 99 22 45 4E |.. CB:..^...."EN| 00000240: 54 45 52 20 54 48 45 20 41 4D 4F 55 4E 54 20 4F |TER THE AMOUNT O| 00000250: 46 20 41 4E 59 20 44 45 50 4F 53 49 54 22 00 83 |F ANY DEPOSIT"..| 00000260: 0A B8 01 99 22 53 48 4F 57 4E 20 49 4E 20 59 4F |...."SHOWN IN YO| 00000270: 55 52 20 43 48 45 43 4B 42 4F 4F 4B 20 50 52 49 |UR CHECKBOOK PRI| 00000280: 4F 52 22 00 A4 0A C2 01 99 22 54 4F 20 43 48 45 |OR"......"TO CHE| 00000290: 43 4B 22 3B 4C 43 3B 22 54 48 41 54 20 49 53 20 |CK";LC;"THAT IS | 000002A0: 4E 4F 54 22 00 BD 0A CC 01 99 22 4F 4E 20 54 48 |NOT"......"ON TH| 000002B0: 45 20 53 54 41 54 45 4D 45 4E 54 2E 22 00 E1 0A |E STATEMENT."...| 000002C0: D6 01 41 24 B2 22 45 4E 54 45 52 20 27 45 4E 44 |..A$."ENTER 'END| 000002D0: 27 20 57 48 45 4E 20 44 4F 4E 45 22 3A 99 20 41 |' WHEN DONE":. A| 000002E0: 24 00 FB 0A E0 01 85 20 52 24 3A 8B 20 52 24 B2 |$...... R$:. R$.| 000002F0: 22 45 4E 44 22 20 A7 20 35 34 30 00 10 0B F4 01 |"END" . 540.....| 00000300: 8B 20 C5 28 52 24 29 20 B1 30 20 A7 20 35 32 30 |. .(R$) .0 . 520| 00000310: 00 1F 0B FE 01 99 20 45 24 3A 89 20 34 37 30 00 |...... E$:. 470.| 00000320: 37 0B 08 02 4E 44 B2 4E 44 AA 31 3A 54 44 B2 54 |7...ND.ND.1:TD.T| 00000330: 44 AA C5 28 52 24 29 00 41 0B 12 02 89 20 34 38 |D..(R$).A.... 48| 00000340: 30 00 55 0B 1C 02 99 22 54 4F 54 41 4C 20 3D 22 |0.U...."TOTAL ="| 00000350: 3B 54 44 3A 99 00 79 0B 26 02 99 22 4E 4F 57 20 |;TD:..y.&.."NOW | 00000360: 45 4E 54 45 52 20 54 48 45 20 41 4D 4F 55 4E 54 |ENTER THE AMOUNT| 00000370: 53 20 4F 46 20 41 4E 59 22 00 9E 0B 30 02 99 22 |S OF ANY"...0.."| 00000380: 43 48 45 43 4B 53 20 49 4E 20 54 48 45 20 43 48 |CHECKS IN THE CH| 00000390: 45 43 4B 42 4F 4F 4B 20 50 52 49 4F 52 22 00 C1 |ECKBOOK PRIOR"..| 000003A0: 0B 3A 02 99 22 54 4F 20 43 48 45 43 4B 22 3B 4C |.:.."TO CHECK";L| 000003B0: 43 3B 22 54 48 41 54 20 48 41 56 45 20 4E 4F 54 |C;"THAT HAVE NOT| 000003C0: 22 00 E7 0B 44 02 99 22 59 45 54 20 42 45 45 4E |"...D.."YET BEEN| 000003D0: 20 53 48 4F 57 4E 20 4F 4E 20 41 20 53 54 41 54 | SHOWN ON A STAT| 000003E0: 45 4D 45 4E 54 2E 22 00 F0 0B 58 02 99 20 41 24 |EMENT."...X.. A$| 000003F0: 00 F9 0B 62 02 85 20 41 24 00 0E 0C 6C 02 8B 20 |...b.. A$...l.. | 00000400: 52 24 B2 22 45 4E 44 22 20 A7 20 36 39 30 00 23 |R$."END" . 690.#| 00000410: 0C 76 02 8B 20 C5 28 52 24 29 20 B1 30 20 A7 20 |.v.. .(R$) .0 . | 00000420: 36 36 30 00 32 0C 80 02 99 20 45 24 3A 89 20 36 |660.2.... E$:. 6| 00000430: 30 30 00 56 0C 94 02 4E 43 B2 4E 43 AA 31 3A 43 |00.V...NC.NC.1:C| 00000440: 28 4E 43 29 B2 C5 28 52 24 29 3A 54 43 B2 54 43 |(NC)..(R$):TC.TC| 00000450: AA 43 28 4E 43 29 00 6A 0C 9E 02 8B 20 4E 43 20 |.C(NC).j.... NC | 00000460: B3 20 4D 43 20 A7 20 36 31 30 00 73 0C A8 02 99 |. MC . 610.s....| 00000470: 20 4C 24 00 87 0C B2 02 99 22 54 4F 54 41 4C 20 | L$......"TOTAL | 00000480: 3D 22 3B 54 43 3A 99 00 AB 0C BC 02 99 22 4E 4F |=";TC:......."NO| 00000490: 57 20 45 4E 54 45 52 20 54 48 45 20 41 4D 4F 55 |W ENTER THE AMOU| 000004A0: 4E 54 53 20 4F 46 20 41 4E 59 22 00 D2 0C C6 02 |NTS OF ANY".....| 000004B0: 99 22 53 45 52 56 49 43 45 20 43 48 41 52 47 45 |."SERVICE CHARGE| 000004C0: 53 20 4F 52 20 44 45 42 49 54 20 4D 45 4D 4F 53 |S OR DEBIT MEMOS| 000004D0: 2E 22 00 DB 0C D0 02 99 20 41 24 00 E4 0C DA 02 |."...... A$.....| 000004E0: 85 20 52 24 00 F9 0C E4 02 8B 20 52 24 B2 22 45 |. R$...... R$."E| 000004F0: 4E 44 22 20 A7 20 37 39 30 00 0E 0D EE 02 8B 20 |ND" . 790...... | 00000500: C5 28 52 24 29 20 B1 30 20 A7 20 37 37 30 00 1D |.(R$) .0 . 770..| 00000510: 0D F8 02 99 20 45 24 3A 89 20 37 32 30 00 35 0D |.... E$:. 720.5.| 00000520: 02 03 4E 53 B2 4E 53 AA 31 3A 54 53 B2 54 53 AA |..NS.NS.1:TS.TS.| 00000530: C5 28 52 24 29 00 3F 0D 0C 03 89 20 37 33 30 00 |.(R$).?.... 730.| 00000540: 53 0D 16 03 99 22 54 4F 54 41 4C 20 3D 22 3B 54 |S...."TOTAL =";T| 00000550: 53 3A 99 00 5E 0D 20 03 8D 20 32 30 30 30 00 7D |S:..^. .. 2000.}| 00000560: 0D 2A 03 57 B2 53 42 AA 54 44 AA 54 53 AB 43 42 |.*.W.SB.TD.TS.CB| 00000570: AB 54 43 AB 54 52 3A 57 B2 B6 28 57 29 00 92 0D |.TC.TR:W..(W)...| 00000580: 2F 03 8B 20 57 20 B1 20 2E 30 30 31 20 A7 20 38 |/.. W . .001 . 8| 00000590: 34 30 00 AD 0D 34 03 57 B2 30 3A 99 22 49 54 20 |40...4.W.0:."IT | 000005A0: 42 41 4C 41 4E 43 45 53 20 21 21 21 22 00 B7 0D |BALANCES !!!"...| 000005B0: 3E 03 89 20 38 35 30 00 DA 0D 48 03 99 22 53 4F |>.. 850...H.."SO| 000005C0: 52 52 59 2C 20 49 54 27 53 20 4F 55 54 20 4F 46 |RRY, IT'S OUT OF| 000005D0: 20 42 41 4C 41 4E 43 45 2E 22 00 F5 0D 52 03 99 | BALANCE."...R..| 000005E0: 22 53 54 41 54 45 4D 45 4E 54 20 42 41 4C 41 4E |"STATEMENT BALAN| 000005F0: 43 45 20 2B 22 00 13 0E 5C 03 99 22 44 45 50 4F |CE +"...\.."DEPO| 00000600: 53 49 54 53 20 4F 55 54 53 54 41 4E 44 49 4E 47 |SITS OUTSTANDING| 00000610: 20 2B 22 00 35 0E 66 03 99 22 53 45 52 56 49 43 | +".5.f.."SERVIC| 00000620: 45 20 43 48 41 52 47 45 53 20 3D 22 3B 53 42 AA |E CHARGES =";SB.| 00000630: 54 44 AA 54 53 00 52 0E 70 03 99 3A 99 22 43 48 |TD.TS.R.p..:."CH| 00000640: 45 43 4B 42 4F 4F 4B 20 42 41 4C 41 4E 43 45 20 |ECKBOOK BALANCE | 00000650: 2B 22 00 6D 0E 7A 03 99 22 43 48 45 4B 53 20 4F |+".m.z.."CHEKS O| 00000660: 55 54 53 54 41 4E 44 49 4E 47 20 2B 22 00 8F 0E |UTSTANDING +"...| 00000670: 84 03 99 22 52 45 43 45 4E 54 20 44 45 50 4F 53 |..."RECENT DEPOS| 00000680: 49 54 53 20 3D 22 3B 43 42 AA 54 43 AA 54 52 00 |ITS =";CB.TC.TR.| 00000690: A7 0E 8E 03 99 3A 99 22 44 49 46 46 45 52 45 4E |.....:."DIFFEREN| 000006A0: 43 45 20 3D 22 3B 57 00 AD 0E 98 03 99 00 B3 0E |CE =";W.........| 000006B0: A2 03 80 00 DA 0E D0 07 99 22 45 4E 54 45 52 20 |........."ENTER | 000006C0: 54 48 45 20 41 4D 4F 55 4E 54 20 4F 46 20 41 4E |THE AMOUNT OF AN| 000006D0: 59 20 44 45 50 4F 53 49 54 22 00 FF 0E DA 07 99 |Y DEPOSIT"......| 000006E0: 22 53 48 4F 57 4E 20 49 4E 20 59 4F 55 52 20 43 |"SHOWN IN YOUR C| 000006F0: 48 45 43 4B 42 4F 4F 4B 20 41 46 54 45 52 22 00 |HECKBOOK AFTER".| 00000700: 22 0F E4 07 99 22 43 48 45 43 4B 20 4E 4F 2E 22 |"...."CHECK NO."| 00000710: 3B 4C 43 3B 22 54 48 41 54 20 49 53 20 41 4C 53 |;LC;"THAT IS ALS| 00000720: 4F 22 00 42 0F EE 07 99 22 4C 49 53 54 45 44 20 |O".B...."LISTED | 00000730: 49 4E 20 54 48 45 20 53 54 41 54 45 4D 45 4E 54 |IN THE STATEMENT| 00000740: 2E 22 00 4B 0F 02 08 99 20 41 24 00 54 0F 0C 08 |.".K.... A$.T...| 00000750: 85 20 52 24 00 6A 0F 16 08 8B 20 52 24 B2 22 45 |. R$.j.... R$."E| 00000760: 4E 44 22 20 A7 20 32 31 33 30 00 80 0F 20 08 8B |ND" . 2130... ..| 00000770: 20 C5 28 52 24 29 20 B1 30 20 A7 20 32 31 30 30 | .(R$) .0 . 2100| 00000780: 00 90 0F 2A 08 99 20 45 24 3A 89 20 32 30 35 30 |...*.. E$:. 2050| 00000790: 00 A8 0F 34 08 4E 52 B2 4E 52 AA 31 3A 54 52 B2 |...4.NR.NR.1:TR.| 000007A0: 54 52 AA C5 28 52 24 29 00 B3 0F 3E 08 89 20 32 |TR..(R$)...>.. 2| 000007B0: 30 36 30 00 C7 0F 52 08 99 22 54 4F 54 41 4C 20 |060...R.."TOTAL | 000007C0: 3D 22 3B 54 52 3A 99 00 CD 0F 5C 08 8E 00 00 F8 |=";TR:....\.....|
....P.. D|BOOK...X..:. G(147).9...." * * CHECKBOOK **":..C...MC.10.O. .. C(MC). I...E$."ERROR. RE-ENTER."......"FIST. BE SURE YOUR BANK"...H.."STATEMENT AND CHE CKBOOK SHOW".S.R.."THE SAME FIGURES FOR EACH CHECK"......"AND DEPOSIT LISTED ON THE"......"STATEMENT.":../...."WHAT'S TH E ENDING BALANCE SHOWN".N.".."ON THE STA TEMENT ?":. SB.T.,.."NOW FIND THE MOST R ECENT CHECK"...6.."THAT WAS ON THE STATM ENT."...J.."WHAT IS THE CHECK NUMBER OF IT ?".F.T.. LC...^.L$."NO MORE ROOM."... |........"WHAT BALANCE IS SHOWN IN YOUR" .,...."CHECKBOOK AFTER CHECK NO.";LC.7.. .. CB:..^...."ENTER THE AMOUNT OF ANY DE POSIT"......"SHOWN IN YOUR CHECKBOOK PRI OR"...B.."TO CHECK";LC;"THAT IS NOT"...L .."ON THE STATEMENT."...V.A$."ENTER 'END ' WHEN DONE":. A$...... R$:. R$."END" . 540...... E(R$) .0 . 520...... E$:. 470. 7...ND.ND.1:TD.TD.E(R$).A.... 480.U...." TOTAL =";TD:..Y.&.."NOW ENTER THE AMOUNT S OF ANY"...0.."CHECKS IN THE CHECKBOOK PRIOR".A.:.."TO CHECK";LC;"THAT HAVE NOT "...D.."YET BEEN SHOWN ON A STATEMENT.". ..X.. A$...B.. A$...L.. R$."END" . 690.# .V.. E(R$) .0 . 660.2.... E$:. 600.V...N C.NC.1:C(NC).E(R$):TC.TC.C(NC).J.... NC . MC . 610.S.... L$......"TOTAL =";TC:.. ....."NOW ENTER THE AMOUNTS OF ANY".R.F. ."SERVICE CHARGES OR DEBIT MEMOS."...P.. A$...Z.. R$...... R$."END" . 790...... E(R$) .0 . 770...... E$:. 720.5...NS.NS. 1:TS.TS.E(R$).?.... 730.S...."TOTAL =";T S:..^. .. 2000.}.*.W.SB.TD.TS.CB.TC.TR:W ..(W).../.. W . .001 . 840...4.W.0:."IT BALANCES !!!"...>.. 850.Z.H.."SORRY, IT' S OUT OF BALANCE."...R.."STATEMENT BALAN CE +"...\.."DEPOSITS OUTSTANDING +".5.F. ."SERVICE CHARGES =";SB.TD.TS.R.P..:."CH ECKBOOK BALANCE +".M.Z.."CHEKS OUTSTANDI NG +"......"RECENT DEPOSITS =";CB.TC.TR. .....:."DIFFERENCE =";W.............Z.P. ."ENTER THE AMOUNT OF ANY DEPOSIT"...Z.. "SHOWN IN YOUR CHECKBOOK AFTER"."...."CH ECK NO.";LC;"THAT IS ALSO".B...."LISTED IN THE STATEMENT.".K.... A$.T.... R$.J.. .. R$."END" . 2130... .. E(R$) .0 . 2100 ...*.. E$:. 2050...4.NR.NR.1:TR.TR.E(R$) ...>.. 2060.G.R.."TOTAL =";TR:..M.\.....
> CLICK IMAGE PREVIEW FOR FULL MODAL