EXPENSE MANAGER
FILE INFORMATION
FILENAME(S): EXPENSE MANAGER
FILE TYPE(S): PRG
FILE SIZE: 9.7K
FIRST SEEN: 2025-11-02 16:30:37
APPEARS ON: 1 disk(s)
FILE HASH
f5b22c64300cbfeb53b8b8310c8efc9d7e6e5ad67d5661cd2c079b4e880191bc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GAMES D C | EXPENSE MANAGER | PRG | Treasure Chest - OzzyC64 | 14 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3E 08 0A 00 8F 2A 45 58 50 45 4E 53 45 20 |..>....*EXPENSE |
00000010: 4D 41 4E 41 47 45 52 2A 20 42 59 20 42 45 52 4E |MANAGER* BY BERN|
00000020: 41 52 44 20 48 41 42 45 54 28 43 29 20 31 39 38 |ARD HABET(C) 198|
00000030: 33 20 20 41 42 52 41 53 43 4F 20 4C 54 44 00 85 |3 ABRASCO LTD..|
00000040: 08 28 00 99 22 93 22 3B 3A 97 35 33 32 38 30 2C |.(..".";:.53280,|
00000050: 36 3A 86 45 58 24 28 31 34 2C 31 31 2C 31 34 29 |6:.EX$(14,11,14)|
00000060: 2C 54 54 28 31 35 2C 31 32 29 2C 43 31 25 28 31 |,TT(15,12),C1%(1|
00000070: 34 2C 31 31 29 2C 45 44 24 28 31 34 29 2C 4D 44 |4,11),ED$(14),MD|
00000080: 24 28 31 31 29 00 C2 08 2C 00 53 50 24 B2 22 20 |$(11)...,.SP$." |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000A0: 20 20 20 20 20 20 20 20 22 3A 81 4E B2 30 A4 31 | ":.N.0.1|
000000B0: 34 3A 87 45 44 24 28 4E 29 3A 8B 4E B1 31 31 A7 |4:.ED$(N):.N.11.|
000000C0: 39 30 00 CE 08 50 00 87 4D 44 24 28 4E 29 00 04 |90...P..MD$(N)..|
000000D0: 09 5A 00 82 4E 3A 43 B2 31 30 3A 96 A5 42 28 4E |.Z..N:C.10:..B(N|
000000E0: 29 B2 B5 28 4E AC 31 30 30 AA 30 2E 30 30 35 29 |)..(N.100.0.005)|
000000F0: AD 31 30 30 3A 97 35 33 32 37 32 2C 32 33 3A 99 |.100:.53272,23:.|
00000100: C7 28 38 29 00 49 09 78 00 99 22 93 22 3B 3A 8D |.(8).I.x..".";:.|
00000110: 33 35 35 30 30 3A 99 22 12 81 20 20 20 20 C5 A0 |35500:.".. ..|
00000120: D8 A0 D0 A0 C5 A0 CE A0 D3 A0 C5 A0 A0 A0 CD A0 |................|
00000130: C1 A0 CE A0 C1 A0 C7 A0 C5 A0 D2 A0 A0 A0 A0 92 |................|
00000140: 9A 22 3A 8D 33 35 35 30 30 00 8D 09 7D 00 99 A3 |.":.35500...}...|
00000150: 38 29 22 11 11 12 81 20 D0 52 45 53 53 20 92 9A |8)".... .RESS ..|
00000160: 20 CF 50 54 49 4F 4E 20 CE 55 4D 42 45 52 92 9A | .PTION .UMBER..|
00000170: 22 3A 99 A3 31 30 29 22 11 11 11 12 81 20 31 20 |":..10)"..... 1 |
00000180: 9A 92 20 CC 4F 41 44 20 44 41 54 41 22 00 C7 09 |.. .OAD DATA"...|
00000190: A0 00 99 A3 31 30 29 22 11 12 81 20 32 20 9A 92 |....10)"... 2 ..|
000001A0: 20 CE 45 57 20 45 4E 54 52 49 45 53 22 3A 99 A3 | .EW ENTRIES":..|
000001B0: 31 30 29 22 11 12 81 20 33 20 9A 92 20 C4 45 4C |10)"... 3 .. .EL|
000001C0: 45 54 49 4F 4E 53 22 00 E4 09 AA 00 99 A3 31 30 |ETIONS".......10|
000001D0: 29 22 11 12 81 20 34 20 9A 92 20 C1 4E 41 4C 59 |)"... 4 .. .NALY|
000001E0: 53 49 53 22 00 25 0A BE 00 99 A3 31 30 29 22 11 |SIS".%.....10)".|
000001F0: 12 81 20 35 20 9A 92 20 D0 52 49 4E 54 20 45 58 |.. 5 .. .RINT EX|
00000200: 50 45 4E 53 45 53 22 3A 99 A3 31 30 29 22 11 12 |PENSES":..10)"..|
00000210: 81 20 36 20 9A 92 20 D3 41 56 45 2F D3 49 47 4E |. 6 .. .AVE/.IGN|
00000220: 2D 4F 46 46 22 00 58 0A 18 01 8D 35 30 30 30 3A |-OFF".X....5000:|
00000230: 91 C5 28 41 24 29 89 33 30 38 30 2C 35 30 30 2C |..(A$).3080,500,|
00000240: 32 35 39 37 2C 31 34 39 37 2C 33 36 30 30 2C 33 |2597,1497,3600,3|
00000250: 33 30 30 3A 89 32 38 30 00 6C 0A F4 01 8D 39 30 |300:.280.l....90|
00000260: 30 30 3A 8B 50 36 B2 32 A7 31 32 30 00 7B 0A F6 |00:.P6.2.120.{..|
00000270: 01 8B 46 33 B3 B1 30 A7 35 30 36 00 BC 0A F7 01 |..F3..0.506.....|
00000280: 99 22 93 12 C1 54 54 45 4E 54 49 4F 4E 3A 92 22 |."...TTENTION:."|
00000290: 3A 99 22 11 D9 4F 55 20 48 41 56 45 20 4E 4F 54 |:."..OU HAVE NOT|
000002A0: 20 4C 4F 41 44 45 44 20 41 4E 59 20 44 41 54 41 | LOADED ANY DATA|
000002B0: 2E 20 C9 46 20 59 4F 55 20 44 4F 22 00 F9 0A F8 |. .F YOU DO"....|
000002C0: 01 99 22 53 4F 20 4C 41 54 45 52 2C 20 41 4E 59 |.."SO LATER, ANY|
000002D0: 20 45 4E 54 52 49 45 53 20 45 4E 54 45 52 45 44 | ENTRIES ENTERED|
000002E0: 20 42 45 46 4F 52 45 22 3A 99 22 57 49 4C 4C 20 | BEFORE":."WILL |
000002F0: 42 45 20 4C 4F 53 54 2E 22 00 2A 0B F9 01 99 22 |BE LOST.".*...."|
00000300: 11 11 C4 4F 20 59 4F 55 20 57 49 53 48 20 54 4F |...O YOU WISH TO|
00000310: 20 50 52 4F 43 45 45 44 22 3B 3A 8D 36 30 30 30 | PROCEED";:.6000|
00000320: 3A 8B 50 36 B2 32 A7 31 32 30 00 47 0B FA 01 46 |:.P6.2.120.G...F|
00000330: 33 B2 31 3A 46 31 B2 30 3A 8B 59 52 24 B2 22 22 |3.1:F1.0:.YR$.""|
00000340: A7 8D 31 36 30 30 30 00 8D 0B FE 01 99 22 93 22 |..16000......"."|
00000350: A3 37 29 22 CE A0 C5 A0 D7 A0 A0 A0 C5 A0 CE A0 |.7)"............|
00000360: D4 A0 D2 A0 C9 A0 C5 A0 D3 22 3A 99 A3 37 29 22 |.........":..7)"|
00000370: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000380: A3 A3 A3 A3 A3 11 22 3A 8D 37 30 30 30 00 A6 0B |......":.7000...|
00000390: 35 02 8B 43 B1 31 34 B0 46 31 B2 31 A7 99 22 11 |5..C.14.F1.1..".|
000003A0: 22 3A 89 36 34 30 00 D0 0B 3A 02 99 22 11 C1 4E |":.640...:.."..N|
000003B0: 59 20 4E 45 57 20 48 45 41 44 49 4E 47 53 22 3B |Y NEW HEADINGS";|
000003C0: 3A 8D 36 30 30 30 3A 8B 50 36 B2 32 A7 36 34 30 |:.6000:.P6.2.640|
000003D0: 00 FE 0B 62 02 99 22 11 C5 4E 54 45 52 20 4E 45 |...b.."..NTER NE|
000003E0: 57 20 48 45 41 44 49 4E 47 3A 20 22 3B 3A 50 33 |W HEADING: ";:P3|
000003F0: B2 39 3A 50 34 B2 31 3A 8D 33 30 30 30 30 00 21 |.9:P4.1:.30000.!|
00000400: 0C 67 02 41 B2 C6 28 50 24 29 3A 8B 41 B3 36 35 |.g.A..(P$):.A.65|
00000410: B0 41 B1 39 30 A7 99 22 91 91 91 22 3A 89 36 31 |.A.90.."...":.61|
00000420: 30 00 3A 0C 6C 02 45 44 24 28 43 29 B2 50 24 3A |0.:.l.ED$(C).P$:|
00000430: 43 B2 43 AA 31 3A 89 35 31 30 00 68 0C 80 02 99 |C.C.1:.510.h....|
00000440: 22 91 D0 4C 45 41 53 45 20 45 4E 54 45 52 20 54 |"..LEASE ENTER T|
00000450: 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 3A 22 3A 8B |HE FOLLOWING:":.|
00000460: 46 31 B2 31 A7 36 38 30 00 99 0C 8A 02 99 22 11 |F1.1.680......".|
00000470: 11 CD 4F 4E 54 48 20 12 C9 4E 20 46 49 47 55 52 |..ONTH ..N FIGUR|
00000480: 45 53 92 20 3A 20 22 3B 3A 50 33 B2 32 3A 50 34 |ES. : ";:P3.2:P4|
00000490: B2 31 3A 8D 33 30 30 30 30 00 C1 0C 9E 02 59 B2 |.1:.30000.....Y.|
000004A0: C5 28 50 24 29 3A 50 4D B2 59 3A 8B 59 B3 31 B0 |.(P$):PM.Y:.Y.1.|
000004B0: 59 B1 31 32 A7 99 22 91 91 91 91 22 3A 89 36 35 |Y.12.."....":.65|
000004C0: 30 00 F7 0C A8 02 99 22 11 11 D4 59 50 45 20 4F |0......"...YPE O|
000004D0: 46 20 45 58 50 45 4E 53 45 20 12 D2 45 46 20 CE |F EXPENSE ..EF .|
000004E0: 4F 20 4F 4E 4C 59 92 3A 20 22 3B 3A 50 33 B2 32 |O ONLY.: ";:P3.2|
000004F0: 3A 8D 33 30 30 30 30 00 19 0D B2 02 58 B2 C5 28 |:.30000.....X..(|
00000500: 50 24 29 3A 8B 58 B3 31 B0 58 B1 43 A7 99 22 91 |P$):.X.1.X.C..".|
00000510: 91 91 91 22 3A 89 36 38 30 00 29 0D B4 02 58 B2 |...":.680.)...X.|
00000520: 58 AB 31 3A 59 B2 59 AB 31 00 70 0D B5 02 8B 43 |X.1:Y.Y.1.p....C|
00000530: 31 25 28 58 2C 59 29 B1 31 34 A7 99 22 12 11 11 |1%(X,Y).14.."...|
00000540: D3 4F 52 52 59 2C 4E 4F 20 4D 4F 52 45 20 45 4E |.ORRY,NO MORE EN|
00000550: 54 52 49 45 53 20 46 52 45 45 20 49 4E 20 54 48 |TRIES FREE IN TH|
00000560: 49 53 20 50 41 47 45 92 11 22 3A 89 31 30 33 30 |IS PAGE..":.1030|
00000570: 00 BF 0D B6 02 99 22 93 D2 45 43 4F 52 44 20 CE |......"..ECORD .|
00000580: 4F 22 43 31 25 28 58 2C 59 29 AA 31 22 4F 46 20 |O"C1%(X,Y).1"OF |
00000590: 31 35 20 3A 22 3A 99 22 A3 A3 A3 A3 A3 A3 A3 A3 |15 :":."........|
000005A0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 3A 99 22 11 |...........":.".|
000005B0: 45 58 50 45 4E 53 45 20 20 20 20 3A 20 22 3B 00 |EXPENSE : ";.|
000005C0: E9 0D BA 02 99 45 44 24 28 58 29 3A 99 22 11 CD |.....ED$(X):."..|
000005D0: 4F 4E 54 48 20 20 20 20 20 20 3A 20 22 4D 44 24 |ONTH : "MD$|
000005E0: 28 59 29 22 20 22 59 52 24 00 26 0E BC 02 99 22 |(Y)" "YR$.&...."|
000005F0: 11 C4 41 59 20 20 20 20 20 20 20 20 3A 20 22 3B |..AY : ";|
00000600: 3A 8D 33 30 30 30 30 3A 44 24 B2 50 24 3A 8D 31 |:.30000:D$.P$:.1|
00000610: 35 30 30 30 3A 8B 50 36 B2 31 A7 99 22 91 91 91 |5000:.P6.1.."...|
00000620: 22 3A 89 37 30 30 00 3D 0E D0 02 8B C3 28 44 24 |":.700.=.....(D$|
00000630: 29 B3 32 A7 44 24 B2 22 30 22 AA 44 24 00 74 0E |).2.D$."0".D$.t.|
00000640: DA 02 99 22 91 22 A3 31 33 29 44 24 3A 99 22 11 |...".".13)D$:.".|
00000650: D0 41 49 44 20 42 59 20 20 20 20 3A 20 31 2E 20 |.AID BY : 1. |
00000660: C3 48 45 51 55 45 22 A3 32 39 29 22 33 2E 20 C3 |.HEQUE".29)"3. .|
00000670: 41 53 48 22 00 A5 0E DC 02 99 22 20 20 20 20 20 |ASH"......" |
00000680: 20 20 20 20 20 20 20 20 32 2E 20 C3 52 45 44 49 | 2. .REDI|
00000690: 54 20 43 41 52 44 22 A3 32 39 29 22 34 2E 20 CF |T CARD".29)"4. .|
000006A0: 54 48 45 52 22 00 D2 0E DF 02 99 22 20 20 20 20 |THER"......" |
000006B0: 20 20 20 20 20 20 20 20 20 12 11 D0 52 45 53 53 | ...RESS|
000006C0: 20 52 45 46 45 52 45 4E 43 45 20 4E 4F 20 92 20 | REFERENCE NO . |
000006D0: 22 3B 00 F1 0E E0 02 8D 35 30 30 30 3A 4E B2 C5 |";......5000:N..|
000006E0: 28 41 24 29 3A 8B 4E B3 31 B0 4E B1 34 A7 37 33 |(A$):.N.1.N.4.73|
000006F0: 36 00 11 0F E4 02 50 42 24 B2 C4 28 4E 29 3A 91 |6.....PB$..(N):.|
00000700: 4E 89 37 34 32 2C 37 34 34 2C 37 34 36 2C 37 34 |N.742,744,746,74|
00000710: 38 00 26 0F E6 02 42 24 B2 22 C3 48 45 51 55 45 |8.&...B$.".HEQUE|
00000720: 22 3A 89 37 35 30 00 40 0F E8 02 42 24 B2 22 C3 |":.750.@...B$.".|
00000730: 52 45 44 49 54 20 43 41 52 44 22 3A 89 37 35 30 |REDIT CARD":.750|
00000740: 00 53 0F EA 02 42 24 B2 22 C3 41 53 48 22 3A 89 |.S...B$.".ASH":.|
00000750: 37 35 30 00 67 0F EC 02 42 24 B2 22 CF 54 48 45 |750.g...B$.".THE|
00000760: 52 22 3A 89 37 35 30 00 9A 0F EE 02 43 24 B2 22 |R":.750.....C$."|
00000770: 91 91 91 91 22 3A 99 43 24 3A 81 4E B2 31 A4 34 |....":.C$:.N.1.4|
00000780: 3A 99 A3 31 33 29 53 50 24 3A 82 3A 99 43 24 3A |:..13)SP$:.:.C$:|
00000790: 99 A3 31 33 29 22 91 22 42 24 00 CA 0F F8 02 99 |..13)"."B$......|
000007A0: 22 11 11 C1 4D 4F 55 4E 54 20 50 41 49 44 3A 20 |"...MOUNT PAID: |
000007B0: 22 3B 3A 20 50 33 B2 39 3A 50 34 B2 31 3A 8D 33 |";: P3.9:P4.1:.3|
000007C0: 30 30 30 30 3A 43 24 B2 50 24 00 F2 0F FD 02 8B |0000:C$.P$......|
000007D0: C5 28 43 24 29 B3 B2 30 B0 C5 28 43 24 29 B1 39 |.(C$)..0..(C$).9|
000007E0: 39 39 39 39 39 A7 99 22 91 91 91 91 22 3A 89 37 |99999.."....":.7|
000007F0: 36 30 00 34 10 02 03 4A 53 B2 39 3A 8D 31 30 30 |60.4...JS.9:.100|
00000800: 30 30 3A 99 22 91 22 3B A3 31 33 29 43 24 3A 99 |00:.".";.13)C$:.|
00000810: 22 11 11 11 11 C1 43 43 45 50 54 22 3B 3A 8D 36 |".....CCEPT";:.6|
00000820: 30 30 30 3A 8B 50 36 B2 32 A7 59 B2 59 AA 31 3A |000:.P6.2.Y.Y.1:|
00000830: 89 35 31 30 00 7B 10 3E 03 99 22 91 C8 41 4E 47 |.510.{.>.."..ANG|
00000840: 2D 4F 4E 20 57 48 49 4C 45 20 50 4F 53 54 49 4E |-ON WHILE POSTIN|
00000850: 47 22 3A 46 32 B2 31 3A 5A B2 43 31 25 28 58 2C |G":F2.1:Z.C1%(X,|
00000860: 59 29 3A 43 24 B2 C4 28 C5 28 43 24 29 29 3A 44 |Y):C$..(.(C$)):D|
00000870: 24 B2 44 24 AA 50 42 24 AA 43 24 00 A1 10 48 03 |$.D$.PB$.C$...H.|
00000880: 45 58 24 28 58 2C 59 2C 5A 29 B2 44 24 3A 43 31 |EX$(X,Y,Z).D$:C1|
00000890: 25 28 58 2C 59 29 B2 43 31 25 28 58 2C 59 29 AA |%(X,Y).C1%(X,Y).|
000008A0: 31 00 AE 10 4A 03 8B 5A B2 30 A7 38 35 30 00 D9 |1...J..Z.0.850..|
000008B0: 10 4B 03 8B C8 28 45 58 24 28 58 2C 59 2C 5A 29 |.K...(EX$(X,Y,Z)|
000008C0: 2C 32 29 B1 C8 28 45 58 24 28 58 2C 59 2C 5A AB |,2)..(EX$(X,Y,Z.|
000008D0: 31 29 2C 32 29 A7 38 35 30 00 1E 11 4D 03 44 24 |1),2).850...M.D$|
000008E0: B2 45 58 24 28 58 2C 59 2C 5A 29 3A 45 58 24 28 |.EX$(X,Y,Z):EX$(|
000008F0: 58 2C 59 2C 5A 29 B2 45 58 24 28 58 2C 59 2C 5A |X,Y,Z).EX$(X,Y,Z|
00000900: AB 31 29 3A 45 58 24 28 58 2C 59 2C 5A AB 31 29 |.1):EX$(X,Y,Z.1)|
00000910: B2 44 24 3A 5A B2 5A AB 31 3A 89 38 34 32 00 59 |.D$:Z.Z.1:.842.Y|
00000920: 11 52 03 4D B2 C5 28 43 24 29 3A 41 B2 58 3A 42 |.R.M..(C$):A.X:B|
00000930: B2 59 3A 8D 31 30 32 30 30 3A 41 B2 31 35 3A 42 |.Y:.10200:A.15:B|
00000940: B2 59 3A 8D 31 30 32 30 30 3A 41 B2 58 3A 42 B2 |.Y:.10200:A.X:B.|
00000950: 31 32 3A 8D 31 30 32 30 30 00 80 11 D2 03 41 B2 |12:.10200.....A.|
00000960: 31 35 3A 42 B2 31 32 3A 8D 31 30 32 30 30 3A 8B |15:B.12:.10200:.|
00000970: 43 31 25 28 58 2C 59 29 B1 31 34 A7 31 30 33 30 |C1%(X,Y).14.1030|
00000980: 00 C8 11 D4 03 99 22 11 CF 4B 2C 20 41 4E 59 20 |......"..K, ANY |
00000990: 4F 54 48 45 52 20 45 4E 54 52 59 20 46 4F 52 20 |OTHER ENTRY FOR |
000009A0: 54 48 49 53 20 4D 4F 4E 54 48 22 3B 3A 8D 36 30 |THIS MONTH";:.60|
000009B0: 30 30 3A 8B 50 36 B2 31 A7 46 31 B2 31 3A 59 B2 |00:.P6.1.F1.1:Y.|
000009C0: 59 AA 31 3A 89 35 31 30 00 F1 11 06 04 99 22 11 |Y.1:.510......".|
000009D0: C1 4E 59 20 4F 54 48 45 52 20 45 4E 54 52 59 22 |.NY OTHER ENTRY"|
000009E0: 3B 3A 8D 36 30 30 30 3A 8B 50 36 B2 31 A7 35 30 |;:.6000:.P6.1.50|
000009F0: 30 00 FA 11 24 04 89 31 32 30 00 0D 12 D9 05 8B |0...$..120......|
00000A00: 59 52 24 B2 22 22 A7 8D 31 36 30 30 30 00 1C 12 |YR$.""..16000...|
00000A10: DC 05 99 22 93 22 3B 3A 46 34 B2 30 00 63 12 E6 |...".";:F4.0.c..|
00000A20: 05 99 22 1D 1D 1D 1D 11 C1 4E 41 4C 59 53 49 53 |.."......NALYSIS|
00000A30: 20 4F 46 20 45 58 50 45 4E 53 45 53 20 50 45 52 | OF EXPENSES PER|
00000A40: 3A 22 3A 99 22 1D 1D 1D 1D A3 A3 A3 A3 A3 A3 A3 |:":."...........|
00000A50: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000A60: A3 A3 22 00 92 12 FA 05 99 22 11 1D 1D 1D 1D 12 |.."......"......|
00000A70: 20 31 20 92 20 CD 4F 4E 54 48 20 2F 20 D3 50 45 | 1 . .ONTH / .PE|
00000A80: 43 54 52 55 4D 20 4F 46 20 45 58 50 45 4E 53 45 |CTRUM OF EXPENSE|
00000A90: 53 22 00 BC 12 04 06 99 22 11 11 1D 1D 1D 1D 12 |S"......".......|
00000AA0: 20 32 20 92 20 CD 4F 4E 54 48 20 2F 20 D3 49 4E | 2 . .ONTH / .IN|
00000AB0: 47 4C 45 20 45 58 50 45 4E 53 45 22 00 E4 12 0E |GLE EXPENSE"....|
00000AC0: 06 99 22 11 11 1D 1D 1D 1D 12 20 33 20 92 20 C5 |.."....... 3 . .|
00000AD0: 58 50 45 4E 53 45 20 2F 20 D7 48 4F 4C 45 20 59 |XPENSE / .HOLE Y|
00000AE0: 45 41 52 22 00 08 13 18 06 99 22 11 11 1D 1D 1D |EAR"......".....|
00000AF0: 1D 12 20 34 20 92 20 C2 41 43 4B 20 54 4F 20 4D |.. 4 . .ACK TO M|
00000B00: 41 49 4E 20 4D 45 4E 55 00 32 13 22 06 99 22 11 |AIN MENU.2."..".|
00000B10: 11 11 1D 1D 1D 1D 12 D0 52 45 53 53 20 43 4F 52 |........RESS COR|
00000B20: 52 45 53 50 4F 4E 44 49 4E 47 20 4E 55 4D 42 45 |RESPONDING NUMBE|
00000B30: 52 22 00 5D 13 36 06 8D 35 30 30 30 3A 91 C5 28 |R".].6..5000:..(|
00000B40: 41 24 29 89 31 36 31 30 2C 31 39 30 30 2C 32 33 |A$).1610,1900,23|
00000B50: 30 30 2C 31 36 30 32 3A 89 31 35 39 30 00 6D 13 |00,1602:.1590.m.|
00000B60: 42 06 8B 46 34 B3 B1 30 A7 46 34 B2 30 00 76 13 |B..F4..0.F4.0.v.|
00000B70: 44 06 89 31 32 30 00 BA 13 4A 06 99 22 93 C5 4E |D..120...J.."..N|
00000B80: 54 45 52 20 4D 4F 4E 54 48 20 52 45 51 55 49 52 |TER MONTH REQUIR|
00000B90: 45 44 20 12 C9 4E 20 46 49 47 55 52 45 53 92 3A |ED ..N FIGURES.:|
00000BA0: 20 22 3B 3A 50 33 B2 32 3A 50 34 B2 31 3A 8D 33 | ";:P3.2:P4.1:.3|
00000BB0: 30 30 30 30 3A 41 24 B2 50 24 00 D5 13 54 06 59 |0000:A$.P$...T.Y|
00000BC0: B2 C5 28 41 24 29 3A 8B 59 B3 31 B0 59 B1 31 32 |..(A$):.Y.1.Y.12|
00000BD0: A7 31 36 31 30 00 20 14 5E 06 59 B2 59 AB 31 3A |.1610. .^.Y.Y.1:|
00000BE0: 99 22 93 C5 58 50 45 4E 53 45 53 20 46 4F 52 20 |."..XPENSES FOR |
00000BF0: 22 4D 44 24 28 59 29 22 20 22 59 52 24 22 20 3A |"MD$(Y)" "YR$" :|
00000C00: 22 3A 4C 31 B2 C3 28 4D 44 24 28 59 29 29 3A 81 |":L1..(MD$(Y)):.|
00000C10: 4E B2 31 A4 32 36 3A 99 22 A3 22 3B 3A 82 3A 99 |N.1.26:.".";:.:.|
00000C20: 00 59 14 63 06 8B 54 54 28 31 35 2C 59 29 B2 30 |.Y.c..TT(15,Y).0|
00000C30: A7 99 22 11 11 CE 4F 20 45 4E 54 52 59 20 49 4E |.."...O ENTRY IN|
00000C40: 20 22 4D 44 24 28 59 29 22 20 22 59 52 24 3A 46 | "MD$(Y)" "YR$:F|
00000C50: 35 B2 31 3A 89 31 37 37 35 00 91 14 68 06 99 22 |5.1:.1775...h.."|
00000C60: 11 C5 58 50 45 4E 53 45 53 3A 22 2C A6 31 30 AB |..XPENSES:",.10.|
00000C70: 4C 31 29 3B 4D 44 24 28 59 29 A3 32 33 29 22 25 |L1);MD$(Y).23)"%|
00000C80: 22 A3 32 39 29 22 D9 45 41 52 20 D4 4F 54 41 4C |".29)".EAR .OTAL|
00000C90: 22 00 C6 14 72 06 99 22 2D 2D 2D 2D 2D 2D 2D 2D |"...r.."--------|
00000CA0: 2D 22 2C 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 1D 2D |-"," ---------.-|
00000CB0: 2D 2D 2D 2D 2D 22 A3 32 39 29 22 2D 2D 2D 2D 2D |-----".29)"-----|
00000CC0: 2D 2D 2D 2D 2D 22 00 DE 14 86 06 81 58 B2 30 A4 |-----"......X.0.|
00000CD0: 31 34 3A 8B 58 B1 B2 43 A7 89 31 37 33 30 00 2A |14:.X..C..1730.*|
00000CE0: 15 90 06 50 B2 28 54 54 28 58 2C 59 29 AD 54 54 |...P.(TT(X,Y).TT|
00000CF0: 28 31 35 2C 59 29 29 AC 31 30 30 3A 50 B2 B5 28 |(15,Y)).100:P..(|
00000D00: 50 AC 31 30 30 AA 2E 35 29 AD 31 30 30 3A 4E B2 |P.100..5).100:N.|
00000D10: 54 54 28 58 2C 59 29 3A 4A 53 B2 31 30 3A 8D 31 |TT(X,Y):JS.10:.1|
00000D20: 30 30 31 30 3A 41 24 B2 43 24 00 5C 15 9F 06 4E |0010:A$.C$.\...N|
00000D30: B2 54 54 28 58 2C 31 32 29 3A 8D 31 30 30 31 30 |.TT(X,12):.10010|
00000D40: 3A 42 24 B2 43 24 3A 4E B2 50 3A 4A 53 B2 37 3A |:B$.C$:N.P:JS.7:|
00000D50: 8D 31 30 30 31 30 3A 44 24 B2 43 24 00 7A 15 AE |.10010:D$.C$.z..|
00000D60: 06 99 45 44 24 28 58 29 2C 41 24 A3 32 30 29 44 |..ED$(X),A$.20)D|
00000D70: 24 A3 32 38 29 42 24 3A 82 58 00 C0 15 C2 06 99 |$.28)B$:.X......|
00000D80: 22 11 22 2C 22 1D 2D 2D 2D 2D 2D 2D 2D 2D 2D 1D |".",".---------.|
00000D90: 2D 2D 2D 2D 2D 2D 1D 1D 2D 2D 2D 2D 2D 2D 2D 2D |------..--------|
00000DA0: 2D 22 3A 4E B2 54 54 28 31 35 2C 59 29 3A 4A 53 |-":N.TT(15,Y):JS|
00000DB0: B2 31 30 3A 8D 31 30 30 31 30 3A 41 24 B2 43 24 |.10:.10010:A$.C$|
00000DC0: 00 01 16 D6 06 4E B2 54 54 28 31 35 2C 31 32 29 |.....N.TT(15,12)|
00000DD0: 3A 8D 31 30 30 31 30 3A 42 24 B2 43 24 3A 44 24 |:.10010:B$.C$:D$|
00000DE0: B2 22 31 30 30 2E 30 30 22 3A 99 22 54 4F 54 41 |."100.00":."TOTA|
00000DF0: 4C 22 2C 41 24 A3 32 31 29 44 24 A3 32 38 29 42 |L",A$.21)D$.28)B|
00000E00: 24 00 26 16 EA 06 99 2C 22 1D 3D 3D 3D 3D 3D 3D |$.&....,".======|
00000E10: 3D 3D 3D 1D 3D 3D 3D 3D 3D 3D 1D 1D 3D 3D 3D 3D |===.======..====|
00000E20: 3D 3D 3D 3D 3D 22 00 33 16 EF 06 8B 46 34 B3 B1 |=====".3....F4..|
00000E30: 30 A7 8E 00 5E 16 F4 06 99 22 11 11 C1 4E 59 20 |0...^...."...NY |
00000E40: 4F 54 48 45 52 20 4D 4F 4E 54 48 22 3B 3A 8D 36 |OTHER MONTH";:.6|
00000E50: 30 30 30 3A 8B 50 36 B2 31 A7 31 36 31 30 00 6A |000:.P6.1.1610.j|
00000E60: 16 17 07 8B 46 34 B2 31 A7 8E 00 74 16 1C 07 89 |....F4.1...t....|
00000E70: 31 35 30 30 00 B8 16 6C 07 99 22 93 C5 4E 54 45 |1500...l.."..NTE|
00000E80: 52 20 4D 4F 4E 54 48 20 52 45 51 55 49 52 45 44 |R MONTH REQUIRED|
00000E90: 20 12 49 4E 20 46 49 47 55 52 45 53 92 3A 20 22 | .IN FIGURES.: "|
00000EA0: 3B 3A 50 33 B2 32 3A 50 34 B2 31 3A 8D 33 30 30 |;:P3.2:P4.1:.300|
00000EB0: 30 30 3A 41 24 B2 50 24 00 D3 16 76 07 59 B2 C5 |00:A$.P$...v.Y..|
00000EC0: 28 41 24 29 3A 8B 59 B3 31 B0 59 B1 31 32 A7 31 |(A$):.Y.1.Y.12.1|
00000ED0: 39 30 30 00 0C 17 8A 07 99 22 11 11 C5 4E 54 45 |900......"...NTE|
00000EE0: 52 20 D2 45 46 20 CE 4F 20 4F 46 20 45 58 50 45 |R .EF .O OF EXPE|
00000EF0: 4E 53 45 20 54 4F 20 42 45 20 41 4E 41 4C 59 53 |NSE TO BE ANALYS|
00000F00: 45 44 3A 11 11 22 3A 8D 37 30 30 30 00 29 17 B2 |ED:..":.7000.)..|
00000F10: 07 99 22 11 11 C5 4E 54 45 52 20 4E 4F 57 3A 20 |.."...NTER NOW: |
00000F20: 22 3B 3A 8D 33 30 30 30 30 00 4C 17 BC 07 58 B2 |";:.30000.L...X.|
00000F30: C5 28 50 24 29 3A 8B 58 B3 31 B0 58 B1 43 A7 99 |.(P$):.X.1.X.C..|
00000F40: 22 91 91 91 91 22 3A 89 31 39 37 30 00 5C 17 C6 |"....":.1970.\..|
00000F50: 07 58 B2 58 AB 31 3A 59 B2 59 AB 31 00 A5 17 D0 |.X.X.1:Y.Y.1....|
00000F60: 07 8B 45 58 24 28 58 2C 59 2C 30 29 B2 22 22 A7 |..EX$(X,Y,0)."".|
00000F70: 99 22 93 D3 4F 52 52 59 2C 4E 4F 20 12 22 45 44 |."..ORRY,NO ."ED|
00000F80: 24 28 58 29 22 92 20 45 58 50 45 4E 53 45 53 20 |$(X)". EXPENSES |
00000F90: 49 4E 20 22 4D 44 24 28 59 29 3A 46 35 B2 31 3A |IN "MD$(Y):F5.1:|
00000FA0: 89 32 31 38 35 00 E5 17 DA 07 99 22 93 22 45 44 |.2185......"."ED|
00000FB0: 24 28 58 29 22 20 45 58 50 45 4E 53 45 53 20 49 |$(X)" EXPENSES I|
00000FC0: 4E 20 22 4D 44 24 28 59 29 22 20 22 59 52 24 22 |N "MD$(Y)" "YR$"|
00000FD0: 20 3A 22 3A 81 4E B2 31 A4 33 36 3A 99 22 A3 22 | :":.N.1.36:."."|
00000FE0: 3B 3A 82 3A 99 00 2C 18 E4 07 99 22 11 11 C4 41 |;:.:..,...."...A|
00000FF0: 59 22 A3 35 29 22 50 41 49 44 20 42 59 22 2C 22 |Y".5)"PAID BY","|
00001000: 1D 1D 1D 1D 41 4D 4F 55 4E 54 22 3A 99 22 A3 A3 |....AMOUNT":."..|
00001010: A3 22 A3 35 29 22 A3 A3 A3 A3 A3 A3 A3 22 2C 22 |.".5)".......","|
00001020: 1D 1D 1D A3 A3 A3 A3 A3 A3 A3 11 22 00 4C 18 02 |...........".L..|
00001030: 08 81 5A B2 30 A4 31 34 3A 8B 45 58 24 28 58 2C |..Z.0.14:.EX$(X,|
00001040: 59 2C 5A 29 B2 22 22 A7 32 31 35 30 00 8C 18 0C |Y,Z)."".2150....|
00001050: 08 99 C8 28 45 58 24 28 58 2C 59 2C 5A 29 2C 32 |...(EX$(X,Y,Z),2|
00001060: 29 3B 3A 91 C5 28 CA 28 45 58 24 28 58 2C 59 2C |);:..(.(EX$(X,Y,|
00001070: 5A 29 2C 33 2C 32 29 29 89 32 30 39 30 2C 32 31 |Z),3,2)).2090,21|
00001080: 30 30 2C 32 31 31 30 2C 32 31 31 35 00 A4 18 2A |00,2110,2115...*|
00001090: 08 99 A3 35 29 22 C3 48 45 51 55 45 22 2C 3A 89 |...5)".HEQUE",:.|
000010A0: 32 31 32 30 00 C1 18 34 08 99 A3 35 29 22 C3 52 |2120...4...5)".R|
000010B0: 45 44 49 54 20 43 41 52 44 22 2C 3A 89 32 31 32 |EDIT CARD",:.212|
000010C0: 30 00 D9 18 3E 08 99 A3 35 29 22 C3 41 53 48 20 |0...>...5)".ASH |
000010D0: 20 22 2C 3A 89 32 31 32 30 00 F0 18 43 08 99 A3 | ",:.2120...C...|
000010E0: 35 29 22 CF 54 48 45 52 22 2C 3A 89 32 31 32 30 |5)".THER",:.2120|
000010F0: 00 29 19 48 08 43 24 B2 C9 28 45 58 24 28 58 2C |.).H.C$..(EX$(X,|
00001100: 59 2C 5A 29 2C C3 28 45 58 24 28 58 2C 59 2C 5A |Y,Z),.(EX$(X,Y,Z|
00001110: 29 29 AB 34 29 3A 4A 53 B2 31 30 3A 8D 31 30 30 |)).4):JS.10:.100|
00001120: 31 35 3A 99 43 24 3A 82 5A 00 6E 19 66 08 99 22 |15:.C$:.Z.n.f.."|
00001130: 11 22 2C 2C 22 1D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 |.",,".---------"|
00001140: 3A 4E B2 54 54 28 58 2C 59 29 3A 8D 31 30 30 31 |:N.TT(X,Y):.1001|
00001150: 30 3A 99 22 54 4F 54 41 4C 22 2C 2C 43 24 3A 99 |0:."TOTAL",,C$:.|
00001160: 2C 2C 22 1D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 7B |,,".=========".{|
00001170: 19 89 08 8B 46 34 B3 B1 30 A7 8E 00 A9 19 8E 08 |....F4..0.......|
00001180: 99 22 11 11 C1 4E 59 20 4F 54 48 45 52 20 41 4E |."...NY OTHER AN|
00001190: 41 4C 59 53 49 53 22 3B 3A 8D 36 30 30 30 3A 8B |ALYSIS";:.6000:.|
000011A0: 50 36 B2 31 A7 31 39 30 30 00 B3 19 B6 08 89 31 |P6.1.1900......1|
000011B0: 35 30 30 00 EB 19 FC 08 99 22 93 C5 4E 54 45 52 |500......"..NTER|
000011C0: 20 52 45 46 20 4E 4F 20 4F 46 20 45 58 50 45 4E | REF NO OF EXPEN|
000011D0: 53 45 20 54 4F 20 42 45 20 41 4E 41 4C 59 53 45 |SE TO BE ANALYSE|
000011E0: 44 3A 11 11 22 3A 8D 37 30 30 30 00 2C 1A 2E 09 |D:..":.7000.,...|
000011F0: 99 22 11 11 C5 4E 54 45 52 20 4E 4F 57 3A 20 22 |."...NTER NOW: "|
00001200: 3B 3A 50 33 B2 32 3A 8D 33 30 30 30 30 3A 58 B2 |;:P3.2:.30000:X.|
00001210: C5 28 50 24 29 3A 8B 58 B3 31 B0 58 B1 43 A7 99 |.(P$):.X.1.X.C..|
00001220: 22 91 91 91 91 22 3A 89 32 33 35 30 00 76 1A 47 |"....":.2350.v.G|
00001230: 09 58 B2 58 AB 31 3A 8B 54 54 28 58 2C 31 32 29 |.X.X.1:.TT(X,12)|
00001240: B2 30 A7 99 22 93 D3 4F 52 52 59 2C 4E 4F 20 45 |.0.."..ORRY,NO E|
00001250: 4E 54 52 59 20 46 4F 52 20 12 22 45 44 24 28 58 |NTRY FOR ."ED$(X|
00001260: 29 22 92 20 49 4E 20 22 59 52 24 3A 46 35 B2 31 |)". IN "YR$:F5.1|
00001270: 3A 89 32 35 32 30 00 B7 1A 4C 09 99 22 93 C2 52 |:.2520...L.."..R|
00001280: 45 41 4B 44 4F 57 4E 20 4F 46 20 22 45 44 24 28 |EAKDOWN OF "ED$(|
00001290: 58 29 22 20 45 58 50 45 4E 53 45 53 20 49 4E 20 |X)" EXPENSES IN |
000012A0: 22 59 52 24 3A 81 4E B2 31 A4 33 39 3A 99 22 A3 |"YR$:.N.1.39:.".|
000012B0: 22 3B 3A 82 4E 3A 99 00 F9 1A 60 09 99 22 11 CD |";:.N:....`.."..|
000012C0: 4F 4E 54 48 3A 22 2C 22 1D 1D 1D 1D C1 4D 4F 55 |ONTH:",".....MOU|
000012D0: 4E 54 1D 1D 1D 1D 1D 1D 25 22 3A 99 22 A3 A3 A3 |NT......%":."...|
000012E0: A3 A3 A3 22 2C 22 1D 1D 1D 1D A3 A3 A3 A3 A3 A3 |...","..........|
000012F0: 1D 1D 1D 1D 1D A3 A3 A3 22 00 2E 1B 7E 09 81 59 |........"...~..Y|
00001300: B2 30 A4 31 31 3A 50 B2 54 54 28 58 2C 59 29 AD |.0.11:P.TT(X,Y).|
00001310: 54 54 28 58 2C 31 32 29 AC 31 30 30 3A 50 B2 B5 |TT(X,12).100:P..|
00001320: 28 50 AC 31 30 30 AA 2E 35 29 AD 31 30 30 00 4F |(P.100..5).100.O|
00001330: 1B 92 09 4E B2 54 54 28 58 2C 59 29 3A 4A 53 B2 |...N.TT(X,Y):JS.|
00001340: 31 30 3A 8D 31 30 30 31 30 3A 41 24 B2 43 24 00 |10:.10010:A$.C$.|
00001350: 95 1B 97 09 4E B2 50 3A 4A 53 B2 37 3A 8D 31 30 |....N.P:JS.7:.10|
00001360: 30 31 30 3A 42 24 B2 43 24 3A 99 4D 44 24 28 59 |010:B$.C$:.MD$(Y|
00001370: 29 2C 41 24 A3 32 32 29 42 24 3A 82 59 3A 99 2C |),A$.22)B$:.Y:.,|
00001380: 22 1D 2D 2D 2D 2D 2D 2D 2D 2D 2D 1D 1D 1D 2D 2D |".---------...--|
00001390: 2D 2D 2D 2D 22 00 D5 1B BA 09 42 24 B2 22 31 30 |----".....B$."10|
000013A0: 30 2E 30 30 22 3A 4E B2 54 54 28 58 2C 31 32 29 |0.00":N.TT(X,12)|
000013B0: 3A 4A 53 B2 31 30 3A 8D 31 30 30 31 30 3A 41 24 |:JS.10:.10010:A$|
000013C0: B2 43 24 3A 99 22 D4 4F 54 41 4C 22 2C 41 24 A3 |.C$:.".OTAL",A$.|
000013D0: 32 33 29 42 24 00 FA 1B CE 09 99 2C 22 1D 3D 3D |23)B$......,".==|
000013E0: 3D 3D 3D 3D 3D 3D 3D 1D 1D 1D 3D 3D 3D 3D 3D 3D |=======...======|
000013F0: 22 3A 8B 46 34 B3 B1 30 A7 8E 00 27 1C D8 09 99 |":.F4..0...'....|
00001400: 22 11 11 C1 4E 59 20 4F 54 48 45 52 20 45 58 50 |"...NY OTHER EXP|
00001410: 45 4E 53 45 22 3B 3A 8D 36 30 30 30 3A 8B 50 36 |ENSE";:.6000:.P6|
00001420: B2 31 A7 32 33 30 30 00 31 1C 00 0A 89 31 35 30 |.1.2300.1....150|
00001430: 30 00 45 1C 25 0A 8D 39 30 30 30 3A 8B 50 36 B2 |0.E.%..9000:.P6.|
00001440: 32 A7 31 32 30 00 58 1C 26 0A 8B 59 52 24 B2 22 |2.120.X.&..YR$."|
00001450: 22 A7 8D 31 36 30 30 30 00 A7 1C 28 0A 99 22 93 |"..16000...(..".|
00001460: C5 4E 54 45 52 20 12 4D 4F 4E 54 48 92 20 49 4E |.NTER .MONTH. IN|
00001470: 20 57 48 49 43 48 20 44 45 4C 45 54 49 4F 4E 22 | WHICH DELETION"|
00001480: 3A 99 22 52 45 51 55 49 52 45 44 20 12 C9 4E 20 |:."REQUIRED ..N |
00001490: 46 49 47 55 52 45 53 92 20 22 3B 3A 50 33 B2 32 |FIGURES. ";:P3.2|
000014A0: 3A 8D 33 30 30 30 30 00 C7 1C 3C 0A 59 B2 C5 28 |:.30000...<.Y..(|
000014B0: 50 24 29 3A 50 4D B2 59 3A 8B 59 B3 31 B0 59 B1 |P$):PM.Y:.Y.1.Y.|
000014C0: 31 32 A7 32 36 30 30 00 D0 1C 3E 0A 50 36 B2 31 |12.2600...>.P6.1|
000014D0: 00 15 1D 41 0A 99 22 11 12 C4 41 59 92 20 12 C9 |...A.."...AY. ..|
000014E0: 4E 20 46 49 47 55 52 45 53 92 3A 20 22 3B 3A 8D |N FIGURES.: ";:.|
000014F0: 33 30 30 30 30 3A 44 24 B2 50 24 3A 8D 31 35 30 |30000:D$.P$:.150|
00001500: 30 30 3A 8B 50 36 B2 31 A7 99 22 91 91 91 22 3A |00:.P6.1.."...":|
00001510: 89 32 36 32 35 00 2C 1D 4B 0A 8B C3 28 44 24 29 |.2625.,.K...(D$)|
00001520: B3 32 A7 44 24 B2 22 30 22 AA 44 24 00 7B 1D 50 |.2.D$."0".D$.{.P|
00001530: 0A 99 22 11 C5 4E 54 45 52 20 12 D4 59 50 45 92 |.."..NTER ..YPE.|
00001540: 20 4F 46 20 45 58 50 45 4E 53 45 20 54 4F 20 57 | OF EXPENSE TO W|
00001550: 48 49 43 48 22 3A 99 22 49 54 20 57 41 53 20 50 |HICH":."IT WAS P|
00001560: 4F 53 54 45 44 20 12 C9 4E 20 46 49 47 55 52 45 |OSTED ..N FIGURE|
00001570: 53 92 11 11 22 3A 8D 37 30 30 30 00 98 1D 8C 0A |S...":.7000.....|
00001580: 99 22 11 11 C5 4E 54 45 52 20 4E 4F 57 3A 20 22 |."...NTER NOW: "|
00001590: 3B 3A 8D 33 30 30 30 30 00 BB 1D 96 0A 58 B2 C5 |;:.30000.....X..|
000015A0: 28 50 24 29 3A 8B 58 B3 31 B0 58 B1 43 A7 99 22 |(P$):.X.1.X.C.."|
000015B0: 91 91 91 91 22 3A 89 32 37 30 30 00 CB 1D A0 0A |....":.2700.....|
000015C0: 58 B2 58 AB 31 3A 59 B2 59 AB 31 00 15 1E A5 0A |X.X.1:Y.Y.1.....|
000015D0: 99 22 11 C5 4E 54 45 52 20 12 C1 4D 4F 55 4E 54 |."..NTER ..MOUNT|
000015E0: 92 3A 20 22 3B 3A 50 33 B2 39 3A 8D 33 30 30 30 |.: ";:P3.9:.3000|
000015F0: 30 3A 41 B2 C5 28 50 24 29 3A 8B 41 B3 B2 30 B0 |0:A..(P$):.A..0.|
00001600: 41 B1 39 39 39 39 39 39 A7 99 22 91 91 91 22 3A |A.999999.."...":|
00001610: 89 32 37 32 35 00 51 1E B7 0A 99 22 93 C8 41 4E |.2725.Q...."..AN|
00001620: 47 2D 4F 4E 20 57 48 49 4C 45 20 53 45 41 52 43 |G-ON WHILE SEARC|
00001630: 48 49 4E 47 22 3A 81 5A B2 30 A4 31 34 3A 8B 45 |HING":.Z.0.14:.E|
00001640: 58 24 28 58 2C 59 2C 5A 29 B2 22 22 A7 32 37 37 |X$(X,Y,Z)."".277|
00001650: 30 00 84 1E B9 0A 4C 31 B2 C3 28 45 58 24 28 58 |0.....L1..(EX$(X|
00001660: 2C 59 2C 5A 29 29 AB 34 3A 43 24 B2 C9 28 45 58 |,Y,Z)).4:C$..(EX|
00001670: 24 28 58 2C 59 2C 5A 29 2C 4C 31 29 3A 4D B2 C5 |$(X,Y,Z),L1):M..|
00001680: 28 43 24 29 00 A5 1E BE 0A 8B C8 28 45 58 24 28 |(C$).......(EX$(|
00001690: 58 2C 59 2C 5A 29 2C 32 29 B2 44 24 AF 41 B2 4D |X,Y,Z),2).D$.A.M|
000016A0: A7 32 38 35 30 00 AC 1E C8 0A 82 5A 00 FD 1E D2 |.2850......Z....|
000016B0: 0A 99 22 11 11 D3 4F 52 52 59 2C 20 48 41 56 45 |.."...ORRY, HAVE|
000016C0: 20 4E 4F 54 20 46 4F 55 4E 44 20 54 48 49 53 20 | NOT FOUND THIS |
000016D0: 45 4E 54 52 59 22 3A 99 22 11 11 12 C8 49 4E 54 |ENTRY":."....INT|
000016E0: 3A 92 20 D2 45 53 45 41 52 43 48 20 42 59 20 4C |:. .ESEARCH BY L|
000016F0: 49 53 54 49 4E 47 20 41 4C 4C 20 22 3B 00 35 1F |ISTING ALL ";.5.|
00001700: E6 0A 99 22 45 58 50 45 4E 53 45 53 22 3A 99 22 |..."EXPENSES":."|
00001710: 46 4F 52 20 54 48 49 53 20 4D 4F 4E 54 48 20 28 |FOR THIS MONTH (|
00001720: C1 4E 41 4C 59 53 49 53 20 CD 45 4E 55 20 2D 20 |.NALYSIS .ENU - |
00001730: CE 4F 20 32 29 00 63 1F F0 0A 99 22 11 11 C1 4E |.O 2).c...."...N|
00001740: 59 20 4F 54 48 45 52 20 44 45 4C 45 54 49 4F 4E |Y OTHER DELETION|
00001750: 22 3B 3A 8D 36 30 30 30 3A 8B 50 36 B2 31 A7 32 |";:.6000:.P6.1.2|
00001760: 36 30 30 00 6C 1F 18 0B 89 31 32 30 00 B2 1F 22 |600.l....120..."|
00001770: 0B 99 22 11 11 C8 41 56 45 20 46 4F 55 4E 44 20 |.."...AVE FOUND |
00001780: 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 20 45 4E |THE FOLLOWING EN|
00001790: 54 52 59 3A 22 3A 99 22 11 11 C4 41 54 45 3A 20 |TRY:":."...ATE: |
000017A0: 22 44 24 22 20 22 4D 44 24 28 59 29 22 20 22 59 |"D$" "MD$(Y)" "Y|
000017B0: 52 24 00 C3 1F 2C 0B 4A 53 B2 31 30 3A 8D 31 30 |R$...,.JS.10:.10|
000017C0: 30 31 35 00 04 20 36 0B 99 22 11 D4 59 50 45 3A |015.. 6.."..YPE:|
000017D0: 20 22 45 44 24 28 58 29 3A 99 22 11 C1 4D 4F 55 | "ED$(X):."..MOU|
000017E0: 4E 54 3A 20 22 43 24 3A 99 22 11 11 C4 45 4C 45 |NT: "C$:."...ELE|
000017F0: 54 45 22 3B 3A 8D 36 30 30 30 3A 8B 50 36 B2 32 |TE";:.6000:.P6.2|
00001800: A7 31 32 30 00 4C 20 63 0B 99 22 11 11 C8 41 4E |.120.L c.."...AN|
00001810: 47 2D 4F 4E 20 57 48 49 4C 45 20 44 45 4C 45 54 |G-ON WHILE DELET|
00001820: 49 4E 47 22 3A 41 B2 58 3A 42 B2 59 3A 8D 31 30 |ING":A.X:B.Y:.10|
00001830: 31 30 30 3A 41 B2 31 35 3A 42 B2 59 3A 8D 31 30 |100:A.15:B.Y:.10|
00001840: 31 30 30 3A 41 B2 58 3A 42 B2 31 32 00 8A 20 7C |100:A.X:B.12.. ||
00001850: 0B 8D 31 30 31 30 30 3A 41 B2 31 35 3A 42 B2 31 |..10100:A.15:B.1|
00001860: 32 3A 8D 31 30 31 30 30 3A 81 5A B2 5A A4 31 34 |2:.10100:.Z.Z.14|
00001870: 3A 8B 5A B2 31 34 A7 45 58 24 28 58 2C 59 2C 5A |:.Z.14.EX$(X,Y,Z|
00001880: 29 B2 22 22 3A 89 33 30 30 30 00 BA 20 9A 0B 45 |)."":.3000.. ..E|
00001890: 58 24 28 58 2C 59 2C 5A 29 B2 45 58 24 28 58 2C |X$(X,Y,Z).EX$(X,|
000018A0: 59 2C 5A AA 31 29 3A 8B 45 58 24 28 58 2C 59 2C |Y,Z.1):.EX$(X,Y,|
000018B0: 5A 29 B2 22 22 A7 33 30 30 30 00 C1 20 B3 0B 82 |Z)."".3000.. ...|
000018C0: 5A 00 ED 20 B8 0B 43 31 25 28 58 2C 59 29 B2 43 |Z.. ..C1%(X,Y).C|
000018D0: 31 25 28 58 2C 59 29 AB 31 3A 46 32 B2 31 3A 99 |1%(X,Y).1:F2.1:.|
000018E0: 22 11 CF 4B 20 21 22 3A 89 32 38 30 30 00 01 21 |"..K !":.2800..!|
000018F0: 08 0C 8D 39 30 30 30 3A 8B 50 36 B2 32 A7 31 32 |...9000:.P6.2.12|
00001900: 30 00 4E 21 0D 0C 99 22 93 C5 4E 54 45 52 20 4E |0.N!..."..NTER N|
00001910: 41 4D 45 20 4F 46 20 46 49 4C 45 20 54 4F 20 42 |AME OF FILE TO B|
00001920: 45 20 4C 4F 41 44 45 44 22 3A 99 22 CD 41 58 20 |E LOADED":.".AX |
00001930: 31 36 20 43 48 41 52 41 43 54 45 52 53 3A 20 22 |16 CHARACTERS: "|
00001940: 3B 3A 50 33 B2 31 36 3A 8D 33 30 30 30 30 00 63 |;:P3.16:.30000.c|
00001950: 21 0F 0C 8D 35 35 30 30 3A 8B 50 36 B2 32 A7 33 |!...5500:.P6.2.3|
00001960: 30 38 35 00 A9 21 12 0C 99 22 11 D0 4C 45 41 53 |085..!..."..LEAS|
00001970: 45 20 50 4C 41 43 45 20 59 4F 55 52 20 44 41 54 |E PLACE YOUR DAT|
00001980: 41 20 44 49 53 4B 20 49 4E 20 44 52 49 56 45 20 |A DISK IN DRIVE |
00001990: 30 22 3A 99 22 11 12 C8 49 54 20 41 4E 59 20 4B |0":."...IT ANY K|
000019A0: 45 59 22 3A 8D 35 30 30 30 00 DE 21 1C 0C 99 22 |EY":.5000..!..."|
000019B0: 11 D0 4C 45 41 53 45 20 48 41 4E 47 2D 4F 4E 22 |..LEASE HANG-ON"|
000019C0: 3A 9F 32 2C 38 2C 32 2C 50 24 3A 8D 39 35 30 30 |:.2,8,2,P$:.9500|
000019D0: 3A 8B 50 36 B2 31 A7 A0 32 3A 89 31 32 30 00 F9 |:.P6.1..2:.120..|
000019E0: 21 21 0C 84 32 2C 59 52 24 3A 84 32 2C 43 3A 8B |!!..2,YR$:.2,C:.|
000019F0: 43 B2 31 30 A7 33 31 31 35 00 1F 22 25 0C 81 58 |C.10.3115.."%..X|
00001A00: B2 31 30 A4 43 AB 31 3A 84 32 2C 45 44 24 28 58 |.10.C.1:.2,ED$(X|
00001A10: 29 3A 82 58 3A 8B 43 B2 31 35 A7 43 B2 31 34 00 |):.X:.C.15.C.14.|
00001A20: 27 22 2B 0C 59 B2 30 00 4F 22 30 0C 81 58 B2 30 |'"+.Y.0.O"0..X.0|
00001A30: A4 43 3A 84 32 2C 43 31 25 28 58 2C 59 29 3A 8B |.C:.2,C1%(X,Y):.|
00001A40: 43 31 25 28 58 2C 59 29 B2 30 A7 33 32 30 30 00 |C1%(X,Y).0.3200.|
00001A50: 62 22 4E 0C 84 32 2C 54 54 28 58 2C 59 29 3A 5A |b"N..2,TT(X,Y):Z|
00001A60: B2 30 00 77 22 62 0C 8B 5A B2 43 31 25 28 58 2C |.0.w"b..Z.C1%(X,|
00001A70: 59 29 A7 33 32 30 30 00 9A 22 6C 0C 84 32 2C 45 |Y).3200.."l..2,E|
00001A80: 58 24 28 58 2C 59 2C 5A 29 3A 5A B2 5A AA 31 3A |X$(X,Y,Z):Z.Z.1:|
00001A90: 8B 5A B3 31 36 A7 33 31 37 30 00 A1 22 80 0C 82 |.Z.16.3170.."...|
00001AA0: 58 00 C3 22 8A 0C 84 32 2C 54 54 28 31 35 2C 59 |X.."...2,TT(15,Y|
00001AB0: 29 3A 59 B2 59 AA 31 3A 8B 59 B3 B2 31 31 A7 33 |):Y.Y.1:.Y..11.3|
00001AC0: 31 32 30 00 F5 22 8C 0C 81 58 B2 30 A4 43 3A 84 |120.."...X.0.C:.|
00001AD0: 32 2C 54 54 28 58 2C 31 32 29 3A 82 58 3A 84 32 |2,TT(X,12):.X:.2|
00001AE0: 2C 54 54 28 31 35 2C 31 32 29 3A 8B 43 B2 31 34 |,TT(15,12):.C.14|
00001AF0: A7 43 B2 31 35 00 0F 23 99 0C A0 32 3A A0 31 35 |.C.15..#...2:.15|
00001B00: 3A 46 32 B2 30 3A 46 33 B2 31 3A 89 31 32 30 00 |:F2.0:F3.1:.120.|
00001B10: 1E 23 E4 0C 8B 46 32 B2 31 A7 33 33 30 37 00 4F |.#...F2.1.3307.O|
00001B20: 23 E5 0C 99 22 93 C4 4F 20 59 4F 55 20 57 49 53 |#..."..O YOU WIS|
00001B30: 48 20 54 4F 20 53 49 47 4E 2D 4F 46 46 22 3B 3A |H TO SIGN-OFF";:|
00001B40: 8D 36 30 30 30 3A 8B 50 36 B2 32 A7 31 32 30 00 |.6000:.P6.2.120.|
00001B50: 8E 23 E9 0C 99 22 93 11 1D 1D 1D 1D 1D 1D 4F 4B |.#..."........OK|
00001B60: 2C 20 4E 4F 57 20 53 49 47 4E 49 4E 47 2D 4F 46 |, NOW SIGNING-OF|
00001B70: 46 22 3A 97 35 33 32 38 30 2C 31 34 3A 99 C7 28 |F":.53280,14:..(|
00001B80: 39 29 3A 97 35 33 32 37 32 2C 32 31 3A 80 00 D9 |9):.53272,21:...|
00001B90: 23 EB 0C 99 22 93 D9 4F 55 20 48 41 56 45 20 4D |#..."..OU HAVE M|
00001BA0: 41 44 45 20 53 4F 4D 45 20 41 4C 54 45 52 41 54 |ADE SOME ALTERAT|
00001BB0: 49 4F 4E 53 22 3A 99 22 11 C4 4F 20 59 4F 55 20 |IONS":."..O YOU |
00001BC0: 57 49 53 48 20 54 4F 20 53 41 56 45 20 54 48 45 |WISH TO SAVE THE|
00001BD0: 4D 22 3B 3A 8D 36 30 30 30 00 E8 23 EE 0C 8B 50 |M";:.6000..#...P|
00001BE0: 36 B2 32 A7 33 33 30 31 00 34 24 F5 0C 99 22 93 |6.2.3301.4$...".|
00001BF0: C5 4E 54 45 52 20 4E 41 4D 45 20 4F 46 20 46 49 |.NTER NAME OF FI|
00001C00: 4C 45 20 54 4F 20 42 45 20 53 41 56 45 44 22 3A |LE TO BE SAVED":|
00001C10: 99 22 CD 41 58 20 31 36 20 43 48 41 52 41 43 54 |.".AX 16 CHARACT|
00001C20: 45 52 53 3A 20 22 3B 3A 50 33 B2 31 36 3A 8D 33 |ERS: ";:P3.16:.3|
00001C30: 30 30 30 30 00 49 24 F6 0C 8D 35 35 30 30 3A 8B |0000.I$...5500:.|
00001C40: 50 36 B2 32 A7 33 33 31 37 00 96 24 F8 0C 42 24 |P6.2.3317..$..B$|
00001C50: B2 50 24 3A 99 22 11 D0 4C 45 41 53 45 20 50 4C |.P$:."..LEASE PL|
00001C60: 41 43 45 20 59 4F 55 52 20 44 41 54 41 20 44 49 |ACE YOUR DATA DI|
00001C70: 53 4B 20 49 4E 20 44 52 49 56 45 20 30 22 3A 99 |SK IN DRIVE 0":.|
00001C80: 22 11 12 C8 49 54 20 41 4E 59 20 4B 45 59 92 22 |"...IT ANY KEY."|
00001C90: 3A 8D 35 30 30 30 00 D8 24 02 0D 99 22 11 D0 4C |:.5000..$..."..L|
00001CA0: 45 41 53 45 20 48 41 4E 47 2D 4F 4E 22 3A 9F 32 |EASE HANG-ON":.2|
00001CB0: 2C 38 2C 32 2C 22 40 30 3A 22 AA 42 24 AA 22 2C |,8,2,"@0:".B$.",|
00001CC0: 53 2C 57 22 3A 8D 39 35 30 30 3A 8B 50 36 B2 31 |S,W":.9500:.P6.1|
00001CD0: A7 A0 32 3A 89 31 32 30 00 F3 24 0C 0D 98 32 2C |..2:.120..$...2,|
00001CE0: 59 52 24 3A 98 32 2C 43 3A 8B 43 B2 31 30 A7 33 |YR$:.2,C:.C.10.3|
00001CF0: 33 36 30 00 19 25 1A 0D 81 58 B2 31 30 A4 43 AB |360..%...X.10.C.|
00001D00: 31 3A 98 32 2C 45 44 24 28 58 29 3A 82 58 3A 8B |1:.2,ED$(X):.X:.|
00001D10: 43 B2 31 35 A7 43 B2 31 34 00 21 25 20 0D 59 B2 |C.15.C.14.!% .Y.|
00001D20: 30 00 49 25 2A 0D 81 58 B2 30 A4 43 3A 98 32 2C |0.I%*..X.0.C:.2,|
00001D30: 43 31 25 28 58 2C 59 29 3A 8B 43 31 25 28 58 2C |C1%(X,Y):.C1%(X,|
00001D40: 59 29 B2 30 A7 33 34 35 30 00 5C 25 48 0D 98 32 |Y).0.3450.\%H..2|
00001D50: 2C 54 54 28 58 2C 59 29 3A 5A B2 30 00 71 25 5C |,TT(X,Y):Z.0.q%\|
00001D60: 0D 8B 5A B2 43 31 25 28 58 2C 59 29 A7 33 34 35 |..Z.C1%(X,Y).345|
00001D70: 30 00 94 25 66 0D 98 32 2C 45 58 24 28 58 2C 59 |0..%f..2,EX$(X,Y|
00001D80: 2C 5A 29 3A 5A B2 5A AA 31 3A 8B 5A B3 31 36 A7 |,Z):Z.Z.1:.Z.16.|
00001D90: 33 34 32 30 00 B9 25 7A 0D 82 58 3A 98 32 2C 54 |3420..%z..X:.2,T|
00001DA0: 54 28 31 35 2C 59 29 3A 59 B2 59 AA 31 3A 8B 59 |T(15,Y):Y.Y.1:.Y|
00001DB0: B3 B2 31 31 A7 33 33 37 30 00 F2 25 90 0D 81 58 |..11.3370..%...X|
00001DC0: B2 30 A4 43 3A 98 32 2C 54 54 28 58 2C 31 32 29 |.0.C:.2,TT(X,12)|
00001DD0: 3A 82 58 3A 98 32 2C 54 54 28 31 35 2C 31 32 29 |:.X:.2,TT(15,12)|
00001DE0: 3A A0 32 3A A0 31 35 3A 8B 43 B2 31 34 A7 43 B2 |:.2:.15:.C.14.C.|
00001DF0: 31 35 00 2C 26 A2 0D 99 22 11 11 C4 4F 20 59 4F |15.,&..."...O YO|
00001E00: 55 20 57 49 53 48 20 54 4F 20 53 41 56 45 20 54 |U WISH TO SAVE T|
00001E10: 48 45 4D 20 41 47 41 49 4E 22 3B 3A 8D 36 30 30 |HEM AGAIN";:.600|
00001E20: 30 3A 8B 50 36 B2 32 A7 33 33 30 31 00 36 26 C0 |0:.P6.2.3301.6&.|
00001E30: 0D 89 33 33 31 37 00 70 26 10 0E 99 22 93 C5 4E |..3317.p&..."..N|
00001E40: 54 45 52 20 45 58 50 45 4E 53 45 20 41 4E 41 4C |TER EXPENSE ANAL|
00001E50: 59 53 49 53 20 54 4F 20 42 45 20 50 52 49 4E 54 |YSIS TO BE PRINT|
00001E60: 45 44 3A 11 22 3A 46 34 B2 31 3A 8D 31 35 31 30 |ED:.":F4.1:.1510|
00001E70: 00 85 26 1A 0E 8B 46 35 B2 31 A7 46 35 B2 30 3A |..&...F5.1.F5.0:|
00001E80: 89 33 36 33 30 00 B3 26 24 0E 99 22 11 C4 4F 20 |.3630..&$.."..O |
00001E90: 59 4F 55 20 57 49 53 48 20 54 4F 20 50 52 49 4E |YOU WISH TO PRIN|
00001EA0: 54 22 3B 3A 8D 36 30 30 30 3A 8B 50 36 B2 32 A7 |T";:.6000:.P6.2.|
00001EB0: 31 32 30 00 C6 26 2B 0E 99 22 91 22 53 50 24 3A |120..&+.."."SP$:|
00001EC0: 8D 36 30 30 30 30 00 F0 26 2E 0E 99 22 11 11 C1 |.60000..&..."...|
00001ED0: 4E 59 20 4F 54 48 45 52 22 3B 3A 8D 36 30 30 30 |NY OTHER";:.6000|
00001EE0: 3A 8B 50 36 B2 32 A7 46 34 B2 30 3A 89 31 32 30 |:.P6.2.F4.0:.120|
00001EF0: 00 FA 26 4C 0E 89 33 36 30 30 00 0E 27 88 13 A1 |..&L..3600..'...|
00001F00: 41 24 3A 8B 41 24 B2 22 22 A7 35 30 30 30 00 14 |A$:.A$."".5000..|
00001F10: 27 92 13 8E 00 5A 27 7C 15 50 36 B2 31 3A 41 B2 |'....Z'|.P6.1:A.|
00001F20: C6 28 50 24 29 3A 8B 28 41 B3 36 35 B0 41 B1 39 |.(P$):.(A.65.A.9|
00001F30: 30 29 B0 50 24 B2 22 4E 22 B0 50 24 B2 22 56 22 |0).P$."N".P$."V"|
00001F40: B0 50 24 B2 22 43 22 B0 50 24 B2 22 53 22 B0 50 |.P$."C".P$."S".P|
00001F50: 24 B2 22 49 22 A7 50 36 B2 32 00 60 27 86 15 8E |$."I".P6.2.`'...|
00001F60: 00 75 27 70 17 99 22 20 12 81 D9 9A 92 2F 12 81 |.u'p.." ...../..|
00001F70: CE 9A 92 3F 22 00 93 27 7A 17 A1 41 24 3A 8B 41 |...?"..'z..A$:.A|
00001F80: 24 B3 B1 22 59 22 AF 41 24 B3 B1 22 4E 22 A7 36 |$.."Y".A$.."N".6|
00001F90: 30 31 30 00 A6 27 84 17 8B 41 24 B2 22 59 22 A7 |010..'...A$."Y".|
00001FA0: 50 36 B2 31 3A 8E 00 B1 27 8E 17 50 36 B2 32 3A |P6.1:...'..P6.2:|
00001FB0: 8E 00 F8 27 58 1B 81 4E B2 30 A4 34 3A 99 4E AA |...'X..N.0.4:.N.|
00001FC0: 31 22 9D 2E 22 45 44 24 28 4E 29 A3 31 32 29 4E |1".."ED$(N).12)N|
00001FD0: AA 36 22 9D 2E 22 45 44 24 28 4E AA 35 29 A3 32 |.6".."ED$(N.5).2|
00001FE0: 35 29 4E AA 31 31 22 9D 2E 22 45 44 24 28 4E AA |5)N.11".."ED$(N.|
00001FF0: 31 30 29 3A 99 3A 82 4E 00 FE 27 62 1B 8E 00 1C |10):.:.N..'b....|
00002000: 28 28 23 99 22 93 C1 52 45 20 59 4F 55 20 53 55 |((#."..RE YOU SU|
00002010: 52 45 22 3B 3A 8D 36 30 30 30 3A 8E 00 49 28 1C |RE";:.6000:..I(.|
00002020: 25 50 36 B2 30 3A 9F 31 35 2C 38 2C 31 35 3A 84 |%P6.0:.15,8,15:.|
00002030: 31 35 2C 45 52 2C 45 52 24 2C 54 52 2C 42 4C 3A |15,ER,ER$,TR,BL:|
00002040: 8B 45 52 B3 32 30 A7 20 8E 00 88 28 26 25 99 22 |.ER.20. ...(&%."|
00002050: 11 12 C4 49 53 4B 20 45 52 52 4F 52 3A 92 20 22 |...ISK ERROR:. "|
00002060: 45 52 22 20 22 45 52 24 54 52 3B 42 4C 3A 99 22 |ER" "ER$TR;BL:."|
00002070: 12 11 C8 49 54 20 41 4E 59 20 4B 45 59 20 46 4F |...IT ANY KEY FO|
00002080: 52 20 4D 45 4E 55 92 22 00 9D 28 30 25 8D 35 30 |R MENU."..(0%.50|
00002090: 30 30 3A A0 31 35 3A 50 36 B2 31 3A 8E 00 B1 28 |00:.15:P6.1:...(|
000020A0: 10 27 4E B2 C5 28 43 24 29 3A 4E B2 A5 42 28 4E |.'N..(C$):N..B(N|
000020B0: 29 00 BD 28 1A 27 43 24 B2 C4 28 4E 29 00 E4 28 |)..(.'C$..(N)..(|
000020C0: 1F 27 81 4E B2 C3 28 43 24 29 A4 31 A9 AB 31 3A |.'.N..(C$).1..1:|
000020D0: 8B CA 28 43 24 2C 4E 2C 31 29 B2 22 2E 22 A7 31 |..(C$,N,1).".".1|
000020E0: 30 30 35 30 00 FE 28 38 27 82 4E 3A 43 24 B2 43 |0050..(8'.N:C$.C|
000020F0: 24 AA 22 2E 30 30 22 3A 89 31 30 30 36 30 00 17 |$.".00":.10060..|
00002100: 29 42 27 8B 4E B2 C3 28 43 24 29 AB 31 A7 43 24 |)B'.N..(C$).1.C$|
00002110: B2 43 24 AA 22 30 22 00 2F 29 4C 27 43 24 B2 C9 |.C$."0"./)L'C$..|
00002120: 28 28 53 50 24 AA 43 24 29 2C 4A 53 29 3A 8E 00 |((SP$.C$),JS):..|
00002130: 47 29 74 27 54 54 28 41 2C 42 29 B2 54 54 28 41 |G)t'TT(A,B).TT(A|
00002140: 2C 42 29 AB 4D 3A 8E 00 5F 29 D8 27 54 54 28 41 |,B).M:.._).'TT(A|
00002150: 2C 42 29 B2 54 54 28 41 2C 42 29 AA 4D 3A 8E 00 |,B).TT(A,B).M:..|
00002160: 96 29 04 29 83 47 52 4F 43 45 52 49 45 53 2C 4A |.).).GROCERIES,J|
00002170: 41 4E 55 41 52 59 2C 43 4C 4F 54 48 45 53 2C 46 |ANUARY,CLOTHES,F|
00002180: 45 42 52 55 41 52 59 2C 4D 49 53 43 45 4C 4C 2E |EBRUARY,MISCELL.|
00002190: 2C 4D 41 52 43 48 00 DF 29 0E 29 83 20 41 53 53 |,MARCH..).). ASS|
000021A0: 45 54 53 2C 41 50 52 49 4C 2C 52 45 4E 54 2F 4D |ETS,APRIL,RENT/M|
000021B0: 4F 52 54 2C 4D 41 59 2C 54 45 4C 45 50 48 4F 4E |ORT,MAY,TELEPHON|
000021C0: 45 2C 4A 55 4E 45 2C 45 4C 45 43 54 52 49 43 2E |E,JUNE,ELECTRIC.|
000021D0: 2C 4A 55 4C 59 2C 49 4E 53 55 52 41 4E 43 45 00 |,JULY,INSURANCE.|
000021E0: 2B 2A 18 29 83 41 55 47 55 53 54 2C 54 52 41 56 |+*.).AUGUST,TRAV|
000021F0: 45 4C 2C 53 45 50 54 45 4D 42 45 52 2C 4D 4F 54 |EL,SEPTEMBER,MOT|
00002200: 4F 52 20 43 41 52 2C 4F 43 54 4F 42 45 52 2C 2A |OR CAR,OCTOBER,*|
00002210: 2A 2A 2A 2A 2A 2A 2A 2A 2C 4E 4F 56 45 4D 42 45 |********,NOVEMBE|
00002220: 52 2C 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 58 2A 22 29 |R,*********.X*")|
00002230: 83 20 44 45 43 45 4D 42 45 52 2C 2A 2A 2A 2A 2A |. DECEMBER,*****|
00002240: 2A 2A 2A 2A 2C 2A 2A 2A 2A 2A 2A 2A 2A 2A 2C 2A |****,*********,*|
00002250: 2A 2A 2A 2A 2A 2A 2A 2A 00 9A 2A 98 3A 41 4D 24 |********..*.:AM$|
00002260: B2 22 33 31 32 38 33 31 33 30 33 31 33 30 33 31 |."31283130313031|
00002270: 33 31 33 30 33 31 33 30 33 31 22 3A 41 4C 24 B2 |3130313031":AL$.|
00002280: 22 33 31 32 39 33 31 33 30 33 31 33 30 33 31 33 |"312931303130313|
00002290: 31 33 30 33 31 33 30 33 31 22 00 A3 2A AC 3A 50 |130313031"..*.:P|
000022A0: 36 B2 30 00 E1 2A B6 3A 50 44 B2 C5 28 44 24 29 |6.0..*.:PD..(D$)|
000022B0: 3A 8B 50 44 B3 31 B0 50 44 B1 33 31 A7 50 36 B2 |:.PD.1.PD.31.P6.|
000022C0: 31 3A 50 59 B2 C5 28 59 52 24 29 3A 8B B5 28 50 |1:PY..(YR$):..(P|
000022D0: 59 AD 34 29 B2 50 59 AD 34 A7 41 4D 24 B2 41 4C |Y.4).PY.4.AM$.AL|
000022E0: 24 00 01 2B CA 3A 8B 50 44 B1 C5 28 CA 28 41 4D |$..+.:.PD..(.(AM|
000022F0: 24 2C 50 4D AC 32 AB 31 2C 32 29 29 A7 50 36 B2 |$,PM.2.1,2)).P6.|
00002300: 31 00 07 2B D4 3A 8E 00 4D 2B 80 3E 99 22 93 D0 |1..+.:..M+.>."..|
00002310: 4C 45 41 53 45 20 45 4E 54 45 52 20 59 45 41 52 |LEASE ENTER YEAR|
00002320: 20 3A 20 31 39 22 3B 3A 50 33 B2 32 3A 50 34 B2 | : 19";:P3.2:P4.|
00002330: 31 3A 8D 33 30 30 30 30 3A 59 52 24 B2 22 31 39 |1:.30000:YR$."19|
00002340: 22 AA 50 24 3A 41 B2 C5 28 59 52 24 29 00 66 2B |".P$:A..(YR$).f+|
00002350: 8A 3E 8B 41 B3 31 39 37 30 B0 41 B1 31 39 39 39 |.>.A.1970.A.1999|
00002360: A7 31 36 30 30 30 00 6C 2B 94 3E 8E 00 9B 2B 30 |.16000.l+.>...+0|
00002370: 75 81 51 B2 31 A4 50 33 3A 99 22 A4 22 3B 3A 82 |u.Q.1.P3:.".";:.|
00002380: 3A 81 51 B2 31 A4 50 33 3A 99 22 9D 22 3B 3A 82 |:.Q.1.P3:.".";:.|
00002390: 3A 50 24 B2 22 22 3A 50 58 B2 30 00 B0 2B D0 75 |:P$."":PX.0..+.u|
000023A0: A1 41 24 3A 8B 41 24 B2 22 22 A7 33 30 31 36 30 |.A$:.A$."".30160|
000023B0: 00 CF 2B DA 75 41 B2 C6 28 41 24 29 3A 8B 41 B1 |..+.uA..(A$):.A.|
000023C0: 31 39 31 AF 41 B3 32 31 39 A7 33 30 32 30 30 00 |191.A.219.30200.|
000023D0: 0E 2C E4 75 8B 28 41 B1 33 31 AF 41 B3 B1 34 34 |.,.u.(A.31.A..44|
000023E0: AF 41 B3 B1 33 34 AF 41 B3 B1 35 38 AF 41 B3 B1 |.A..34.A..58.A..|
000023F0: 35 39 AF 41 B3 39 37 29 B0 41 B2 31 33 B0 41 B2 |59.A.97).A.13.A.|
00002400: 32 30 B0 41 B2 31 35 37 A7 33 30 32 30 30 00 19 |20.A.157.30200..|
00002410: 2C EE 75 89 33 30 31 36 30 00 29 2C F8 75 8B 41 |,.u.30160.),.u.A|
00002420: B2 31 33 A7 33 30 33 32 30 00 40 2C 02 76 8B 41 |.13.30320.@,.v.A|
00002430: B2 31 35 37 AF 50 24 B2 22 22 A7 33 30 30 30 30 |.157.P$."".30000|
00002440: 00 50 2C 0C 76 8B 41 B2 32 30 A7 33 30 32 35 30 |.P,.v.A.20.30250|
00002450: 00 61 2C 11 76 8B 50 58 B2 50 33 A7 33 30 31 36 |.a,.v.PX.P3.3016|
00002460: 30 00 73 2C 16 76 8B 41 B3 B1 31 35 37 A7 33 30 |0.s,.v.A..157.30|
00002470: 32 38 30 00 97 2C 1B 76 50 58 B2 C3 28 50 24 29 |280..,.vPX..(P$)|
00002480: 3A 81 51 B2 31 A4 50 58 3A 99 22 9D 22 3B 3A 82 |:.Q.1.PX:.".";:.|
00002490: 3A 89 33 30 30 30 30 00 A8 2C 2A 76 8B 50 24 B2 |:.30000..,*v.P$.|
000024A0: 22 22 A7 33 30 31 36 30 00 D5 2C 34 76 50 24 B2 |"".30160..,4vP$.|
000024B0: C8 28 50 24 2C C3 28 50 24 29 AB 31 29 3A 41 24 |.(P$,.(P$).1):A$|
000024C0: B2 22 9D A4 9D 22 3A 50 58 B2 50 58 AB 31 3A 89 |."...":PX.PX.1:.|
000024D0: 33 30 33 30 30 00 E9 2C 48 76 8B C3 28 50 24 29 |30300..,Hv..(P$)|
000024E0: B2 50 33 A7 33 30 33 33 30 00 FF 2C 52 76 50 24 |.P3.30330..,RvP$|
000024F0: B2 50 24 AA 41 24 3A 50 58 B2 C3 28 50 24 29 00 |.P$.A$:PX..(P$).|
00002500: 0F 2D 5C 76 99 41 24 3B 3A 89 33 30 31 36 30 00 |.-\v.A$;:.30160.|
00002510: 23 2D 70 76 8B C3 28 50 24 29 B3 50 34 A7 33 30 |#-pv..(P$).P4.30|
00002520: 31 36 30 00 2B 2D 7A 76 99 3A 8E 00 43 2D AC 8A |160.+-zv.:..C-..|
00002530: 81 51 B2 31 A4 33 37 3A 99 22 C0 22 3B 3A 82 3A |.Q.1.37:.".";:.:|
00002540: 99 3A 8E 00 73 2D 60 EA 97 35 33 32 36 35 2C 31 |.:..s-`..53265,1|
00002550: 31 3A 47 31 24 B2 C7 28 31 37 29 3A 9F 34 2C 34 |1:G1$..(17):.4,4|
00002560: 3A 98 34 2C C7 28 31 35 29 3A 98 34 3A 47 31 B2 |:.4,.(15):.4:G1.|
00002570: 39 38 34 00 A7 2D 88 EA 81 47 30 B2 30 A4 32 34 |984..-...G0.0.24|
00002580: 3A 47 30 24 B2 47 31 24 3A 47 31 B2 47 31 AA 34 |:G0$.G1$:G1.G1.4|
00002590: 30 3A 81 47 32 B2 47 31 A4 47 31 AA 33 39 3A 47 |0:.G2.G1.G1.39:G|
000025A0: 33 B2 C2 28 47 32 29 00 D0 2D 92 EA 8B 47 33 B1 |3..(G2)..-...G3.|
000025B0: 31 32 38 A7 47 33 B2 47 33 AB 31 32 38 3A 47 34 |128.G3.G3.128:G4|
000025C0: B2 31 3A 47 30 24 B2 47 30 24 AA C7 28 31 38 29 |.1:G0$.G0$..(18)|
000025D0: 00 F4 2D 9C EA 8B 28 47 33 B1 30 29 AC 28 47 33 |..-...(G3.0).(G3|
000025E0: B3 33 32 29 A7 47 33 B2 47 33 AA 36 34 3A 89 36 |.32).G3.G3.64:.6|
000025F0: 30 31 30 30 00 0F 2E A6 EA 8B 28 47 33 B1 33 31 |0100......(G3.31|
00002600: 29 AC 28 47 33 B3 36 34 29 A7 36 30 31 30 30 00 |).(G3.64).60100.|
00002610: 35 2E B0 EA 8B 28 47 33 B1 36 33 29 AC 28 47 33 |5....(G3.63).(G3|
00002620: B3 39 36 29 A7 47 33 B2 47 33 AA 31 32 38 3A 89 |.96).G3.G3.128:.|
00002630: 36 30 31 30 30 00 5B 2E BA EA 8B 28 47 33 B1 39 |60100.[....(G3.9|
00002640: 35 29 AC 28 47 33 B3 31 32 38 29 A7 47 33 B2 47 |5).(G3.128).G3.G|
00002650: 33 AA 36 34 3A 89 36 30 31 30 30 00 6D 2E C4 EA |3.64:.60100.m...|
00002660: 47 30 24 B2 47 30 24 AA C7 28 47 33 29 00 8B 2E |G0$.G0$..(G3)...|
00002670: CE EA 8B 47 34 B2 31 A7 47 30 24 B2 47 30 24 AA |...G4.1.G0$.G0$.|
00002680: C7 28 31 34 36 29 3A 47 34 B2 30 00 BA 2E D8 EA |.(146):G4.0.....|
00002690: 82 47 32 3A 98 34 2C 47 30 24 3A 82 47 30 3A 98 |.G2:.4,G0$:.G0:.|
000026A0: 34 3A 98 34 2C C7 28 31 34 35 29 3A A0 34 3A 97 |4:.4,.(145):.4:.|
000026B0: 35 33 32 36 35 2C 32 37 3A 8E 00 C8 2E 48 EE 8F |53265,27:....H..|
000026C0: 20 56 32 2E 30 28 44 29 00 00 00 FB FF FF FF FB | V2.0(D)........|
000026D0: FF FF FF |... |
..>....*EXPENSE MANAGER* BY BERNARD HABE
T(C) 1983 ABRASCO LTD...(..".";:.53280,
6:.EX$(14,11,14),TT(15,12),C1%(14,11),ED
$(14),MD$(11).B.,.SP$."
":.N.0.14:.ED$(N):.N.11.90.N.P..
MD$(N)...Z..N:C.10:..B(N)..(N.100.0.005)
.100:.53272,23:.G(8).I.X..".";:.35500:."
.. E X P E N S E M A N A G E R .
.":.35500...}...8)".... PRESS .. OPTION
NUMBER..":..10)"..... 1 .. LOAD DATA".G.
...10)"... 2 .. NEW ENTRIES":..10)"...
3 .. DELETIONS".......10)"... 4 .. ANALY
SIS".%.....10)"... 5 .. PRINT EXPENSES":
..10)"... 6 .. SAVE/SIGN-OFF".X....5000:
.E(A$).3080,500,2597,1497,3600,3300:.280
.L....9000:.P6.2.120.{....F3..0.506.....
."..ATTENTION:.":.".YOU HAVE NOT LOADED
ANY DATA. IF YOU DO"......"SO LATER, ANY
ENTRIES ENTERED BEFORE":."WILL BE LOST.
".*...."..DO YOU WISH TO PROCEED";:.6000
:.P6.2.120.G...F3.1:F1.0:.YR$.""..16000.
.....".".7)"N E W E N T R I E S":..7)"
......................":.7000...5..C.14.
F1.1..".":.640.P.:..".ANY NEW HEADINGS";
:.6000:.P6.2.640...B..".ENTER NEW HEADIN
G: ";:P3.9:P4.1:.30000.!.G.A.F(P$):.A.65
.A.90.."...":.610.:.L.ED$(C).P$:C.C.1:.5
10.H....".PLEASE ENTER THE FOLLOWING:":.
F1.1.680......"..MONTH .IN FIGURES. : ";
:P3.2:P4.1:.30000.A...Y.E(P$):PM.Y:.Y.1.
Y.12.."....":.650......"..TYPE OF EXPENS
E .REF NO ONLY.: ";:P3.2:.30000.....X.E(
P$):.X.1.X.C.."....":.680.)...X.X.1:Y.Y.
1.P....C1%(X,Y).14.."...SORRY,NO MORE EN
TRIES FREE IN THIS PAGE..":.1030......".
RECORD NO"C1%(X,Y).1"OF 15 :":."........
...........":.".EXPENSE : ";......ED$
(X):.".MONTH : "MD$(Y)" "YR$.&...."
.DAY : ";:.30000:D$.P$:.15000:.P6
.1.."...":.700.=.P..C(D$).2.D$."0".D$.T.
Z..".".13)D$:.".PAID BY : 1. CHEQUE".
29)"3. CASH"......" 2. CREDI
T CARD".29)"4. OTHER".R...."
..PRESS REFERENCE NO . ";......5000:N.E
(A$):.N.1.N.4.736.....PB$.D(N):.N.742,74
4,746,748.&...B$."CHEQUE":.750.@...B$."C
REDIT CARD":.750.S...B$."CASH":.750.G...
B$."OTHER":.750.....C$."....":.C$:.N.1.4
:..13)SP$:.:.C$:..13)"."B$.J...."..AMOUN
T PAID: ";: P3.9:P4.1:.30000:C$.P$......
E(C$)..0.E(C$).999999.."....":.760.4...J
S.9:.10000:.".";.13)C$:."....ACCEPT";:.6
000:.P6.2.Y.Y.1:.510.{.>..".HANG-ON WHIL
E POSTING":F2.1:Z.C1%(X,Y):C$.D(E(C$)):D
$.D$.PB$.C$...H.EX$(X,Y,Z).D$:C1%(X,Y).C
1%(X,Y).1...J..Z.0.850.Y.K..H(EX$(X,Y,Z)
,2).H(EX$(X,Y,Z.1),2).850...M.D$.EX$(X,Y
,Z):EX$(X,Y,Z).EX$(X,Y,Z.1):EX$(X,Y,Z.1)
.D$:Z.Z.1:.842.Y.R.M.E(C$):A.X:B.Y:.1020
0:A.15:B.Y:.10200:A.X:B.12:.10200...R.A.
15:B.12:.10200:.C1%(X,Y).14.1030.H.T..".
OK, ANY OTHER ENTRY FOR THIS MONTH";:.60
00:.P6.1.F1.1:Y.Y.1:.510......".ANY OTHE
R ENTRY";:.6000:.P6.1.500...$..120...Y..
YR$.""..16000......".";:F4.0.C....".....
ANALYSIS OF EXPENSES PER:":."...........
.................."......"...... 1 . MON
TH / SPECTRUM OF EXPENSES"......".......
2 . MONTH / SINGLE EXPENSE"......".....
.. 3 . EXPENSE / WHOLE YEAR"......".....
.. 4 . BACK TO MAIN MENU.2.".."........P
RESS CORRESPONDING NUMBER".].6..5000:.E(
A$).1610,1900,2300,1602:.1590.M.B..F4..0
.F4.0.V.D..120...J..".ENTER MONTH REQUIR
ED .IN FIGURES.: ";:P3.2:P4.1:.30000:A$.
P$.U.T.Y.E(A$):.Y.1.Y.12.1610. .^.Y.Y.1:
.".EXPENSES FOR "MD$(Y)" "YR$" :":L1.C(M
D$(Y)):.N.1.26:.".";:.:..Y.C..TT(15,Y).0
.."..NO ENTRY IN "MD$(Y)" "YR$:F5.1:.177
5...H..".EXPENSES:",.10.L1);MD$(Y).23)"%
".29)"YEAR TOTAL".F.R.."---------"," ---
------.------".29)"----------"......X.0.
14:.X..C..1730.*...P.(TT(X,Y).TT(15,Y)).
100:P..(P.100..5).100:N.TT(X,Y):JS.10:.1
0010:A$.C$.\...N.TT(X,12):.10010:B$.C$:N
.P:JS.7:.10010:D$.C$.Z....ED$(X),A$.20)D
$.28)B$:.X...B..".",".---------.------..
---------":N.TT(15,Y):JS.10:.10010:A$.C$
...V.N.TT(15,12):.10010:B$.C$:D$."100.00
":."TOTAL",A$.21)D$.28)B$.&....,".======
===.======..=========".3....F4..0...^...
."..ANY OTHER MONTH";:.6000:.P6.1.1610.J
....F4.1...T....1500...L..".ENTER MONTH
REQUIRED .IN FIGURES.: ";:P3.2:P4.1:.300
00:A$.P$.S.V.Y.E(A$):.Y.1.Y.12.1900.....
."..ENTER REF NO OF EXPENSE TO BE ANALYS
ED:..":.7000.)...."..ENTER NOW: ";:.3000
0.L...X.E(P$):.X.1.X.C.."....":.1970.\.F
.X.X.1:Y.Y.1...P..EX$(X,Y,0).""..".SORRY
,NO ."ED$(X)". EXPENSES IN "MD$(Y):F5.1:
.2185...Z.."."ED$(X)" EXPENSES IN "MD$(Y
)" "YR$" :":.N.1.36:.".";:.:..,...."..DA
Y".5)"PAID BY","....AMOUNT":."...".5)"..
.....","...........".L....Z.0.14:.EX$(X,
Y,Z)."".2150......H(EX$(X,Y,Z),2);:.E(J(
EX$(X,Y,Z),3,2)).2090,2100,2110,2115...*
...5)"CHEQUE",:.2120.A.4...5)"CREDIT CAR
D",:.2120.Y.>...5)"CASH ",:.2120...C...
5)"OTHER",:.2120.).H.C$.I(EX$(X,Y,Z),C(E
X$(X,Y,Z)).4):JS.10:.10015:.C$:.Z.N.F.."
.",,".---------":N.TT(X,Y):.10010:."TOTA
L",,C$:.,,".=========".{....F4..0.......
."..ANY OTHER ANALYSIS";:.6000:.P6.1.190
0......1500......".ENTER REF NO OF EXPEN
SE TO BE ANALYSED:..":.7000.,...."..ENTE
R NOW: ";:P3.2:.30000:X.E(P$):.X.1.X.C..
"....":.2350.V.G.X.X.1:.TT(X,12).0..".SO
RRY,NO ENTRY FOR ."ED$(X)". IN "YR$:F5.1
:.2520...L..".BREAKDOWN OF "ED$(X)" EXPE
NSES IN "YR$:.N.1.39:.".";:.N:....`..".M
ONTH:","....AMOUNT......%":."......","..
................"...~..Y.0.11:P.TT(X,Y).
TT(X,12).100:P..(P.100..5).100.O...N.TT(
X,Y):JS.10:.10010:A$.C$.....N.P:JS.7:.10
010:B$.C$:.MD$(Y),A$.22)B$:.Y:.,".------
---...------".U...B$."100.00":N.TT(X,12)
:JS.10:.10010:A$.C$:."TOTAL",A$.23)B$...
N..,".=========...======":.F4..0...'.X..
"..ANY OTHER EXPENSE";:.6000:.P6.1.2300.
1....1500.E.%..9000:.P6.2.120.X.&..YR$."
"..16000...(..".ENTER .MONTH. IN WHICH D
ELETION":."REQUIRED .IN FIGURES. ";:P3.2
:.30000.G.<.Y.E(P$):PM.Y:.Y.1.Y.12.2600.
P.>.P6.1...A.."..DAY. .IN FIGURES.: ";:.
30000:D$.P$:.15000:.P6.1.."...":.2625.,.
K..C(D$).2.D$."0".D$.{.P..".ENTER .TYPE.
OF EXPENSE TO WHICH":."IT WAS POSTED .I
N FIGURES...":.7000......"..ENTER NOW: "
;:.30000.....X.E(P$):.X.1.X.C.."....":.2
700.K. .X.X.1:Y.Y.1......".ENTER .AMOUNT
.: ";:P3.9:.30000:A.E(P$):.A..0.A.999999
.."...":.2725.Q....".HANG-ON WHILE SEARC
HING":.Z.0.14:.EX$(X,Y,Z)."".2770.....L1
.C(EX$(X,Y,Z)).4:C$.I(EX$(X,Y,Z),L1):M.E
(C$)......H(EX$(X,Y,Z),2).D$.A.M.2850...
H..Z...R.."..SORRY, HAVE NOT FOUND THIS
ENTRY":."...HINT:. RESEARCH BY LISTING A
LL ";.5...."EXPENSES":."FOR THIS MONTH (
ANALYSIS MENU - NO 2).C...."..ANY OTHER
DELETION";:.6000:.P6.1.2600.L....120..."
.."..HAVE FOUND THE FOLLOWING ENTRY:":."
..DATE: "D$" "MD$(Y)" "YR$.C.,.JS.10:.10
015.. 6..".TYPE: "ED$(X):.".AMOUNT: "C$:
."..DELETE";:.6000:.P6.2.120.L C.."..HAN
G-ON WHILE DELETING":A.X:B.Y:.10100:A.15
:B.Y:.10100:A.X:B.12.. |..10100:A.15:B.1
2:.10100:.Z.Z.14:.Z.14.EX$(X,Y,Z)."":.30
00.. ..EX$(X,Y,Z).EX$(X,Y,Z.1):.EX$(X,Y,
Z)."".3000.A ...Z.. ..C1%(X,Y).C1%(X,Y).
1:F2.1:.".OK !":.2800..!...9000:.P6.2.12
0.N!...".ENTER NAME OF FILE TO BE LOADED
":."MAX 16 CHARACTERS: ";:P3.16:.30000.C
!...5500:.P6.2.3085..!...".PLEASE PLACE
YOUR DATA DISK IN DRIVE 0":."..HIT ANY K
EY":.5000..!...".PLEASE HANG-ON":.2,8,2,
P$:.9500:.P6.1. 2:.120..!!..2,YR$:.2,C:.
C.10.3115.."%..X.10.C.1:.2,ED$(X):.X:.C.
15.C.14.'"+.Y.0.O"0..X.0.C:.2,C1%(X,Y):.
C1%(X,Y).0.3200.B"N..2,TT(X,Y):Z.0.W"B..
Z.C1%(X,Y).3200.."L..2,EX$(X,Y,Z):Z.Z.1:
.Z.16.3170.."...X.C"...2,TT(15,Y):Y.Y.1:
.Y..11.3120.."...X.0.C:.2,TT(X,12):.X:.2
,TT(15,12):.C.14.C.15..#.. 2: 15:F2.0:F3
.1:.120..#...F2.1.3307.O#...".DO YOU WIS
H TO SIGN-OFF";:.6000:.P6.2.120..#..."..
......OK, NOW SIGNING-OFF":.53280,14:.G(
9):.53272,21:..Y#...".YOU HAVE MADE SOME
ALTERATIONS":.".DO YOU WISH TO SAVE THE
M";:.6000..#...P6.2.3301.4$...".ENTER NA
ME OF FILE TO BE SAVED":."MAX 16 CHARACT
ERS: ";:P3.16:.30000.I$...5500:.P6.2.331
7..$..B$.P$:.".PLEASE PLACE YOUR DATA DI
SK IN DRIVE 0":."..HIT ANY KEY.":.5000.X
$...".PLEASE HANG-ON":.2,8,2,"@0:".B$.",
S,W":.9500:.P6.1. 2:.120..$...2,YR$:.2,C
:.C.10.3360..%...X.10.C.1:.2,ED$(X):.X:.
C.15.C.14.!% .Y.0.I%*..X.0.C:.2,C1%(X,Y)
:.C1%(X,Y).0.3450.\%H..2,TT(X,Y):Z.0.Q%\
..Z.C1%(X,Y).3450..%F..2,EX$(X,Y,Z):Z.Z.
1:.Z.16.3420..%Z..X:.2,TT(15,Y):Y.Y.1:.Y
..11.3370..%...X.0.C:.2,TT(X,12):.X:.2,T
T(15,12): 2: 15:.C.14.C.15.,&..."..DO YO
U WISH TO SAVE THEM AGAIN";:.6000:.P6.2.
3301.6&...3317.P&...".ENTER EXPENSE ANAL
YSIS TO BE PRINTED:.":F4.1:.1510..&...F5
.1.F5.0:.3630..&$..".DO YOU WISH TO PRIN
T";:.6000:.P6.2.120.F&+.."."SP$:.60000..
&..."..ANY OTHER";:.6000:.P6.2.F4.0:.120
..&L..3600..'...A$:.A$."".5000..'....Z'|
.P6.1:A.F(P$):.(A.65.A.90).P$."N".P$."V"
.P$."C".P$."S".P$."I".P6.2.`'....U'P.."
..Y../..N..?"..'Z..A$:.A$.."Y".A$.."N".6
010..'...A$."Y".P6.1:...'..P6.2:...'X..N
.0.4:.N.1".."ED$(N).12)N.6".."ED$(N.5).2
5)N.11".."ED$(N.10):.:.N..'B....((#.".AR
E YOU SURE";:.6000:..I(.%P6.0:.15,8,15:.
15,ER,ER$,TR,BL:.ER.20. ...(&%."..DISK E
RROR:. "ER" "ER$TR;BL:."..HIT ANY KEY FO
R MENU."..(0%.5000: 15:P6.1:...(.'N.E(C$
):N..B(N)..(.'C$.D(N)..(.'.N.C(C$).1..1:
.J(C$,N,1).".".10050..(8'.N:C$.C$.".00":
.10060..)B'.N.C(C$).1.C$.C$."0"./)L'C$.I
((SP$.C$),JS):..G)T'TT(A,B).TT(A,B).M:..
_)X'TT(A,B).TT(A,B).M:...).).GROCERIES,J
ANUARY,CLOTHES,FEBRUARY,MISCELL.,MARCH..
).). ASSETS,APRIL,RENT/MORT,MAY,TELEPHON
E,JUNE,ELECTRIC.,JULY,INSURANCE.+*.).AUG
UST,TRAVEL,SEPTEMBER,MOTOR CAR,OCTOBER,*
********,NOVEMBER,*********.X*"). DECEMB
ER,*********,*********,*********..*.:AM$
."312831303130313130313031":AL$."3129313
03130313130313031"..*.:P6.0..*.:PD.E(D$)
:.PD.1.PD.31.P6.1:PY.E(YR$):..(PY.4).PY.
4.AM$.AL$..+J:.PD.E(J(AM$,PM.2.1,2)).P6.
1..+T:..M+.>.".PLEASE ENTER YEAR : 19";:
P3.2:P4.1:.30000:YR$."19".P$:A.E(YR$).F+
.>.A.1970.A.1999.16000.L+.>...+0U.Q.1.P3
:.".";:.:.Q.1.P3:.".";:.:P$."":PX.0..+PU
.A$:.A$."".30160.O+ZUA.F(A$):.A.191.A.21
9.30200..,.U.(A.31.A..44.A..34.A..58.A..
59.A.97).A.13.A.20.A.157.30200..,.U.3016
0.),.U.A.13.30320.@,.V.A.157.P$."".30000
.P,.V.A.20.30250.A,.V.PX.P3.30160.S,.V.A
..157.30280..,.VPX.C(P$):.Q.1.PX:.".";:.
:.30000..,*V.P$."".30160.U,4VP$.H(P$,C(P
$).1):A$."...":PX.PX.1:.30300..,HV.C(P$)
.P3.30330..,RVP$.P$.A$:PX.C(P$)..-\V.A$;
:.30160.#-PV.C(P$).P4.30160.+-ZV.:..C-..
.Q.1.37:.".";:.:.:..S-`..53265,11:G1$.G(
17):.4,4:.4,G(15):.4:G1.984..-...G0.0.24
:G0$.G1$:G1.G1.40:.G2.G1.G1.39:G3.B(G2).
P-...G3.128.G3.G3.128:G4.1:G0$.G0$.G(18)
..-...(G3.0).(G3.32).G3.G3.64:.60100....
..(G3.31).(G3.64).60100.5....(G3.63).(G3
.96).G3.G3.128:.60100.[....(G3.95).(G3.1
28).G3.G3.64:.60100.M.D.G0$.G0$.G(G3)...
N..G4.1.G0$.G0$.G(146):G4.0...X..G2:.4,G
0$:.G0:.4:.4,G(145): 4:.53265,27:..H.H..
V2.0(D)...........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL