_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL