BOOKEEPING
FILE INFORMATION
FILENAME(S): BOOKEEPING
FILE TYPE(S): PRG
FILE SIZE: 5.2K
FIRST SEEN: 2025-11-30 17:31:30
APPEARS ON: 1 disk(s)
FILE HASH
9bd7caac82a3abb38487c9aa79c3c974b3b794ad1a0c637fe70679e8c5e5774f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ARCADIAN | BOOKEEPING | PRG | UK CD | 23 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 01 00 8F 20 2D 20 42 4B 45 45 50 45 |....... - BKEEPE| 00000010: 52 20 28 43 29 20 31 39 37 39 00 3C 08 02 00 8F |R (C) 1979.<....| 00000020: 20 57 52 49 54 54 45 4E 20 42 59 20 4A 4F 48 4E | WRITTEN BY JOHN| 00000030: 20 4D 45 4C 49 53 53 41 20 4A 52 2E 00 65 08 03 | MELISSA JR..e..| 00000040: 00 8F 20 34 32 30 31 20 43 4C 41 59 4D 4F 4E 54 |.. 4201 CLAYMONT| 00000050: 2C 20 41 50 54 2E 32 2C 20 4C 41 53 20 56 45 47 |, APT.2, LAS VEG| 00000060: 41 53 2C 4E 56 00 80 08 04 00 8F 20 50 48 4F 4E |AS,NV...... PHON| 00000070: 45 20 28 37 30 32 29 20 37 33 34 2D 30 38 34 39 |E (702) 734-0849| 00000080: 00 89 08 1E 00 4E B2 36 30 00 98 08 28 00 86 41 |.....N.60...(..A| 00000090: 28 4E 29 2C 42 28 4E 29 00 BB 08 2D 00 96 20 A5 |(N),B(N)...-.. .| 000000A0: 41 28 4B 29 B2 4B AB B5 28 BC 28 B6 28 46 29 29 |A(K).K..(.(.(F))| 000000B0: AD BC 28 31 30 29 29 3A 4B B2 35 00 C9 08 32 00 |..(10)):K.5...2.| 000000C0: 81 20 4A B2 31 20 A4 20 4E 00 D2 08 37 00 87 20 |. J.1 . N...7.. | 000000D0: 41 24 00 DA 08 3C 00 82 20 4A 00 E4 08 41 00 89 |A$...<.. J...A..| 000000E0: 35 30 30 30 00 0B 09 46 00 99 22 93 C1 43 43 4F |5000...F.."..CCO| 000000F0: 55 4E 54 20 4E 41 4D 45 20 57 49 4C 4C 20 42 45 |UNT NAME WILL BE| 00000100: 20 44 49 53 50 4C 41 59 45 44 22 00 32 09 48 00 | DISPLAYED".2.H.| 00000110: 99 22 41 46 54 45 52 A0 41 43 43 4F 55 4E 54 20 |."AFTER.ACCOUNT | 00000120: 23 20 45 4E 54 52 59 2E 20 C9 46 20 57 52 4F 4E |# ENTRY. .F WRON| 00000130: 47 22 00 56 09 4A 00 99 22 41 43 43 4F 55 4E 54 |G".V.J.."ACCOUNT| 00000140: 2C 20 45 4E 54 45 52 20 30 20 46 4F 52 20 41 4D |, ENTER 0 FOR AM| 00000150: 4F 55 4E 54 2E 22 00 8F 09 4C 00 99 22 C5 4E 54 |OUNT."...L..".NT| 00000160: 45 52 20 39 39 20 46 4F 52 20 41 43 43 4F 55 4E |ER 99 FOR ACCOUN| 00000170: 54 20 23 20 54 4F A0 52 45 54 55 52 4E 22 3A 99 |T # TO.RETURN":.| 00000180: 22 54 4F A0 4D 41 49 4E 4C 49 4E 45 2E 11 22 00 |"TO.MAINLINE..".| 00000190: 99 09 64 00 8D 32 30 30 30 00 9F 09 65 00 8C 00 |..d..2000...e...| 000001A0: B0 09 66 00 8B 20 41 31 B2 39 39 A7 35 30 30 30 |..f.. A1.99.5000| 000001B0: 00 C2 09 69 00 8B 20 41 31 B3 B2 4E 20 A7 20 31 |...i.. A1..N . 1| 000001C0: 31 30 00 E8 09 6C 00 99 22 C1 C3 C3 CF D5 CE D4 |10...l..".......| 000001D0: 20 23 20 CD D5 D3 D4 20 C2 C5 20 31 20 D4 CF 22 | # .... .. 1 .."| 000001E0: 3B 4E 3A 89 20 31 30 30 00 F7 09 6E 00 81 20 4A |;N:. 100...n.. J| 000001F0: B2 31 20 A4 20 41 31 00 00 0A 78 00 87 20 41 24 |.1 . A1...x.. A$| 00000200: 00 08 0A 82 00 82 20 4A 00 28 0A 87 00 8B 20 41 |...... J.(.... A| 00000210: 24 B2 22 22 20 A7 20 41 24 B2 22 C3 C8 C5 C3 CB |$."" . A$.".....| 00000220: 20 23 2F CE C1 CD C5 22 00 3B 0A 8C 00 99 20 22 | #/....".;.... "| 00000230: 20 20 20 22 3B 41 31 3B 41 24 3B 00 55 0A 96 00 | ";A1;A$;.U...| 00000240: 85 20 22 2D 2D 20 C1 CD CF D5 CE D4 20 20 24 9D |. "-- ...... $.| 00000250: 9D 9D 22 3B 44 00 67 0A A0 00 41 28 41 31 29 B2 |..";D.g...A(A1).| 00000260: 41 28 41 31 29 AA 44 00 71 0A AA 00 89 20 31 30 |A(A1).D.q.... 10| 00000270: 30 00 8F 0A C8 00 99 22 93 22 3B 3A 46 31 B2 30 |0......".";:F1.0| 00000280: 3A 4C 4E B2 31 3A 81 20 4A B2 31 20 A4 20 4E 00 |:LN.1:. J.1 . N.| 00000290: 98 0A D2 00 87 20 41 24 00 AA 0A DC 00 8B 20 41 |..... A$...... A| 000002A0: 24 B2 22 22 20 A7 20 32 34 30 00 BC 0A E1 00 8B |$."" . 240......| 000002B0: 20 46 31 B2 31 A7 99 A6 32 30 29 3B 00 D2 0A E6 | F1.1...20);....| 000002C0: 00 99 4A 3B A3 34 29 3B 41 24 3A 4C 4E B2 4C 4E |..J;.4);A$:LN.LN| 000002D0: AA 31 00 E3 0A E8 00 8B 20 4C 4E B1 32 32 A7 8D |.1...... LN.22..| 000002E0: 32 36 30 00 EB 0A F0 00 82 20 4A 00 0A 0B FA 00 |260...... J.....| 000002F0: 81 20 4A B2 4C 4E 20 A4 32 32 3A 99 3A 82 3A 8D |. J.LN .22:.:.:.| 00000300: 37 30 30 3A 89 20 35 30 30 30 00 27 0B 04 01 4C |700:. 5000.'...L| 00000310: 4E B2 31 3A 8B 20 46 31 B2 30 A7 46 31 B2 31 3A |N.1:. F1.0.F1.1:| 00000320: 99 22 13 22 3B 3A 8E 00 37 0B 0E 01 46 31 B2 30 |.".";:..7...F1.0| 00000330: 3A 8D 37 30 30 3A 8E 00 49 0B 2C 01 8F 20 2D 20 |:.700:..I.,.. - | 00000340: 53 55 4D 4D 41 52 59 20 2D 00 76 0B 36 01 99 22 |SUMMARY -.v.6.."| 00000350: 93 D3 D5 CD CD C1 D2 D9 20 20 20 20 20 20 20 20 |........ | 00000360: 20 20 20 20 20 20 20 C3 D5 D2 D2 C5 CE D4 20 20 | ....... | 00000370: 20 20 20 D9 D4 C4 00 83 0B 3B 01 54 B2 30 3A 54 | ......;.T.0:T| 00000380: 31 B2 30 00 89 0B 40 01 99 00 97 0B 90 01 81 20 |1.0...@........ | 00000390: 4A B2 31 20 A4 20 4E 00 A0 0B 9A 01 87 20 41 24 |J.1 . N...... A$| 000003A0: 00 B3 0B 9C 01 8B 20 C3 28 41 24 29 B1 31 33 A7 |...... .(A$).13.| 000003B0: 34 32 30 00 D4 0B 9E 01 81 4A 46 B2 31 A4 28 31 |420......JF.1.(1| 000003C0: 35 AB C3 28 41 24 29 29 3A 41 24 B2 41 24 AA 22 |5..(A$)):A$.A$."| 000003D0: 2E 22 3A 82 00 E6 0B A4 01 8B 20 4A B3 B1 33 32 |.":....... J..32| 000003E0: 20 A7 20 34 34 30 00 06 0C A9 01 99 20 A3 32 31 | . 440...... .21| 000003F0: 29 3B 22 C0 C0 C0 C0 C0 C0 C0 C0 20 20 C0 C0 C0 |);"........ ...| 00000400: C0 C0 C0 C0 C0 22 00 2F 0C AE 01 99 22 D3 D5 C2 |....."./...."...| 00000410: D4 CF D4 C1 CC 22 3B A3 31 39 29 3B 3A 46 B2 54 |.....";.19);:F.T| 00000420: 3A 8D 36 30 30 3A 99 46 24 3B A3 32 39 29 3B 00 |:.600:.F$;.29);.| 00000430: 49 0C B3 01 46 B2 54 31 3A 8D 36 30 30 3A 99 46 |I...F.T1:.600:.F| 00000440: 24 3A 4C 4E B2 4C 4E AA 32 00 63 0C B8 01 8B 20 |$:LN.LN.2.c.... | 00000450: 41 28 4A 29 B2 30 20 AF 42 28 4A 29 B2 30 20 A7 |A(J).0 .B(J).0 .| 00000460: 34 38 30 00 74 0C BA 01 8B 20 4C 4E B1 31 39 A7 |480.t.... LN.19.| 00000470: 8D 37 30 30 00 91 0C BD 01 4C 4E B2 4C 4E AA 31 |.700.....LN.LN.1| 00000480: 3A 99 20 4A 3B A3 34 29 3B 41 24 3B A3 31 39 29 |:. J;.4);A$;.19)| 00000490: 3B 00 AC 0C C2 01 46 B2 41 28 4A 29 3A 8D 36 30 |;.....F.A(J):.60| 000004A0: 30 3A 99 46 24 3B 3A 54 B2 54 AA 46 00 CE 0C D6 |0:.F$;:T.T.F....| 000004B0: 01 46 B2 46 AA 42 28 4A 29 3A 8D 36 30 30 3A 99 |.F.F.B(J):.600:.| 000004C0: A3 32 39 29 46 24 3A 54 31 B2 54 31 AA 46 00 D6 |.29)F$:T1.T1.F..| 000004D0: 0C E0 01 82 20 4A 00 F6 0C E5 01 99 20 A3 32 31 |.... J...... .21| 000004E0: 29 3B 22 C0 C0 C0 C0 C0 C0 C0 C0 20 20 C0 C0 C0 |);"........ ...| 000004F0: C0 C0 C0 C0 C0 22 00 1C 0D EA 01 99 22 D4 CF D4 |....."......"...| 00000500: C1 CC 22 3B A3 31 39 29 3B 3A 46 B2 54 3A 8D 36 |..";.19);:F.T:.6| 00000510: 30 30 3A 99 46 24 3B A3 32 39 29 3B 00 2E 0D EF |00:.F$;.29);....| 00000520: 01 46 B2 54 31 3A 8D 36 30 30 3A 99 46 24 00 3D |.F.T1:.600:.F$.=| 00000530: 0D F4 01 8D 37 30 30 3A 89 35 30 30 30 00 4D 0D |....700:.5000.M.| 00000540: 58 02 8F 20 4E 55 4D 20 50 52 49 4E 54 00 5F 0D |X.. NUM PRINT._.| 00000550: 5D 02 46 24 B2 22 22 3A 8B 20 46 B2 30 A7 8E 00 |].F$."":. F.0...| 00000560: 83 0D 62 02 46 B2 B5 28 46 AC 31 30 30 AA 2E 35 |..b.F..(F.100..5| 00000570: 29 AD 31 30 30 3A 8B 20 A5 41 28 4B 29 B3 31 A7 |).100:. .A(K).1.| 00000580: 36 33 30 00 A0 0D 6C 02 81 20 4A 46 B2 31 A4 A5 |630...l.. JF.1..| 00000590: 41 28 4B 29 3A 46 24 B2 46 24 AA 22 20 22 3A 82 |A(K):F$.F$." ":.| 000005A0: 00 C5 0D 76 02 46 24 B2 46 24 AA C4 28 46 29 3A |...v.F$.F$..(F):| 000005B0: 8B 20 C3 28 46 24 29 B3 38 A7 46 24 B2 46 24 AA |. .(F$).8.F$.F$.| 000005C0: 22 2E 30 30 22 00 DD 0D 80 02 8B C3 28 46 24 29 |".00".......(F$)| 000005D0: B3 31 30 A7 46 24 B2 46 24 AA 22 30 22 00 E3 0D |.10.F$.F$."0"...| 000005E0: 8A 02 8E 00 18 0E BC 02 99 22 20 20 20 20 20 20 |........." | 000005F0: A4 A4 A4 A4 A4 22 3A 99 22 D0 52 45 53 53 20 12 |.....":.".RESS .| 00000600: D3 D0 C1 C3 C5 92 20 54 4F A0 43 4F 4E 54 49 4E |...... TO.CONTIN| 00000610: 55 45 A0 2E 2E 2E 22 3B 00 32 0E D0 02 4C 4E B2 |UE....";.2...LN.| 00000620: 30 3A A1 5A 5A 24 3A 8B 5A 5A 24 B2 22 22 A7 37 |0:.ZZ$:.ZZ$."".7| 00000630: 32 30 00 4A 0E DA 02 99 22 93 2E 2E 2E C3 CF CE |20.J....".......| 00000640: D4 C9 CE D5 C5 C4 11 22 3A 8E 00 77 0E 20 03 99 |.......":..w. ..| 00000650: 22 93 D0 D5 D4 20 C9 CE 20 C4 C1 D4 C1 20 C4 C9 |".... .. .... ..| 00000660: D3 CB 2C 20 C1 CE C4 20 D0 D2 C5 D3 D3 20 27 D2 |.., ... ..... '.| 00000670: C5 D4 D5 D2 CE 27 22 00 91 0E 2A 03 A1 41 4E 24 |.....'"...*..AN$| 00000680: 3A 8B 20 41 4E 24 B3 B1 C7 28 31 33 29 A7 38 31 |:. AN$...(13).81| 00000690: 30 00 97 0E 34 03 8E 00 CA 0E E8 03 83 20 4D 45 |0...4........ ME| 000006A0: 52 43 48 41 4E 44 49 53 45 2C 41 43 43 54 47 2C |RCHANDISE,ACCTG,| 000006B0: 41 44 56 45 52 54 49 53 49 4E 47 2C 41 55 54 4F |ADVERTISING,AUTO| 000006C0: 2C 50 41 43 4B 41 47 49 4E 47 00 EA 0E F2 03 83 |,PACKAGING......| 000006D0: 20 43 4F 4E 54 52 49 42 2C 44 45 4C 49 56 45 52 | CONTRIB,DELIVER| 000006E0: 59 2C 45 4C 45 43 54 52 49 43 00 06 0F FC 03 83 |Y,ELECTRIC......| 000006F0: 20 45 4E 54 45 52 54 41 49 4E 4D 45 4E 54 2C 46 | ENTERTAINMENT,F| 00000700: 52 45 49 47 48 54 00 24 0F 06 04 83 20 48 45 41 |REIGHT.$.... HEA| 00000710: 54 2C 49 4E 53 55 52 41 4E 43 45 2C 49 4E 54 45 |T,INSURANCE,INTE| 00000720: 52 45 53 54 00 41 0F 10 04 83 20 4C 41 55 4E 44 |REST.A.... LAUND| 00000730: 52 59 2C 4C 45 47 41 4C 2C 4C 49 43 45 4E 53 45 |RY,LEGAL,LICENSE| 00000740: 53 00 53 0F 1A 04 83 20 4D 49 53 43 2C 4F 46 46 |S.S.... MISC,OFF| 00000750: 49 43 45 00 77 0F 24 04 83 20 50 4F 53 54 41 47 |ICE.w.$.. POSTAG| 00000760: 45 2C 52 45 4E 54 2C 52 45 50 41 49 52 53 2C 53 |E,RENT,REPAIRS,S| 00000770: 48 4F 50 20 45 58 50 00 95 0F 2E 04 83 20 54 41 |HOP EXP...... TA| 00000780: 58 2D 46 49 43 41 2C 54 41 58 2D 53 54 41 54 45 |X-FICA,TAX-STATE| 00000790: 20 55 2E 49 2E 00 B1 0F 38 04 83 20 54 41 58 2D | U.I....8.. TAX-| 000007A0: 4F 54 48 45 52 2C 53 45 4C 4C 49 4E 47 20 45 58 |OTHER,SELLING EX| 000007B0: 50 00 CA 0F 42 04 83 20 53 55 50 50 4C 49 45 53 |P...B.. SUPPLIES| 000007C0: 2C 54 45 4C 45 50 48 4F 4E 45 00 E2 0F 4C 04 83 |,TELEPHONE...L..| 000007D0: 20 54 52 41 44 45 20 44 55 45 53 2C 54 52 41 56 | TRADE DUES,TRAV| 000007E0: 45 4C 00 FD 0F 56 04 83 20 57 41 47 45 53 2C 57 |EL...V.. WAGES,W| 000007F0: 41 54 45 52 2C 2C 2C 2C 2C 2C 2C 2C 2C 00 0C 10 |ATER,,,,,,,,,...| 00000800: 60 04 83 20 2C 2C 2C 2C 2C 2C 2C 2C 00 36 10 B0 |`.. ,,,,,,,,.6..| 00000810: 04 83 20 4E 4F 54 45 53 20 50 41 59 41 42 4C 45 |.. NOTES PAYABLE| 00000820: 2C 46 45 44 20 49 4E 43 20 54 41 58 2C 4C 4F 41 |,FED INC TAX,LOA| 00000830: 4E 53 20 50 41 59 00 5D 10 BA 04 83 20 4C 4F 41 |NS PAY.].... LOA| 00000840: 4E 53 20 52 45 43 2E 2C 50 45 52 53 4F 4E 41 4C |NS REC.,PERSONAL| 00000850: 2C 46 49 58 45 44 20 41 53 53 45 54 53 00 6A 10 |,FIXED ASSETS.j.| 00000860: C4 04 83 20 20 2C 20 2C 20 2C 00 88 10 D0 07 99 |... , , ,......| 00000870: 22 C1 C3 C3 D4 20 23 20 28 30 31 20 2D 22 3B 4E |".... # (01 -";N| 00000880: 3B 22 9D 29 3A 20 22 3B 00 A0 10 DA 07 A1 20 4E |;".): ";...... N| 00000890: 4E 24 3A 8B 20 4E 4E 24 B2 22 22 A7 32 30 31 30 |N$:. NN$."".2010| 000008A0: 00 AA 10 E4 07 99 4E 4E 24 3B 00 B5 10 E9 07 4D |......NN$;.....M| 000008B0: 24 B2 4E 4E 24 00 CD 10 EE 07 A1 20 4E 4E 24 3A |$.NN$...... NN$:| 000008C0: 8B 20 4E 4E 24 B2 22 22 A7 32 30 33 30 00 EB 10 |. NN$."".2030...| 000008D0: F8 07 8B 20 C6 28 4E 4E 24 29 B2 32 30 20 A7 20 |... .(NN$).20 . | 000008E0: 99 4E 4E 24 3B 3A 89 32 30 31 30 00 F4 10 02 08 |.NN$;:.2010.....| 000008F0: 99 4E 4E 24 00 02 11 0C 08 4D 24 B2 4D 24 AA 4E |.NN$.....M$.M$.N| 00000900: 4E 24 00 0F 11 16 08 41 31 B2 C5 28 4D 24 29 00 |N$.....A1..(M$).| 00000910: 32 11 20 08 8B 20 41 31 B2 30 20 A7 20 99 22 C9 |2. .. A1.0 . .".| 00000920: CE D6 C1 CC C9 C4 20 C5 CE D4 D2 D9 22 3A 89 20 |...... .....":. | 00000930: 37 30 00 38 11 33 08 8E 00 47 11 C4 09 8F 20 2D |70.8.3...G.... -| 00000940: 20 54 4F 54 41 4C 53 00 54 11 CE 09 54 B2 30 3A | TOTALS.T...T.0:| 00000950: 54 31 B2 30 00 78 11 D8 09 81 20 4A B2 31 A4 4E |T1.0.x.... J.1.N| 00000960: 3A 54 B2 54 AA 41 28 4A 29 3A 54 31 B2 54 31 AA |:T.T.A(J):T1.T1.| 00000970: 42 28 4A 29 3A 82 20 4A 00 84 11 E2 09 54 31 B2 |B(J):. J.....T1.| 00000980: 54 31 AA 54 00 8D 11 EC 09 89 34 39 30 00 9D 11 |T1.T......490...| 00000990: B8 0B 8F 20 53 41 56 45 20 44 41 54 41 00 A6 11 |... SAVE DATA...| 000009A0: B9 0B 8D 38 30 30 00 AC 11 BD 0B 8F 00 DA 11 C2 |...800..........| 000009B0: 0B 9F 31 35 2C 38 2C 31 35 3A 9F 20 31 2C 38 2C |..15,8,15:. 1,8,| 000009C0: 32 2C 22 30 3A 44 4F 4D 45 20 44 41 54 41 2C 53 |2,"0:DOME DATA,S| 000009D0: 2C 57 22 3A 8D 31 30 30 30 30 00 E6 11 CC 0B 81 |,W":.10000......| 000009E0: 20 4A B2 31 A4 4E 00 08 12 D6 0B 59 54 44 B2 B5 | J.1.N.....YTD..| 000009F0: 28 28 41 28 4A 29 AA 42 28 4A 29 29 AC 31 30 30 |((A(J).B(J)).100| 00000A00: AA 2E 35 29 AD 31 30 30 00 18 12 E0 0B 8B 59 54 |..5).100......YT| 00000A10: 44 B2 30 A7 33 30 39 30 00 28 12 EA 0B 98 31 2C |D.0.3090.(....1,| 00000A20: 4A 3A 98 31 2C 59 54 44 00 2F 12 12 0C 82 4A 00 |J:.1,YTD./....J.| 00000A30: 37 12 1C 0C A0 20 31 00 41 12 26 0C 89 35 30 30 |7.... 1.A.&..500| 00000A40: 30 00 52 12 A0 0F 8F 2F 49 4E 50 55 54 20 44 41 |0.R..../INPUT DA| 00000A50: 54 41 00 5B 12 A1 0F 8D 38 30 30 00 88 12 AA 0F |TA.[....800.....| 00000A60: 9F 31 35 2C 38 2C 31 35 3A 9F 31 2C 38 2C 32 2C |.15,8,15:.1,8,2,| 00000A70: 22 30 3A 44 4F 4D 45 20 44 41 54 41 2C 53 2C 52 |"0:DOME DATA,S,R| 00000A80: 22 3A 8D 31 30 30 30 30 00 9B 12 AF 0F 99 22 11 |":.10000......".| 00000A90: C6 C9 CC C5 20 C6 CF D5 CE C4 22 00 B0 12 B4 0F |.... .....".....| 00000AA0: 84 31 2C 49 3A 8B 53 54 B3 B1 30 A7 34 30 35 30 |.1,I:.ST..0.4050| 00000AB0: 00 BC 12 BE 0F 84 31 2C 42 28 49 29 00 CC 12 C8 |......1,B(I)....| 00000AC0: 0F 8B 20 53 54 B2 30 A7 34 30 32 30 00 D3 12 D2 |.. ST.0.4020....| 00000AD0: 0F A0 31 00 F6 12 DC 0F 8B 53 54 B3 B1 36 34 A7 |..1......ST..64.| 00000AE0: 99 22 C9 CE D0 D5 D4 20 C5 D2 D2 CF D2 2E 20 D3 |."..... ...... .| 00000AF0: D4 3D 22 3B 53 54 00 00 13 E6 0F 89 35 30 30 30 |.=";ST......5000| 00000B00: 00 17 13 88 13 99 22 93 0E CD C5 CE D5 11 11 22 |......"........"| 00000B10: 3A A0 31 3A A0 31 35 00 2D 13 8D 13 99 22 30 2E |:.1:.15.-...."0.| 00000B20: 20 C9 CE D3 D4 D2 D5 C3 D4 C9 CF CE D3 00 4C 13 | .............L.| 00000B30: 92 13 99 22 11 31 2E 20 D4 D2 C1 CE D3 C1 C3 D4 |...".1. ........| 00000B40: C9 CF CE 20 C5 CE D4 D2 C9 C5 D3 22 00 6C 13 9C |... .......".l..| 00000B50: 13 99 22 11 32 2E 20 C9 CE D0 D5 D4 20 C4 C1 D4 |..".2. ..... ...| 00000B60: C1 20 C6 D2 CF CD 20 C4 C9 D3 CB 22 00 8E 13 A6 |. .... ...."....| 00000B70: 13 99 22 11 33 2E 20 CC C9 D3 D4 20 C3 C8 C1 D2 |..".3. .... ....| 00000B80: D4 20 CF C6 20 C1 C3 C3 CF D5 CE D4 D3 22 00 A7 |. .. ........"..| 00000B90: 13 B0 13 99 22 11 34 2E 20 D0 D2 C9 CE D4 20 D3 |....".4. ..... .| 00000BA0: D5 CD CD C1 D2 D9 22 00 C4 13 BA 13 99 22 11 35 |......"......".5| 00000BB0: 2E 20 D3 C1 D6 C5 20 C4 C1 D4 C1 20 CF CE 20 C4 |. .... .... .. .| 00000BC0: C9 D3 CB 22 00 E4 13 BF 13 99 22 11 36 2E 20 D0 |..."......".6. .| 00000BD0: D2 C9 CE D4 20 D3 D5 CD CD C1 D2 D9 20 D4 CF D4 |.... ....... ...| 00000BE0: C1 CC D3 22 00 F3 13 C4 13 99 22 11 37 2E 20 C5 |..."......".7. .| 00000BF0: CE C4 22 00 13 14 CE 13 99 22 11 11 C5 CE D4 C5 |.."......"......| 00000C00: D2 20 C3 CF CD CD C1 CE C4 20 CE D5 CD C2 C5 D2 |. ....... ......| 00000C10: 2E 20 22 00 29 14 D8 13 A1 20 43 24 3A 8B 20 43 |. ".).... C$:. C| 00000C20: 24 B2 22 22 A7 35 30 38 30 00 34 14 EC 13 8C 3A |$."".5080.4....:| 00000C30: 99 22 93 22 00 5F 14 F6 13 91 20 C5 28 43 24 29 |."."._.... .(C$)| 00000C40: 89 37 30 2C 34 30 30 30 2C 32 30 30 2C 33 30 30 |.70,4000,200,300| 00000C50: 2C 33 30 30 30 2C 32 35 30 30 2C 35 39 39 39 00 |,3000,2500,5999.| 00000C60: 6A 14 00 14 89 20 36 30 30 30 00 70 14 6F 17 80 |j.... 6000.p.o..| 00000C70: 00 8F 14 70 17 99 22 93 C9 CE D3 D4 D2 D5 C3 D4 |...p..".........| 00000C80: C9 CF CE D3 20 2D 20 C2 CB C5 C5 D0 C5 D2 11 00 |.... - .........| 00000C90: B9 14 7A 17 99 22 20 20 20 20 D4 48 49 53 20 50 |..z.." .HIS P| 00000CA0: 52 4F 47 52 41 4D 20 57 49 4C 4C A0 41 53 53 49 |ROGRAM WILL.ASSI| 00000CB0: 53 54 A0 59 4F 55 A0 49 4E 00 E4 14 84 17 99 22 |ST.YOU.IN......"| 00000CC0: 53 55 4D 4D 41 52 49 5A 49 4E 47 A0 43 48 45 43 |SUMMARIZING.CHEC| 00000CD0: 4B 53 20 41 4E 44 A0 43 41 53 48 A0 50 41 59 4D |KS AND.CASH.PAYM| 00000CE0: 45 4E 54 53 00 10 15 8E 17 99 22 46 52 4F 4D A0 |ENTS......"FROM.| 00000CF0: 41 A0 42 55 53 49 4E 45 53 53 2E 20 C9 54 20 57 |A.BUSINESS. .T W| 00000D00: 41 53 A0 57 52 49 54 54 45 4E A0 54 4F A0 42 45 |AS.WRITTEN.TO.BE| 00000D10: 00 3B 15 98 17 99 22 55 53 45 44 A0 49 4E A0 43 |.;...."USED.IN.C| 00000D20: 4F 4E 4A 55 4E 43 54 49 4F 4E A0 57 49 54 48 A0 |ONJUNCTION.WITH.| 00000D30: 54 48 45 A0 50 4F 50 55 4C 41 52 00 69 15 A2 17 |THE.POPULAR.i...| 00000D40: 99 22 C4 4F 4D 45 A0 C2 4F 4F 4B 4B 45 45 50 49 |.".OME..OOKKEEPI| 00000D50: 4E 47 A0 D2 45 43 4F 52 44 2E 20 C9 54 20 4D 41 |NG..ECORD. .T MA| 00000D60: 59 A0 41 4C 53 4F A0 42 45 00 97 15 AC 17 99 22 |Y.ALSO.BE......"| 00000D70: 55 53 45 44 A0 42 59 A0 49 54 53 45 4C 46 A0 44 |USED.BY.ITSELF.D| 00000D80: 49 52 45 43 54 4C 59 A0 46 52 4F 4D A0 43 48 45 |IRECTLY.FROM.CHE| 00000D90: 43 4B 53 54 55 42 53 00 AD 15 B6 17 99 22 4F 52 |CKSTUBS......"OR| 00000DA0: A0 41 A0 43 48 45 43 4B 42 4F 4F 4B 2E 00 DC 15 |.A.CHECKBOOK....| 00000DB0: C0 17 99 22 11 20 20 20 20 D4 48 45 A0 50 52 4F |...". .HE.PRO| 00000DC0: 47 52 41 4D A0 57 49 4C 4C A0 50 52 4F 4D 50 54 |GRAM.WILL.PROMPT| 00000DD0: A0 59 4F 55 A0 54 48 52 4F 55 47 48 00 0A 16 CA |.YOU.THROUGH....| 00000DE0: 17 99 22 45 4E 54 52 59 A0 4F 46 A0 45 58 50 45 |.."ENTRY.OF.EXPE| 00000DF0: 4E 44 49 54 55 52 45 53 2E 20 C1 46 54 45 52 A0 |NDITURES. .FTER.| 00000E00: 54 48 45 A0 45 58 50 45 4E 2D 00 39 16 D4 17 99 |THE.EXPEN-.9....| 00000E10: 22 44 49 54 55 52 45 53 A0 48 41 56 45 A0 42 45 |"DITURES.HAVE.BE| 00000E20: 45 4E A0 45 4E 54 45 52 45 44 2C 20 59 4F 55 A0 |EN.ENTERED, YOU.| 00000E30: 4D 41 59 A0 4F 52 44 45 52 00 62 16 DE 17 99 22 |MAY.ORDER.b...."| 00000E40: 91 55 50 A0 41 A0 53 55 4D 4D 41 52 59 20 28 46 |.UP.A.SUMMARY (F| 00000E50: 52 4F 4D A0 54 48 45 A0 4D 45 4E 55 29 2E 20 D4 |ROM.THE.MENU). .| 00000E60: 48 45 00 8C 16 E8 17 99 22 53 55 4D 4D 41 52 59 |HE......"SUMMARY| 00000E70: 20 4D 41 59 A0 42 45 A0 53 41 56 45 44 A0 4F 4E | MAY.BE.SAVED.ON| 00000E80: A0 41 A0 44 49 53 4B 20 46 49 4C 45 00 BC 16 F2 |.A.DISK FILE....| 00000E90: 17 99 22 41 4E 44 20 52 45 41 44 20 49 4E 20 54 |.."AND READ IN T| 00000EA0: 48 45 A0 46 4F 4C 4C 4F 57 49 4E 47 A0 4D 4F 4E |HE.FOLLOWING.MON| 00000EB0: 54 48 20 46 4F 52 A0 D9 45 41 52 91 00 D6 16 FC |TH FOR..EAR.....| 00000EC0: 17 99 22 91 D4 4F A0 C4 41 54 45 20 53 55 4D 4D |.."..O..ATE SUMM| 00000ED0: 41 52 49 45 53 2E 00 04 17 06 18 99 22 11 20 20 |ARIES.......". | 00000EE0: 20 20 D4 48 45 20 50 52 4F 47 52 41 4D A0 43 4F | .HE PROGRAM.CO| 00000EF0: 4E 53 49 53 54 53 A0 4F 46 A0 36 20 53 45 47 4D |NSISTS.OF.6 SEGM| 00000F00: 45 4E 54 53 00 32 17 0B 18 99 22 57 48 49 43 48 |ENTS.2...."WHICH| 00000F10: A0 41 52 45 A0 43 41 4C 4C 45 44 A0 42 59 A0 54 |.ARE.CALLED.BY.T| 00000F20: 48 45 A0 CD C5 CE D5 20 41 4E 44 20 52 45 54 55 |HE..... AND RETU| 00000F30: 52 4E 00 5B 17 10 18 99 22 54 4F 20 54 48 45 A0 |RN.[...."TO THE.| 00000F40: 4D 45 4E 55 2E 20 C5 41 43 48 A0 53 45 47 4D 45 |MENU. .ACH.SEGME| 00000F50: 4E 54 A0 4F 50 45 52 41 54 45 53 00 89 17 15 18 |NT.OPERATES.....| 00000F60: 99 22 49 4E 44 45 50 45 4E 44 45 4E 54 4C 59 20 |."INDEPENDENTLY | 00000F70: 4F 46 A0 54 48 45 A0 4F 54 48 45 52 53 A0 41 4E |OF.THE.OTHERS.AN| 00000F80: 44 A0 4D 41 59 20 42 45 22 00 A9 17 1A 18 99 22 |D.MAY BE"......"| 00000F90: 43 41 4C 4C 45 44 20 57 48 45 4E 45 56 45 52 A0 |CALLED WHENEVER.| 00000FA0: 59 4F 55 A0 57 49 53 48 2E 00 B3 17 1F 18 8D 20 |YOU.WISH....... | 00000FB0: 37 30 30 00 E1 17 24 18 99 22 20 20 20 20 D4 48 |700...$.." .H| 00000FC0: 45 A0 46 49 52 53 54 A0 53 54 45 50 20 49 4E A0 |E.FIRST.STEP IN.| 00000FD0: 55 53 49 4E 47 A0 54 48 49 53 A0 53 59 53 54 45 |USING.THIS.SYSTE| 00000FE0: 4D 00 0C 18 29 18 99 22 49 53 A0 54 4F A0 43 4C |M...).."IS.TO.CL| 00000FF0: 41 53 53 49 46 59 A0 54 48 45 A0 45 58 50 45 4E |ASSIFY.THE.EXPEN| 00001000: 44 49 54 55 52 45 53 20 49 4E 54 4F 00 37 18 2E |DITURES INTO.7..| 00001010: 18 99 22 41 43 43 4F 55 4E 54 53 2E 20 C8 41 56 |.."ACCOUNTS. .AV| 00001020: 45 A0 54 48 45 A0 43 4F 4D 50 55 54 45 52 A0 4C |E.THE.COMPUTER.L| 00001030: 49 53 54 A0 54 48 45 00 62 18 33 18 99 22 41 43 |IST.THE.b.3.."AC| 00001040: 43 4F 55 4E 54 53 A0 4F 4E A0 54 48 45 A0 53 43 |COUNTS.ON.THE.SC| 00001050: 52 45 45 4E A0 57 48 49 4C 45 A0 59 4F 55 A0 47 |REEN.WHILE.YOU.G| 00001060: 4F A0 00 8B 18 38 18 99 22 54 48 52 4F 55 47 48 |O....8.."THROUGH| 00001070: A0 45 41 43 48 A0 49 54 45 4D A0 57 52 49 54 49 |.EACH.ITEM.WRITI| 00001080: 4E 47 A0 44 4F 57 4E A0 54 48 45 00 CA 18 3D 18 |NG.DOWN.THE...=.| 00001090: 99 22 41 43 43 4F 55 4E 54 20 4E 55 4D 42 45 52 |."ACCOUNT NUMBER| 000010A0: A0 4F 4E 20 41 20 4C 49 53 54 20 4F 46 A0 43 48 |.ON A LIST OF.CH| 000010B0: 45 43 4B 53 A0 41 4E 44 22 3A 99 22 43 41 53 48 |ECKS.AND":."CASH| 000010C0: A0 50 41 59 4D 45 4E 54 53 2E 00 F7 18 5B 18 99 |.PAYMENTS....[..| 000010D0: 22 11 20 20 20 20 C2 45 46 4F 52 45 A0 45 4E 54 |". .EFORE.ENT| 000010E0: 45 52 49 4E 47 A0 54 48 45 A0 45 58 50 45 4E 44 |ERING.THE.EXPEND| 000010F0: 49 54 55 52 45 53 2C 00 23 19 60 18 99 22 54 4F |ITURES,.#.`.."TO| 00001100: 54 41 4C A0 54 48 45 4D A0 55 50 A0 41 4E 44 A0 |TAL.THEM.UP.AND.| 00001110: 53 41 56 45 A0 54 48 41 54 20 54 4F 54 41 4C A0 |SAVE.THAT TOTAL.| 00001120: 54 4F A0 00 50 19 65 18 99 22 56 45 52 49 46 59 |TO..P.e.."VERIFY| 00001130: A0 54 48 45 A0 43 4F 4D 50 55 54 45 52 A0 54 4F |.THE.COMPUTER.TO| 00001140: 54 41 4C 53 2E 20 D4 48 45 4E 20 45 4E 54 45 52 |TALS. .HEN ENTER| 00001150: 00 7F 19 6A 18 99 22 54 48 45 20 54 52 41 4E 53 |...j.."THE TRANS| 00001160: 41 43 54 49 4F 4E 53 A0 49 4E 54 4F 20 54 48 45 |ACTIONS.INTO THE| 00001170: A0 43 4F 4D 50 55 54 45 52 2E 20 D7 48 45 4E 00 |.COMPUTER. .HEN.| 00001180: AE 19 6F 18 99 22 91 59 4F 55 A0 48 41 56 45 A0 |..o..".YOU.HAVE.| 00001190: 45 4E 54 45 52 45 44 A0 41 4C 4C A0 59 4F 55 52 |ENTERED.ALL.YOUR| 000011A0: A0 54 52 41 4E 53 41 43 54 49 4F 4E 53 2C 00 D7 |.TRANSACTIONS,..| 000011B0: 19 74 18 99 22 50 52 49 4E 54 A0 54 48 45 A0 53 |.t.."PRINT.THE.S| 000011C0: 55 4D 4D 41 52 59 A0 4F 52 A0 53 55 4D 4D 41 52 |UMMARY.OR.SUMMAR| 000011D0: 59 A0 54 4F 54 41 4C 00 01 1A 79 18 99 22 41 4E |Y.TOTAL...y.."AN| 000011E0: 44 A0 43 4F 4D 50 41 52 45 A0 54 48 49 53 A0 54 |D.COMPARE.THIS.T| 000011F0: 4F 54 41 4C A0 54 4F 20 54 48 45 A0 54 4F 54 41 |OTAL.TO THE.TOTA| 00001200: 4C 00 2D 1A 7E 18 99 22 50 52 45 56 49 4F 55 53 |L.-.~.."PREVIOUS| 00001210: 4C 59 20 44 45 54 45 52 4D 49 4E 45 44 2E 20 C9 |LY DETERMINED. .| 00001220: 46 A0 59 4F 55 A0 4E 45 45 44 A0 54 4F 00 5A 1A |F.YOU.NEED.TO.Z.| 00001230: 83 18 99 22 4D 41 4B 45 A0 4D 4F 52 45 A0 45 4E |..."MAKE.MORE.EN| 00001240: 54 52 49 45 53 2C A0 54 48 45 4E A0 52 45 54 55 |TRIES,.THEN.RETU| 00001250: 52 4E A0 54 4F A0 54 48 45 A0 00 85 1A 88 18 99 |RN.TO.THE.......| 00001260: 22 45 4E 54 52 59 A0 52 4F 55 54 49 4E 45 2E 20 |"ENTRY.ROUTINE. | 00001270: 20 D7 48 45 4E A0 54 48 45 A0 53 55 4D 4D 41 52 | .HEN.THE.SUMMAR| 00001280: 59 20 49 53 A0 00 AE 1A 92 18 99 22 43 4F 4D 50 |Y IS......."COMP| 00001290: 4C 45 54 45 44 2C 20 53 41 56 45 20 49 54 20 4F |LETED, SAVE IT O| 000012A0: 4E A0 41 20 44 49 53 4B 20 46 49 4C 45 2E 00 B7 |N.A DISK FILE...| 000012B0: 1A 97 18 8D 37 30 30 00 E5 1A 9C 18 99 22 11 20 |....700......". | 000012C0: 20 20 20 D4 48 45 A0 41 43 43 4F 55 4E 54 53 A0 | .HE.ACCOUNTS.| 000012D0: 31 20 54 48 52 4F 55 47 48 A0 35 30 20 41 52 45 |1 THROUGH.50 ARE| 000012E0: A0 54 41 58 A0 00 10 1B A6 18 99 22 44 45 44 55 |.TAX......."DEDU| 000012F0: 43 54 49 42 4C 45 A0 45 58 50 45 4E 53 45 53 2C |CTIBLE.EXPENSES,| 00001300: 20 41 4E 44 A0 41 43 43 4F 55 4E 54 53 A0 35 31 | AND.ACCOUNTS.51| 00001310: 00 3E 1B B0 18 99 22 54 48 52 4F 55 47 48 A0 36 |.>...."THROUGH.6| 00001320: 30 20 41 52 45 20 4E 4F 4E 2D 44 45 44 55 43 54 |0 ARE NON-DEDUCT| 00001330: 49 42 4C 45 A0 45 58 50 45 4E 53 45 53 2E 00 6D |IBLE.EXPENSES..m| 00001340: 1B BA 18 99 22 D4 4F A0 43 48 41 4E 47 45 A0 54 |....".O.CHANGE.T| 00001350: 48 45 A0 41 43 43 4F 55 4E 54 A0 54 49 54 4C 45 |HE.ACCOUNT.TITLE| 00001360: 53 2C 20 4D 4F 44 49 46 59 20 54 48 45 00 9C 1B |S, MODIFY THE...| 00001370: C4 18 99 22 91 44 41 54 41 A0 53 54 41 54 45 4D |...".DATA.STATEM| 00001380: 45 4E 54 53 A0 42 45 47 49 4E 4E 49 4E 47 A0 41 |ENTS.BEGINNING.A| 00001390: 54 A0 4C 49 4E 45 20 31 30 30 30 2E 00 C9 1B CE |T.LINE 1000.....| 000013A0: 18 99 22 11 20 20 20 20 D4 4F 20 43 48 41 4E 47 |..". .O CHANG| 000013B0: 45 A0 54 48 45 A0 4E 55 4D 42 45 52 A0 4F 46 A0 |E.THE.NUMBER.OF.| 000013C0: 41 56 41 49 4C 41 42 4C 45 00 F7 1B D8 18 99 22 |AVAILABLE......"| 000013D0: 41 43 43 4F 55 4E 54 53 2C 20 43 48 41 4E 47 45 |ACCOUNTS, CHANGE| 000013E0: A0 54 48 45 A0 56 41 4C 55 45 A0 4F 46 A0 CE 20 |.THE.VALUE.OF.. | 000013F0: 49 4E A0 4C 49 4E 45 00 25 1C E2 18 99 22 33 30 |IN.LINE.%...."30| 00001400: 2E 20 C9 46 A0 59 4F 55 A0 4E 45 45 44 A0 54 4F |. .F.YOU.NEED.TO| 00001410: A0 53 54 4F 50 A0 54 48 45 A0 50 52 4F 47 52 41 |.STOP.THE.PROGRA| 00001420: 4D 20 41 4E 44 00 4F 1C EC 18 99 22 52 45 2D 45 |M AND.O...."RE-E| 00001430: 4E 54 45 52 A0 57 49 54 48 4F 55 54 A0 4C 4F 53 |NTER.WITHOUT.LOS| 00001440: 53 A0 4F 46 A0 44 41 54 41 2C 20 54 48 45 4E 00 |S.OF.DATA, THEN.| 00001450: 60 1C F6 18 99 22 C7 CF D4 CF 20 35 30 30 30 2E |`....".... 5000.| 00001460: 00 69 1C 5A 19 8D 37 30 30 00 73 1C 63 19 89 35 |.i.Z..700.s.c..5| 00001470: 30 30 30 00 8F 1C 10 27 84 31 35 2C 45 31 2C 45 |000....'.15,E1,E| 00001480: 24 2C 45 32 2C 45 33 3A 8B 45 31 B2 30 A7 8E 00 |$,E2,E3:.E1.0...| 00001490: BD 1C 1A 27 99 22 11 C4 49 53 4B 20 C5 52 52 4F |...'."..ISK .RRO| 000014A0: 52 21 22 3A 99 45 31 3B 45 24 3B 45 32 3B 45 33 |R!":.E1;E$;E2;E3| 000014B0: 3A 81 4A 43 B2 31 A4 34 30 30 30 3A 82 00 CE 1C |:.JC.1.4000:....| 000014C0: 24 27 A0 31 3A A0 31 35 3A 89 35 30 30 30 00 00 |$'.1:.15:.5000..| 000014D0: 00 0A AA |... |
....... - BKEEPER (C) 1979.<.... WRITTEN BY JOHN MELISSA JR..E.... 4201 CLAYMONT , APT.2, LAS VEGAS,NV...... PHONE (702) 734-0849.....N.60...(..A(N),B(N)...-.. . A(K).K..(.(.(F))..(10)):K.5.I.2.. J.1 . N.R.7.. A$.Z.<.. J...A..5000...F..".ACCO UNT NAME WILL BE DISPLAYED".2.H.."AFTER ACCOUNT # ENTRY. IF WRONG".V.J.."ACCOUNT , ENTER 0 FOR AMOUNT."...L.."ENTER 99 FO R ACCOUNT # TO RETURN":."TO MAINLINE..". ..D..2000...E.....F.. A1.99.5000.B.I.. A 1..N . 110...L.."ACCOUNT # MUST BE 1 TO" ;N:. 100...N.. J.1 . A1...X.. A$...... J .(.... A$."" . A$."CHECK #/NAME".;.... " ";A1;A$;.U.... "-- AMOUNT $...";D.G. .A(A1).A(A1).D.Q.... 100...H..".";:F1.0 :LN.1:. J.1 . N...R.. A$...... A$."" . 2 40...... F1.1...20);.R....J;.4);A$:LN.LN .1...... LN.22..260...... J...... J.LN . 22:.:.:.700:. 5000.'...LN.1:. F1.0.F1.1: .".";:..7...F1.0:.700:..I.,.. - SUMMARY -.V.6..".SUMMARY CURRENT YTD...;.T.0:T1.0...@........ J.1 . N. .... A$...... C(A$).13.420.T....JF.1.(1 5.C(A$)):A$.A$.".":....... J..32 . 440.. .... .21);"........ ........"./...."SUB TOTAL";.19);:F.T:.600:.F$;.29);.I...F.T1 :.600:.F$:LN.LN.2.C.... A(J).0 .B(J).0 . 480.T.... LN.19..700.....LN.LN.1:. J;.4) ;A$;.19);...B.F.A(J):.600:.F$;:T.T.F.N.V .F.F.B(J):.600:..29)F$:T1.T1.F.V.... J.. .... .21);"........ ........"......"TOT AL";.19);:F.T:.600:.F$;.29);.....F.T1:.6 00:.F$.=....700:.5000.M.X.. NUM PRINT._. ].F$."":. F.0.....B.F..(F.100..5).100:. .A(K).1.630. .L.. JF.1..A(K):F$.F$." ":. .E.V.F$.F$.D(F):. C(F$).8.F$.F$.".00"... ...C(F$).10.F$.F$."0"............" .....":."PRESS .SPACE. TO CONTINUE ..."; .2.P.LN.0:.ZZ$:.ZZ$."".720.J.Z.."....CON TINUED.":..W. ..".PUT IN DATA DISK, AND PRESS 'RETURN'"...*..AN$:. AN$..G(13).81 0...4...J.... MERCHANDISE,ACCTG,ADVERTIS ING,AUTO,PACKAGING...... CONTRIB,DELIVER Y,ELECTRIC...... ENTERTAINMENT,FREIGHT.$ .... HEAT,INSURANCE,INTEREST.A.... LAUND RY,LEGAL,LICENSES.S.... MISC,OFFICE.W.$. . POSTAGE,RENT,REPAIRS,SHOP EXP...... TA X-FICA,TAX-STATE U.I....8.. TAX-OTHER,SE LLING EXP.J.B.. SUPPLIES,TELEPHONE...L.. TRADE DUES,TRAVEL...V.. WAGES,WATER,,,, ,,,,,...`.. ,,,,,,,,.6.... NOTES PAYABLE ,FED INC TAX,LOANS PAY.].... LOANS REC., PERSONAL,FIXED ASSETS.J.D.. , , ,...P.. "ACCT # (01 -";N;".): ";. .Z.. NN$:. NN$ ."".2010......NN$;.....M$.NN$.M.... NN$: . NN$."".2030...... F(NN$).20 . .NN$;:.2 010......NN$.....M$.M$.NN$.....A1.E(M$). 2. .. A1.0 . ."INVALID ENTRY":. 70.8.3.. .G.D.. - TOTALS.T.N.T.0:T1.0.X.X.. J.1.N :T.T.A(J):T1.T1.B(J):. J.....T1.T1.T.... ..490...... SAVE DATA......800.......Z.B ..15,8,15:. 1,8,2,"0:DOME DATA,S,W":.100 00...L.. J.1.N...V.YTD..((A(J).B(J)).100 ..5).100......YTD.0.3090.(....1,J:.1,YTD ./....J.7... 1.A.&..5000.R. ../INPUT DA TA.[....800......15,8,15:.1,8,2,"0:DOME DATA,S,R":.10000......".FILE FOUND"..... .1,I:.ST..0.4050......1,B(I).L.H.. ST.0. 4020.S.R. 1......ST..64.."INPUT ERROR. S T=";ST......5000......"..MENU..": 1: 15. -...."0. INSTRUCTIONS.L....".1. TRANSACT ION ENTRIES".L....".2. INPUT DATA FROM D ISK"......".3. LIST CHART OF ACCOUNTS".. ....".4. PRINT SUMMARY".D....".5. SAVE D ATA ON DISK"......".6. PRINT SUMMARY TOT ALS"...D..".7. END"...N.."..ENTER COMMAN D NUMBER. ".).X.. C$:. C$."".5080.4....: ."."._.... E(C$).70,4000,200,300,3000,25 00,5999.J.... 6000.P.O.....P..".INSTRUCT IONS - BKEEPER....Z.." THIS PROGRAM W ILL ASSIST YOU IN......"SUMMARIZING CHEC KS AND CASH PAYMENTS......"FROM A BUSINE SS. IT WAS WRITTEN TO BE.;...."USED IN C ONJUNCTION WITH THE POPULAR.I...."DOME B OOKKEEPING RECORD. IT MAY ALSO BE......" USED BY ITSELF DIRECTLY FROM CHECKSTUBS. ....."OR A CHECKBOOK.......". THE PRO GRAM WILL PROMPT YOU THROUGH...J.."ENTRY OF EXPENDITURES. AFTER THE EXPEN-.9.T.. "DITURES HAVE BEEN ENTERED, YOU MAY ORDE R.B....".UP A SUMMARY (FROM THE MENU). T HE......"SUMMARY MAY BE SAVED ON A DISK FILE......"AND READ IN THE FOLLOWING MON TH FOR YEAR..V....".TO DATE SUMMARIES... ....". THE PROGRAM CONSISTS OF 6 SEGM ENTS.2...."WHICH ARE CALLED BY THE MENU AND RETURN.[...."TO THE MENU. EACH SEGME NT OPERATES......"INDEPENDENTLY OF THE O THERS AND MAY BE"......"CALLED WHENEVER YOU WISH....... 700...$.." THE FIRST STEP IN USING THIS SYSTEM...).."IS TO CL ASSIFY THE EXPENDITURES INTO.7...."ACCOU NTS. HAVE THE COMPUTER LIST THE.B.3.."AC COUNTS ON THE SCREEN WHILE YOU GO ...8.. "THROUGH EACH ITEM WRITING DOWN THE.J.=. ."ACCOUNT NUMBER ON A LIST OF CHECKS AND ":."CASH PAYMENTS....[..". BEFORE ENT ERING THE EXPENDITURES,.#.`.."TOTAL THEM UP AND SAVE THAT TOTAL TO .P.E.."VERIFY THE COMPUTER TOTALS. THEN ENTER..J.."T HE TRANSACTIONS INTO THE COMPUTER. WHEN. ..O..".YOU HAVE ENTERED ALL YOUR TRANSAC TIONS,.W.T.."PRINT THE SUMMARY OR SUMMAR Y TOTAL...Y.."AND COMPARE THIS TOTAL TO THE TOTAL.-.~.."PREVIOUSLY DETERMINED. I F YOU NEED TO.Z...."MAKE MORE ENTRIES, T HEN RETURN TO THE ......"ENTRY ROUTINE. WHEN THE SUMMARY IS ......"COMPLETED, S AVE IT ON A DISK FILE.......700......". THE ACCOUNTS 1 THROUGH 50 ARE TAX ... ..."DEDUCTIBLE EXPENSES, AND ACCOUNTS 51 .>...."THROUGH 60 ARE NON-DEDUCTIBLE EXP ENSES..M...."TO CHANGE THE ACCOUNT TITLE S, MODIFY THE...D..".DATA STATEMENTS BEG INNING AT LINE 1000..I.N..". TO CHANG E THE NUMBER OF AVAILABLE...X.."ACCOUNTS , CHANGE THE VALUE OF N IN LINE.%...."30 . IF YOU NEED TO STOP THE PROGRAM AND.O. ..."RE-ENTER WITHOUT LOSS OF DATA, THEN. `...."GOTO 5000..I.Z..700.S.C..5000....' .15,E1,E$,E2,E3:.E1.0......'.".DISK ERRO R!":.E1;E$;E2;E3:.JC.1.4000:..N.$' 1: 15 :.5000.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL