UITGAVEN MANAGER
FILE INFORMATION
FILENAME(S): UITGAVEN MANAGER
FILE TYPE(S): PRG
FILE SIZE: 9.7K
FIRST SEEN: 2025-11-02 16:30:31
APPEARS ON: 1 disk(s)
FILE HASH
8e639fe7ef0de274735f6b743eb439b69b89b5e04fbb46c172afbac45627cfc3
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GAMES D C | UITGAVEN MANAGER | PRG | Treasure Chest - OzzyC64 | 15 | 0 | 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 73 0E |).2.D$."0".D$.s.|
00000640: DA 02 99 22 91 22 A3 31 33 29 44 24 3A 99 22 11 |...".".13)D$:.".|
00000650: 50 41 49 44 20 42 59 20 20 20 20 3A 20 31 2E 43 |PAID BY : 1.C|
00000660: 48 45 51 55 45 22 A3 32 39 29 22 33 2E 20 C3 41 |HEQUE".29)"3. .A|
00000670: 53 48 22 00 A4 0E DC 02 99 22 20 20 20 20 20 20 |SH"......" |
00000680: 20 20 20 20 20 20 20 32 2E 20 C3 52 45 44 49 54 | 2. .REDIT|
00000690: 20 43 41 52 44 22 A3 32 39 29 22 34 2E 20 CF 54 | CARD".29)"4. .T|
000006A0: 48 45 52 22 00 D1 0E DF 02 99 22 20 20 20 20 20 |HER"......" |
000006B0: 20 20 20 20 20 20 20 20 12 11 D0 52 45 53 53 20 | ...RESS |
000006C0: 52 45 46 45 52 45 4E 43 45 20 4E 4F 20 92 20 22 |REFERENCE NO . "|
000006D0: 3B 00 F0 0E E0 02 8D 35 30 30 30 3A 4E B2 C5 28 |;......5000:N..(|
000006E0: 41 24 29 3A 8B 4E B3 31 B0 4E B1 34 A7 37 33 36 |A$):.N.1.N.4.736|
000006F0: 00 10 0F E4 02 50 42 24 B2 C4 28 4E 29 3A 91 4E |.....PB$..(N):.N|
00000700: 89 37 34 32 2C 37 34 34 2C 37 34 36 2C 37 34 38 |.742,744,746,748|
00000710: 00 25 0F E6 02 42 24 B2 22 C3 48 45 51 55 45 22 |.%...B$.".HEQUE"|
00000720: 3A 89 37 35 30 00 3F 0F E8 02 42 24 B2 22 C3 52 |:.750.?...B$.".R|
00000730: 45 44 49 54 20 43 41 52 44 22 3A 89 37 35 30 00 |EDIT CARD":.750.|
00000740: 52 0F EA 02 42 24 B2 22 C3 41 53 48 22 3A 89 37 |R...B$.".ASH":.7|
00000750: 35 30 00 66 0F EC 02 42 24 B2 22 CF 54 48 45 52 |50.f...B$.".THER|
00000760: 22 3A 89 37 35 30 00 99 0F EE 02 43 24 B2 22 91 |":.750.....C$.".|
00000770: 91 91 91 22 3A 99 43 24 3A 81 4E B2 31 A4 34 3A |...":.C$:.N.1.4:|
00000780: 99 A3 31 33 29 53 50 24 3A 82 3A 99 43 24 3A 99 |..13)SP$:.:.C$:.|
00000790: A3 31 33 29 22 91 22 42 24 00 C9 0F F8 02 99 22 |.13)"."B$......"|
000007A0: 11 11 C1 4D 4F 55 4E 54 20 50 41 49 44 3A 20 22 |...MOUNT PAID: "|
000007B0: 3B 3A 20 50 33 B2 39 3A 50 34 B2 31 3A 8D 33 30 |;: P3.9:P4.1:.30|
000007C0: 30 30 30 3A 43 24 B2 50 24 00 F1 0F FD 02 8B C5 |000:C$.P$.......|
000007D0: 28 43 24 29 B3 B2 30 B0 C5 28 43 24 29 B1 39 39 |(C$)..0..(C$).99|
000007E0: 39 39 39 39 A7 99 22 91 91 91 91 22 3A 89 37 36 |9999.."....":.76|
000007F0: 30 00 33 10 02 03 4A 53 B2 39 3A 8D 31 30 30 30 |0.3...JS.9:.1000|
00000800: 30 3A 99 22 91 22 3B A3 31 33 29 43 24 3A 99 22 |0:.".";.13)C$:."|
00000810: 11 11 11 11 C1 43 43 45 50 54 22 3B 3A 8D 36 30 |.....CCEPT";:.60|
00000820: 30 30 3A 8B 50 36 B2 32 A7 59 B2 59 AA 31 3A 89 |00:.P6.2.Y.Y.1:.|
00000830: 35 31 30 00 7A 10 3E 03 99 22 91 C8 41 4E 47 2D |510.z.>.."..ANG-|
00000840: 4F 4E 20 57 48 49 4C 45 20 50 4F 53 54 49 4E 47 |ON WHILE POSTING|
00000850: 22 3A 46 32 B2 31 3A 5A B2 43 31 25 28 58 2C 59 |":F2.1:Z.C1%(X,Y|
00000860: 29 3A 43 24 B2 C4 28 C5 28 43 24 29 29 3A 44 24 |):C$..(.(C$)):D$|
00000870: B2 44 24 AA 50 42 24 AA 43 24 00 A0 10 48 03 45 |.D$.PB$.C$...H.E|
00000880: 58 24 28 58 2C 59 2C 5A 29 B2 44 24 3A 43 31 25 |X$(X,Y,Z).D$:C1%|
00000890: 28 58 2C 59 29 B2 43 31 25 28 58 2C 59 29 AA 31 |(X,Y).C1%(X,Y).1|
000008A0: 00 AD 10 4A 03 8B 5A B2 30 A7 38 35 30 00 D8 10 |...J..Z.0.850...|
000008B0: 4B 03 8B C8 28 45 58 24 28 58 2C 59 2C 5A 29 2C |K...(EX$(X,Y,Z),|
000008C0: 32 29 B1 C8 28 45 58 24 28 58 2C 59 2C 5A AB 31 |2)..(EX$(X,Y,Z.1|
000008D0: 29 2C 32 29 A7 38 35 30 00 1D 11 4D 03 44 24 B2 |),2).850...M.D$.|
000008E0: 45 58 24 28 58 2C 59 2C 5A 29 3A 45 58 24 28 58 |EX$(X,Y,Z):EX$(X|
000008F0: 2C 59 2C 5A 29 B2 45 58 24 28 58 2C 59 2C 5A AB |,Y,Z).EX$(X,Y,Z.|
00000900: 31 29 3A 45 58 24 28 58 2C 59 2C 5A AB 31 29 B2 |1):EX$(X,Y,Z.1).|
00000910: 44 24 3A 5A B2 5A AB 31 3A 89 38 34 32 00 58 11 |D$:Z.Z.1:.842.X.|
00000920: 52 03 4D B2 C5 28 43 24 29 3A 41 B2 58 3A 42 B2 |R.M..(C$):A.X:B.|
00000930: 59 3A 8D 31 30 32 30 30 3A 41 B2 31 35 3A 42 B2 |Y:.10200:A.15:B.|
00000940: 59 3A 8D 31 30 32 30 30 3A 41 B2 58 3A 42 B2 31 |Y:.10200:A.X:B.1|
00000950: 32 3A 8D 31 30 32 30 30 00 7F 11 D2 03 41 B2 31 |2:.10200.....A.1|
00000960: 35 3A 42 B2 31 32 3A 8D 31 30 32 30 30 3A 8B 43 |5:B.12:.10200:.C|
00000970: 31 25 28 58 2C 59 29 B1 31 34 A7 31 30 33 30 00 |1%(X,Y).14.1030.|
00000980: C7 11 D4 03 99 22 11 CF 4B 2C 20 41 4E 59 20 4F |....."..K, ANY O|
00000990: 54 48 45 52 20 45 4E 54 52 59 20 46 4F 52 20 54 |THER ENTRY FOR T|
000009A0: 48 49 53 20 4D 4F 4E 54 48 22 3B 3A 8D 36 30 30 |HIS MONTH";:.600|
000009B0: 30 3A 8B 50 36 B2 31 A7 46 31 B2 31 3A 59 B2 59 |0:.P6.1.F1.1:Y.Y|
000009C0: AA 31 3A 89 35 31 30 00 F0 11 06 04 99 22 11 C1 |.1:.510......"..|
000009D0: 4E 59 20 4F 54 48 45 52 20 45 4E 54 52 59 22 3B |NY OTHER ENTRY";|
000009E0: 3A 8D 36 30 30 30 3A 8B 50 36 B2 31 A7 35 30 30 |:.6000:.P6.1.500|
000009F0: 00 F9 11 24 04 89 31 32 30 00 0C 12 D9 05 8B 59 |...$..120......Y|
00000A00: 52 24 B2 22 22 A7 8D 31 36 30 30 30 00 1B 12 DC |R$.""..16000....|
00000A10: 05 99 22 93 22 3B 3A 46 34 B2 30 00 62 12 E6 05 |..".";:F4.0.b...|
00000A20: 99 22 1D 1D 1D 1D 11 C1 4E 41 4C 59 53 49 53 20 |."......NALYSIS |
00000A30: 4F 46 20 45 58 50 45 4E 53 45 53 20 50 45 52 3A |OF EXPENSES PER:|
00000A40: 22 3A 99 22 1D 1D 1D 1D A3 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 22 00 91 12 FA 05 99 22 11 1D 1D 1D 1D 12 20 |."......"...... |
00000A70: 31 20 92 20 CD 4F 4E 54 48 20 2F 20 D3 50 45 43 |1 . .ONTH / .PEC|
00000A80: 54 52 55 4D 20 4F 46 20 45 58 50 45 4E 53 45 53 |TRUM OF EXPENSES|
00000A90: 22 00 BB 12 04 06 99 22 11 11 1D 1D 1D 1D 12 20 |"......"....... |
00000AA0: 32 20 92 20 CD 4F 4E 54 48 20 2F 20 D3 49 4E 47 |2 . .ONTH / .ING|
00000AB0: 4C 45 20 45 58 50 45 4E 53 45 22 00 E3 12 0E 06 |LE EXPENSE".....|
00000AC0: 99 22 11 11 1D 1D 1D 1D 12 20 33 20 92 20 C5 58 |."....... 3 . .X|
00000AD0: 50 45 4E 53 45 20 2F 20 D7 48 4F 4C 45 20 59 45 |PENSE / .HOLE YE|
00000AE0: 41 52 22 00 07 13 18 06 99 22 11 11 1D 1D 1D 1D |AR"......"......|
00000AF0: 12 20 34 20 92 20 C2 41 43 4B 20 54 4F 20 4D 41 |. 4 . .ACK TO MA|
00000B00: 49 4E 20 4D 45 4E 55 00 31 13 22 06 99 22 11 11 |IN MENU.1.".."..|
00000B10: 11 1D 1D 1D 1D 12 D0 52 45 53 53 20 43 4F 52 52 |.......RESS CORR|
00000B20: 45 53 50 4F 4E 44 49 4E 47 20 4E 55 4D 42 45 52 |ESPONDING NUMBER|
00000B30: 22 00 5C 13 36 06 8D 35 30 30 30 3A 91 C5 28 41 |".\.6..5000:..(A|
00000B40: 24 29 89 31 36 31 30 2C 31 39 30 30 2C 32 33 30 |$).1610,1900,230|
00000B50: 30 2C 31 36 30 32 3A 89 31 35 39 30 00 6C 13 42 |0,1602:.1590.l.B|
00000B60: 06 8B 46 34 B3 B1 30 A7 46 34 B2 30 00 75 13 44 |..F4..0.F4.0.u.D|
00000B70: 06 89 31 32 30 00 B9 13 4A 06 99 22 93 C5 4E 54 |..120...J.."..NT|
00000B80: 45 52 20 4D 4F 4E 54 48 20 52 45 51 55 49 52 45 |ER MONTH REQUIRE|
00000B90: 44 20 12 C9 4E 20 46 49 47 55 52 45 53 92 3A 20 |D ..N FIGURES.: |
00000BA0: 22 3B 3A 50 33 B2 32 3A 50 34 B2 31 3A 8D 33 30 |";:P3.2:P4.1:.30|
00000BB0: 30 30 30 3A 41 24 B2 50 24 00 D4 13 54 06 59 B2 |000:A$.P$...T.Y.|
00000BC0: C5 28 41 24 29 3A 8B 59 B3 31 B0 59 B1 31 32 A7 |.(A$):.Y.1.Y.12.|
00000BD0: 31 36 31 30 00 1F 14 5E 06 59 B2 59 AB 31 3A 99 |1610...^.Y.Y.1:.|
00000BE0: 22 93 C5 58 50 45 4E 53 45 53 20 46 4F 52 20 22 |"..XPENSES FOR "|
00000BF0: 4D 44 24 28 59 29 22 20 22 59 52 24 22 20 3A 22 |MD$(Y)" "YR$" :"|
00000C00: 3A 4C 31 B2 C3 28 4D 44 24 28 59 29 29 3A 81 4E |:L1..(MD$(Y)):.N|
00000C10: B2 31 A4 32 36 3A 99 22 A3 22 3B 3A 82 3A 99 00 |.1.26:.".";:.:..|
00000C20: 58 14 63 06 8B 54 54 28 31 35 2C 59 29 B2 30 A7 |X.c..TT(15,Y).0.|
00000C30: 99 22 11 11 CE 4F 20 45 4E 54 52 59 20 49 4E 20 |."...O ENTRY IN |
00000C40: 22 4D 44 24 28 59 29 22 20 22 59 52 24 3A 46 35 |"MD$(Y)" "YR$:F5|
00000C50: B2 31 3A 89 31 37 37 35 00 90 14 68 06 99 22 11 |.1:.1775...h..".|
00000C60: C5 58 50 45 4E 53 45 53 3A 22 2C A6 31 30 AB 4C |.XPENSES:",.10.L|
00000C70: 31 29 3B 4D 44 24 28 59 29 A3 32 33 29 22 25 22 |1);MD$(Y).23)"%"|
00000C80: A3 32 39 29 22 D9 45 41 52 20 D4 4F 54 41 4C 22 |.29)".EAR .OTAL"|
00000C90: 00 C5 14 72 06 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D |...r.."---------|
00000CA0: 22 2C 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 1D 2D 2D |"," ---------.--|
00000CB0: 2D 2D 2D 2D 22 A3 32 39 29 22 2D 2D 2D 2D 2D 2D |----".29)"------|
00000CC0: 2D 2D 2D 2D 22 00 DD 14 86 06 81 58 B2 30 A4 31 |----"......X.0.1|
00000CD0: 34 3A 8B 58 B1 B2 43 A7 89 31 37 33 30 00 29 15 |4:.X..C..1730.).|
00000CE0: 90 06 50 B2 28 54 54 28 58 2C 59 29 AD 54 54 28 |..P.(TT(X,Y).TT(|
00000CF0: 31 35 2C 59 29 29 AC 31 30 30 3A 50 B2 B5 28 50 |15,Y)).100:P..(P|
00000D00: AC 31 30 30 AA 2E 35 29 AD 31 30 30 3A 4E B2 54 |.100..5).100:N.T|
00000D10: 54 28 58 2C 59 29 3A 4A 53 B2 31 30 3A 8D 31 30 |T(X,Y):JS.10:.10|
00000D20: 30 31 30 3A 41 24 B2 43 24 00 5B 15 9F 06 4E B2 |010:A$.C$.[...N.|
00000D30: 54 54 28 58 2C 31 32 29 3A 8D 31 30 30 31 30 3A |TT(X,12):.10010:|
00000D40: 42 24 B2 43 24 3A 4E B2 50 3A 4A 53 B2 37 3A 8D |B$.C$:N.P:JS.7:.|
00000D50: 31 30 30 31 30 3A 44 24 B2 43 24 00 79 15 AE 06 |10010:D$.C$.y...|
00000D60: 99 45 44 24 28 58 29 2C 41 24 A3 32 30 29 44 24 |.ED$(X),A$.20)D$|
00000D70: A3 32 38 29 42 24 3A 82 58 00 BF 15 C2 06 99 22 |.28)B$:.X......"|
00000D80: 11 22 2C 22 1D 2D 2D 2D 2D 2D 2D 2D 2D 2D 1D 2D |.",".---------.-|
00000D90: 2D 2D 2D 2D 2D 1D 1D 2D 2D 2D 2D 2D 2D 2D 2D 2D |-----..---------|
00000DA0: 22 3A 4E B2 54 54 28 31 35 2C 59 29 3A 4A 53 B2 |":N.TT(15,Y):JS.|
00000DB0: 31 30 3A 8D 31 30 30 31 30 3A 41 24 B2 43 24 00 |10:.10010:A$.C$.|
00000DC0: 00 16 D6 06 4E B2 54 54 28 31 35 2C 31 32 29 3A |....N.TT(15,12):|
00000DD0: 8D 31 30 30 31 30 3A 42 24 B2 43 24 3A 44 24 B2 |.10010:B$.C$:D$.|
00000DE0: 22 31 30 30 2E 30 30 22 3A 99 22 54 4F 54 41 4C |"100.00":."TOTAL|
00000DF0: 22 2C 41 24 A3 32 31 29 44 24 A3 32 38 29 42 24 |",A$.21)D$.28)B$|
00000E00: 00 25 16 EA 06 99 2C 22 1D 3D 3D 3D 3D 3D 3D 3D |.%....,".=======|
00000E10: 3D 3D 1D 3D 3D 3D 3D 3D 3D 1D 1D 3D 3D 3D 3D 3D |==.======..=====|
00000E20: 3D 3D 3D 3D 22 00 32 16 EF 06 8B 46 34 B3 B1 30 |====".2....F4..0|
00000E30: A7 8E 00 5D 16 F4 06 99 22 11 11 C1 4E 59 20 4F |...]...."...NY O|
00000E40: 54 48 45 52 20 4D 4F 4E 54 48 22 3B 3A 8D 36 30 |THER MONTH";:.60|
00000E50: 30 30 3A 8B 50 36 B2 31 A7 31 36 31 30 00 69 16 |00:.P6.1.1610.i.|
00000E60: 17 07 8B 46 34 B2 31 A7 8E 00 73 16 1C 07 89 31 |...F4.1...s....1|
00000E70: 35 30 30 00 B7 16 6C 07 99 22 93 C5 4E 54 45 52 |500...l.."..NTER|
00000E80: 20 4D 4F 4E 54 48 20 52 45 51 55 49 52 45 44 20 | MONTH REQUIRED |
00000E90: 12 49 4E 20 46 49 47 55 52 45 53 92 3A 20 22 3B |.IN FIGURES.: ";|
00000EA0: 3A 50 33 B2 32 3A 50 34 B2 31 3A 8D 33 30 30 30 |:P3.2:P4.1:.3000|
00000EB0: 30 3A 41 24 B2 50 24 00 D2 16 76 07 59 B2 C5 28 |0:A$.P$...v.Y..(|
00000EC0: 41 24 29 3A 8B 59 B3 31 B0 59 B1 31 32 A7 31 39 |A$):.Y.1.Y.12.19|
00000ED0: 30 30 00 0B 17 8A 07 99 22 11 11 C5 4E 54 45 52 |00......"...NTER|
00000EE0: 20 D2 45 46 20 CE 4F 20 4F 46 20 45 58 50 45 4E | .EF .O OF EXPEN|
00000EF0: 53 45 20 54 4F 20 42 45 20 41 4E 41 4C 59 53 45 |SE TO BE ANALYSE|
00000F00: 44 3A 11 11 22 3A 8D 37 30 30 30 00 28 17 B2 07 |D:..":.7000.(...|
00000F10: 99 22 11 11 C5 4E 54 45 52 20 4E 4F 57 3A 20 22 |."...NTER NOW: "|
00000F20: 3B 3A 8D 33 30 30 30 30 00 4B 17 BC 07 58 B2 C5 |;:.30000.K...X..|
00000F30: 28 50 24 29 3A 8B 58 B3 31 B0 58 B1 43 A7 99 22 |(P$):.X.1.X.C.."|
00000F40: 91 91 91 91 22 3A 89 31 39 37 30 00 5B 17 C6 07 |....":.1970.[...|
00000F50: 58 B2 58 AB 31 3A 59 B2 59 AB 31 00 A4 17 D0 07 |X.X.1:Y.Y.1.....|
00000F60: 8B 45 58 24 28 58 2C 59 2C 30 29 B2 22 22 A7 99 |.EX$(X,Y,0).""..|
00000F70: 22 93 D3 4F 52 52 59 2C 4E 4F 20 12 22 45 44 24 |"..ORRY,NO ."ED$|
00000F80: 28 58 29 22 92 20 45 58 50 45 4E 53 45 53 20 49 |(X)". EXPENSES I|
00000F90: 4E 20 22 4D 44 24 28 59 29 3A 46 35 B2 31 3A 89 |N "MD$(Y):F5.1:.|
00000FA0: 32 31 38 35 00 E4 17 DA 07 99 22 93 22 45 44 24 |2185......"."ED$|
00000FB0: 28 58 29 22 20 45 58 50 45 4E 53 45 53 20 49 4E |(X)" EXPENSES IN|
00000FC0: 20 22 4D 44 24 28 59 29 22 20 22 59 52 24 22 20 | "MD$(Y)" "YR$" |
00000FD0: 3A 22 3A 81 4E B2 31 A4 33 36 3A 99 22 A3 22 3B |:":.N.1.36:.".";|
00000FE0: 3A 82 3A 99 00 2B 18 E4 07 99 22 11 11 C4 41 59 |:.:..+...."...AY|
00000FF0: 22 A3 35 29 22 50 41 49 44 20 42 59 22 2C 22 1D |".5)"PAID BY",".|
00001000: 1D 1D 1D 41 4D 4F 55 4E 54 22 3A 99 22 A3 A3 A3 |...AMOUNT":."...|
00001010: 22 A3 35 29 22 A3 A3 A3 A3 A3 A3 A3 22 2C 22 1D |".5)".......",".|
00001020: 1D 1D A3 A3 A3 A3 A3 A3 A3 11 22 00 4B 18 02 08 |..........".K...|
00001030: 81 5A B2 30 A4 31 34 3A 8B 45 58 24 28 58 2C 59 |.Z.0.14:.EX$(X,Y|
00001040: 2C 5A 29 B2 22 22 A7 32 31 35 30 00 8B 18 0C 08 |,Z)."".2150.....|
00001050: 99 C8 28 45 58 24 28 58 2C 59 2C 5A 29 2C 32 29 |..(EX$(X,Y,Z),2)|
00001060: 3B 3A 91 C5 28 CA 28 45 58 24 28 58 2C 59 2C 5A |;:..(.(EX$(X,Y,Z|
00001070: 29 2C 33 2C 32 29 29 89 32 30 39 30 2C 32 31 30 |),3,2)).2090,210|
00001080: 30 2C 32 31 31 30 2C 32 31 31 35 00 A3 18 2A 08 |0,2110,2115...*.|
00001090: 99 A3 35 29 22 C3 48 45 51 55 45 22 2C 3A 89 32 |..5)".HEQUE",:.2|
000010A0: 31 32 30 00 C0 18 34 08 99 A3 35 29 22 C3 52 45 |120...4...5)".RE|
000010B0: 44 49 54 20 43 41 52 44 22 2C 3A 89 32 31 32 30 |DIT CARD",:.2120|
000010C0: 00 D8 18 3E 08 99 A3 35 29 22 C3 41 53 48 20 20 |...>...5)".ASH |
000010D0: 22 2C 3A 89 32 31 32 30 00 EF 18 43 08 99 A3 35 |",:.2120...C...5|
000010E0: 29 22 CF 54 48 45 52 22 2C 3A 89 32 31 32 30 00 |)".THER",:.2120.|
000010F0: 28 19 48 08 43 24 B2 C9 28 45 58 24 28 58 2C 59 |(.H.C$..(EX$(X,Y|
00001100: 2C 5A 29 2C C3 28 45 58 24 28 58 2C 59 2C 5A 29 |,Z),.(EX$(X,Y,Z)|
00001110: 29 AB 34 29 3A 4A 53 B2 31 30 3A 8D 31 30 30 31 |).4):JS.10:.1001|
00001120: 35 3A 99 43 24 3A 82 5A 00 6D 19 66 08 99 22 11 |5:.C$:.Z.m.f..".|
00001130: 22 2C 2C 22 1D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A |",,".---------":|
00001140: 4E B2 54 54 28 58 2C 59 29 3A 8D 31 30 30 31 30 |N.TT(X,Y):.10010|
00001150: 3A 99 22 54 4F 54 41 4C 22 2C 2C 43 24 3A 99 2C |:."TOTAL",,C$:.,|
00001160: 2C 22 1D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 7A 19 |,".=========".z.|
00001170: 89 08 8B 46 34 B3 B1 30 A7 8E 00 A8 19 8E 08 99 |...F4..0........|
00001180: 22 11 11 C1 4E 59 20 4F 54 48 45 52 20 41 4E 41 |"...NY OTHER ANA|
00001190: 4C 59 53 49 53 22 3B 3A 8D 36 30 30 30 3A 8B 50 |LYSIS";:.6000:.P|
000011A0: 36 B2 31 A7 31 39 30 30 00 B2 19 B6 08 89 31 35 |6.1.1900......15|
000011B0: 30 30 00 EA 19 FC 08 99 22 93 C5 4E 54 45 52 20 |00......"..NTER |
000011C0: 52 45 46 20 4E 4F 20 4F 46 20 45 58 50 45 4E 53 |REF NO OF EXPENS|
000011D0: 45 20 54 4F 20 42 45 20 41 4E 41 4C 59 53 45 44 |E TO BE ANALYSED|
000011E0: 3A 11 11 22 3A 8D 37 30 30 30 00 2B 1A 2E 09 99 |:..":.7000.+....|
000011F0: 22 11 11 C5 4E 54 45 52 20 4E 4F 57 3A 20 22 3B |"...NTER NOW: ";|
00001200: 3A 50 33 B2 32 3A 8D 33 30 30 30 30 3A 58 B2 C5 |:P3.2:.30000:X..|
00001210: 28 50 24 29 3A 8B 58 B3 31 B0 58 B1 43 A7 99 22 |(P$):.X.1.X.C.."|
00001220: 91 91 91 91 22 3A 89 32 33 35 30 00 75 1A 47 09 |....":.2350.u.G.|
00001230: 58 B2 58 AB 31 3A 8B 54 54 28 58 2C 31 32 29 B2 |X.X.1:.TT(X,12).|
00001240: 30 A7 99 22 93 D3 4F 52 52 59 2C 4E 4F 20 45 4E |0.."..ORRY,NO EN|
00001250: 54 52 59 20 46 4F 52 20 12 22 45 44 24 28 58 29 |TRY FOR ."ED$(X)|
00001260: 22 92 20 49 4E 20 22 59 52 24 3A 46 35 B2 31 3A |". IN "YR$:F5.1:|
00001270: 89 32 35 32 30 00 B6 1A 4C 09 99 22 93 C2 52 45 |.2520...L.."..RE|
00001280: 41 4B 44 4F 57 4E 20 4F 46 20 22 45 44 24 28 58 |AKDOWN OF "ED$(X|
00001290: 29 22 20 45 58 50 45 4E 53 45 53 20 49 4E 20 22 |)" EXPENSES IN "|
000012A0: 59 52 24 3A 81 4E B2 31 A4 33 39 3A 99 22 A3 22 |YR$:.N.1.39:."."|
000012B0: 3B 3A 82 4E 3A 99 00 F8 1A 60 09 99 22 11 CD 4F |;:.N:....`.."..O|
000012C0: 4E 54 48 3A 22 2C 22 1D 1D 1D 1D C1 4D 4F 55 4E |NTH:",".....MOUN|
000012D0: 54 1D 1D 1D 1D 1D 1D 25 22 3A 99 22 A3 A3 A3 A3 |T......%":."....|
000012E0: A3 A3 22 2C 22 1D 1D 1D 1D A3 A3 A3 A3 A3 A3 1D |..","...........|
000012F0: 1D 1D 1D 1D A3 A3 A3 22 00 2D 1B 7E 09 81 59 B2 |.......".-.~..Y.|
00001300: 30 A4 31 31 3A 50 B2 54 54 28 58 2C 59 29 AD 54 |0.11:P.TT(X,Y).T|
00001310: 54 28 58 2C 31 32 29 AC 31 30 30 3A 50 B2 B5 28 |T(X,12).100:P..(|
00001320: 50 AC 31 30 30 AA 2E 35 29 AD 31 30 30 00 4E 1B |P.100..5).100.N.|
00001330: 92 09 4E B2 54 54 28 58 2C 59 29 3A 4A 53 B2 31 |..N.TT(X,Y):JS.1|
00001340: 30 3A 8D 31 30 30 31 30 3A 41 24 B2 43 24 00 94 |0:.10010:A$.C$..|
00001350: 1B 97 09 4E B2 50 3A 4A 53 B2 37 3A 8D 31 30 30 |...N.P:JS.7:.100|
00001360: 31 30 3A 42 24 B2 43 24 3A 99 4D 44 24 28 59 29 |10:B$.C$:.MD$(Y)|
00001370: 2C 41 24 A3 32 32 29 42 24 3A 82 59 3A 99 2C 22 |,A$.22)B$:.Y:.,"|
00001380: 1D 2D 2D 2D 2D 2D 2D 2D 2D 2D 1D 1D 1D 2D 2D 2D |.---------...---|
00001390: 2D 2D 2D 22 00 D4 1B BA 09 42 24 B2 22 31 30 30 |---".....B$."100|
000013A0: 2E 30 30 22 3A 4E B2 54 54 28 58 2C 31 32 29 3A |.00":N.TT(X,12):|
000013B0: 4A 53 B2 31 30 3A 8D 31 30 30 31 30 3A 41 24 B2 |JS.10:.10010:A$.|
000013C0: 43 24 3A 99 22 D4 4F 54 41 4C 22 2C 41 24 A3 32 |C$:.".OTAL",A$.2|
000013D0: 33 29 42 24 00 F9 1B CE 09 99 2C 22 1D 3D 3D 3D |3)B$......,".===|
000013E0: 3D 3D 3D 3D 3D 3D 1D 1D 1D 3D 3D 3D 3D 3D 3D 22 |======...======"|
000013F0: 3A 8B 46 34 B3 B1 30 A7 8E 00 26 1C D8 09 99 22 |:.F4..0...&...."|
00001400: 11 11 C1 4E 59 20 4F 54 48 45 52 20 45 58 50 45 |...NY OTHER EXPE|
00001410: 4E 53 45 22 3B 3A 8D 36 30 30 30 3A 8B 50 36 B2 |NSE";:.6000:.P6.|
00001420: 31 A7 32 33 30 30 00 30 1C 00 0A 89 31 35 30 30 |1.2300.0....1500|
00001430: 00 44 1C 25 0A 8D 39 30 30 30 3A 8B 50 36 B2 32 |.D.%..9000:.P6.2|
00001440: A7 31 32 30 00 57 1C 26 0A 8B 59 52 24 B2 22 22 |.120.W.&..YR$.""|
00001450: A7 8D 31 36 30 30 30 00 A6 1C 28 0A 99 22 93 C5 |..16000...(.."..|
00001460: 4E 54 45 52 20 12 4D 4F 4E 54 48 92 20 49 4E 20 |NTER .MONTH. IN |
00001470: 57 48 49 43 48 20 44 45 4C 45 54 49 4F 4E 22 3A |WHICH DELETION":|
00001480: 99 22 52 45 51 55 49 52 45 44 20 12 C9 4E 20 46 |."REQUIRED ..N F|
00001490: 49 47 55 52 45 53 92 20 22 3B 3A 50 33 B2 32 3A |IGURES. ";:P3.2:|
000014A0: 8D 33 30 30 30 30 00 C6 1C 3C 0A 59 B2 C5 28 50 |.30000...<.Y..(P|
000014B0: 24 29 3A 50 4D B2 59 3A 8B 59 B3 31 B0 59 B1 31 |$):PM.Y:.Y.1.Y.1|
000014C0: 32 A7 32 36 30 30 00 CF 1C 3E 0A 50 36 B2 31 00 |2.2600...>.P6.1.|
000014D0: 14 1D 41 0A 99 22 11 12 C4 41 59 92 20 12 C9 4E |..A.."...AY. ..N|
000014E0: 20 46 49 47 55 52 45 53 92 3A 20 22 3B 3A 8D 33 | FIGURES.: ";:.3|
000014F0: 30 30 30 30 3A 44 24 B2 50 24 3A 8D 31 35 30 30 |0000:D$.P$:.1500|
00001500: 30 3A 8B 50 36 B2 31 A7 99 22 91 91 91 22 3A 89 |0:.P6.1.."...":.|
00001510: 32 36 32 35 00 2B 1D 4B 0A 8B C3 28 44 24 29 B3 |2625.+.K...(D$).|
00001520: 32 A7 44 24 B2 22 30 22 AA 44 24 00 7A 1D 50 0A |2.D$."0".D$.z.P.|
00001530: 99 22 11 C5 4E 54 45 52 20 12 D4 59 50 45 92 20 |."..NTER ..YPE. |
00001540: 4F 46 20 45 58 50 45 4E 53 45 20 54 4F 20 57 48 |OF EXPENSE TO WH|
00001550: 49 43 48 22 3A 99 22 49 54 20 57 41 53 20 50 4F |ICH":."IT WAS PO|
00001560: 53 54 45 44 20 12 C9 4E 20 46 49 47 55 52 45 53 |STED ..N FIGURES|
00001570: 92 11 11 22 3A 8D 37 30 30 30 00 97 1D 8C 0A 99 |...":.7000......|
00001580: 22 11 11 C5 4E 54 45 52 20 4E 4F 57 3A 20 22 3B |"...NTER NOW: ";|
00001590: 3A 8D 33 30 30 30 30 00 BA 1D 96 0A 58 B2 C5 28 |:.30000.....X..(|
000015A0: 50 24 29 3A 8B 58 B3 31 B0 58 B1 43 A7 99 22 91 |P$):.X.1.X.C..".|
000015B0: 91 91 91 22 3A 89 32 37 30 30 00 CA 1D A0 0A 58 |...":.2700.....X|
000015C0: B2 58 AB 31 3A 59 B2 59 AB 31 00 14 1E A5 0A 99 |.X.1:Y.Y.1......|
000015D0: 22 11 C5 4E 54 45 52 20 12 C1 4D 4F 55 4E 54 92 |"..NTER ..MOUNT.|
000015E0: 3A 20 22 3B 3A 50 33 B2 39 3A 8D 33 30 30 30 30 |: ";:P3.9:.30000|
000015F0: 3A 41 B2 C5 28 50 24 29 3A 8B 41 B3 B2 30 B0 41 |:A..(P$):.A..0.A|
00001600: B1 39 39 39 39 39 39 A7 99 22 91 91 91 22 3A 89 |.999999.."...":.|
00001610: 32 37 32 35 00 50 1E B7 0A 99 22 93 C8 41 4E 47 |2725.P...."..ANG|
00001620: 2D 4F 4E 20 57 48 49 4C 45 20 53 45 41 52 43 48 |-ON WHILE SEARCH|
00001630: 49 4E 47 22 3A 81 5A B2 30 A4 31 34 3A 8B 45 58 |ING":.Z.0.14:.EX|
00001640: 24 28 58 2C 59 2C 5A 29 B2 22 22 A7 32 37 37 30 |$(X,Y,Z)."".2770|
00001650: 00 83 1E B9 0A 4C 31 B2 C3 28 45 58 24 28 58 2C |.....L1..(EX$(X,|
00001660: 59 2C 5A 29 29 AB 34 3A 43 24 B2 C9 28 45 58 24 |Y,Z)).4:C$..(EX$|
00001670: 28 58 2C 59 2C 5A 29 2C 4C 31 29 3A 4D B2 C5 28 |(X,Y,Z),L1):M..(|
00001680: 43 24 29 00 A4 1E BE 0A 8B C8 28 45 58 24 28 58 |C$).......(EX$(X|
00001690: 2C 59 2C 5A 29 2C 32 29 B2 44 24 AF 41 B2 4D A7 |,Y,Z),2).D$.A.M.|
000016A0: 32 38 35 30 00 AB 1E C8 0A 82 5A 00 FC 1E D2 0A |2850......Z.....|
000016B0: 99 22 11 11 D3 4F 52 52 59 2C 20 48 41 56 45 20 |."...ORRY, HAVE |
000016C0: 4E 4F 54 20 46 4F 55 4E 44 20 54 48 49 53 20 45 |NOT FOUND THIS E|
000016D0: 4E 54 52 59 22 3A 99 22 11 11 12 C8 49 4E 54 3A |NTRY":."....INT:|
000016E0: 92 20 D2 45 53 45 41 52 43 48 20 42 59 20 4C 49 |. .ESEARCH BY LI|
000016F0: 53 54 49 4E 47 20 41 4C 4C 20 22 3B 00 34 1F E6 |STING ALL ";.4..|
00001700: 0A 99 22 45 58 50 45 4E 53 45 53 22 3A 99 22 46 |.."EXPENSES":."F|
00001710: 4F 52 20 54 48 49 53 20 4D 4F 4E 54 48 20 28 C1 |OR THIS MONTH (.|
00001720: 4E 41 4C 59 53 49 53 20 CD 45 4E 55 20 2D 20 CE |NALYSIS .ENU - .|
00001730: 4F 20 32 29 00 62 1F F0 0A 99 22 11 11 C1 4E 59 |O 2).b...."...NY|
00001740: 20 4F 54 48 45 52 20 44 45 4C 45 54 49 4F 4E 22 | OTHER DELETION"|
00001750: 3B 3A 8D 36 30 30 30 3A 8B 50 36 B2 31 A7 32 36 |;:.6000:.P6.1.26|
00001760: 30 30 00 6B 1F 18 0B 89 31 32 30 00 B1 1F 22 0B |00.k....120...".|
00001770: 99 22 11 11 C8 41 56 45 20 46 4F 55 4E 44 20 54 |."...AVE FOUND T|
00001780: 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 20 45 4E 54 |HE FOLLOWING ENT|
00001790: 52 59 3A 22 3A 99 22 11 11 C4 41 54 45 3A 20 22 |RY:":."...ATE: "|
000017A0: 44 24 22 20 22 4D 44 24 28 59 29 22 20 22 59 52 |D$" "MD$(Y)" "YR|
000017B0: 24 00 C2 1F 2C 0B 4A 53 B2 31 30 3A 8D 31 30 30 |$...,.JS.10:.100|
000017C0: 31 35 00 03 20 36 0B 99 22 11 D4 59 50 45 3A 20 |15.. 6.."..YPE: |
000017D0: 22 45 44 24 28 58 29 3A 99 22 11 C1 4D 4F 55 4E |"ED$(X):."..MOUN|
000017E0: 54 3A 20 22 43 24 3A 99 22 11 11 C4 45 4C 45 54 |T: "C$:."...ELET|
000017F0: 45 22 3B 3A 8D 36 30 30 30 3A 8B 50 36 B2 32 A7 |E";:.6000:.P6.2.|
00001800: 31 32 30 00 4B 20 63 0B 99 22 11 11 C8 41 4E 47 |120.K c.."...ANG|
00001810: 2D 4F 4E 20 57 48 49 4C 45 20 44 45 4C 45 54 49 |-ON WHILE DELETI|
00001820: 4E 47 22 3A 41 B2 58 3A 42 B2 59 3A 8D 31 30 31 |NG":A.X:B.Y:.101|
00001830: 30 30 3A 41 B2 31 35 3A 42 B2 59 3A 8D 31 30 31 |00:A.15:B.Y:.101|
00001840: 30 30 3A 41 B2 58 3A 42 B2 31 32 00 89 20 7C 0B |00:A.X:B.12.. |.|
00001850: 8D 31 30 31 30 30 3A 41 B2 31 35 3A 42 B2 31 32 |.10100:A.15:B.12|
00001860: 3A 8D 31 30 31 30 30 3A 81 5A B2 5A A4 31 34 3A |:.10100:.Z.Z.14:|
00001870: 8B 5A B2 31 34 A7 45 58 24 28 58 2C 59 2C 5A 29 |.Z.14.EX$(X,Y,Z)|
00001880: B2 22 22 3A 89 33 30 30 30 00 B9 20 9A 0B 45 58 |."":.3000.. ..EX|
00001890: 24 28 58 2C 59 2C 5A 29 B2 45 58 24 28 58 2C 59 |$(X,Y,Z).EX$(X,Y|
000018A0: 2C 5A AA 31 29 3A 8B 45 58 24 28 58 2C 59 2C 5A |,Z.1):.EX$(X,Y,Z|
000018B0: 29 B2 22 22 A7 33 30 30 30 00 C0 20 B3 0B 82 5A |)."".3000.. ...Z|
000018C0: 00 EC 20 B8 0B 43 31 25 28 58 2C 59 29 B2 43 31 |.. ..C1%(X,Y).C1|
000018D0: 25 28 58 2C 59 29 AB 31 3A 46 32 B2 31 3A 99 22 |%(X,Y).1:F2.1:."|
000018E0: 11 CF 4B 20 21 22 3A 89 32 38 30 30 00 00 21 08 |..K !":.2800..!.|
000018F0: 0C 8D 39 30 30 30 3A 8B 50 36 B2 32 A7 31 32 30 |..9000:.P6.2.120|
00001900: 00 4D 21 0D 0C 99 22 93 C5 4E 54 45 52 20 4E 41 |.M!..."..NTER NA|
00001910: 4D 45 20 4F 46 20 46 49 4C 45 20 54 4F 20 42 45 |ME OF FILE TO BE|
00001920: 20 4C 4F 41 44 45 44 22 3A 99 22 CD 41 58 20 31 | LOADED":.".AX 1|
00001930: 36 20 43 48 41 52 41 43 54 45 52 53 3A 20 22 3B |6 CHARACTERS: ";|
00001940: 3A 50 33 B2 31 36 3A 8D 33 30 30 30 30 00 62 21 |:P3.16:.30000.b!|
00001950: 0F 0C 8D 35 35 30 30 3A 8B 50 36 B2 32 A7 33 30 |...5500:.P6.2.30|
00001960: 38 35 00 A8 21 12 0C 99 22 11 D0 4C 45 41 53 45 |85..!..."..LEASE|
00001970: 20 50 4C 41 43 45 20 59 4F 55 52 20 44 41 54 41 | PLACE YOUR DATA|
00001980: 20 44 49 53 4B 20 49 4E 20 44 52 49 56 45 20 30 | DISK IN DRIVE 0|
00001990: 22 3A 99 22 11 12 C8 49 54 20 41 4E 59 20 4B 45 |":."...IT ANY KE|
000019A0: 59 22 3A 8D 35 30 30 30 00 DD 21 1C 0C 99 22 11 |Y":.5000..!...".|
000019B0: D0 4C 45 41 53 45 20 48 41 4E 47 2D 4F 4E 22 3A |.LEASE HANG-ON":|
000019C0: 9F 32 2C 38 2C 32 2C 50 24 3A 8D 39 35 30 30 3A |.2,8,2,P$:.9500:|
000019D0: 8B 50 36 B2 31 A7 A0 32 3A 89 31 32 30 00 F8 21 |.P6.1..2:.120..!|
000019E0: 21 0C 84 32 2C 59 52 24 3A 84 32 2C 43 3A 8B 43 |!..2,YR$:.2,C:.C|
000019F0: B2 31 30 A7 33 31 31 35 00 1E 22 25 0C 81 58 B2 |.10.3115.."%..X.|
00001A00: 31 30 A4 43 AB 31 3A 84 32 2C 45 44 24 28 58 29 |10.C.1:.2,ED$(X)|
00001A10: 3A 82 58 3A 8B 43 B2 31 35 A7 43 B2 31 34 00 26 |:.X:.C.15.C.14.&|
00001A20: 22 2B 0C 59 B2 30 00 4E 22 30 0C 81 58 B2 30 A4 |"+.Y.0.N"0..X.0.|
00001A30: 43 3A 84 32 2C 43 31 25 28 58 2C 59 29 3A 8B 43 |C:.2,C1%(X,Y):.C|
00001A40: 31 25 28 58 2C 59 29 B2 30 A7 33 32 30 30 00 61 |1%(X,Y).0.3200.a|
00001A50: 22 4E 0C 84 32 2C 54 54 28 58 2C 59 29 3A 5A B2 |"N..2,TT(X,Y):Z.|
00001A60: 30 00 76 22 62 0C 8B 5A B2 43 31 25 28 58 2C 59 |0.v"b..Z.C1%(X,Y|
00001A70: 29 A7 33 32 30 30 00 99 22 6C 0C 84 32 2C 45 58 |).3200.."l..2,EX|
00001A80: 24 28 58 2C 59 2C 5A 29 3A 5A B2 5A AA 31 3A 8B |$(X,Y,Z):Z.Z.1:.|
00001A90: 5A B3 31 36 A7 33 31 37 30 00 A0 22 80 0C 82 58 |Z.16.3170.."...X|
00001AA0: 00 C2 22 8A 0C 84 32 2C 54 54 28 31 35 2C 59 29 |.."...2,TT(15,Y)|
00001AB0: 3A 59 B2 59 AA 31 3A 8B 59 B3 B2 31 31 A7 33 31 |:Y.Y.1:.Y..11.31|
00001AC0: 32 30 00 F4 22 8C 0C 81 58 B2 30 A4 43 3A 84 32 |20.."...X.0.C:.2|
00001AD0: 2C 54 54 28 58 2C 31 32 29 3A 82 58 3A 84 32 2C |,TT(X,12):.X:.2,|
00001AE0: 54 54 28 31 35 2C 31 32 29 3A 8B 43 B2 31 34 A7 |TT(15,12):.C.14.|
00001AF0: 43 B2 31 35 00 0E 23 99 0C A0 32 3A A0 31 35 3A |C.15..#...2:.15:|
00001B00: 46 32 B2 30 3A 46 33 B2 31 3A 89 31 32 30 00 1D |F2.0:F3.1:.120..|
00001B10: 23 E4 0C 8B 46 32 B2 31 A7 33 33 30 37 00 4E 23 |#...F2.1.3307.N#|
00001B20: E5 0C 99 22 93 C4 4F 20 59 4F 55 20 57 49 53 48 |..."..O YOU WISH|
00001B30: 20 54 4F 20 53 49 47 4E 2D 4F 46 46 22 3B 3A 8D | TO SIGN-OFF";:.|
00001B40: 36 30 30 30 3A 8B 50 36 B2 32 A7 31 32 30 00 8D |6000:.P6.2.120..|
00001B50: 23 E9 0C 99 22 93 11 1D 1D 1D 1D 1D 1D 4F 4B 2C |#..."........OK,|
00001B60: 20 4E 4F 57 20 53 49 47 4E 49 4E 47 2D 4F 46 46 | NOW SIGNING-OFF|
00001B70: 22 3A 97 35 33 32 38 30 2C 31 34 3A 99 C7 28 39 |":.53280,14:..(9|
00001B80: 29 3A 97 35 33 32 37 32 2C 32 31 3A 80 00 D8 23 |):.53272,21:...#|
00001B90: EB 0C 99 22 93 D9 4F 55 20 48 41 56 45 20 4D 41 |..."..OU HAVE MA|
00001BA0: 44 45 20 53 4F 4D 45 20 41 4C 54 45 52 41 54 49 |DE SOME ALTERATI|
00001BB0: 4F 4E 53 22 3A 99 22 11 C4 4F 20 59 4F 55 20 57 |ONS":."..O YOU W|
00001BC0: 49 53 48 20 54 4F 20 53 41 56 45 20 54 48 45 4D |ISH TO SAVE THEM|
00001BD0: 22 3B 3A 8D 36 30 30 30 00 E7 23 EE 0C 8B 50 36 |";:.6000..#...P6|
00001BE0: B2 32 A7 33 33 30 31 00 33 24 F5 0C 99 22 93 C5 |.2.3301.3$..."..|
00001BF0: 4E 54 45 52 20 4E 41 4D 45 20 4F 46 20 46 49 4C |NTER NAME OF FIL|
00001C00: 45 20 54 4F 20 42 45 20 53 41 56 45 44 22 3A 99 |E TO BE SAVED":.|
00001C10: 22 CD 41 58 20 31 36 20 43 48 41 52 41 43 54 45 |".AX 16 CHARACTE|
00001C20: 52 53 3A 20 22 3B 3A 50 33 B2 31 36 3A 8D 33 30 |RS: ";:P3.16:.30|
00001C30: 30 30 30 00 48 24 F6 0C 8D 35 35 30 30 3A 8B 50 |000.H$...5500:.P|
00001C40: 36 B2 32 A7 33 33 31 37 00 95 24 F8 0C 42 24 B2 |6.2.3317..$..B$.|
00001C50: 50 24 3A 99 22 11 D0 4C 45 41 53 45 20 50 4C 41 |P$:."..LEASE PLA|
00001C60: 43 45 20 59 4F 55 52 20 44 41 54 41 20 44 49 53 |CE YOUR DATA DIS|
00001C70: 4B 20 49 4E 20 44 52 49 56 45 20 30 22 3A 99 22 |K IN DRIVE 0":."|
00001C80: 11 12 C8 49 54 20 41 4E 59 20 4B 45 59 92 22 3A |...IT ANY KEY.":|
00001C90: 8D 35 30 30 30 00 D7 24 02 0D 99 22 11 D0 4C 45 |.5000..$..."..LE|
00001CA0: 41 53 45 20 48 41 4E 47 2D 4F 4E 22 3A 9F 32 2C |ASE HANG-ON":.2,|
00001CB0: 38 2C 32 2C 22 40 30 3A 22 AA 42 24 AA 22 2C 53 |8,2,"@0:".B$.",S|
00001CC0: 2C 57 22 3A 8D 39 35 30 30 3A 8B 50 36 B2 31 A7 |,W":.9500:.P6.1.|
00001CD0: A0 32 3A 89 31 32 30 00 F2 24 0C 0D 98 32 2C 59 |.2:.120..$...2,Y|
00001CE0: 52 24 3A 98 32 2C 43 3A 8B 43 B2 31 30 A7 33 33 |R$:.2,C:.C.10.33|
00001CF0: 36 30 00 18 25 1A 0D 81 58 B2 31 30 A4 43 AB 31 |60..%...X.10.C.1|
00001D00: 3A 98 32 2C 45 44 24 28 58 29 3A 82 58 3A 8B 43 |:.2,ED$(X):.X:.C|
00001D10: B2 31 35 A7 43 B2 31 34 00 20 25 20 0D 59 B2 30 |.15.C.14. % .Y.0|
00001D20: 00 48 25 2A 0D 81 58 B2 30 A4 43 3A 98 32 2C 43 |.H%*..X.0.C:.2,C|
00001D30: 31 25 28 58 2C 59 29 3A 8B 43 31 25 28 58 2C 59 |1%(X,Y):.C1%(X,Y|
00001D40: 29 B2 30 A7 33 34 35 30 00 5B 25 48 0D 98 32 2C |).0.3450.[%H..2,|
00001D50: 54 54 28 58 2C 59 29 3A 5A B2 30 00 70 25 5C 0D |TT(X,Y):Z.0.p%\.|
00001D60: 8B 5A B2 43 31 25 28 58 2C 59 29 A7 33 34 35 30 |.Z.C1%(X,Y).3450|
00001D70: 00 93 25 66 0D 98 32 2C 45 58 24 28 58 2C 59 2C |..%f..2,EX$(X,Y,|
00001D80: 5A 29 3A 5A B2 5A AA 31 3A 8B 5A B3 31 36 A7 33 |Z):Z.Z.1:.Z.16.3|
00001D90: 34 32 30 00 B8 25 7A 0D 82 58 3A 98 32 2C 54 54 |420..%z..X:.2,TT|
00001DA0: 28 31 35 2C 59 29 3A 59 B2 59 AA 31 3A 8B 59 B3 |(15,Y):Y.Y.1:.Y.|
00001DB0: B2 31 31 A7 33 33 37 30 00 F1 25 90 0D 81 58 B2 |.11.3370..%...X.|
00001DC0: 30 A4 43 3A 98 32 2C 54 54 28 58 2C 31 32 29 3A |0.C:.2,TT(X,12):|
00001DD0: 82 58 3A 98 32 2C 54 54 28 31 35 2C 31 32 29 3A |.X:.2,TT(15,12):|
00001DE0: A0 32 3A A0 31 35 3A 8B 43 B2 31 34 A7 43 B2 31 |.2:.15:.C.14.C.1|
00001DF0: 35 00 2B 26 A2 0D 99 22 11 11 C4 4F 20 59 4F 55 |5.+&..."...O YOU|
00001E00: 20 57 49 53 48 20 54 4F 20 53 41 56 45 20 54 48 | WISH TO SAVE TH|
00001E10: 45 4D 20 41 47 41 49 4E 22 3B 3A 8D 36 30 30 30 |EM AGAIN";:.6000|
00001E20: 3A 8B 50 36 B2 32 A7 33 33 30 31 00 35 26 C0 0D |:.P6.2.3301.5&..|
00001E30: 89 33 33 31 37 00 6F 26 10 0E 99 22 93 C5 4E 54 |.3317.o&..."..NT|
00001E40: 45 52 20 45 58 50 45 4E 53 45 20 41 4E 41 4C 59 |ER EXPENSE ANALY|
00001E50: 53 49 53 20 54 4F 20 42 45 20 50 52 49 4E 54 45 |SIS TO BE PRINTE|
00001E60: 44 3A 11 22 3A 46 34 B2 31 3A 8D 31 35 31 30 00 |D:.":F4.1:.1510.|
00001E70: 84 26 1A 0E 8B 46 35 B2 31 A7 46 35 B2 30 3A 89 |.&...F5.1.F5.0:.|
00001E80: 33 36 33 30 00 B2 26 24 0E 99 22 11 C4 4F 20 59 |3630..&$.."..O Y|
00001E90: 4F 55 20 57 49 53 48 20 54 4F 20 50 52 49 4E 54 |OU WISH TO PRINT|
00001EA0: 22 3B 3A 8D 36 30 30 30 3A 8B 50 36 B2 32 A7 31 |";:.6000:.P6.2.1|
00001EB0: 32 30 00 C5 26 2B 0E 99 22 91 22 53 50 24 3A 8D |20..&+.."."SP$:.|
00001EC0: 36 30 30 30 30 00 EF 26 2E 0E 99 22 11 11 C1 4E |60000..&..."...N|
00001ED0: 59 20 4F 54 48 45 52 22 3B 3A 8D 36 30 30 30 3A |Y OTHER";:.6000:|
00001EE0: 8B 50 36 B2 32 A7 46 34 B2 30 3A 89 31 32 30 00 |.P6.2.F4.0:.120.|
00001EF0: F9 26 4C 0E 89 33 36 30 30 00 0D 27 88 13 A1 41 |.&L..3600..'...A|
00001F00: 24 3A 8B 41 24 B2 22 22 A7 35 30 30 30 00 13 27 |$:.A$."".5000..'|
00001F10: 92 13 8E 00 59 27 7C 15 50 36 B2 31 3A 41 B2 C6 |....Y'|.P6.1:A..|
00001F20: 28 50 24 29 3A 8B 28 41 B3 36 35 B0 41 B1 39 30 |(P$):.(A.65.A.90|
00001F30: 29 B0 50 24 B2 22 4E 22 B0 50 24 B2 22 56 22 B0 |).P$."N".P$."V".|
00001F40: 50 24 B2 22 43 22 B0 50 24 B2 22 53 22 B0 50 24 |P$."C".P$."S".P$|
00001F50: B2 22 49 22 A7 50 36 B2 32 00 5F 27 86 15 8E 00 |."I".P6.2._'....|
00001F60: 74 27 70 17 99 22 20 12 81 D9 9A 92 2F 12 81 CE |t'p.." ...../...|
00001F70: 9A 92 3F 22 00 92 27 7A 17 A1 41 24 3A 8B 41 24 |..?"..'z..A$:.A$|
00001F80: B3 B1 22 59 22 AF 41 24 B3 B1 22 4E 22 A7 36 30 |.."Y".A$.."N".60|
00001F90: 31 30 00 A5 27 84 17 8B 41 24 B2 22 59 22 A7 50 |10..'...A$."Y".P|
00001FA0: 36 B2 31 3A 8E 00 B0 27 8E 17 50 36 B2 32 3A 8E |6.1:...'..P6.2:.|
00001FB0: 00 F7 27 58 1B 81 4E B2 30 A4 34 3A 99 4E AA 31 |..'X..N.0.4:.N.1|
00001FC0: 22 9D 2E 22 45 44 24 28 4E 29 A3 31 32 29 4E AA |".."ED$(N).12)N.|
00001FD0: 36 22 9D 2E 22 45 44 24 28 4E AA 35 29 A3 32 35 |6".."ED$(N.5).25|
00001FE0: 29 4E AA 31 31 22 9D 2E 22 45 44 24 28 4E AA 31 |)N.11".."ED$(N.1|
00001FF0: 30 29 3A 99 3A 82 4E 00 FD 27 62 1B 8E 00 1B 28 |0):.:.N..'b....(|
00002000: 28 23 99 22 93 C1 52 45 20 59 4F 55 20 53 55 52 |(#."..RE YOU SUR|
00002010: 45 22 3B 3A 8D 36 30 30 30 3A 8E 00 48 28 1C 25 |E";:.6000:..H(.%|
00002020: 50 36 B2 30 3A 9F 31 35 2C 38 2C 31 35 3A 84 31 |P6.0:.15,8,15:.1|
00002030: 35 2C 45 52 2C 45 52 24 2C 54 52 2C 42 4C 3A 8B |5,ER,ER$,TR,BL:.|
00002040: 45 52 B3 32 30 A7 20 8E 00 87 28 26 25 99 22 11 |ER.20. ...(&%.".|
00002050: 12 C4 49 53 4B 20 45 52 52 4F 52 3A 92 20 22 45 |..ISK ERROR:. "E|
00002060: 52 22 20 22 45 52 24 54 52 3B 42 4C 3A 99 22 12 |R" "ER$TR;BL:.".|
00002070: 11 C8 49 54 20 41 4E 59 20 4B 45 59 20 46 4F 52 |..IT ANY KEY FOR|
00002080: 20 4D 45 4E 55 92 22 00 9C 28 30 25 8D 35 30 30 | MENU."..(0%.500|
00002090: 30 3A A0 31 35 3A 50 36 B2 31 3A 8E 00 B0 28 10 |0:.15:P6.1:...(.|
000020A0: 27 4E B2 C5 28 43 24 29 3A 4E B2 A5 42 28 4E 29 |'N..(C$):N..B(N)|
000020B0: 00 BC 28 1A 27 43 24 B2 C4 28 4E 29 00 E3 28 1F |..(.'C$..(N)..(.|
000020C0: 27 81 4E B2 C3 28 43 24 29 A4 31 A9 AB 31 3A 8B |'.N..(C$).1..1:.|
000020D0: CA 28 43 24 2C 4E 2C 31 29 B2 22 2E 22 A7 31 30 |.(C$,N,1).".".10|
000020E0: 30 35 30 00 FD 28 38 27 82 4E 3A 43 24 B2 43 24 |050..(8'.N:C$.C$|
000020F0: AA 22 2E 30 30 22 3A 89 31 30 30 36 30 00 16 29 |.".00":.10060..)|
00002100: 42 27 8B 4E B2 C3 28 43 24 29 AB 31 A7 43 24 B2 |B'.N..(C$).1.C$.|
00002110: 43 24 AA 22 30 22 00 2E 29 4C 27 43 24 B2 C9 28 |C$."0"..)L'C$..(|
00002120: 28 53 50 24 AA 43 24 29 2C 4A 53 29 3A 8E 00 46 |(SP$.C$),JS):..F|
00002130: 29 74 27 54 54 28 41 2C 42 29 B2 54 54 28 41 2C |)t'TT(A,B).TT(A,|
00002140: 42 29 AB 4D 3A 8E 00 5E 29 D8 27 54 54 28 41 2C |B).M:..^).'TT(A,|
00002150: 42 29 B2 54 54 28 41 2C 42 29 AA 4D 3A 8E 00 95 |B).TT(A,B).M:...|
00002160: 29 04 29 83 57 45 45 4B 45 4E 44 53 20 2C 4A 41 |).).WEEKENDS ,JA|
00002170: 4E 55 41 52 59 2C 4B 4C 45 44 49 4E 47 2C 46 45 |NUARY,KLEDING,FE|
00002180: 42 52 55 41 52 59 2C 53 43 48 4F 45 4E 45 4E 2C |BRUARY,SCHOENEN,|
00002190: 4D 41 52 43 48 00 D6 29 0E 29 83 20 42 52 4F 4D |MARCH..).). BROM|
000021A0: 4D 45 52 2C 41 50 52 49 4C 2C 42 45 4E 5A 49 4E |MER,APRIL,BENZIN|
000021B0: 45 2C 4D 41 59 2C 54 45 4C 45 46 4F 4F 4E 2C 4A |E,MAY,TELEFOON,J|
000021C0: 55 4E 45 2C 56 4F 45 44 49 4E 47 2C 4A 55 4C 59 |UNE,VOEDING,JULY|
000021D0: 2C 4D 55 53 49 43 00 21 2A 18 29 83 41 55 47 55 |,MUSIC.!*.).AUGU|
000021E0: 53 54 2C 50 4C 45 5A 49 45 52 2C 53 45 50 54 45 |ST,PLEZIER,SEPTE|
000021F0: 4D 42 45 52 2C 56 45 52 56 4F 45 52 2C 4F 43 54 |MBER,VERVOER,OCT|
00002200: 4F 42 45 52 2C 2A 2A 2A 2A 2A 2A 2A 2A 2A 2C 4E |OBER,*********,N|
00002210: 4F 56 45 4D 42 45 52 2C 2A 2A 2A 2A 2A 2A 2A 2A |OVEMBER,********|
00002220: 2A 00 4E 2A 22 29 83 20 44 45 43 45 4D 42 45 52 |*.N*"). DECEMBER|
00002230: 2C 2A 2A 2A 2A 2A 2A 2A 2A 2A 2C 2A 2A 2A 2A 2A |,*********,*****|
00002240: 2A 2A 2A 2A 2C 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 90 |****,*********..|
00002250: 2A 98 3A 41 4D 24 B2 22 33 31 32 38 33 31 33 30 |*.:AM$."31283130|
00002260: 33 31 33 30 33 31 33 31 33 30 33 31 33 30 33 31 |3130313130313031|
00002270: 22 3A 41 4C 24 B2 22 33 31 32 39 33 31 33 30 33 |":AL$."312931303|
00002280: 31 33 30 33 31 33 31 33 30 33 31 33 30 33 31 22 |130313130313031"|
00002290: 00 99 2A AC 3A 50 36 B2 30 00 D7 2A B6 3A 50 44 |..*.:P6.0..*.:PD|
000022A0: B2 C5 28 44 24 29 3A 8B 50 44 B3 31 B0 50 44 B1 |..(D$):.PD.1.PD.|
000022B0: 33 31 A7 50 36 B2 31 3A 50 59 B2 C5 28 59 52 24 |31.P6.1:PY..(YR$|
000022C0: 29 3A 8B B5 28 50 59 AD 34 29 B2 50 59 AD 34 A7 |):..(PY.4).PY.4.|
000022D0: 41 4D 24 B2 41 4C 24 00 F7 2A CA 3A 8B 50 44 B1 |AM$.AL$..*.:.PD.|
000022E0: C5 28 CA 28 41 4D 24 2C 50 4D AC 32 AB 31 2C 32 |.(.(AM$,PM.2.1,2|
000022F0: 29 29 A7 50 36 B2 31 00 FD 2A D4 3A 8E 00 43 2B |)).P6.1..*.:..C+|
00002300: 80 3E 99 22 93 D0 4C 45 41 53 45 20 45 4E 54 45 |.>."..LEASE ENTE|
00002310: 52 20 59 45 41 52 20 3A 20 31 39 22 3B 3A 50 33 |R YEAR : 19";:P3|
00002320: B2 32 3A 50 34 B2 31 3A 8D 33 30 30 30 30 3A 59 |.2:P4.1:.30000:Y|
00002330: 52 24 B2 22 31 39 22 AA 50 24 3A 41 B2 C5 28 59 |R$."19".P$:A..(Y|
00002340: 52 24 29 00 5C 2B 8A 3E 8B 41 B3 31 39 37 30 B0 |R$).\+.>.A.1970.|
00002350: 41 B1 31 39 39 39 A7 31 36 30 30 30 00 62 2B 94 |A.1999.16000.b+.|
00002360: 3E 8E 00 91 2B 30 75 81 51 B2 31 A4 50 33 3A 99 |>...+0u.Q.1.P3:.|
00002370: 22 A4 22 3B 3A 82 3A 81 51 B2 31 A4 50 33 3A 99 |".";:.:.Q.1.P3:.|
00002380: 22 9D 22 3B 3A 82 3A 50 24 B2 22 22 3A 50 58 B2 |".";:.:P$."":PX.|
00002390: 30 00 A6 2B D0 75 A1 41 24 3A 8B 41 24 B2 22 22 |0..+.u.A$:.A$.""|
000023A0: A7 33 30 31 36 30 00 C5 2B DA 75 41 B2 C6 28 41 |.30160..+.uA..(A|
000023B0: 24 29 3A 8B 41 B1 31 39 31 AF 41 B3 32 31 39 A7 |$):.A.191.A.219.|
000023C0: 33 30 32 30 30 00 04 2C E4 75 8B 28 41 B1 33 31 |30200..,.u.(A.31|
000023D0: AF 41 B3 B1 34 34 AF 41 B3 B1 33 34 AF 41 B3 B1 |.A..44.A..34.A..|
000023E0: 35 38 AF 41 B3 B1 35 39 AF 41 B3 39 37 29 B0 41 |58.A..59.A.97).A|
000023F0: B2 31 33 B0 41 B2 32 30 B0 41 B2 31 35 37 A7 33 |.13.A.20.A.157.3|
00002400: 30 32 30 30 00 0F 2C EE 75 89 33 30 31 36 30 00 |0200..,.u.30160.|
00002410: 1F 2C F8 75 8B 41 B2 31 33 A7 33 30 33 32 30 00 |.,.u.A.13.30320.|
00002420: 36 2C 02 76 8B 41 B2 31 35 37 AF 50 24 B2 22 22 |6,.v.A.157.P$.""|
00002430: A7 33 30 30 30 30 00 46 2C 0C 76 8B 41 B2 32 30 |.30000.F,.v.A.20|
00002440: A7 33 30 32 35 30 00 57 2C 11 76 8B 50 58 B2 50 |.30250.W,.v.PX.P|
00002450: 33 A7 33 30 31 36 30 00 69 2C 16 76 8B 41 B3 B1 |3.30160.i,.v.A..|
00002460: 31 35 37 A7 33 30 32 38 30 00 8D 2C 1B 76 50 58 |157.30280..,.vPX|
00002470: B2 C3 28 50 24 29 3A 81 51 B2 31 A4 50 58 3A 99 |..(P$):.Q.1.PX:.|
00002480: 22 9D 22 3B 3A 82 3A 89 33 30 30 30 30 00 9E 2C |".";:.:.30000..,|
00002490: 2A 76 8B 50 24 B2 22 22 A7 33 30 31 36 30 00 CB |*v.P$."".30160..|
000024A0: 2C 34 76 50 24 B2 C8 28 50 24 2C C3 28 50 24 29 |,4vP$..(P$,.(P$)|
000024B0: AB 31 29 3A 41 24 B2 22 9D A4 9D 22 3A 50 58 B2 |.1):A$."...":PX.|
000024C0: 50 58 AB 31 3A 89 33 30 33 30 30 00 DF 2C 48 76 |PX.1:.30300..,Hv|
000024D0: 8B C3 28 50 24 29 B2 50 33 A7 33 30 33 33 30 00 |..(P$).P3.30330.|
000024E0: F5 2C 52 76 50 24 B2 50 24 AA 41 24 3A 50 58 B2 |.,RvP$.P$.A$:PX.|
000024F0: C3 28 50 24 29 00 05 2D 5C 76 99 41 24 3B 3A 89 |.(P$)..-\v.A$;:.|
00002500: 33 30 31 36 30 00 19 2D 70 76 8B C3 28 50 24 29 |30160..-pv..(P$)|
00002510: B3 50 34 A7 33 30 31 36 30 00 21 2D 7A 76 99 3A |.P4.30160.!-zv.:|
00002520: 8E 00 39 2D AC 8A 81 51 B2 31 A4 33 37 3A 99 22 |..9-...Q.1.37:."|
00002530: C0 22 3B 3A 82 3A 99 3A 8E 00 69 2D 60 EA 97 35 |.";:.:.:..i-`..5|
00002540: 33 32 36 35 2C 31 31 3A 47 31 24 B2 C7 28 31 37 |3265,11:G1$..(17|
00002550: 29 3A 9F 34 2C 34 3A 98 34 2C C7 28 31 35 29 3A |):.4,4:.4,.(15):|
00002560: 98 34 3A 47 31 B2 39 38 34 00 9D 2D 88 EA 81 47 |.4:G1.984..-...G|
00002570: 30 B2 30 A4 32 34 3A 47 30 24 B2 47 31 24 3A 47 |0.0.24:G0$.G1$:G|
00002580: 31 B2 47 31 AA 34 30 3A 81 47 32 B2 47 31 A4 47 |1.G1.40:.G2.G1.G|
00002590: 31 AA 33 39 3A 47 33 B2 C2 28 47 32 29 00 C6 2D |1.39:G3..(G2)..-|
000025A0: 92 EA 8B 47 33 B1 31 32 38 A7 47 33 B2 47 33 AB |...G3.128.G3.G3.|
000025B0: 31 32 38 3A 47 34 B2 31 3A 47 30 24 B2 47 30 24 |128:G4.1:G0$.G0$|
000025C0: AA C7 28 31 38 29 00 EA 2D 9C EA 8B 28 47 33 B1 |..(18)..-...(G3.|
000025D0: 30 29 AC 28 47 33 B3 33 32 29 A7 47 33 B2 47 33 |0).(G3.32).G3.G3|
000025E0: AA 36 34 3A 89 36 30 31 30 30 00 05 2E A6 EA 8B |.64:.60100......|
000025F0: 28 47 33 B1 33 31 29 AC 28 47 33 B3 36 34 29 A7 |(G3.31).(G3.64).|
00002600: 36 30 31 30 30 00 2B 2E B0 EA 8B 28 47 33 B1 36 |60100.+....(G3.6|
00002610: 33 29 AC 28 47 33 B3 39 36 29 A7 47 33 B2 47 33 |3).(G3.96).G3.G3|
00002620: AA 31 32 38 3A 89 36 30 31 30 30 00 51 2E BA EA |.128:.60100.Q...|
00002630: 8B 28 47 33 B1 39 35 29 AC 28 47 33 B3 31 32 38 |.(G3.95).(G3.128|
00002640: 29 A7 47 33 B2 47 33 AA 36 34 3A 89 36 30 31 30 |).G3.G3.64:.6010|
00002650: 30 00 63 2E C4 EA 47 30 24 B2 47 30 24 AA C7 28 |0.c...G0$.G0$..(|
00002660: 47 33 29 00 81 2E CE EA 8B 47 34 B2 31 A7 47 30 |G3)......G4.1.G0|
00002670: 24 B2 47 30 24 AA C7 28 31 34 36 29 3A 47 34 B2 |$.G0$..(146):G4.|
00002680: 30 00 B0 2E D8 EA 82 47 32 3A 98 34 2C 47 30 24 |0......G2:.4,G0$|
00002690: 3A 82 47 30 3A 98 34 3A 98 34 2C C7 28 31 34 35 |:.G0:.4:.4,.(145|
000026A0: 29 3A A0 34 3A 97 35 33 32 36 35 2C 32 37 3A 8E |):.4:.53265,27:.|
000026B0: 00 BE 2E 48 EE 8F 20 56 32 2E 30 28 44 29 00 00 |...H.. V2.0(D)..|
000026C0: 00 FB FF FF FF FB 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$.S.
Z..".".13)D$:.".PAID BY : 1.CHEQUE".2
9)"3. CASH"......" 2. CREDIT
CARD".29)"4. OTHER".Q...."
..PRESS REFERENCE NO . ";......5000:N.E(
A$):.N.1.N.4.736.....PB$.D(N):.N.742,744
,746,748.%...B$."CHEQUE":.750.?...B$."CR
EDIT CARD":.750.R...B$."CASH":.750.F...B
$."OTHER":.750.....C$."....":.C$:.N.1.4:
..13)SP$:.:.C$:..13)"."B$.I...."..AMOUNT
PAID: ";: P3.9:P4.1:.30000:C$.P$......E
(C$)..0.E(C$).999999.."....":.760.3...JS
.9:.10000:.".";.13)C$:."....ACCEPT";:.60
00:.P6.2.Y.Y.1:.510.Z.>..".HANG-ON WHILE
POSTING":F2.1:Z.C1%(X,Y):C$.D(E(C$)):D$
.D$.PB$.C$. .H.EX$(X,Y,Z).D$:C1%(X,Y).C1
%(X,Y).1...J..Z.0.850.X.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.X.R.M.E(C$):A.X:B.Y:.10200
:A.15:B.Y:.10200:A.X:B.12:.10200..R.A.1
5:B.12:.10200:.C1%(X,Y).14.1030.G.T..".O
K, ANY OTHER ENTRY FOR THIS MONTH";:.600
0:.P6.1.F1.1:Y.Y.1:.510......".ANY OTHER
ENTRY";:.6000:.P6.1.500...$..120...Y..Y
R$.""..16000......".";:F4.0.B....".....A
NALYSIS OF EXPENSES PER:":."............
................."......"...... 1 . MONT
H / SPECTRUM OF EXPENSES"......".......
2 . MONTH / SINGLE EXPENSE"......"......
. 3 . EXPENSE / WHOLE YEAR"......"......
. 4 . BACK TO MAIN MENU.1.".."........PR
ESS CORRESPONDING NUMBER".\.6..5000:.E(A
$).1610,1900,2300,1602:.1590.L.B..F4..0.
F4.0.U.D..120...J..".ENTER MONTH REQUIRE
D .IN FIGURES.: ";:P3.2:P4.1:.30000:A$.P
$.T.T.Y.E(A$):.Y.1.Y.12.1610...^.Y.Y.1:.
".EXPENSES FOR "MD$(Y)" "YR$" :":L1.C(MD
$(Y)):.N.1.26:.".";:.:..X.C..TT(15,Y).0.
."..NO ENTRY IN "MD$(Y)" "YR$:F5.1:.1775
...H..".EXPENSES:",.10.L1);MD$(Y).23)"%"
.29)"YEAR TOTAL".E.R.."---------"," ----
-----.------".29)"----------"......X.0.1
4:.X..C..1730.)...P.(TT(X,Y).TT(15,Y)).1
00:P..(P.100..5).100:N.TT(X,Y):JS.10:.10
010:A$.C$.[...N.TT(X,12):.10010:B$.C$:N.
P:JS.7:.10010:D$.C$.Y....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$.%....,".=======
==.======..=========".2....F4..0...]....
"..ANY OTHER MONTH";:.6000:.P6.1.1610.I.
...F4.1...S....1500...L..".ENTER MONTH R
EQUIRED .IN FIGURES.: ";:P3.2:P4.1:.3000
0:A$.P$.R.V.Y.E(A$):.Y.1.Y.12.1900......
"..ENTER REF NO OF EXPENSE TO BE ANALYSE
D:..":.7000.(...."..ENTER NOW: ";:.30000
.K...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:.".";:.:..+...."..DAY
".5)"PAID BY","....AMOUNT":."...".5)"...
....","...........".K....Z.0.14:.EX$(X,Y
,Z)."".2150......H(EX$(X,Y,Z),2);:.E(J(E
X$(X,Y,Z),3,2)).2090,2100,2110,2115...*.
..5)"CHEQUE",:.2120...4...5)"CREDIT CARD
",:.2120.X.>...5)"CASH ",:.2120...C...5
)"OTHER",:.2120.(.H.C$.I(EX$(X,Y,Z),C(EX
$(X,Y,Z)).4):JS.10:.10015:.C$:.Z.M.F..".
",,".---------":N.TT(X,Y):.10010:."TOTAL
",,C$:.,,".=========".Z....F4..0........
"..ANY OTHER ANALYSIS";:.6000:.P6.1.1900
......1500......".ENTER REF NO OF EXPENS
E TO BE ANALYSED:..":.7000.+...."..ENTER
NOW: ";:P3.2:.30000:X.E(P$):.X.1.X.C.."
....":.2350.U.G.X.X.1:.TT(X,12).0..".SOR
RY,NO ENTRY FOR ."ED$(X)". IN "YR$:F5.1:
.2520...L..".BREAKDOWN OF "ED$(X)" EXPEN
SES IN "YR$:.N.1.39:.".";:.N:....`..".MO
NTH:","....AMOUNT......%":."......","...
...............".-.~..Y.0.11:P.TT(X,Y).T
T(X,12).100:P..(P.100..5).100.N...N.TT(X
,Y):JS.10:.10010:A$.C$.....N.P:JS.7:.100
10:B$.C$:.MD$(Y),A$.22)B$:.Y:.,".-------
--...------".T...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.0
....1500.D.%..9000:.P6.2.120.W.&..YR$.""
..16000...(..".ENTER .MONTH. IN WHICH DE
LETION":."REQUIRED .IN FIGURES. ";:P3.2:
.30000.F.<.Y.E(P$):PM.Y:.Y.1.Y.12.2600.O
.>.P6.1...A.."..DAY. .IN FIGURES.: ";:.3
0000:D$.P$:.15000:.P6.1.."...":.2625.+.K
..C(D$).2.D$."0".D$.Z.P..".ENTER .TYPE.
OF EXPENSE TO WHICH":."IT WAS POSTED .IN
FIGURES...":.7000......"..ENTER NOW: ";
:.30000.....X.E(P$):.X.1.X.C.."....":.27
00.J. .X.X.1:Y.Y.1......".ENTER .AMOUNT.
: ";:P3.9:.30000:A.E(P$):.A..0.A.999999.
."...":.2725.P....".HANG-ON WHILE SEARCH
ING":.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 E
NTRY":."...HINT:. RESEARCH BY LISTING AL
L ";.4...."EXPENSES":."FOR THIS MONTH (A
NALYSIS MENU - NO 2).B...."..ANY OTHER D
ELETION";:.6000:.P6.1.2600.K....120...".
."..HAVE FOUND THE FOLLOWING ENTRY:":.".
.DATE: "D$" "MD$(Y)" "YR$.B.,.JS.10:.100
15.. 6..".TYPE: "ED$(X):.".AMOUNT: "C$:.
"..DELETE";:.6000:.P6.2.120.K C.."..HANG
-ON WHILE DELETING":A.X:B.Y:.10100:A.15:
B.Y:.10100:A.X:B.12.. |..10100:A.15:B.12
:.10100:.Z.Z.14:.Z.14.EX$(X,Y,Z)."":.300
0.. ..EX$(X,Y,Z).EX$(X,Y,Z.1):.EX$(X,Y,Z
)."".3000.. ...Z.. ..C1%(X,Y).C1%(X,Y).1
:F2.1:.".OK !":.2800..!...9000:.P6.2.120
.M!...".ENTER NAME OF FILE TO BE LOADED"
:."MAX 16 CHARACTERS: ";:P3.16:.30000.B!
...5500:.P6.2.3085..!...".PLEASE PLACE Y
OUR DATA DISK IN DRIVE 0":."..HIT ANY KE
Y":.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.1
5.C.14.&"+.Y.0.N"0..X.0.C:.2,C1%(X,Y):.C
1%(X,Y).0.3200.A"N..2,TT(X,Y):Z.0.V"B..Z
.C1%(X,Y).3200.."L..2,EX$(X,Y,Z):Z.Z.1:.
Z.16.3170. "...X.B"...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.N#...".DO YOU WISH
TO SIGN-OFF";:.6000:.P6.2.120..#..."...
.....OK, NOW SIGNING-OFF":.53280,14:.G(9
):.53272,21:..X#...".YOU HAVE MADE SOME
ALTERATIONS":.".DO YOU WISH TO SAVE THEM
";:.6000..#...P6.2.3301.3$...".ENTER NAM
E OF FILE TO BE SAVED":."MAX 16 CHARACTE
RS: ";:P3.16:.30000.H$...5500:.P6.2.3317
..$..B$.P$:.".PLEASE PLACE YOUR DATA DIS
K IN DRIVE 0":."..HIT ANY KEY.":.5000.W$
...".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.H%*..X.0.C:.2,C1%(X,Y):
.C1%(X,Y).0.3450.[%H..2,TT(X,Y):Z.0.P%\.
.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,TT
(15,12): 2: 15:.C.14.C.15.+&..."..DO YOU
WISH TO SAVE THEM AGAIN";:.6000:.P6.2.3
301.5&...3317.O&...".ENTER EXPENSE ANALY
SIS TO BE PRINTED:.":F4.1:.1510..&...F5.
1.F5.0:.3630..&$..".DO YOU WISH TO PRINT
";:.6000:.P6.2.120.E&+.."."SP$:.60000..&
..."..ANY OTHER";:.6000:.P6.2.F4.0:.120.
.&L..3600..'...A$:.A$."".5000..'....Y'|.
P6.1:A.F(P$):.(A.65.A.90).P$."N".P$."V".
P$."C".P$."S".P$."I".P6.2._'....T'P.." .
.Y../..N..?"..'Z..A$:.A$.."Y".A$.."N".60
10..'...A$."Y".P6.1:...'..P6.2:...'X..N.
0.4:.N.1".."ED$(N).12)N.6".."ED$(N.5).25
)N.11".."ED$(N.10):.:.N..'B....((#.".ARE
YOU SURE";:.6000:..H(.%P6.0:.15,8,15:.1
5,ER,ER$,TR,BL:.ER.20. ...(&%."..DISK ER
ROR:. "ER" "ER$TR;BL:."..HIT ANY KEY FOR
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):..F)T'TT(A,B).TT(A,B).M:..^
)X'TT(A,B).TT(A,B).M:...).).WEEKENDS ,JA
NUARY,KLEDING,FEBRUARY,SCHOENEN,MARCH.V)
.). BROMMER,APRIL,BENZINE,MAY,TELEFOON,J
UNE,VOEDING,JULY,MUSIC.!*.).AUGUST,PLEZI
ER,SEPTEMBER,VERVOER,OCTOBER,*********,N
OVEMBER,*********.N*"). DECEMBER,*******
**,*********,*********..*.:AM$."31283130
3130313130313031":AL$."31293130313031313
0313031"..*.:P6.0.W*.: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:..C+
.>.".PLEASE ENTER YEAR : 19";:P3.2:P4.1:
.30000:YR$."19".P$:A.E(YR$).\+.>.A.1970.
A.1999.16000.B+.>...+0U.Q.1.P3:.".";:.:.
Q.1.P3:.".";:.:P$."":PX.0..+PU.A$:.A$.""
.30160.E+ZUA.F(A$):.A.191.A.219.30200..,
.U.(A.31.A..44.A..34.A..58.A..59.A.97).A
.13.A.20.A.157.30200..,.U.30160..,.U.A.1
3.30320.6,.V.A.157.P$."".30000.F,.V.A.20
.30250.W,.V.PX.P3.30160.I,.V.A..157.3028
0..,.VPX.C(P$):.Q.1.PX:.".";:.:.30000..,
*V.P$."".30160.K,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.:..9-...Q.1.37:."
.";:.:.:..I-`..53265,11:G1$.G(17):.4,4:.
4,G(15):.4:G1.984..-...G0.0.24:G0$.G1$:G
1.G1.40:.G2.G1.G1.39:G3.B(G2).F-...G3.12
8.G3.G3.128:G4.1:G0$.G0$.G(18)..-...(G3.
0).(G3.32).G3.G3.64:.60100......(G3.31).
(G3.64).60100.+....(G3.63).(G3.96).G3.G3
.128:.60100.Q....(G3.95).(G3.128).G3.G3.
64:.60100.C.D.G0$.G0$.G(G3)...N..G4.1.G0
$.G0$.G(146):G4.0...X..G2:.4,G0$:.G0:.4:
.4,G(145): 4:.53265,27:....H.. V2.0(D)..
.........
> CLICK IMAGE PREVIEW FOR FULL MODAL