Multiple names: CHECKBOOK-80, CHECKBOOK -80
FILE INFORMATION
FILENAME(S):
• CHECKBOOK-80<br>• CHECKBOOK    -80
FILE TYPE(S): PRG
FILE SIZE: 11.1K
FIRST SEEN: 2025-10-20 14:30:08
APPEARS ON: 3 disk(s)
FILE HASH
075320fe7d17714048f416590b2f85246f34c87c7a20d483da9520efe371a24a
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| WOLF S SOFT C001 | CHECKBOOK-80 | PRG | Treasure Chest - Klaus Der Suhler | 6 | 9 | DOWNLOAD FILE |
| WOLF S SOFT C019 | CHECKBOOK -80 | PRG | Treasure Chest - Klaus Der Suhler | 6 | 0 | DOWNLOAD FILE |
| 21 | CHECKBOOK -80 | PRG | Treasure Chest - Plattfuss | 5 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 4F 1C 0A 00 8F 20 2E 2E 2E 2E 2E 2E 2E 2E |..O.... ........|
00000010: 4D 4F 44 49 46 49 45 44 20 46 4F 52 20 43 31 32 |MODIFIED FOR C12|
00000020: 38 20 57 49 54 48 20 38 30 20 43 4F 4C 55 4D 4E |8 WITH 80 COLUMN|
00000030: 20 52 47 42 20 53 43 52 45 45 4E 2E 2E 2E 2E 2E | RGB SCREEN.....|
00000040: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 00 |................|
00000050: 55 1C 14 00 3A 00 A3 1C 1E 00 8F 20 2E 2E 2E 2E |U...:...... ....|
00000060: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 42 59 20 |.............BY |
00000070: 47 45 4E 45 20 45 48 52 49 43 48 20 30 38 30 35 |GENE EHRICH 0805|
00000080: 33 2D 30 32 30 39 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |3-0209..........|
00000090: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
000000A0: 2E 2E 2E 00 F1 1C 28 00 8F 20 2E 2E 2E 2E 2E 2E |......(.. ......|
000000B0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 4F |...............O|
000000C0: 43 54 4F 42 45 52 20 31 30 2C 20 31 39 38 35 2E |CTOBER 10, 1985.|
000000D0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
000000E0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
000000F0: 2E 00 F7 1C 32 00 3A 00 FD 1C 3C 00 8F 00 0B 1D |....2.:...<.....|
00000100: 46 00 FE 25 3A 20 8D 32 38 37 30 00 4B 1D 50 00 |F..%: .2870.K.P.|
00000110: 43 24 B2 C7 28 31 33 29 3A 54 24 B2 22 9F 44 41 |C$..(13):T$.".DA|
00000120: 54 45 20 28 4D 4D 2F 44 44 2F 59 59 29 05 22 3A |TE (MM/DD/YY).":|
00000130: 4C 24 B2 22 9F 41 43 43 4F 55 4E 54 20 42 41 4C |L$.".ACCOUNT BAL|
00000140: 41 4E 43 45 05 22 3A 99 22 90 22 00 9B 1D 5A 00 |ANCE.":."."...Z.|
00000150: 4D B2 B5 28 28 B8 28 31 29 AB 35 30 30 29 AD 34 |M..((.(1).500).4|
00000160: 35 29 3A 86 43 25 28 4D 29 2C 44 24 28 4D 29 2C |5):.C%(M),D$(M),|
00000170: 41 28 4D 29 3A 83 20 4D 41 49 4E 20 4D 45 4E 55 |A(M):. MAIN MENU|
00000180: 2C 4E 45 57 20 41 43 43 4F 55 4E 54 2C 41 43 43 |,NEW ACCOUNT,ACC|
00000190: 4F 55 4E 54 20 55 50 44 41 54 45 00 E8 1D 64 00 |OUNT UPDATE...d.|
000001A0: 83 20 57 4F 52 4B 20 4F 4E 20 41 4E 4F 54 48 45 |. WORK ON ANOTHE|
000001B0: 52 20 41 43 43 4F 55 4E 54 2C 22 22 2C 46 55 4E |R ACCOUNT,"",FUN|
000001C0: 43 54 49 4F 4E 20 4B 45 59 20 4D 45 4E 55 2C 4D |CTION KEY MENU,M|
000001D0: 41 49 4E 20 4D 45 4E 55 2C 42 41 4C 41 4E 43 45 |AIN MENU,BALANCE|
000001E0: 20 41 43 43 4F 55 4E 54 00 2E 1E 6E 00 83 20 45 | ACCOUNT...n.. E|
000001F0: 4E 54 45 52 20 54 52 41 4E 53 41 43 54 49 4F 4E |NTER TRANSACTION|
00000200: 53 2C 43 41 4C 43 55 4C 41 54 4F 52 20 4D 4F 44 |S,CALCULATOR MOD|
00000210: 45 2C 41 43 43 4F 55 4E 54 20 4C 49 53 54 49 4E |E,ACCOUNT LISTIN|
00000220: 47 2C 53 41 56 45 20 41 43 43 4F 55 4E 54 00 7D |G,SAVE ACCOUNT.}|
00000230: 1E 78 00 83 20 46 55 4E 43 54 49 4F 4E 20 4B 45 |.x.. FUNCTION KE|
00000240: 59 20 4D 45 4E 55 2C 22 22 2C 22 91 91 22 2C 45 |Y MENU,"","..",E|
00000250: 4E 54 49 52 45 20 41 43 43 4F 55 4E 54 2C 43 48 |NTIRE ACCOUNT,CH|
00000260: 45 43 4B 53 2C 52 41 4E 47 45 20 4F 46 20 43 48 |ECKS,RANGE OF CH|
00000270: 45 43 4B 53 2C 44 45 50 4F 53 49 54 53 00 CF 1E |ECKS,DEPOSITS...|
00000280: 82 00 83 20 4F 54 48 45 52 20 54 52 41 4E 53 41 |... OTHER TRANSA|
00000290: 43 54 49 4F 4E 53 2C 22 22 2C 22 91 91 22 2C 4C |CTIONS,"","..",L|
000002A0: 49 53 54 45 44 2D 4D 41 54 43 48 2C 4C 49 53 54 |ISTED-MATCH,LIST|
000002B0: 45 44 2D 4E 4F 20 4D 41 54 43 48 2C 4E 4F 54 20 |ED-NO MATCH,NOT |
000002C0: 4F 4E 20 53 54 41 54 45 4D 45 4E 54 2C 22 22 00 |ON STATEMENT,"".|
000002D0: 1A 1F 8C 00 83 20 22 91 91 22 2C 43 4F 4E 54 49 |..... "..",CONTI|
000002E0: 4E 55 45 2C 45 44 49 54 2C 44 45 4C 45 54 45 2C |NUE,EDIT,DELETE,|
000002F0: 22 22 2C 54 52 41 4E 53 41 43 54 49 4F 4E 20 54 |"",TRANSACTION T|
00000300: 59 50 45 2C 43 48 45 43 4B 2C 44 45 50 4F 53 49 |YPE,CHECK,DEPOSI|
00000310: 54 2C 4F 54 48 45 52 2C 22 22 00 61 1F 96 00 83 |T,OTHER,"".a....|
00000320: 20 22 44 49 53 50 4C 41 59 20 4F 50 54 49 4F 4E | "DISPLAY OPTION|
00000330: 53 22 2C 46 55 4C 4C 20 53 43 52 45 45 4E 2C 49 |S",FULL SCREEN,I|
00000340: 54 45 4D 20 42 59 20 49 54 45 4D 2C 4C 49 53 54 |TEM BY ITEM,LIST|
00000350: 49 4E 47 20 54 4F 20 50 52 49 4E 54 45 52 2C 22 |ING TO PRINTER,"|
00000360: 22 00 6B 1F A0 00 8D 33 31 32 30 00 71 1F AA 00 |".k....3120.q...|
00000370: 8F 00 BE 1F B4 00 99 22 93 11 11 9F 45 4E 54 45 |......."....ENTE|
00000380: 52 20 47 45 4E 45 52 41 4C 20 41 43 43 4F 55 4E |R GENERAL ACCOUN|
00000390: 54 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 2E 11 22 |T INFORMATION.."|
000003A0: 43 24 22 42 41 4E 4B 20 4E 41 4D 45 05 22 43 24 |C$"BANK NAME."C$|
000003B0: 22 3F 22 3B 3A 49 B2 30 3A 8D 32 34 34 30 00 FA |"?";:I.0:.2440..|
000003C0: 1F BE 00 50 24 B2 C8 28 42 24 2C 32 30 29 3A 99 |...P$..(B$,20):.|
000003D0: 22 9F 11 41 43 43 4F 55 4E 54 20 23 05 22 43 24 |"..ACCOUNT #."C$|
000003E0: 22 3F 22 3B 3A 49 B2 31 3A 8D 32 34 34 30 3A 4D |"?";:I.1:.2440:M|
000003F0: 24 B2 C8 28 42 24 2C 31 35 29 00 38 20 C8 00 99 |$..(B$,15).8 ...|
00000400: 22 11 22 54 24 3B 43 24 22 3F 22 3B 3A 49 B2 32 |"."T$;C$"?";:I.2|
00000410: 3A 8D 32 34 34 30 3A 8D 32 31 39 30 3A 48 24 B2 |:.2440:.2190:H$.|
00000420: 42 24 3A 8B 42 24 B2 22 22 A7 52 B2 33 3A 8D 32 |B$:.B$."".R.3:.2|
00000430: 32 32 30 3A 89 32 30 30 00 64 20 D2 00 49 B2 31 |220:.200.d ..I.1|
00000440: 3A 54 25 B2 31 3A 8D 31 39 34 30 3A 91 54 25 89 |:T%.1:.1940:.T%.|
00000450: 32 31 30 2C 39 30 30 2C 32 32 30 2C 31 37 30 3A |210,900,220,170:|
00000460: 89 33 35 30 00 AA 20 DC 00 99 22 9F 93 50 55 54 |.350.. ..."..PUT|
00000470: 20 41 43 43 4F 55 4E 54 20 44 41 54 41 20 44 49 | ACCOUNT DATA DI|
00000480: 53 4B 20 49 4E 20 44 52 49 56 45 2E 20 57 48 45 |SK IN DRIVE. WHE|
00000490: 4E 20 52 45 41 44 59 2C 20 50 52 45 53 53 20 27 |N READY, PRESS '|
000004A0: 52 45 54 55 52 4E 27 2E 05 22 00 C2 20 E6 00 53 |RETURN'..".. ..S|
000004B0: B2 30 3A 8D 32 30 30 30 3A 8B 54 25 B1 31 A7 33 |.0:.2000:.T%.1.3|
000004C0: 35 30 00 D5 20 F0 00 9F 31 2C 38 2C 31 35 2C 22 |50.. ...1,8,15,"|
000004D0: 49 22 3A A0 31 00 05 21 FA 00 9F 31 35 2C 38 2C |I":.1..!...15,8,|
000004E0: 31 35 3A 42 24 B2 C8 28 50 24 2C 33 29 AA C9 28 |15:B$..(P$,3)..(|
000004F0: 4D 24 2C 34 29 3A 9F 32 2C 38 2C 32 2C 42 24 3A |M$,4):.2,8,2,B$:|
00000500: 84 31 35 2C 45 00 41 21 04 01 8B 45 B3 B1 30 A7 |.15,E.A!...E..0.|
00000510: 99 22 1C 11 41 43 43 4F 55 4E 54 20 4E 4F 54 20 |."..ACCOUNT NOT |
00000520: 46 4F 55 4E 44 2E 05 22 3A 81 54 B2 31 A4 33 30 |FOUND..":.T.1.30|
00000530: 30 30 3A 82 54 3A A0 31 35 3A A0 32 3A 89 32 31 |00:.T:.15:.2:.21|
00000540: 30 00 71 21 0E 01 84 32 2C 50 24 2C 4D 24 3A 84 |0.q!...2,P$,M$:.|
00000550: 32 2C 4E 24 2C 55 24 3A 84 32 2C 4E 3A 84 32 2C |2,N$,U$:.2,N:.2,|
00000560: 42 3A 81 51 B2 31 A4 4E 3A 84 32 2C 43 25 28 51 |B:.Q.1.N:.2,C%(Q|
00000570: 29 00 90 21 18 01 84 32 2C 44 24 28 51 29 3A 84 |)..!...2,D$(Q):.|
00000580: 32 2C 41 28 51 29 3A 82 51 3A A0 32 3A A0 31 35 |2,A(Q):.Q:.2:.15|
00000590: 00 C5 21 22 01 99 22 93 22 50 24 3B 43 24 3B 4D |..!".."."P$;C$;M|
000005A0: 24 3B 43 24 22 9F 11 41 43 43 4F 55 4E 54 20 4C |$;C$"..ACCOUNT L|
000005B0: 41 53 54 20 42 41 4C 41 4E 43 45 44 20 4F 4E 20 |AST BALANCED ON |
000005C0: 05 22 3B 4E 24 00 F6 21 2C 01 99 22 9F 11 46 49 |.";N$..!,.."..FI|
000005D0: 4C 45 20 4C 41 53 54 20 55 50 44 41 54 45 44 20 |LE LAST UPDATED |
000005E0: 4F 4E 20 05 22 3B 55 24 3A 8D 32 31 35 30 3A 99 |ON .";U$:.2150:.|
000005F0: 22 11 22 4C 24 3B 00 40 22 36 01 99 43 24 22 24 |"."L$;.@"6..C$"$|
00000600: 22 42 24 3B 43 24 22 9F 11 50 52 45 53 53 20 27 |"B$;C$"..PRESS '|
00000610: 52 45 54 55 52 4E 27 20 54 4F 20 43 4F 4E 54 49 |RETURN' TO CONTI|
00000620: 4E 55 45 22 3A 50 24 B2 C8 28 50 24 2C 32 30 29 |NUE":P$..(P$,20)|
00000630: 3A 4D 24 B2 C8 28 4D 24 2C 31 35 29 3A 53 B2 30 |:M$..(M$,15):S.0|
00000640: 00 54 22 40 01 8D 32 30 30 30 3A 8B 54 25 B1 31 |.T"@..2000:.T%.1|
00000650: A7 33 35 30 00 67 22 4A 01 49 B2 32 3A 54 25 B2 |.350.g"J.I.2:T%.|
00000660: 36 3A 8D 31 39 34 30 00 7D 22 54 01 8B 54 25 B3 |6:.1940.}"T..T%.|
00000670: 31 30 A7 8D 32 30 30 30 3A 89 33 34 30 00 AF 22 |10..2000:.340.."|
00000680: 5E 01 91 54 25 AB 31 33 32 89 33 33 30 2C 32 31 |^..T%.132.330,21|
00000690: 30 2C 33 36 30 2C 36 36 30 2C 33 33 30 2C 39 34 |0,360,660,330,94|
000006A0: 30 2C 32 37 32 30 2C 36 30 30 3A 89 33 33 30 00 |0,2720,600:.330.|
000006B0: D2 22 68 01 52 B2 4E AB 31 30 3A 8B 52 B3 31 A7 |."h.R.N.10:.R.1.|
000006C0: 52 B2 31 3A 8B 4E B2 30 A7 99 22 93 22 3A 89 33 |R.1:.N.0..".":.3|
000006D0: 39 30 00 0B 23 72 01 8B 4E B2 4D A7 99 22 1C 93 |90..#r..N.M.."..|
000006E0: 11 11 11 11 11 11 11 11 11 11 11 4D 45 4D 4F 52 |...........MEMOR|
000006F0: 59 20 46 55 4C 4C 2E 05 22 3A 81 54 B2 31 A4 31 |Y FULL..":.T.1.1|
00000700: 35 30 30 3A 82 54 3A 89 33 33 30 00 37 23 7C 01 |500:.T:.330.7#|.|
00000710: 99 22 93 4C 41 54 45 53 54 20 45 4E 54 52 49 45 |.".LATEST ENTRIE|
00000720: 53 3A 22 3A 81 51 B2 52 A4 4E 3A 49 B2 31 3A 8D |S:":.Q.R.N:I.1:.|
00000730: 32 30 37 30 3A 82 51 00 69 23 86 01 8D 32 31 35 |2070:.Q.i#...215|
00000740: 30 3A 99 4C 24 3B 43 24 3B 22 24 22 42 24 3B 43 |0:.L$;C$;"$"B$;C|
00000750: 24 22 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |$"..............|
00000760: C3 C3 C3 C3 C3 C3 C3 C3 22 00 A0 23 90 01 49 B2 |........"..#..I.|
00000770: 30 3A 54 25 B2 33 32 3A 8D 31 39 34 30 3A 52 B2 |0:T%.32:.1940:R.|
00000780: 38 3A 8D 32 32 32 30 3A 91 54 25 89 33 33 30 2C |8:.2220:.T%.330,|
00000790: 34 31 30 2C 34 32 30 2C 34 33 30 3A 89 33 35 30 |410,420,430:.350|
000007A0: 00 B9 23 9A 01 99 22 45 4E 54 45 52 20 43 48 45 |..#..."ENTER CHE|
000007B0: 43 4B 11 22 3A 89 34 34 30 00 DF 23 A4 01 99 22 |CK.":.440..#..."|
000007C0: 45 4E 54 45 52 20 44 45 50 4F 53 49 54 11 22 3A |ENTER DEPOSIT.":|
000007D0: 43 25 28 4E AA 31 29 B2 AB 31 3A 89 34 34 30 00 |C%(N.1)..1:.440.|
000007E0: 04 24 AE 01 99 22 45 4E 54 45 52 20 4F 54 48 45 |.$..."ENTER OTHE|
000007F0: 52 20 54 52 41 4E 53 2E 11 22 3A 43 25 28 4E AA |R TRANS..":C%(N.|
00000800: 31 29 B2 30 00 33 24 B8 01 99 54 24 3B 43 24 22 |1).0.3$...T$;C$"|
00000810: 3F 22 3B 3A 49 B2 32 3A 8D 32 34 34 30 3A 8B 42 |?";:I.2:.2440:.B|
00000820: 24 B2 22 22 A7 52 B2 34 3A 8D 32 32 32 30 3A 89 |$."".R.4:.2220:.|
00000830: 34 30 30 00 53 24 C2 01 8D 32 31 39 30 3A 8B 42 |400.S$...2190:.B|
00000840: 24 B2 22 22 A7 52 B2 32 3A 8D 32 32 32 30 3A 89 |$."".R.2:.2220:.|
00000850: 34 34 30 00 71 24 CC 01 4E B2 4E AA 31 3A 44 24 |440.q$..N.N.1:D$|
00000860: 28 4E 29 B2 42 24 3A 8B 54 25 B3 B1 32 A7 35 30 |(N).B$:.T%..2.50|
00000870: 30 00 91 24 D6 01 99 22 43 48 45 43 4B 20 23 22 |0..$..."CHECK #"|
00000880: 3B 43 24 22 3F 22 3B 3A 49 B2 31 3A 8D 32 34 34 |;C$"?";:I.1:.244|
00000890: 30 00 BD 24 E0 01 49 B2 33 45 34 3A 56 B2 31 3A |0..$..I.3E4:V.1:|
000008A0: 8D 32 38 32 30 3A 8B 57 B3 30 A7 52 B2 32 3A 8D |.2820:.W.0.R.2:.|
000008B0: 32 32 32 30 3A 57 B2 30 3A 89 34 37 30 00 CD 24 |2220:W.0:.470..$|
000008C0: EA 01 43 25 28 4E 29 B2 C5 28 42 24 29 00 0B 25 |..C%(N)..(B$)..%|
000008D0: F4 01 99 22 44 45 53 43 52 49 50 54 49 4F 4E 22 |..."DESCRIPTION"|
000008E0: 3B 43 24 22 3F 22 3B 3A 49 B2 30 3A 8D 32 34 34 |;C$"?";:I.0:.244|
000008F0: 30 3A 44 24 28 4E 29 B2 44 24 28 4E 29 AA 22 20 |0:D$(N).D$(N)." |
00000900: 20 22 AA C8 28 42 24 2C 32 35 29 00 43 25 FE 01 | "..(B$,25).C%..|
00000910: 99 22 41 4D 4F 55 4E 54 22 3B 43 24 22 3F 22 3B |."AMOUNT";C$"?";|
00000920: 3A 49 B2 31 3A 8D 32 34 34 30 3A 8D 32 30 34 30 |:I.1:.2440:.2040|
00000930: 3A 49 B2 31 45 34 3A 56 B2 AB 31 45 34 3A 8D 32 |:I.1E4:V..1E4:.2|
00000940: 38 32 30 00 72 25 08 02 8B 57 B3 C3 28 42 24 29 |820.r%...W..(B$)|
00000950: AB 32 B0 28 54 25 B3 B1 34 AF C5 28 42 24 29 B3 |.2.(T%..4..(B$).|
00000960: B2 30 29 A7 52 B2 32 3A 8D 32 32 32 30 3A 89 35 |.0).R.2:.2220:.5|
00000970: 31 30 00 A6 25 12 02 41 28 4E 29 B2 C5 28 42 24 |10..%..A(N)..(B$|
00000980: 29 3A 99 22 9F 49 53 20 45 56 45 52 59 54 48 49 |):.".IS EVERYTHI|
00000990: 4E 47 20 43 4F 52 52 45 43 54 22 43 24 22 28 59 |NG CORRECT"C$"(Y|
000009A0: 2F 4E 29 3F 05 22 00 AF 25 1C 02 A1 F9 41 24 00 |/N)?."..%....A$.|
000009B0: C6 25 26 02 8B 41 24 B2 22 4E 22 A7 4E B2 4E AB |.%&..A$."N".N.N.|
000009C0: 31 3A 89 33 36 30 00 D7 25 30 02 8B 41 24 B3 B1 |1:.360..%0..A$..|
000009D0: 22 59 22 A7 35 34 30 00 EC 25 3A 02 8B 54 25 B2 |"Y".540..%:..T%.|
000009E0: 32 A7 42 B2 42 AB 32 AC 41 28 4E 29 00 02 26 44 |2.B.B.2.A(N)..&D|
000009F0: 02 42 B2 42 AA 41 28 4E 29 3A 8B 4E B2 31 A7 33 |.B.B.A(N):.N.1.3|
00000A00: 36 30 00 20 26 4E 02 91 54 25 AB 31 8D 32 32 33 |60. &N..T%.1.223|
00000A10: 30 2C 32 33 31 30 2C 32 33 31 30 3A 89 33 36 30 |0,2310,2310:.360|
00000A20: 00 66 26 58 02 99 22 9E 93 50 55 54 20 41 43 43 |.f&X.."..PUT ACC|
00000A30: 4F 55 4E 54 20 44 41 54 41 20 44 49 53 4B 20 49 |OUNT DATA DISK I|
00000A40: 4E 20 44 52 49 56 45 2E 20 57 48 45 4E 20 52 45 |N DRIVE. WHEN RE|
00000A50: 41 44 59 2C 20 50 52 45 53 53 20 27 52 45 54 55 |ADY, PRESS 'RETU|
00000A60: 52 4E 27 2E 05 22 00 7E 26 62 02 53 B2 30 3A 8D |RN'..".~&b.S.0:.|
00000A70: 32 30 30 30 3A 8B 54 25 B1 31 A7 33 35 30 00 91 |2000:.T%.1.350..|
00000A80: 26 6C 02 9F 31 2C 38 2C 31 35 2C 22 49 22 3A A0 |&l..1,8,15,"I":.|
00000A90: 31 00 D2 26 76 02 42 24 B2 22 40 30 3A 22 AA C8 |1..&v.B$."@0:"..|
00000AA0: 28 50 24 2C 33 29 AA C9 28 4D 24 2C 34 29 AA 22 |(P$,3)..(M$,4)."|
00000AB0: 2C 53 2C 57 22 3A 55 24 B2 48 24 3A 9F 32 2C 38 |,S,W":U$.H$:.2,8|
00000AC0: 2C 32 2C 42 24 3A 98 32 2C 50 24 2C 22 2C 22 2C |,2,B$:.2,P$,",",|
00000AD0: 4D 24 00 F7 26 80 02 98 32 2C C8 28 4E 24 2C 38 |M$..&...2,.(N$,8|
00000AE0: 29 2C 22 2C 22 2C C8 28 55 24 2C 38 29 3A 98 32 |),",",.(U$,8):.2|
00000AF0: 2C 4E 3A 98 32 2C 42 00 27 27 8A 02 81 54 B2 31 |,N:.2,B.''...T.1|
00000B00: A4 4E 3A 98 32 2C 43 25 28 54 29 3A 98 32 2C 44 |.N:.2,C%(T):.2,D|
00000B10: 24 28 54 29 3A 98 32 2C 41 28 54 29 3A 82 54 3A |$(T):.2,A(T):.T:|
00000B20: A0 32 3A 89 33 33 30 00 35 27 94 02 8B 4E B2 30 |.2:.330.5'...N.0|
00000B30: A7 32 38 31 30 00 3B 27 9E 02 3A 00 81 27 A8 02 |.2810.;'..:..'..|
00000B40: 99 22 93 22 50 24 3B 43 24 3B 22 41 43 43 23 20 |."."P$;C$;"ACC# |
00000B50: 22 4D 24 3B 43 24 22 C5 C5 C5 C5 C5 C5 C5 C5 C5 |"M$;C$".........|
00000B60: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 3A 8D |.............":.|
00000B70: 32 31 35 30 3A 99 4C 24 3B 43 24 3B 22 24 22 42 |2150:.L$;C$;"$"B|
00000B80: 24 00 C3 27 B2 02 49 B2 30 3A 99 A3 32 29 3B 22 |$..'..I.0:..2);"|
00000B90: 11 12 A9 41 43 43 4F 55 4E 54 20 4C 49 53 54 49 |...ACCOUNT LISTI|
00000BA0: 4E 47 DF 11 22 3A 54 25 B2 31 35 3A 8D 31 39 34 |NG..":T%.15:.194|
00000BB0: 30 3A 45 25 B2 54 25 AB 31 3A 8B 54 25 B3 32 A7 |0:E%.T%.1:.T%.2.|
00000BC0: 33 33 30 00 D1 27 BC 02 8B 54 25 B1 39 A7 33 35 |330..'...T%.9.35|
00000BD0: 30 00 0D 28 C6 02 99 22 91 22 3B A3 38 29 3B 45 |0..(...".";.8);E|
00000BE0: 25 22 11 22 3A 54 25 B2 33 37 3A 49 B2 30 3A 8D |%".":T%.37:I.0:.|
00000BF0: 31 39 34 30 3A 91 54 25 89 36 38 30 2C 37 32 30 |1940:.T%.680,720|
00000C00: 2C 37 32 30 2C 37 32 30 3A 89 33 35 30 00 22 28 |,720,720:.350."(|
00000C10: D0 02 50 25 B2 54 25 3A 8B 50 25 B3 B1 34 A7 37 |..P%.T%:.P%..4.7|
00000C20: 34 30 00 5B 28 DA 02 9F 34 2C 34 3A 98 34 2C 22 |40.[(...4,4:.4,"|
00000C30: 41 43 43 4F 55 4E 54 20 4C 49 53 54 49 4E 47 22 |ACCOUNT LISTING"|
00000C40: 2C 43 24 2C 43 24 2C 50 24 2C 43 24 2C 4D 24 2C |,C$,C$,P$,C$,M$,|
00000C50: 43 24 2C 48 24 2C 43 24 2C 43 24 00 84 28 E4 02 |C$,H$,C$,C$..(..|
00000C60: 99 22 93 22 3A 58 B2 30 3A 51 B2 30 3A 91 45 25 |.".":X.0:Q.0:.E%|
00000C70: 89 37 38 30 2C 37 38 30 2C 38 35 30 2C 37 38 30 |.780,780,850,780|
00000C80: 2C 37 38 30 00 94 28 EE 02 A0 34 3A 8B 58 B2 30 |,780..(...4:.X.0|
00000C90: A7 36 36 30 00 A8 28 F8 02 8D 31 35 36 30 3A 8B |.660..(...1560:.|
00000CA0: 45 25 B2 39 A7 33 35 30 00 B1 28 02 03 89 38 33 |E%.9.350..(...83|
00000CB0: 30 00 C6 28 0C 03 51 B2 51 AA 31 3A 8B 45 25 B2 |0..(..Q.Q.1:.E%.|
00000CC0: 31 A7 31 34 37 30 00 DD 28 16 03 8B 45 25 B2 32 |1.1470..(...E%.2|
00000CD0: AF 43 25 28 51 29 B1 30 A7 31 34 37 30 00 FE 28 |.C%(Q).0.1470..(|
00000CE0: 20 03 8B 45 25 B2 33 AF 43 25 28 51 29 B3 B2 4A | ..E%.3.C%(Q)..J|
00000CF0: AF 43 25 28 51 29 B1 B2 4B A7 31 34 37 30 00 15 |.C%(Q)..K.1470..|
00000D00: 29 2A 03 8B 45 25 B2 34 AF 43 25 28 51 29 B3 30 |)*..E%.4.C%(Q).0|
00000D10: A7 31 34 37 30 00 2C 29 34 03 8B 45 25 B2 35 AF |.1470.,)4..E%.5.|
00000D20: 43 25 28 51 29 B2 30 A7 31 34 37 30 00 39 29 3E |C%(Q).0.1470.9)>|
00000D30: 03 8B 51 B3 4E A7 37 38 30 00 42 29 48 03 89 37 |..Q.N.780.B)H..7|
00000D40: 35 30 00 6F 29 52 03 99 22 9E 46 52 4F 4D 20 43 |50.o)R..".FROM C|
00000D50: 48 45 43 4B 20 23 3A 05 22 3B 3A 49 B2 31 3A 8D |HECK #:.";:I.1:.|
00000D60: 32 34 34 30 3A 8B 42 24 B2 22 22 A7 36 38 30 00 |2440:.B$."".680.|
00000D70: 94 29 5C 03 4B B2 C5 28 42 24 29 3A 49 B2 33 45 |.)\.K..(B$):I.3E|
00000D80: 34 3A 56 B2 31 3A 8D 32 38 32 30 3A 8B 57 B3 31 |4:V.1:.2820:.W.1|
00000D90: A7 37 34 30 00 C0 29 66 03 99 22 9E 11 54 4F 20 |.740..)f.."..TO |
00000DA0: 43 48 45 43 4B 20 23 3A 05 22 3B 3A 49 B2 31 3A |CHECK #:.";:I.1:|
00000DB0: 8D 32 34 34 30 3A 8B 42 24 B2 22 22 A7 37 34 30 |.2440:.B$."".740|
00000DC0: 00 F0 29 70 03 4A B2 C5 28 42 24 29 3A 49 B2 33 |..)p.J..(B$):I.3|
00000DD0: 45 34 3A 56 B2 31 3A 8D 32 38 32 30 3A 8B 57 B3 |E4:V.1:.2820:.W.|
00000DE0: 31 A7 52 B2 31 3A 8D 32 32 32 30 3A 89 38 37 30 |1.R.1:.2220:.870|
00000DF0: 00 FE 29 7A 03 99 22 93 22 3A 89 37 38 30 00 3A |..)z..".":.780.:|
00000E00: 2A 84 03 99 22 9F 93 45 4E 54 45 52 20 42 41 4C |*..."..ENTER BAL|
00000E10: 41 4E 43 45 20 53 48 4F 57 4E 20 4F 4E 20 4C 41 |ANCE SHOWN ON LA|
00000E20: 53 54 20 42 41 4C 41 4E 43 45 44 20 53 54 41 54 |ST BALANCED STAT|
00000E30: 45 4D 45 4E 54 20 3F 05 22 3B 00 61 2A 8E 03 49 |EMENT ?.";.a*..I|
00000E40: B2 31 3A 8D 32 34 34 30 3A 8D 32 30 34 30 3A 49 |.1:.2440:.2040:I|
00000E50: B2 31 45 35 3A 56 B2 AB 31 45 35 3A 8D 32 38 32 |.1E5:V..1E5:.282|
00000E60: 30 00 85 2A 98 03 8B 57 B3 C3 28 42 24 29 AB 32 |0..*...W..(B$).2|
00000E70: A7 52 B2 31 3A 8D 32 32 32 30 3A 99 22 3F 22 3B |.R.1:.2220:."?";|
00000E80: 3A 89 39 31 30 00 9A 2A A2 03 42 B2 C5 28 42 24 |:.910..*..B..(B$|
00000E90: 29 3A 4E B2 30 3A 89 33 33 30 00 A8 2A AC 03 8B |):N.0:.330..*...|
00000EA0: 4E B2 30 A7 32 38 31 30 00 E7 2A B6 03 99 22 93 |N.0.2810..*...".|
00000EB0: 22 50 24 3B 43 24 22 41 43 43 23 20 22 4D 24 3B |"P$;C$"ACC# "M$;|
00000EC0: 43 24 22 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |C$".............|
00000ED0: C5 C5 C5 C5 C5 C5 C5 C5 C5 11 20 12 A9 41 43 43 |.......... ..ACC|
00000EE0: 4F 55 4E 54 20 22 3B 00 34 2B C0 03 99 22 9E 42 |OUNT ";.4+...".B|
00000EF0: 41 4C 41 4E 43 49 4E 47 DF 11 11 22 43 24 22 9F |ALANCING..."C$".|
00000F00: 43 4F 4D 50 41 52 45 20 54 48 45 20 45 4E 54 52 |COMPARE THE ENTR|
00000F10: 59 20 4F 4E 20 54 48 45 20 53 43 52 45 45 4E 20 |Y ON THE SCREEN |
00000F20: 54 4F 20 54 48 45 20 53 54 41 54 45 4D 45 4E 54 |TO THE STATEMENT|
00000F30: 2E 05 11 22 00 54 2B CA 03 81 51 B2 31 A4 4E 3A |...".T+...Q.1.N:|
00000F40: 8B C9 28 44 24 28 51 29 2C 31 29 B2 22 2A 22 A7 |..(D$(Q),1)."*".|
00000F50: 31 30 31 30 00 7C 2B D4 03 49 B2 30 3A 8D 32 30 |1010.|+..I.0:.20|
00000F60: 37 30 3A 54 25 B2 32 32 3A 49 B2 30 3A 8D 31 39 |70:T%.22:I.0:.19|
00000F70: 34 30 3A 52 B2 35 3A 8D 32 32 32 30 00 A4 2B DE |40:R.5:.2220..+.|
00000F80: 03 91 54 25 89 31 30 30 30 2C 31 30 32 30 2C 31 |..T%.1000,1020,1|
00000F90: 30 33 30 2C 31 30 31 30 3A 51 B2 4E 3A 82 51 3A |030,1010:Q.N:.Q:|
00000FA0: 89 33 35 30 00 B4 2B E8 03 51 B2 4E 3A 82 51 3A |.350..+..Q.N:.Q:|
00000FB0: 89 33 33 30 00 C1 2B F2 03 82 51 3A 89 31 30 34 |.330..+...Q:.104|
00000FC0: 30 00 DB 2B FC 03 44 24 28 51 29 B2 44 24 28 51 |0..+..D$(Q).D$(Q|
00000FD0: 29 AA 22 2A 22 3A 89 31 30 31 30 00 FC 2B 06 04 |)."*":.1010..+..|
00000FE0: 54 25 B2 51 3A 8D 31 36 37 30 3A 51 B2 54 25 AB |T%.Q:.1670:Q.T%.|
00000FF0: 31 3A 99 22 93 22 3A 89 31 30 31 30 00 39 2C 10 |1:.".":.1010.9,.|
00001000: 04 99 22 9F 49 53 20 45 56 45 52 59 54 48 49 4E |..".IS EVERYTHIN|
00001010: 47 20 4F 4E 20 54 48 45 20 53 54 41 54 45 4D 45 |G ON THE STATEME|
00001020: 4E 54 20 41 43 43 4F 55 4E 54 45 44 20 46 4F 52 |NT ACCOUNTED FOR|
00001030: 20 28 59 2F 4E 29 3F 05 22 00 42 2C 1A 04 A1 F9 | (Y/N)?.".B,....|
00001040: 41 24 00 52 2C 24 04 8B 41 24 B2 22 4E 22 A7 33 |A$.R,$..A$."N".3|
00001050: 33 30 00 64 2C 2E 04 8B 41 24 B3 B1 22 59 22 A7 |30.d,...A$.."Y".|
00001060: 31 30 35 30 00 9D 2C 38 04 99 22 9F 93 45 4E 54 |1050..,8.."..ENT|
00001070: 45 52 20 53 54 41 54 45 4D 45 4E 54 20 42 41 4C |ER STATEMENT BAL|
00001080: 41 4E 43 45 05 22 3B 43 24 22 3F 22 3B 3A 49 B2 |ANCE.";C$"?";:I.|
00001090: 31 3A 8D 32 34 34 30 3A 8D 32 30 34 30 00 C4 2C |1:.2440:.2040..,|
000010A0: 42 04 49 B2 31 45 35 3A 56 B2 AB 31 45 35 3A 8D |B.I.1E5:V..1E5:.|
000010B0: 32 38 32 30 3A 8B 57 B3 C3 28 42 24 29 AB 32 A7 |2820:.W..(B$).2.|
000010C0: 31 30 38 30 00 F0 2C 4C 04 56 B2 C5 28 42 24 29 |1080..,L.V..(B$)|
000010D0: 3A 5A B2 42 3A 81 51 B2 31 A4 4E 3A 8B C9 28 44 |:Z.B:.Q.1.N:..(D|
000010E0: 24 28 51 29 2C 31 29 B2 22 2A 22 A7 31 31 33 30 |$(Q),1)."*".1130|
000010F0: 00 08 2D 56 04 8B 43 25 28 51 29 B1 30 A7 56 B2 |..-V..C%(Q).0.V.|
00001100: 56 AB 32 AC 41 28 51 29 00 1F 2D 60 04 56 B2 56 |V.2.A(Q)..-`.V.V|
00001110: AA 41 28 51 29 3A 42 B2 56 3A 8D 32 31 35 30 00 |.A(Q):B.V:.2150.|
00001120: 26 2D 6A 04 82 51 00 5E 2D 74 04 99 22 9E 11 43 |&-j..Q.^-t.."..C|
00001130: 48 45 43 4B 42 4F 4F 4B 20 42 41 4C 41 4E 43 45 |HECKBOOK BALANCE|
00001140: 3D 05 20 24 22 3B 3A 42 B2 5A 3A 8D 32 31 35 30 |=. $";:B.Z:.2150|
00001150: 3A 99 42 24 3A 42 B2 56 3A 8D 32 31 35 30 00 97 |:.B$:B.V:.2150..|
00001160: 2D 7E 04 99 22 9E 11 41 44 4A 55 53 54 45 44 20 |-~.."..ADJUSTED |
00001170: 53 54 41 54 45 4D 45 4E 54 20 42 41 4C 41 4E 43 |STATEMENT BALANC|
00001180: 45 3D 05 20 24 22 3B 3A 99 42 24 3A 42 B2 5A AB |E=. $";:.B$:B.Z.|
00001190: 56 3A 8D 32 31 35 30 00 D0 2D 88 04 42 B2 5A 3A |V:.2150..-..B.Z:|
000011A0: 8B C5 28 42 24 29 B2 30 A7 99 22 9A 11 59 4F 55 |..(B$).0.."..YOU|
000011B0: 52 20 43 48 45 43 4B 42 4F 4F 4B 20 49 53 20 42 |R CHECKBOOK IS B|
000011C0: 41 4C 41 4E 43 45 44 2E 05 22 3A 89 31 32 31 30 |ALANCED..":.1210|
000011D0: 00 1F 2E 92 04 99 22 1C 11 54 48 45 20 44 49 46 |......"..THE DIF|
000011E0: 46 45 52 45 4E 43 45 20 49 53 3A 05 20 24 22 42 |FERENCE IS:. $"B|
000011F0: 24 3B 43 24 22 11 50 52 45 53 53 20 27 52 45 54 |$;C$".PRESS 'RET|
00001200: 55 52 4E 27 20 54 4F 20 47 4F 20 54 4F 20 41 43 |URN' TO GO TO AC|
00001210: 43 4F 55 4E 54 20 4C 49 53 54 49 4E 47 2E 22 00 |COUNT LISTING.".|
00001220: 37 2E 9C 04 53 B2 30 3A 8D 32 30 30 30 3A 8B 54 |7...S.0:.2000:.T|
00001230: 25 B1 31 A7 33 35 30 00 40 2E A6 04 89 36 36 30 |%.1.350.@....660|
00001240: 00 46 2E B0 04 3A 00 8E 2E BA 04 8F 20 2E 2E 2E |.F...:...... ...|
00001250: 2E 2E 2E 2E 2E 2E 20 52 4F 55 54 49 4E 45 20 54 |...... ROUTINE T|
00001260: 4F 20 44 45 4C 45 54 45 20 45 4E 54 52 49 45 53 |O DELETE ENTRIES|
00001270: 20 57 49 54 48 20 2A 20 2E 2E 2E 2E 2E 2E 2E 2E | WITH * ........|
00001280: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 00 94 |................|
00001290: 2E C4 04 3A 00 D9 2E CE 04 99 22 9F 11 44 4F 20 |...:......"..DO |
000012A0: 59 4F 55 20 57 41 4E 54 20 54 4F 20 44 45 4C 45 |YOU WANT TO DELE|
000012B0: 54 45 20 41 4C 4C 20 4F 46 20 54 48 45 20 4D 41 |TE ALL OF THE MA|
000012C0: 54 43 48 45 44 20 49 54 45 4D 53 20 46 52 4F 4D |TCHED ITEMS FROM|
000012D0: 20 41 43 43 4F 55 4E 54 3F 00 0E 2F D8 04 99 22 | ACCOUNT?../..."|
000012E0: 41 20 27 59 27 20 52 45 53 50 4F 4E 53 45 20 57 |A 'Y' RESPONSE W|
000012F0: 49 4C 4C 20 43 41 55 53 45 20 54 48 45 4D 20 54 |ILL CAUSE THEM T|
00001300: 4F 20 42 45 20 44 45 4C 45 54 45 44 05 22 00 17 |O BE DELETED."..|
00001310: 2F E2 04 A1 F9 41 24 00 36 2F EC 04 8B 41 24 B2 |/....A$.6/...A$.|
00001320: 22 4E 22 A7 57 24 B2 22 5C 22 3A 99 22 4E 4F 22 |"N".W$."\":."NO"|
00001330: 3A 89 31 33 37 30 00 48 2F F6 04 8B 41 24 B3 B1 |:.1370.H/...A$..|
00001340: 22 59 22 A7 31 32 35 30 00 53 2F 00 05 99 22 59 |"Y".1250.S/..."Y|
00001350: 45 53 22 00 96 2F 0A 05 99 22 96 11 41 52 45 20 |ES"../..."..ARE |
00001360: 59 4F 55 20 53 55 52 45 20 59 4F 55 20 57 41 4E |YOU SURE YOU WAN|
00001370: 54 20 54 4F 20 44 45 4C 45 54 45 20 4D 41 54 43 |T TO DELETE MATC|
00001380: 48 45 44 20 49 54 45 4D 53 20 46 52 4F 4D 20 44 |HED ITEMS FROM D|
00001390: 49 53 4B 3F 05 22 00 9F 2F 14 05 A1 F9 41 24 00 |ISK?."../....A$.|
000013A0: BE 2F 1E 05 8B 41 24 B2 22 4E 22 A7 57 24 B2 22 |./...A$."N".W$."|
000013B0: 5C 22 3A 99 22 4E 4F 22 3A 89 31 33 37 30 00 D0 |\":."NO":.1370..|
000013C0: 2F 28 05 8B 41 24 B3 B1 22 59 22 A7 31 33 30 30 |/(..A$.."Y".1300|
000013D0: 00 EA 2F 32 05 8B 41 24 B2 22 59 22 A7 57 24 B2 |../2..A$."Y".W$.|
000013E0: 22 2A 22 3A 99 22 59 45 53 22 00 32 30 3C 05 99 |"*":."YES".20<..|
000013F0: 22 9F 11 41 4C 4C 20 4F 46 20 54 48 45 20 49 54 |"..ALL OF THE IT|
00001400: 45 4D 53 20 49 4E 20 54 48 45 20 41 43 43 4F 55 |EMS IN THE ACCOU|
00001410: 4E 54 20 57 48 49 43 48 20 48 41 56 45 20 42 45 |NT WHICH HAVE BE|
00001420: 45 4E 20 4D 41 54 43 48 45 44 20 4F 4E 20 54 48 |EN MATCHED ON TH|
00001430: 45 22 00 6C 30 46 05 99 22 53 54 41 54 45 4D 45 |E".l0F.."STATEME|
00001440: 4E 54 20 41 52 45 20 4E 4F 57 20 42 45 49 4E 47 |NT ARE NOW BEING|
00001450: 20 44 45 4C 45 54 45 44 20 46 52 4F 4D 20 54 48 | DELETED FROM TH|
00001460: 45 20 41 43 43 4F 55 4E 54 2E 05 22 00 89 30 50 |E ACCOUNT.."..0P|
00001470: 05 99 22 11 12 9E 50 4C 45 41 53 45 20 42 45 20 |.."...PLEASE BE |
00001480: 50 41 54 49 45 4E 54 05 22 00 93 30 5A 05 4E 24 |PATIENT."..0Z.N$|
00001490: B2 48 24 00 BF 30 64 05 81 51 B2 31 A4 4E 3A 8B |.H$..0d..Q.1.N:.|
000014A0: C9 28 44 24 28 51 29 2C 31 29 B2 57 24 A7 54 25 |.(D$(Q),1).W$.T%|
000014B0: B2 51 3A 49 31 B2 51 AB 31 3A 8D 31 39 32 30 00 |.Q:I1.Q.1:.1920.|
000014C0: C6 30 6E 05 82 51 00 D7 30 78 05 8B 57 24 B2 22 |.0n..Q..0x..W$."|
000014D0: 5C 22 A7 31 34 32 30 00 1A 31 82 05 99 22 9E 11 |\".1420..1..."..|
000014E0: 44 4F 20 59 4F 55 20 57 49 53 48 20 54 48 45 20 |DO YOU WISH THE |
000014F0: 52 45 4D 41 49 4E 49 4E 47 20 49 54 45 4D 53 20 |REMAINING ITEMS |
00001500: 54 4F 20 42 45 20 53 41 56 45 44 20 28 59 2F 4E |TO BE SAVED (Y/N|
00001510: 29 3F 05 22 3A 89 31 34 33 30 00 4F 31 8C 05 99 |)?.":.1430.O1...|
00001520: 22 9E 11 44 4F 20 59 4F 55 20 57 49 53 48 20 54 |"..DO YOU WISH T|
00001530: 48 45 20 41 43 43 4F 55 4E 54 20 54 4F 20 42 45 |HE ACCOUNT TO BE|
00001540: 20 53 41 56 45 44 20 28 59 2F 4E 29 3F 05 22 00 | SAVED (Y/N)?.".|
00001550: 58 31 96 05 A1 F9 41 24 00 70 31 A0 05 8B 41 24 |X1....A$.p1...A$|
00001560: B2 22 59 22 A7 99 22 59 45 53 22 3A 89 36 30 30 |."Y".."YES":.600|
00001570: 00 87 31 AA 05 8B 41 24 B2 22 4E 22 A7 99 22 4E |..1...A$."N".."N|
00001580: 4F 22 3A 89 33 33 30 00 91 31 B4 05 89 31 34 33 |O":.330..1...143|
00001590: 30 00 A1 31 BE 05 8B 58 B2 30 A7 49 31 B2 51 AB |0..1...X.0.I1.Q.|
000015A0: 31 00 BB 31 C8 05 49 B2 30 3A 8D 32 30 37 30 3A |1..1..I.0:.2070:|
000015B0: 8B 50 25 B3 B1 34 A7 31 35 34 30 00 E4 31 D2 05 |.P%..4.1540..1..|
000015C0: 41 24 B2 22 22 3A 8B 43 25 28 51 29 B1 30 A7 41 |A$."":.C%(Q).0.A|
000015D0: 24 B2 22 43 48 45 43 4B 20 23 22 AA C4 28 43 25 |$."CHECK #"..(C%|
000015E0: 28 51 29 29 00 08 32 DC 05 8B 43 25 28 51 29 B2 |(Q))..2...C%(Q).|
000015F0: 30 A7 41 24 B2 22 4F 54 48 45 52 20 54 52 41 4E |0.A$."OTHER TRAN|
00001600: 53 41 43 54 49 4F 4E 22 00 23 32 E6 05 8B 43 25 |SACTION".#2...C%|
00001610: 28 51 29 B3 30 A7 20 41 24 B2 22 44 45 50 4F 53 |(Q).0. A$."DEPOS|
00001620: 49 54 22 00 38 32 F0 05 42 24 B2 C4 28 41 28 51 |IT".82..B$..(A(Q|
00001630: 29 29 3A 8D 32 31 32 30 00 72 32 FA 05 98 34 2C |)):.2120.r2...4,|
00001640: 41 24 3B A6 32 30 AB C3 28 41 24 29 29 3B 44 24 |A$;.20..(A$));D$|
00001650: 28 51 29 3B A6 34 35 AB C3 28 44 24 28 51 29 29 |(Q);.45..(D$(Q))|
00001660: AB C3 28 42 24 29 29 3B 42 24 22 11 22 3A 89 38 |..(B$));B$".":.8|
00001670: 33 30 00 96 32 04 06 58 B2 58 AA 31 3A 8B 58 B2 |30..2..X.X.1:.X.|
00001680: 35 B0 50 25 B2 33 A7 8D 31 35 36 30 3A 8B 45 25 |5.P%.3..1560:.E%|
00001690: B2 39 A7 33 35 30 00 9F 32 0E 06 89 38 33 30 00 |.9.350..2...830.|
000016A0: DE 32 18 06 58 B2 30 3A 49 B2 30 3A 54 25 B2 32 |.2..X.0:I.0:T%.2|
000016B0: 37 3A 8D 31 39 34 30 3A 52 B2 35 3A 8D 32 32 32 |7:.1940:R.5:.222|
000016C0: 30 3A 91 54 25 89 31 35 38 30 2C 31 35 37 30 2C |0:.T%.1580,1570,|
000016D0: 31 35 39 30 2C 31 37 38 30 3A 45 25 B2 39 00 E4 |1590,1780:E%.9..|
000016E0: 32 22 06 8E 00 EE 32 2C 06 51 B2 4E 3A 8E 00 26 |2"....2,.Q.N:..&|
000016F0: 33 36 06 99 22 9F 45 4E 54 45 52 20 23 20 4F 46 |36..".ENTER # OF|
00001700: 20 49 54 45 4D 20 54 4F 20 42 45 20 43 48 41 4E | ITEM TO BE CHAN|
00001710: 47 45 44 2E 05 22 43 24 22 3F 22 3B 3A 49 B2 31 |GED.."C$"?";:I.1|
00001720: 3A 8D 32 34 34 30 00 3E 33 40 06 8B 42 24 B2 22 |:.2440.>3@..B$."|
00001730: 22 20 A7 52 B2 33 3A 8D 32 32 32 30 3A 8E 00 67 |" .R.3:.2220:..g|
00001740: 33 4A 06 49 B2 33 45 34 3A 56 B2 AB 4E 3A 8D 32 |3J.I.3E4:V..N:.2|
00001750: 38 32 30 3A 8B 57 B3 30 A7 54 25 B2 4D 3A 57 B2 |820:.W.0.T%.M:W.|
00001760: 30 3A 89 31 36 36 30 00 85 33 54 06 54 25 B2 C5 |0:.1660..3T.T%..|
00001770: 28 42 24 29 3A 8B 54 25 B2 30 A7 54 25 B2 4D 3A |(B$):.T%.0.T%.M:|
00001780: 89 31 36 36 30 00 9F 33 5E 06 8B 54 25 B3 30 A7 |.1660..3^..T%.0.|
00001790: 54 25 B2 AB 54 25 3A 89 31 36 36 30 3A 82 5A 00 |T%..T%:.1660:.Z.|
000017A0: BD 33 68 06 81 5A B2 31 A4 4E 3A 8B 43 25 28 5A |.3h..Z.1.N:.C%(Z|
000017B0: 29 B2 54 25 A7 54 25 B2 5A 3A 5A B2 4E 00 C4 33 |).T%.T%.Z:Z.N..3|
000017C0: 72 06 82 5A 00 DE 33 7C 06 8B 54 25 B1 4E A7 52 |r..Z..3|..T%.N.R|
000017D0: B2 33 3A 8D 32 32 32 30 3A 89 31 35 39 30 00 28 |.3:.2220:.1590.(|
000017E0: 34 86 06 99 22 9F 93 55 53 45 20 43 55 52 53 4F |4..."..USE CURSO|
000017F0: 52 20 4B 45 59 53 20 54 4F 20 50 4F 53 49 54 49 |R KEYS TO POSITI|
00001800: 4F 4E 20 43 55 52 53 4F 52 20 4F 56 45 52 20 45 |ON CURSOR OVER E|
00001810: 52 52 4F 52 2E 20 43 4F 52 52 45 43 54 20 54 48 |RROR. CORRECT TH|
00001820: 45 20 45 52 52 4F 52 22 00 69 34 90 06 99 22 42 |E ERROR".i4..."B|
00001830: 59 20 54 59 50 49 4E 47 20 54 48 45 20 43 4F 52 |Y TYPING THE COR|
00001840: 52 45 43 54 20 44 41 54 41 20 49 4E 2E 20 48 49 |RECT DATA IN. HI|
00001850: 54 20 27 52 45 54 55 52 4E 27 20 57 48 45 4E 20 |T 'RETURN' WHEN |
00001860: 46 49 58 45 44 2E 11 05 22 00 A5 34 9A 06 99 22 |FIXED..."..4..."|
00001870: 9E 43 55 52 52 45 4E 54 20 45 4E 54 52 59 3A 05 |.CURRENT ENTRY:.|
00001880: 22 3A 51 B2 54 25 3A 49 B2 30 3A 8D 32 30 37 30 |":Q.T%:I.0:.2070|
00001890: 3A 99 22 9E 11 43 4F 52 52 45 43 54 20 41 4D 4F |:."..CORRECT AMO|
000018A0: 55 4E 54 05 22 00 C9 34 A4 06 42 B2 42 AB 41 28 |UNT."..4..B.B.A(|
000018B0: 54 25 29 3A 8B 43 25 28 54 25 29 B1 30 A7 42 B2 |T%):.C%(T%).0.B.|
000018C0: 42 AA 32 AC 41 28 54 25 29 00 02 35 AE 06 42 24 |B.2.A(T%)..5..B$|
000018D0: B2 C4 28 41 28 54 25 29 29 3A 8D 32 31 32 30 3A |..(A(T%)):.2120:|
000018E0: 99 22 20 20 22 42 24 3A 85 22 91 22 3B 42 24 3A |." "B$:.".";B$:|
000018F0: 8D 32 30 34 30 3A 49 B2 31 45 34 3A 56 B2 AB 31 |.2040:I.1E4:V..1|
00001900: 45 34 00 27 35 B8 06 8D 32 38 32 30 3A 8B 57 B3 |E4.'5...2820:.W.|
00001910: C3 28 42 24 29 AB 32 A7 52 B2 31 3A 8D 32 32 32 |.(B$).2.R.1:.222|
00001920: 30 3A 89 31 37 31 30 00 69 35 C2 06 41 28 54 25 |0:.1710.i5..A(T%|
00001930: 29 B2 C5 28 42 24 29 3A 99 22 9E 11 43 4F 52 52 |)..(B$):."..CORR|
00001940: 45 43 54 20 44 41 54 45 05 22 43 24 22 20 20 22 |ECT DATE."C$" "|
00001950: C8 28 44 24 28 54 25 29 2C 38 29 3A 85 22 91 22 |.(D$(T%),8):."."|
00001960: 3B 42 24 3A 8D 32 31 39 30 00 84 35 CC 06 8B 42 |;B$:.2190..5...B|
00001970: 24 B2 22 22 A7 52 B2 33 3A 8D 32 32 32 30 3A 89 |$."".R.3:.2220:.|
00001980: 31 37 33 30 00 C1 35 D6 06 99 22 9E 11 43 4F 52 |1730..5..."..COR|
00001990: 52 45 43 54 20 44 45 53 43 52 49 50 54 49 4F 4E |RECT DESCRIPTION|
000019A0: 05 22 43 24 22 20 20 22 CA 28 44 24 28 54 25 29 |."C$" ".(D$(T%)|
000019B0: 2C 31 31 29 3A 85 22 91 22 3B 41 24 3A 99 22 93 |,11):.".";A$:.".|
000019C0: 22 00 F3 35 E0 06 44 24 28 54 25 29 B2 42 24 AA |"..5..D$(T%).B$.|
000019D0: 22 20 20 22 AA C9 28 41 24 2C 32 35 29 3A 8B 43 |" "..(A$,25):.C|
000019E0: 25 28 54 25 29 B1 30 A7 42 B2 42 AB 32 AC 41 28 |%(T%).0.B.B.2.A(|
000019F0: 54 25 29 00 29 36 EA 06 42 B2 42 AA 41 28 54 25 |T%).)6..B.B.A(T%|
00001A00: 29 3A 51 B2 49 31 3A 42 24 B2 C4 28 42 29 3A 8D |):Q.I1:B$..(B):.|
00001A10: 32 31 35 30 3A 99 22 93 22 4C 24 3B 43 24 22 24 |2150:."."L$;C$"$|
00001A20: 22 3B 42 24 22 11 22 3A 8E 00 66 36 F4 06 99 22 |";B$".":..f6..."|
00001A30: 9E 45 4E 54 45 52 20 4E 55 4D 42 45 52 20 4F 46 |.ENTER NUMBER OF|
00001A40: 20 49 54 45 4D 20 54 4F 20 42 45 20 44 45 4C 45 | ITEM TO BE DELE|
00001A50: 54 45 44 2E 05 22 43 24 22 3F 22 3B 3A 49 B2 31 |TED.."C$"?";:I.1|
00001A60: 3A 8D 32 34 34 30 00 7D 36 FE 06 8B 42 24 B2 22 |:.2440.}6...B$."|
00001A70: 22 A7 52 B2 33 3A 8D 32 32 32 30 3A 8E 00 A6 36 |".R.3:.2220:...6|
00001A80: 08 07 49 B2 33 45 34 3A 56 B2 AB 4E 3A 8D 32 38 |..I.3E4:V..N:.28|
00001A90: 32 30 3A 8B 57 B3 30 A7 54 25 B2 4D 3A 57 B2 30 |20:.W.0.T%.M:W.0|
00001AA0: 3A 89 31 38 35 30 00 C4 36 12 07 54 25 B2 C5 28 |:.1850..6..T%..(|
00001AB0: 42 24 29 3A 8B 54 25 B2 30 A7 54 25 B2 4D 3A 89 |B$):.T%.0.T%.M:.|
00001AC0: 31 38 35 30 00 DB 36 1C 07 8B 54 25 B3 30 A7 54 |1850..6...T%.0.T|
00001AD0: 25 B2 AB 54 25 3A 89 31 38 35 30 00 F9 36 26 07 |%..T%:.1850..6&.|
00001AE0: 81 5A B2 31 A4 4E 3A 8B 54 25 B2 43 25 28 5A 29 |.Z.1.N:.T%.C%(Z)|
00001AF0: A7 54 25 B2 5A 3A 5A B2 4E 00 00 37 30 07 82 5A |.T%.Z:Z.N..70..Z|
00001B00: 00 1F 37 3A 07 99 22 11 22 3A 8B 54 25 B1 4E A7 |..7:..".":.T%.N.|
00001B10: 52 B2 35 3A 8D 32 32 32 30 3A 89 31 37 38 30 00 |R.5:.2220:.1780.|
00001B20: 6A 37 44 07 51 B2 54 25 3A 49 B2 30 3A 8D 32 30 |j7D.Q.T%:I.0:.20|
00001B30: 37 30 3A 99 22 9E 11 41 52 45 20 59 4F 55 20 53 |70:."..ARE YOU S|
00001B40: 55 52 45 20 59 4F 55 20 57 41 4E 54 20 54 48 49 |URE YOU WANT THI|
00001B50: 53 20 49 54 45 4D 20 44 45 4C 45 54 45 44 22 43 |S ITEM DELETED"C|
00001B60: 24 22 28 59 2F 4E 29 3F 05 22 00 73 37 4E 07 A1 |$"(Y/N)?.".s7N..|
00001B70: F9 41 24 00 8B 37 58 07 8B 41 24 B2 22 4E 22 A7 |.A$..7X..A$."N".|
00001B80: 51 B2 49 31 3A 99 22 93 22 3A 8E 00 9D 37 62 07 |Q.I1:.".":...7b.|
00001B90: 8B 41 24 B3 B1 22 59 22 A7 31 38 37 30 00 B7 37 |.A$.."Y".1870..7|
00001BA0: 6C 07 8B 43 25 28 54 25 29 B1 30 A7 42 B2 42 AA |l..C%(T%).0.B.B.|
00001BB0: 32 AC 41 28 54 25 29 00 DD 37 76 07 42 B2 42 AB |2.A(T%)..7v.B.B.|
00001BC0: 41 28 54 25 29 3A 8D 32 31 35 30 3A 99 22 93 22 |A(T%):.2150:."."|
00001BD0: 4C 24 3B 43 24 22 24 22 42 24 22 11 22 00 19 38 |L$;C$"$"B$"."..8|
00001BE0: 80 07 81 54 B2 54 25 A4 4E 3A 43 25 28 54 29 B2 |...T.T%.N:C%(T).|
00001BF0: 43 25 28 54 AA 31 29 3A 44 24 28 54 29 B2 44 24 |C%(T.1):D$(T).D$|
00001C00: 28 54 AA 31 29 3A 41 28 54 29 B2 41 28 54 AA 31 |(T.1):A(T).A(T.1|
00001C10: 29 3A 82 54 3A 51 B2 49 31 00 3D 38 8A 07 43 25 |):.T:Q.I1.=8..C%|
00001C20: 28 4E 29 B2 30 3A 41 28 4E 29 B2 30 3A 44 24 28 |(N).0:A(N).0:D$(|
00001C30: 4E 29 B2 22 22 3A 4E B2 4E AB 31 3A 8E 00 74 38 |N)."":N.N.1:..t8|
00001C40: 94 07 8B 49 B1 30 A7 99 22 93 22 50 24 3B 43 24 |...I.0.."."P$;C$|
00001C50: 22 41 43 43 23 20 22 4D 24 3B 43 24 22 C5 C5 C5 |"ACC# "M$;C$"...|
00001C60: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00001C70: C5 C5 C5 22 00 9B 38 9E 07 8C 3A 81 53 B2 31 A4 |..."..8...:.S.1.|
00001C80: 54 25 3A 87 41 24 3A 82 53 3A 53 B2 30 3A 8B 41 |T%:.A$:.S:S.0:.A|
00001C90: 24 B2 22 91 91 22 A7 31 39 37 30 00 BF 38 A8 07 |$."..".1970..8..|
00001CA0: 99 A3 28 32 30 AB C3 28 41 24 29 29 AD 32 29 3B |..(20..(A$)).2);|
00001CB0: 22 12 A9 22 41 24 22 DF 22 3A 99 3A 53 B2 30 00 |".."A$".":.:S.0.|
00001CC0: E4 38 B2 07 87 41 24 3A 8B 41 24 B3 B1 22 22 A7 |.8...A$:.A$.."".|
00001CD0: 53 B2 53 AA 31 3A 99 53 22 9D 29 22 41 24 3A 89 |S.S.1:.S".)"A$:.|
00001CE0: 31 39 37 30 00 03 39 BC 07 8B 49 B3 32 A7 99 22 |1970..9...I.2.."|
00001CF0: 9E 11 45 4E 54 45 52 20 23 3A 05 22 3B 3A 89 32 |..ENTER #:.";:.2|
00001D00: 30 30 30 00 2D 39 C6 07 8F 3A 50 4F 4B 45 33 38 |000.-9...:POKE38|
00001D10: 30 34 33 2C 33 3A 50 4F 4B 45 33 38 30 38 37 2C |043,3:POKE38087,|
00001D20: 33 3A 50 4F 4B 45 33 38 31 33 31 2C 33 00 36 39 |3:POKE38131,3.69|
00001D30: D0 07 A1 F9 41 24 00 58 39 DA 07 99 3A 54 25 B2 |....A$.X9...:T%.|
00001D40: C6 28 41 24 29 AA 31 3A 8B 54 25 B1 31 33 33 AF |.(A$).1:.T%.133.|
00001D50: 54 25 B3 31 34 31 A7 8E 00 83 39 E4 07 54 25 B2 |T%.141....9..T%.|
00001D60: C5 28 41 24 29 AA 31 3A 8B 54 25 AB 31 B3 B2 53 |.(A$).1:.T%.1..S|
00001D70: AF 28 54 25 B3 B1 31 B0 41 24 B2 C7 28 31 33 29 |.(T%..1.A$..(13)|
00001D80: 29 A7 8E 00 8D 39 EE 07 89 32 30 30 30 00 BB 39 |)....9...2000..9|
00001D90: F8 07 57 B2 30 3A 81 54 B2 31 A4 C3 28 42 24 29 |..W.0:.T.1..(B$)|
00001DA0: 3A 8B CA 28 42 24 2C 54 2C 31 29 B2 22 2E 22 A7 |:..(B$,T,1).".".|
00001DB0: 57 B2 54 3A 54 B2 C3 28 42 24 29 00 CF 39 02 08 |W.T:T..(B$)..9..|
00001DC0: 82 54 3A 8B 57 B2 30 A7 57 B2 C3 28 42 24 29 00 |.T:.W.0.W..(B$).|
00001DD0: D5 39 0C 08 8E 00 01 3A 16 08 42 24 B2 C4 28 41 |.9.....:..B$..(A|
00001DE0: 28 51 29 29 3A 8D 32 31 32 30 3A 8B 43 25 28 51 |(Q)):.2120:.C%(Q|
00001DF0: 29 B1 30 A7 99 22 43 4B 20 23 22 43 25 28 51 29 |).0.."CK #"C%(Q)|
00001E00: 3B 00 1C 3A 20 08 8B 43 25 28 51 29 B2 30 A7 99 |;..: ..C%(Q).0..|
00001E10: 22 4F 54 4E 23 20 22 28 AB 51 29 3B 00 37 3A 2A |"OTN# "(.Q);.7:*|
00001E20: 08 8B 43 25 28 51 29 B3 30 A7 99 22 44 45 50 23 |..C%(Q).0.."DEP#|
00001E30: 20 22 28 AB 51 29 3B 00 54 3A 34 08 99 A3 31 39 | "(.Q);.T:4...19|
00001E40: AB C3 28 42 24 29 29 3B 22 24 22 42 24 3A 8B 49 |..(B$));"$"B$:.I|
00001E50: B2 31 A7 8E 00 64 3A 3E 08 99 44 24 28 51 29 22 |.1...d:>..D$(Q)"|
00001E60: 11 22 3A 8E 00 7B 3A 48 08 8D 32 30 34 30 3A 8B |.":..{:H..2040:.|
00001E70: 57 B2 C3 28 42 24 29 AB 32 A7 8E 00 96 3A 52 08 |W..(B$).2....:R.|
00001E80: 8B 57 B2 C3 28 42 24 29 A7 42 24 B2 42 24 AA 22 |.W..(B$).B$.B$."|
00001E90: 2E 30 30 22 3A 8E 00 A6 3A 5C 08 42 24 B2 42 24 |.00":...:\.B$.B$|
00001EA0: AA 22 30 22 3A 8E 00 B9 3A 66 08 8B 42 B1 30 A7 |."0":...:f..B.0.|
00001EB0: 42 B2 42 AA 2E 30 30 30 31 00 CC 3A 70 08 8B 42 |B.B..0001..:p..B|
00001EC0: B3 30 A7 42 B2 42 AB 2E 30 30 30 31 00 DE 3A 7A |.0.B.B..0001..:z|
00001ED0: 08 8B B6 28 42 29 B3 2E 30 31 A7 42 B2 30 00 0D |...(B)..01.B.0..|
00001EE0: 3B 84 08 42 24 B2 C4 28 42 29 3A 8D 32 30 34 30 |;..B$..(B):.2040|
00001EF0: 3A 42 24 B2 C8 28 42 24 2C 57 AA 32 29 3A 8D 32 |:B$..(B$,W.2):.2|
00001F00: 31 32 30 3A 42 B2 C5 28 42 24 29 3A 8E 00 3E 3B |120:B..(B$):..>;|
00001F10: 8E 08 8B C3 28 42 24 29 B3 38 B0 CA 28 42 24 2C |....(B$).8..(B$,|
00001F20: 31 2C 32 29 B1 22 31 32 22 B0 CA 28 42 24 2C 34 |1,2)."12"..(B$,4|
00001F30: 2C 32 29 B1 22 33 31 22 A7 42 24 B2 22 22 00 6F |,2)."31".B$."".o|
00001F40: 3B 98 08 8B C3 28 42 24 29 B1 38 B0 CA 28 42 24 |;....(B$).8..(B$|
00001F50: 2C 31 2C 32 29 B3 22 30 31 22 B0 CA 28 42 24 2C |,1,2)."01"..(B$,|
00001F60: 34 2C 32 29 B3 22 30 31 22 A7 42 24 B2 22 22 00 |4,2)."01".B$."".|
00001F70: 75 3B A2 08 8E 00 AA 3B AC 08 81 45 B2 31 A4 52 |u;.....;...E.1.R|
00001F80: 3A 99 22 91 91 22 3A 99 22 20 20 20 20 20 20 20 |:."..":." |
00001F90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A | ":|
00001FA0: 99 22 91 91 22 3A 82 45 3A 8E 00 CC 3B B6 08 81 |."..":.E:...;...|
00001FB0: 54 B2 31 A4 4E AB 31 3A 8B 43 25 28 4E 29 B2 43 |T.1.N.1:.C%(N).C|
00001FC0: 25 28 54 29 A7 5A B2 54 3A 54 B2 4E 00 DD 3B C0 |%(T).Z.T:T.N..;.|
00001FD0: 08 82 54 3A 8B 54 B1 4E A7 32 32 36 30 00 E3 3B |..T:.T.N.2260..;|
00001FE0: CA 08 8E 00 27 3C D4 08 99 3A 99 22 9F 93 43 48 |....'<...:."..CH|
00001FF0: 45 43 4B 20 22 43 25 28 4E 29 22 20 41 4C 52 45 |ECK "C%(N)" ALRE|
00002000: 41 44 59 20 4F 4E 46 49 4C 45 2E 11 05 22 3A 51 |ADY ONFILE...":Q|
00002010: B2 5A 3A 49 B2 30 3A 99 22 20 31 29 22 3A 8D 32 |.Z:I.0:." 1)":.2|
00002020: 30 37 30 3A 51 B2 4E 00 61 3C DE 08 99 22 20 32 |070:Q.N.a<..." 2|
00002030: 29 22 3A 8D 32 30 37 30 3A 99 22 9E 45 4E 54 45 |)":.2070:.".ENTE|
00002040: 52 20 23 20 4F 46 20 43 4F 52 52 45 43 54 20 45 |R # OF CORRECT E|
00002050: 4E 54 52 59 3A 05 22 3A 53 B2 32 3A 8D 32 30 30 |NTRY:.":S.2:.200|
00002060: 30 00 7D 3C E8 08 54 25 B2 54 25 AB 31 3A 8B 54 |0.}<..T%.T%.1:.T|
00002070: 25 B2 30 B0 54 25 B1 32 A7 32 32 33 30 00 98 3C |%.0.T%.2.2230..<|
00002080: F2 08 8B 54 25 B2 31 A7 42 B2 42 AA 41 28 4E 29 |...T%.1.B.B.A(N)|
00002090: 3A 4E B2 4E AB 31 3A 8E 00 C3 3C FC 08 42 B2 41 |:N.N.1:...<..B.A|
000020A0: 28 5A 29 AA 42 3A 44 24 28 5A 29 B2 44 24 28 4E |(Z).B:D$(Z).D$(N|
000020B0: 29 3A 41 28 5A 29 B2 41 28 4E 29 3A 4E B2 4E AB |):A(Z).A(N):N.N.|
000020C0: 31 3A 8E 00 D2 3C 06 09 5A B2 30 3A 8B 4E B2 31 |1:...<..Z.0:.N.1|
000020D0: A7 8E 00 FC 3C 10 09 81 51 B2 31 A4 4E AB 31 3A |....<...Q.1.N.1:|
000020E0: 8B C8 28 44 24 28 4E 29 2C 38 29 B3 B1 C8 28 44 |..(D$(N),8)...(D|
000020F0: 24 28 51 29 2C 38 29 A7 32 33 38 30 00 13 3D 1A |$(Q),8).2380..=.|
00002100: 09 8B 43 25 28 51 29 B3 B1 43 25 28 4E 29 A7 32 |..C%(Q)..C%(N).2|
00002110: 33 38 30 00 28 3D 24 09 8B 41 28 51 29 B3 B1 41 |380.(=$..A(Q)..A|
00002120: 28 4E 29 A7 32 33 38 30 00 36 3D 2E 09 8B 5A B2 |(N).2380.6=...Z.|
00002130: 31 A7 32 33 37 30 00 66 3D 38 09 99 22 93 54 48 |1.2370.f=8..".TH|
00002140: 45 53 45 20 45 4E 54 52 49 45 53 20 41 52 45 20 |ESE ENTRIES ARE |
00002150: 41 4C 52 45 41 44 59 20 4F 4E 20 46 49 4C 45 3A |ALREADY ON FILE:|
00002160: 11 22 3A 5A B2 31 00 74 3D 42 09 49 B2 30 3A 8D |.":Z.1.t=B.I.0:.|
00002170: 32 30 37 30 00 82 3D 4C 09 82 51 3A 8B 5A B2 30 |2070..=L..Q:.Z.0|
00002180: A7 8E 00 BE 3D 56 09 99 22 9F 11 49 53 20 54 48 |....=V.."..IS TH|
00002190: 49 53 20 45 4E 54 52 59 20 41 20 44 55 50 4C 49 |IS ENTRY A DUPLI|
000021A0: 43 41 54 45 3F 11 05 22 3A 49 B2 30 3A 8D 32 30 |CATE?..":I.0:.20|
000021B0: 37 30 3A 99 22 9F 28 59 2F 4E 29 3F 05 22 00 C7 |70:.".(Y/N)?."..|
000021C0: 3D 60 09 A1 F9 41 24 00 FD 3D 6A 09 8B 41 24 B2 |=`...A$..=j..A$.|
000021D0: 22 4E 22 A7 99 22 9F 41 44 44 49 4E 47 20 45 4E |"N"..".ADDING EN|
000021E0: 54 52 59 20 54 4F 20 4C 49 53 54 3A 05 22 3A 81 |TRY TO LIST:.":.|
000021F0: 54 B2 31 A4 31 35 30 30 3A 82 54 3A 8E 00 0F 3E |T.1.1500:.T:...>|
00002200: 74 09 8B 41 24 B3 B1 22 59 22 A7 32 34 30 30 00 |t..A$.."Y".2400.|
00002210: 4A 3E 7E 09 99 22 9F 11 45 52 41 53 49 4E 47 20 |J>~.."..ERASING |
00002220: 4C 41 53 54 20 45 4E 54 52 59 05 22 3A 81 54 B2 |LAST ENTRY.":.T.|
00002230: 31 A4 31 35 30 30 3A 82 54 3A 42 B2 42 AB 41 28 |1.1500:.T:B.B.A(|
00002240: 4E 29 3A 4E B2 4E AB 31 3A 8E 00 54 3E 88 09 42 |N):N.N.1:..T>..B|
00002250: 24 B2 22 22 00 5E 3E 92 09 99 22 A4 22 3B 00 67 |$."".^>...".";.g|
00002260: 3E 9C 09 A1 F9 41 24 00 81 3E A6 09 8B 41 24 B2 |>....A$..>...A$.|
00002270: 22 9D 22 B0 41 24 B2 C7 28 32 30 29 A7 32 35 33 |".".A$..(20).253|
00002280: 30 00 B5 3E B0 09 8B 41 24 B2 22 13 22 B0 41 24 |0..>...A$.".".A$|
00002290: B2 22 93 22 B0 41 24 B2 22 11 22 B0 41 24 B2 22 |.".".A$.".".A$."|
000022A0: 91 22 B0 41 24 B2 22 94 22 B0 41 24 B2 22 1D 22 |.".A$.".".A$."."|
000022B0: A7 32 34 36 30 00 CC 3E BA 09 8B 41 24 B2 C7 28 |.2460..>...A$..(|
000022C0: 31 33 29 A7 99 C7 28 32 30 29 3A 8E 00 DD 3E C4 |13)...(20):...>.|
000022D0: 09 91 49 89 32 35 36 30 2C 32 35 38 30 00 EA 3E |..I.2560,2580..>|
000022E0: CE 09 42 24 B2 42 24 AA 41 24 00 FC 3E D8 09 99 |..B$.B$.A$..>...|
000022F0: 22 9D 22 41 24 3B 3A 89 32 34 35 30 00 0F 3F E2 |"."A$;:.2450..?.|
00002300: 09 8B C3 28 42 24 29 B3 31 A7 89 32 34 36 30 00 |...(B$).1..2460.|
00002310: 33 3F EC 09 42 24 B2 C8 28 42 24 2C C3 28 42 24 |3?..B$..(B$,.(B$|
00002320: 29 AB 31 29 3A 41 24 B2 C7 28 32 30 29 3A 89 32 |).1):A$..(20):.2|
00002330: 35 32 30 00 46 3F F6 09 99 C7 28 32 30 29 3B C7 |520.F?....(20);.|
00002340: 28 31 33 29 3A 8E 00 70 3F 00 0A 8B 28 41 24 B3 |(13):..p?...(A$.|
00002350: 22 30 22 B0 41 24 B1 22 39 22 29 AF 41 24 B3 B1 |"0".A$."9").A$..|
00002360: 22 2E 22 AF 41 24 B3 B1 22 2D 22 A7 32 34 36 30 |".".A$.."-".2460|
00002370: 00 7A 3F 0A 0A 89 32 35 31 30 00 9C 3F 14 0A 8B |.z?...2510..?...|
00002380: 28 41 24 B3 22 30 22 B0 41 24 B1 22 39 22 29 AF |(A$."0".A$."9").|
00002390: 41 24 B3 B1 22 2F 22 A7 32 34 36 30 00 AE 3F 1E |A$.."/".2460..?.|
000023A0: 0A 8B C3 28 42 24 29 B2 38 A7 32 34 36 30 00 DC |...(B$).8.2460..|
000023B0: 3F 28 0A 91 C3 28 42 24 29 89 32 36 35 30 2C 32 |?(...(B$).2650,2|
000023C0: 36 33 30 2C 32 36 31 30 2C 32 36 37 30 2C 32 36 |630,2610,2670,26|
000023D0: 33 30 2C 32 36 31 30 2C 32 36 31 30 00 ED 3F 32 |30,2610,2610..?2|
000023E0: 0A 8B 41 24 B2 22 2F 22 A7 32 34 36 30 00 F7 3F |..A$."/".2460..?|
000023F0: 3C 0A 89 32 35 31 30 00 09 40 46 0A 8B 41 24 B3 |<..2510..@F..A$.|
00002400: B1 22 2F 22 A7 32 34 36 30 00 13 40 50 0A 89 32 |."/".2460..@P..2|
00002410: 35 31 30 00 35 40 5A 0A 8B 41 24 B2 22 2F 22 A7 |510.5@Z..A$."/".|
00002420: 20 42 24 B2 22 30 22 AA 42 24 3A 99 22 9D 9D 94 | B$."0".B$:."...|
00002430: 30 1D 1D 22 3B 00 3F 40 64 0A 89 32 35 31 30 00 |0..";.?@d..2510.|
00002440: 6D 40 6E 0A 8B 41 24 B2 22 2F 22 A7 42 24 B2 C8 |m@n..A$."/".B$..|
00002450: 28 42 24 2C 33 29 AA 22 30 22 AA C9 28 42 24 2C |(B$,3)."0"..(B$,|
00002460: 31 29 3A 99 22 9D 9D 94 30 1D 1D 22 3B 00 77 40 |1):."...0..";.w@|
00002470: 78 0A 89 32 35 31 30 00 7D 40 82 0A 3A 00 C9 40 |x..2510.}@..:..@|
00002480: 8C 0A 8F 20 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |... ............|
00002490: 2E 2E 2E 2E 2E 2E 2E 2E 43 41 4C 43 55 4C 41 54 |........CALCULAT|
000024A0: 4F 52 20 52 4F 55 54 49 4E 45 2E 2E 2E 2E 2E 2E |OR ROUTINE......|
000024B0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
000024C0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 00 CF 40 96 0A 3A 00 |...........@..:.|
000024D0: 0A 41 A0 0A 99 22 93 12 43 41 4C 43 55 4C 41 54 |.A..."..CALCULAT|
000024E0: 4F 52 11 22 3A 99 22 45 4E 54 45 52 20 53 54 41 |OR.":."ENTER STA|
000024F0: 52 54 49 4E 47 20 42 41 4C 41 4E 43 45 3F 22 3B |RTING BALANCE?";|
00002500: 3A 49 B2 31 3A 8D 32 34 34 30 00 19 41 AA 0A 8B |:I.1:.2440..A...|
00002510: 42 24 B2 22 22 A7 33 33 30 00 3E 41 B4 0A 49 B2 |B$."".330.>A..I.|
00002520: 31 45 35 3A 56 B2 AB 31 45 35 3A 57 B2 30 3A 8D |1E5:V..1E5:W.0:.|
00002530: 32 38 32 30 3A 8B 57 B3 30 A7 32 37 32 30 00 5C |2820:.W.0.2720.\|
00002540: 41 BE 0A 58 B2 42 3A 8D 32 30 34 30 3A 8B 57 B3 |A..X.B:.2040:.W.|
00002550: C3 28 42 24 29 AB 32 A7 32 37 32 30 00 8C 41 C8 |.(B$).2.2720..A.|
00002560: 0A 42 B2 C5 28 42 24 29 3A 99 22 11 41 4D 4F 55 |.B..(B$):.".AMOU|
00002570: 4E 54 20 4F 46 20 45 4E 54 52 59 22 43 24 22 3F |NT OF ENTRY"C$"?|
00002580: 22 3B 3A 49 B2 31 3A 8D 32 34 34 30 00 A0 41 D2 |";:I.1:.2440..A.|
00002590: 0A 8B 42 24 B2 22 22 A7 42 B2 58 3A 89 33 33 30 |..B$."".B.X:.330|
000025A0: 00 D8 41 DC 0A 49 B2 31 45 34 3A 56 B2 AB 31 45 |..A..I.1E4:V..1E|
000025B0: 34 3A 57 B2 30 3A 8D 32 38 32 30 3A 8B 57 B3 30 |4:W.0:.2820:.W.0|
000025C0: A7 52 B2 33 3A 8D 32 32 32 30 3A 42 24 B2 C4 28 |.R.3:.2220:B$..(|
000025D0: 42 29 3A 89 32 37 36 30 00 05 42 E6 0A 8D 32 30 |B):.2760..B...20|
000025E0: 34 30 3A 8B 57 B3 C3 28 42 24 29 AB 32 A7 52 B2 |40:.W..(B$).2.R.|
000025F0: 33 3A 8D 32 32 32 30 3A 42 24 B2 C4 28 42 29 3A |3:.2220:B$..(B):|
00002600: 89 32 37 36 30 00 2F 42 F0 0A 42 B2 42 AA C5 28 |.2760./B..B.B..(|
00002610: 42 24 29 3A 8D 32 31 35 30 3A 99 22 42 41 4C 41 |B$):.2150:."BALA|
00002620: 4E 43 45 3D 20 24 22 42 24 3A 89 32 37 36 30 00 |NCE= $"B$:.2760.|
00002630: 62 42 FA 0A 99 22 93 11 11 11 11 11 11 11 11 11 |bB..."..........|
00002640: 11 41 43 43 4F 55 4E 54 20 45 4D 50 54 59 2E 22 |.ACCOUNT EMPTY."|
00002650: 3A 81 5A B2 31 A4 31 35 30 30 3A 82 5A 3A 89 33 |:.Z.1.1500:.Z:.3|
00002660: 33 30 00 7C 42 04 0B 8B C5 28 42 24 29 B1 49 B0 |30.|B....(B$).I.|
00002670: C5 28 42 24 29 B3 56 A7 57 B2 AB 31 00 82 42 0E |.(B$).V.W..1..B.|
00002680: 0B 8E 00 88 42 18 0B 3A 00 CD 42 22 0B 8F 20 2E |....B..:..B".. .|
00002690: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
000026A0: 2E 20 53 45 54 20 46 55 4E 43 54 49 4F 4E 20 4B |. SET FUNCTION K|
000026B0: 45 59 53 20 54 4F 20 43 48 52 24 20 53 54 41 4E |EYS TO CHR$ STAN|
000026C0: 44 41 52 44 20 2E 2E 2E 2E 2E 2E 2E 2E 00 D3 42 |DARD ..........B|
000026D0: 2C 0B 3A 00 E2 42 36 0B F9 20 31 2C C7 28 31 33 |,.:..B6.. 1,.(13|
000026E0: 33 29 00 F1 42 40 0B F9 20 32 2C C7 28 31 33 37 |3)..B@.. 2,.(137|
000026F0: 29 00 00 43 4A 0B F9 20 33 2C C7 28 31 33 34 29 |)..CJ.. 3,.(134)|
00002700: 00 0F 43 54 0B F9 20 34 2C C7 28 31 33 38 29 00 |..CT.. 4,.(138).|
00002710: 1E 43 5E 0B F9 20 35 2C C7 28 31 33 35 29 00 2D |.C^.. 5,.(135).-|
00002720: 43 68 0B F9 20 36 2C C7 28 31 33 39 29 00 3C 43 |Ch.. 6,.(139).<C|
00002730: 72 0B F9 20 37 2C C7 28 31 33 36 29 00 4B 43 7C |r.. 7,.(136).KC||
00002740: 0B F9 20 38 2C C7 28 31 34 30 29 00 51 43 86 0B |.. 8,.(140).QC..|
00002750: 8E 00 57 43 90 0B 3A 00 9B 43 9A 0B 8F 20 2E 2E |..WC..:..C... ..|
00002760: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 53 45 54 |............ SET|
00002770: 20 46 55 4E 43 54 49 4F 4E 20 4B 45 59 53 20 54 | FUNCTION KEYS T|
00002780: 4F 20 43 31 32 38 20 53 54 41 4E 44 41 52 44 20 |O C128 STANDARD |
00002790: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 00 AD 43 A4 0B |.............C..|
000027A0: F9 20 31 2C 22 47 52 41 50 48 49 43 22 00 C3 43 |. 1,"GRAPHIC"..C|
000027B0: AE 0B F9 20 32 2C 22 44 4C 4F 41 44 22 AA C7 28 |... 2,"DLOAD"..(|
000027C0: 33 34 29 00 DD 43 B8 0B F9 20 33 2C 22 44 49 52 |34)..C... 3,"DIR|
000027D0: 45 43 54 4F 52 59 22 AA C7 28 31 33 29 00 F4 43 |ECTORY"..(13)..C|
000027E0: C2 0B F9 20 34 2C 22 53 43 4E 43 4C 52 22 AA C7 |... 4,"SCNCLR"..|
000027F0: 28 31 33 29 00 0A 44 CC 0B F9 20 35 2C 22 44 53 |(13)..D... 5,"DS|
00002800: 41 56 45 22 AA C7 28 33 34 29 00 1E 44 D6 0B F9 |AVE"..(34)..D...|
00002810: 20 36 2C 22 52 55 4E 22 AA C7 28 31 33 29 00 33 | 6,"RUN"..(13).3|
00002820: 44 E0 0B F9 20 37 2C 22 4C 49 53 54 22 AA C7 28 |D... 7,"LIST"..(|
00002830: 31 33 29 00 4B 44 EA 0B F9 20 38 2C 22 4D 4F 4E |13).KD... 8,"MON|
00002840: 49 54 4F 52 22 AA C7 28 31 33 29 00 59 44 F4 0B |ITOR"..(13).YD..|
00002850: 99 D3 28 45 52 29 3B 45 4C 00 80 44 FE 0B 99 22 |..(ER);EL..D..."|
00002860: 11 12 9F 43 48 45 43 4B 42 4F 4F 4B 20 50 52 4F |...CHECKBOOK PRO|
00002870: 47 52 41 4D 20 43 4F 4D 50 4C 45 54 45 44 05 22 |GRAM COMPLETED."|
00002880: 00 86 44 08 0C 80 00 8C 44 12 0C 3A 00 C5 44 1C |..D.....D..:..D.|
00002890: 0C 8F 20 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 20 57 |.. .......... W|
000028A0: 45 4C 43 4F 4D 45 20 53 43 52 45 45 4E 20 2E 2E |ELCOME SCREEN ..|
000028B0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
000028C0: 2E 2E 2E 2E 2E 00 CB 44 26 0C 3A 00 DF 44 30 0C |.......D&.:..D0.|
000028D0: 8D 33 32 38 30 3A E7 35 2C 31 3A 99 22 92 22 00 |.3280:.5,1:.".".|
000028E0: 1B 45 3A 0C 99 22 93 1C 20 20 20 20 20 20 20 20 |.E:..".. |
000028F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002900: 20 20 20 20 43 31 32 38 20 43 48 45 43 4B 42 4F | C128 CHECKBO|
00002910: 4F 4B 20 50 52 4F 47 52 41 4D 22 00 71 45 44 0C |OK PROGRAM".qED.|
00002920: 99 22 11 05 4D 4F 44 49 46 49 45 44 20 46 4F 52 |."..MODIFIED FOR|
00002930: 20 54 48 45 20 43 31 32 38 20 42 59 20 47 45 4E | THE C128 BY GEN|
00002940: 45 20 45 48 52 49 43 48 2E 20 50 52 4F 47 52 41 |E EHRICH. PROGRA|
00002950: 4D 20 57 49 4C 4C 20 48 4F 4C 44 20 49 4E 20 53 |M WILL HOLD IN S|
00002960: 54 4F 52 41 47 45 20 55 50 20 54 4F 20 31 34 31 |TORAGE UP TO 141|
00002970: 35 00 C5 45 4E 0C 99 22 11 43 48 45 43 4B 53 20 |5..EN..".CHECKS |
00002980: 46 4F 52 20 54 48 45 20 43 55 52 52 45 4E 54 20 |FOR THE CURRENT |
00002990: 41 43 43 4F 55 4E 54 20 42 45 49 4E 47 20 57 4F |ACCOUNT BEING WO|
000029A0: 52 4B 45 44 20 4F 4E 2E 20 20 57 48 45 4E 20 42 |RKED ON. WHEN B|
000029B0: 41 4C 41 4E 43 49 4E 47 20 41 43 43 4F 55 4E 54 |ALANCING ACCOUNT|
000029C0: 20 45 41 43 48 00 1C 46 58 0C 99 22 11 4D 41 54 | EACH..FX..".MAT|
000029D0: 43 48 45 44 20 49 54 45 4D 20 57 49 4C 4C 20 48 |CHED ITEM WILL H|
000029E0: 41 56 45 20 41 4E 20 2A 20 50 4C 41 43 45 44 20 |AVE AN * PLACED |
000029F0: 54 4F 20 54 48 45 20 52 49 47 48 54 20 4F 46 20 |TO THE RIGHT OF |
00002A00: 54 48 45 20 44 45 53 43 52 49 50 54 49 4F 4E 20 |THE DESCRIPTION |
00002A10: 46 49 45 4C 44 2E 20 41 46 54 45 52 00 71 46 62 |FIELD. AFTER.qFb|
00002A20: 0C 99 22 11 42 41 4C 41 4E 43 49 4E 47 20 54 48 |..".BALANCING TH|
00002A30: 45 20 41 43 43 4F 55 4E 54 20 54 48 45 20 50 52 |E ACCOUNT THE PR|
00002A40: 4F 47 52 41 4D 20 57 49 4C 4C 20 41 53 4B 20 49 |OGRAM WILL ASK I|
00002A50: 46 20 59 4F 55 20 57 49 53 48 20 4D 41 54 43 48 |F YOU WISH MATCH|
00002A60: 45 44 20 49 54 45 4D 53 20 44 45 4C 45 54 45 44 |ED ITEMS DELETED|
00002A70: 2E 00 C8 46 6C 0C 99 22 11 49 46 20 59 4F 55 20 |...Fl..".IF YOU |
00002A80: 53 41 59 20 59 45 53 20 49 54 20 57 49 4C 4C 20 |SAY YES IT WILL |
00002A90: 41 53 4B 20 49 46 20 59 4F 55 20 41 52 45 20 53 |ASK IF YOU ARE S|
00002AA0: 55 52 45 2E 20 49 46 20 59 4F 55 20 53 41 59 20 |URE. IF YOU SAY |
00002AB0: 4E 4F 20 54 48 45 4E 20 59 4F 55 20 4D 41 59 20 |NO THEN YOU MAY |
00002AC0: 4B 45 45 50 20 41 4C 4C 00 1C 47 76 0C 99 22 11 |KEEP ALL..Gv..".|
00002AD0: 49 54 45 4D 53 20 49 4E 20 41 43 43 4F 55 4E 54 |ITEMS IN ACCOUNT|
00002AE0: 20 55 50 20 54 4F 20 31 34 31 35 2E 20 49 46 20 | UP TO 1415. IF |
00002AF0: 59 4F 55 20 53 41 59 20 59 45 53 20 54 48 45 4E |YOU SAY YES THEN|
00002B00: 20 41 4C 4C 20 57 49 54 48 20 2A 20 57 49 4C 4C | ALL WITH * WILL|
00002B10: 20 42 45 20 44 45 4C 45 54 45 44 2E 00 5F 47 80 | BE DELETED.._G.|
00002B20: 0C 99 22 9F 11 11 20 20 20 20 20 20 20 20 20 20 |.."... |
00002B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 4F | TO|
00002B40: 20 45 4E 44 20 50 52 4F 47 52 41 4D 20 50 52 45 | END PROGRAM PRE|
00002B50: 53 53 20 52 55 4E 2F 53 54 4F 50 20 4B 45 59 00 |SS RUN/STOP KEY.|
00002B60: 9D 47 8A 0C 99 22 96 11 11 20 20 20 20 20 20 20 |.G..."... |
00002B70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002B80: 20 20 20 20 20 20 20 54 4F 20 42 45 47 49 4E 20 | TO BEGIN |
00002B90: 50 52 45 53 53 20 41 4E 59 20 4B 45 59 00 A7 47 |PRESS ANY KEY..G|
00002BA0: 94 0C 99 22 05 92 22 00 B0 47 9E 0C A1 F9 41 24 |...".."..G....A$|
00002BB0: 00 B6 47 A8 0C 8E 00 BC 47 B2 0C 3A 00 07 48 BC |..G.....G..:..H.|
00002BC0: 0C 8F 20 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |.. .............|
00002BD0: 2E 2E 53 54 41 52 54 55 50 20 47 52 41 50 48 49 |..STARTUP GRAPHI|
00002BE0: 43 20 53 43 52 45 45 4E 2E 2E 2E 2E 2E 2E 2E 2E |C SCREEN........|
00002BF0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
00002C00: 2E 2E 2E 2E 2E 2E 2E 00 0D 48 C6 0C 3A 00 16 48 |.........H..:..H|
00002C10: D0 0C 99 22 93 22 00 20 48 DA 0C D7 32 39 38 30 |...".". H...2980|
00002C20: 00 2D 48 E4 0C 81 58 58 B2 31 A4 31 36 00 3B 48 |.-H...XX.1.16.;H|
00002C30: EE 0C 81 43 B2 32 20 A4 20 31 36 00 44 48 F8 0C |...C.2 . 16.DH..|
00002C40: E7 35 2C 43 00 5D 48 02 0D 99 22 12 20 20 20 43 |.5,C.]H...". C|
00002C50: 48 45 43 4B 42 4F 4F 4B 20 20 20 22 3B 00 64 48 |HECKBOOK ";.dH|
00002C60: 0C 0D 82 43 00 6C 48 16 0D 82 58 58 00 72 48 20 |...C.lH...XX.rH |
00002C70: 0D 8E 00 00 00 |..... |
..O.... ........MODIFIED FOR C128 WITH 8
0 COLUMN RGB SCREEN.....................
U...:...... .................BY GENE EHR
ICH 08053-0209..........................
......(.. .....................OCTOBER 1
0, 1985.................................
....2.:...<.....F..%: .2870.K.P.C$.G(13)
:T$.".DATE (MM/DD/YY).":L$.".ACCOUNT BAL
ANCE.":."."...Z.M..((.(1).500).45):.C%(M
),D$(M),A(M):. MAIN MENU,NEW ACCOUNT,ACC
OUNT UPDATE...D.. WORK ON ANOTHER ACCOUN
T,"",FUNCTION KEY MENU,MAIN MENU,BALANCE
ACCOUNT...N.. ENTER TRANSACTIONS,CALCUL
ATOR MODE,ACCOUNT LISTING,SAVE ACCOUNT.}
.X.. FUNCTION KEY MENU,"","..",ENTIRE AC
COUNT,CHECKS,RANGE OF CHECKS,DEPOSITS.O.
... OTHER TRANSACTIONS,"","..",LISTED-MA
TCH,LISTED-NO MATCH,NOT ON STATEMENT,"".
..... "..",CONTINUE,EDIT,DELETE,"",TRANS
ACTION TYPE,CHECK,DEPOSIT,OTHER,"".A....
"DISPLAY OPTIONS",FULL SCREEN,ITEM BY I
TEM,LISTING TO PRINTER,"".K. ..3120.Q...
......."....ENTER GENERAL ACCOUNT INFORM
ATION.."C$"BANK NAME."C$"?";:I.0:.2440..
...P$.H(B$,20):."..ACCOUNT #."C$"?";:I.1
:.2440:M$.H(B$,15).8 H.."."T$;C$"?";:I.2
:.2440:.2190:H$.B$:.B$."".R.3:.2220:.200
.D R.I.1:T%.1:.1940:.T%.210,900,220,170:
.350.. ..."..PUT ACCOUNT DATA DISK IN DR
IVE. WHEN READY, PRESS 'RETURN'..".B ..S
.0:.2000:.T%.1.350.U ...1,8,15,"I": 1..!
...15,8,15:B$.H(P$,3).I(M$,4):.2,8,2,B$:
.15,E.A!...E..0.."..ACCOUNT NOT FOUND.."
:.T.1.3000:.T: 15: 2:.210.Q!...2,P$,M$:.
2,N$,U$:.2,N:.2,B:.Q.1.N:.2,C%(Q)..!...2
,D$(Q):.2,A(Q):.Q: 2: 15.E!".."."P$;C$;M
$;C$"..ACCOUNT LAST BALANCED ON .";N$..!
,.."..FILE LAST UPDATED ON .";U$:.2150:.
"."L$;.@"6..C$"$"B$;C$"..PRESS 'RETURN'
TO CONTINUE":P$.H(P$,20):M$.H(M$,15):S.0
.T"@..2000:.T%.1.350.G"J.I.2:T%.6:.1940.
}"T..T%.10..2000:.340.."^..T%.132.330,21
0,360,660,330,940,2720,600:.330.R"H.R.N.
10:.R.1.R.1:.N.0..".":.390..#R..N.M.."..
...........MEMORY FULL..":.T.1.1500:.T:.
330.7#|..".LATEST ENTRIES:":.Q.R.N:I.1:.
2070:.Q.I#...2150:.L$;C$;"$"B$;C$"CCCCCC
CCCCCCCCCCCCCCCC". #..I.0:T%.32:.1940:R.
8:.2220:.T%.330,410,420,430:.350..#..."E
NTER CHECK.":.440..#..."ENTER DEPOSIT.":
C%(N.1)..1:.440..$..."ENTER OTHER TRANS.
.":C%(N.1).0.3$...T$;C$"?";:I.2:.2440:.B
$."".R.4:.2220:.400.S$B..2190:.B$."".R.2
:.2220:.440.Q$L.N.N.1:D$(N).B$:.T%..2.50
0..$V.."CHECK #";C$"?";:I.1:.2440..$..I.
3E4:V.1:.2820:.W.0.R.2:.2220:W.0:.470.M$
..C%(N).E(B$)..%..."DESCRIPTION";C$"?";:
I.0:.2440:D$(N).D$(N)." ".H(B$,25).C%..
."AMOUNT";C$"?";:I.1:.2440:.2040:I.1E4:V
..1E4:.2820.R%...W.C(B$).2.(T%..4.E(B$).
.0).R.2:.2220:.510..%..A(N).E(B$):.".IS
EVERYTHING CORRECT"C$"(Y/N)?."..%....A$.
F%&..A$."N".N.N.1:.360.W%0..A$.."Y".540.
.%:..T%.2.B.B.2.A(N)..&D.B.B.A(N):.N.1.3
60. &N..T%.1.2230,2310,2310:.360.F&X..".
.PUT ACCOUNT DATA DISK IN DRIVE. WHEN RE
ADY, PRESS 'RETURN'..".~&B.S.0:.2000:.T%
.1.350..&L..1,8,15,"I": 1.R&V.B$."@0:".H
(P$,3).I(M$,4).",S,W":U$.H$:.2,8,2,B$:.2
,P$,",",M$..&...2,H(N$,8),",",H(U$,8):.2
,N:.2,B.''...T.1.N:.2,C%(T):.2,D$(T):.2,
A(T):.T: 2:.330.5'...N.0.2810.;'..:..'..
."."P$;C$;"ACC# "M$;C$"EEEEEEEEEEEEEEEEE
EEEEE":.2150:.L$;C$;"$"B$.C'..I.0:..2);"
...ACCOUNT LISTING..":T%.15:.1940:E%.T%.
1:.T%.2.330.Q'...T%.9.350..(F..".";.8);E
%".":T%.37:I.0:.1940:.T%.680,720,720,720
:.350."(P.P%.T%:.P%..4.740.[(Z..4,4:.4,"
ACCOUNT LISTING",C$,C$,P$,C$,M$,C$,H$,C$
,C$..(...".":X.0:Q.0:.E%.780,780,850,780
,780..(.. 4:.X.0.660..(...1560:.E%.9.350
..(...830.F(..Q.Q.1:.E%.1.1470..(...E%.2
.C%(Q).0.1470..( ..E%.3.C%(Q)..J.C%(Q)..
K.1470..)*..E%.4.C%(Q).0.1470.,)4..E%.5.
C%(Q).0.1470.9)>..Q.N.780.B)H..750.O)R..
".FROM CHECK #:.";:I.1:.2440:.B$."".680.
.)\.K.E(B$):I.3E4:V.1:.2820:.W.1.740..)F
.."..TO CHECK #:.";:I.1:.2440:.B$."".740
..)P.J.E(B$):I.3E4:V.1:.2820:.W.1.R.1:.2
220:.870..)Z..".":.780.:*..."..ENTER BAL
ANCE SHOWN ON LAST BALANCED STATEMENT ?.
";.A*..I.1:.2440:.2040:I.1E5:V..1E5:.282
0..*...W.C(B$).2.R.1:.2220:."?";:.910..*
..B.E(B$):N.0:.330..*...N.0.2810..*...".
"P$;C$"ACC# "M$;C$"EEEEEEEEEEEEEEEEEEEEE
E. ..ACCOUNT ";.4+...".BALANCING..."C$".
COMPARE THE ENTRY ON THE SCREEN TO THE S
TATEMENT...".T+J..Q.1.N:.I(D$(Q),1)."*".
1010.|+T.I.0:.2070:T%.22:I.0:.1940:R.5:.
2220..+...T%.1000,1020,1030,1010:Q.N:.Q:
.350..+..Q.N:.Q:.330.A+...Q:.1040..+..D$
(Q).D$(Q)."*":.1010..+..T%.Q:.1670:Q.T%.
1:.".":.1010.9,...".IS EVERYTHING ON THE
STATEMENT ACCOUNTED FOR (Y/N)?.".B,....
A$.R,$..A$."N".330.D,...A$.."Y".1050..,8
.."..ENTER STATEMENT BALANCE.";C$"?";:I.
1:.2440:.2040.D,B.I.1E5:V..1E5:.2820:.W.
C(B$).2.1080..,L.V.E(B$):Z.B:.Q.1.N:.I(D
$(Q),1)."*".1130..-V..C%(Q).0.V.V.2.A(Q)
..-`.V.V.A(Q):B.V:.2150.&-J..Q.^-T.."..C
HECKBOOK BALANCE=. $";:B.Z:.2150:.B$:B.V
:.2150..-~.."..ADJUSTED STATEMENT BALANC
E=. $";:.B$:B.Z.V:.2150.P-..B.Z:.E(B$).0
.."..YOUR CHECKBOOK IS BALANCED..":.1210
......"..THE DIFFERENCE IS:. $"B$;C$".PR
ESS 'RETURN' TO GO TO ACCOUNT LISTING.".
7...S.0:.2000:.T%.1.350.@....660.F...:..
.... ......... ROUTINE TO DELETE ENTRIES
WITH * .........................D.:.Y.N
.."..DO YOU WANT TO DELETE ALL OF THE MA
TCHED ITEMS FROM ACCOUNT?../X.."A 'Y' RE
SPONSE WILL CAUSE THEM TO BE DELETED."..
/....A$.6/...A$."N".W$."\":."NO":.1370.H
/...A$.."Y".1250.S/..."YES"../..."..ARE
YOU SURE YOU WANT TO DELETE MATCHED ITEM
S FROM DISK?."../....A$../...A$."N".W$."
\":."NO":.1370.P/(..A$.."Y".1300../2..A$
."Y".W$."*":."YES".20<.."..ALL OF THE IT
EMS IN THE ACCOUNT WHICH HAVE BEEN MATCH
ED ON THE".L0F.."STATEMENT ARE NOW BEING
DELETED FROM THE ACCOUNT.."..0P.."...PL
EASE BE PATIENT."..0Z.N$.H$..0D..Q.1.N:.
I(D$(Q),1).W$.T%.Q:I1.Q.1:.1920.F0N..Q.W
0X..W$."\".1420..1..."..DO YOU WISH THE
REMAINING ITEMS TO BE SAVED (Y/N)?.":.14
30.O1..."..DO YOU WISH THE ACCOUNT TO BE
SAVED (Y/N)?.".X1....A$.P1 ..A$."Y".."Y
ES":.600..1...A$."N".."NO":.330..1...143
0..1...X.0.I1.Q.1..1H.I.0:.2070:.P%..4.1
540..1R.A$."":.C%(Q).0.A$."CHECK #".D(C%
(Q))..2...C%(Q).0.A$."OTHER TRANSACTION"
.#2...C%(Q).0. A$."DEPOSIT".82..B$.D(A(Q
)):.2120.R2...4,A$;.20.C(A$));D$(Q);.45.
C(D$(Q)).C(B$));B$".":.830..2..X.X.1:.X.
5.P%.3..1560:.E%.9.350..2...830..2..X.0:
I.0:T%.27:.1940:R.5:.2220:.T%.1580,1570,
1590,1780:E%.9..2"....2,.Q.N:..&36..".EN
TER # OF ITEM TO BE CHANGED.."C$"?";:I.1
:.2440.>3@..B$."" .R.3:.2220:..G3J.I.3E4
:V..N:.2820:.W.0.T%.M:W.0:.1660..3T.T%.E
(B$):.T%.0.T%.M:.1660..3^..T%.0.T%..T%:.
1660:.Z..3H..Z.1.N:.C%(Z).T%.T%.Z:Z.N.D3
R..Z..3|..T%.N.R.3:.2220:.1590.(4..."..U
SE CURSOR KEYS TO POSITION CURSOR OVER E
RROR. CORRECT THE ERROR".I4..."BY TYPING
THE CORRECT DATA IN. HIT 'RETURN' WHEN
FIXED..."..4...".CURRENT ENTRY:.":Q.T%:I
.0:.2070:."..CORRECT AMOUNT.".I4..B.B.A(
T%):.C%(T%).0.B.B.2.A(T%)..5..B$.D(A(T%)
):.2120:." "B$:.".";B$:.2040:I.1E4:V..1
E4.'5...2820:.W.C(B$).2.R.1:.2220:.1710.
I5B.A(T%).E(B$):."..CORRECT DATE."C$" "
H(D$(T%),8):.".";B$:.2190..5L..B$."".R.3
:.2220:.1730.A5V.."..CORRECT DESCRIPTION
."C$" "J(D$(T%),11):.".";A$:."."..5..D$
(T%).B$." ".I(A$,25):.C%(T%).0.B.B.2.A(
T%).)6..B.B.A(T%):Q.I1:B$.D(B):.2150:.".
"L$;C$"$";B$".":..F6...".ENTER NUMBER OF
ITEM TO BE DELETED.."C$"?";:I.1:.2440.}
6...B$."".R.3:.2220:...6..I.3E4:V..N:.28
20:.W.0.T%.M:W.0:.1850.D6..T%.E(B$):.T%.
0.T%.M:.1850..6...T%.0.T%..T%:.1850..6&.
.Z.1.N:.T%.C%(Z).T%.Z:Z.N..70..Z..7:..".
":.T%.N.R.5:.2220:.1780.J7D.Q.T%:I.0:.20
70:."..ARE YOU SURE YOU WANT THIS ITEM D
ELETED"C$"(Y/N)?.".S7N...A$..7X..A$."N".
Q.I1:.".":...7B..A$.."Y".1870..7L..C%(T%
).0.B.B.2.A(T%)..7V.B.B.A(T%):.2150:."."
L$;C$"$"B$"."..8...T.T%.N:C%(T).C%(T.1):
D$(T).D$(T.1):A(T).A(T.1):.T:Q.I1.=8..C%
(N).0:A(N).0:D$(N)."":N.N.1:..T8...I.0..
"."P$;C$"ACC# "M$;C$"EEEEEEEEEEEEEEEEEEE
EEE"..8...:.S.1.T%:.A$:.S:S.0:.A$."..".1
970..8....(20.C(A$)).2);".."A$".":.:S.0.
.8...A$:.A$.."".S.S.1:.S".)"A$:.1970..9.
..I.2.."..ENTER #:.";:.2000.-9F..:POKE38
043,3:POKE38087,3:POKE38131,3.69P...A$.X
9Z..:T%.F(A$).1:.T%.133.T%.141....9..T%.
E(A$).1:.T%.1..S.(T%..1.A$.G(13))....9..
.2000..9..W.0:.T.1.C(B$):.J(B$,T,1).".".
W.T:T.C(B$).O9...T:.W.0.W.C(B$).U9.....:
..B$.D(A(Q)):.2120:.C%(Q).0.."CK #"C%(Q)
;..: ..C%(Q).0.."OTN# "(.Q);.7:*..C%(Q).
0.."DEP# "(.Q);.T:4...19.C(B$));"$"B$:.I
.1...D:>..D$(Q)".":..{:H..2040:.W.C(B$).
2....:R..W.C(B$).B$.B$.".00":...:\.B$.B$
."0":...:F..B.0.B.B..0001.L:P..B.0.B.B..
0001..:Z...(B)..01.B.0..;..B$.D(B):.2040
:B$.H(B$,W.2):.2120:B.E(B$):..>;...C(B$)
.8.J(B$,1,2)."12".J(B$,4,2)."31".B$."".O
;...C(B$).8.J(B$,1,2)."01".J(B$,4,2)."01
".B$."".U;.....;...E.1.R:."..":."
":."..":.E:..L;...T.1.N.1:
.C%(N).C%(T).Z.T:T.N..;...T:.T.N.2260..;
J...'<T..:."..CHECK "C%(N)" ALREADY ONFI
LE...":Q.Z:I.0:." 1)":.2070:Q.N.A<..." 2
)":.2070:.".ENTER # OF CORRECT ENTRY:.":
S.2:.2000.}<..T%.T%.1:.T%.0.T%.2.2230..<
...T%.1.B.B.A(N):N.N.1:..C<..B.A(Z).B:D$
(Z).D$(N):A(Z).A(N):N.N.1:..R<..Z.0:.N.1
....<...Q.1.N.1:.H(D$(N),8)..H(D$(Q),8).
2380..=...C%(Q)..C%(N).2380.(=$..A(Q)..A
(N).2380.6=...Z.1.2370.F=8..".THESE ENTR
IES ARE ALREADY ON FILE:.":Z.1.T=B.I.0:.
2070..=L..Q:.Z.0....=V.."..IS THIS ENTRY
A DUPLICATE?..":I.0:.2070:.".(Y/N)?.".G
=`...A$..=J..A$."N"..".ADDING ENTRY TO L
IST:.":.T.1.1500:.T:...>T..A$.."Y".2400.
J>~.."..ERASING LAST ENTRY.":.T.1.1500:.
T:B.B.A(N):N.N.1:..T>..B$."".^>...".";.G
>....A$..>...A$.".".A$.G(20).2530..>...A
$.".".A$.".".A$.".".A$.".".A$.".".A$."."
.2460.L>...A$.G(13)..G(20):...>D..I.2560
,2580..>N.B$.B$.A$..>X.."."A$;:.2450..?.
..C(B$).1..2460.3?..B$.H(B$,C(B$).1):A$.
G(20):.2520.F?...G(20);G(13):..P?...(A$.
"0".A$."9").A$..".".A$.."-".2460.Z?...25
10..?...(A$."0".A$."9").A$.."/".2460..?.
..C(B$).8.2460..?(..C(B$).2650,2630,2610
,2670,2630,2610,2610..?2..A$."/".2460..?
<..2510..@F..A$.."/".2460..@P..2510.5@Z.
.A$."/". B$."0".B$:."...0..";.?@D..2510.
M@N..A$."/".B$.H(B$,3)."0".I(B$,1):."...
0..";.W@X..2510.}@..:.I@... ............
........CALCULATOR ROUTINE..............
..................O@..:..A .."..CALCULAT
OR.":."ENTER STARTING BALANCE?";:I.1:.24
40..A...B$."".330.>A..I.1E5:V..1E5:W.0:.
2820:.W.0.2720.\A..X.B:.2040:.W.C(B$).2.
2720..AH.B.E(B$):.".AMOUNT OF ENTRY"C$"?
";:I.1:.2440. AR..B$."".B.X:.330.XA..I.1
E4:V..1E4:W.0:.2820:.W.0.R.3:.2220:B$.D(
B):.2760..B...2040:.W.C(B$).2.R.3:.2220:
B$.D(B):.2760./B..B.B.E(B$):.2150:."BALA
NCE= $"B$:.2760.BB..."...........ACCOUNT
EMPTY.":.Z.1.1500:.Z:.330.|B...E(B$).I.
E(B$).V.W..1..B.....B..:.MB".. .........
......... SET FUNCTION KEYS TO CHR$ STAN
DARD .........SB,.:..B6.. 1,G(133)..B@..
2,G(137)..CJ.. 3,G(134)..CT.. 4,G(138).
.C^.. 5,G(135).-CH.. 6,G(139).<CR.. 7,G(
136).KC|.. 8,G(140).QC....WC..:..C... ..
............ SET FUNCTION KEYS TO C128 S
TANDARD .............C... 1,"GRAPHIC".CC
... 2,"DLOAD".G(34)..C... 3,"DIRECTORY".
G(13)..CB.. 4,"SCNCLR".G(13)..DL.. 5,"DS
AVE".G(34)..DV.. 6,"RUN".G(13).3D... 7,"
LIST".G(13).KD... 8,"MONITOR".G(13).YD..
.S(ER);EL..D..."...CHECKBOOK PROGRAM COM
PLETED."..D.....D..:.ED... .......... W
ELCOME SCREEN ........................KD
&.:..D0..3280:.5,1:."."..E:.."..
C128 CHECKBOOK PROGR
AM".QED.."..MODIFIED FOR THE C128 BY GEN
E EHRICH. PROGRAM WILL HOLD IN STORAGE U
P TO 1415.EEN..".CHECKS FOR THE CURRENT
ACCOUNT BEING WORKED ON. WHEN BALANCING
ACCOUNT EACH..FX..".MATCHED ITEM WILL H
AVE AN * PLACED TO THE RIGHT OF THE DESC
RIPTION FIELD. AFTER.QFB..".BALANCING TH
E ACCOUNT THE PROGRAM WILL ASK IF YOU WI
SH MATCHED ITEMS DELETED..HFL..".IF YOU
SAY YES IT WILL ASK IF YOU ARE SURE. IF
YOU SAY NO THEN YOU MAY KEEP ALL..GV..".
ITEMS IN ACCOUNT UP TO 1415. IF YOU SAY
YES THEN ALL WITH * WILL BE DELETED.._G.
.."... TO END PRO
GRAM PRESS RUN/STOP KEY..G..."...
TO BEGIN PRESS AN
Y KEY..G...".."..G....A$..G.....G..:..H.
.. ...............STARTUP GRAPHIC SCREEN
.................................HF.:..H
P..".". HZ.W2980.-H...XX.1.16.;H...C.2 .
16.DH...5,C.]H...". CHECKBOOK ";.DH
...C.LH...XX.RH .....
> CLICK IMAGE PREVIEW FOR FULL MODAL