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

EXPENSE MANAGER

FILE INFORMATION

FILENAME(S): EXPENSE MANAGER

FILE TYPE(S): PRG

FILE SIZE: 9.3K

FIRST SEEN: 2025-11-30 21:06:26

APPEARS ON: 1 disk(s)

FILE HASH

b142d564a119bcc2e66d24d8db5176872ecdad7c80cd76a4cf9ffbd6b5a54a5d

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
SUNLINER EXPENSE MANAGER PRG DuncanTwain 33 10 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 3F 08 0A 00 8F 20  2A 45 58 50 45 4E 53 45  |..?.... *EXPENSE|
00000010: 20 4D 41 4E 41 47 45 52  2A 20 42 59 20 42 45 52  | MANAGER* BY BER|
00000020: 4E 41 52 44 20 48 41 42  45 54 20 28 43 29 20 31  |NARD HABET (C) 1|
00000030: 39 38 33 20 41 42 52 41  53 43 4F 20 4C 54 44 00  |983 ABRASCO LTD.|
00000040: 86 08 28 00 99 22 93 22  3B 3A 97 35 33 32 38 30  |..(..".";:.53280|
00000050: 2C 36 3A 86 45 58 24 28  31 34 2C 31 31 2C 31 34  |,6:.EX$(14,11,14|
00000060: 29 2C 54 54 28 31 35 2C  31 32 29 2C 43 31 25 28  |),TT(15,12),C1%(|
00000070: 31 34 2C 31 31 29 2C 45  44 24 28 31 34 29 2C 4D  |14,11),ED$(14),M|
00000080: 44 24 28 31 31 29 00 C3  08 2C 00 53 50 24 B2 22  |D$(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  20 22 3A 81 4E B2 30 A4  |         ":.N.0.|
000000B0: 31 34 3A 87 45 44 24 28  4E 29 3A 8B 4E B1 31 31  |14:.ED$(N):.N.11|
000000C0: A7 39 30 00 CF 08 50 00  87 4D 44 24 28 4E 29 00  |.90...P..MD$(N).|
000000D0: 05 09 5A 00 82 4E 3A 43  B2 31 30 3A 96 A5 42 28  |..Z..N:C.10:..B(|
000000E0: 4E 29 B2 B5 28 4E AC 31  30 30 AA 30 2E 30 30 35  |N)..(N.100.0.005|
000000F0: 29 AD 31 30 30 3A 97 35  33 32 37 32 2C 32 33 3A  |).100:.53272,23:|
00000100: 99 C7 28 38 29 00 4A 09  78 00 99 22 93 22 3B 3A  |..(8).J.x..".";:|
00000110: 8D 33 35 35 30 30 3A 99  22 12 81 20 20 20 20 C5  |.35500:."..    .|
00000120: A0 D8 A0 D0 A0 C5 A0 CE  A0 D3 A0 C5 20 20 20 CD  |............   .|
00000130: A0 C1 A0 CE A0 C1 A0 C7  A0 C5 A0 D2 A0 A0 A0 A0  |................|
00000140: 92 9A 22 3A 8D 33 35 35  30 30 00 8C 09 7D 00 99  |..":.35500...}..|
00000150: A3 38 29 22 11 11 12 81  20 D0 52 45 53 53 20 92  |.8)".... .RESS .|
00000160: 9A 20 CF 50 54 49 4F 4E  20 CE 55 4D 42 45 52 22  |. .PTION .UMBER"|
00000170: 3A 99 A3 31 30 29 22 11  11 11 12 81 20 31 20 9A  |:..10)"..... 1 .|
00000180: 92 20 CC 4F 41 44 20 44  41 54 41 22 00 C6 09 A0  |. .OAD DATA"....|
00000190: 00 99 A3 31 30 29 22 11  12 81 20 32 20 9A 92 20  |...10)"... 2 .. |
000001A0: CE 45 57 20 45 4E 54 52  49 45 53 22 3A 99 A3 31  |.EW ENTRIES":..1|
000001B0: 30 29 22 11 12 81 20 33  20 9A 92 20 C4 45 4C 45  |0)"... 3 .. .ELE|
000001C0: 54 49 4F 4E 53 22 00 E3  09 AA 00 99 A3 31 30 29  |TIONS".......10)|
000001D0: 22 11 12 81 20 34 20 9A  92 20 C1 4E 41 4C 59 53  |"... 4 .. .NALYS|
000001E0: 49 53 22 00 24 0A BE 00  99 A3 31 30 29 22 11 12  |IS".$.....10)"..|
000001F0: 81 20 35 20 9A 92 20 D0  52 49 4E 54 20 45 58 50  |. 5 .. .RINT EXP|
00000200: 45 4E 53 45 53 22 3A 99  A3 31 30 29 22 11 81 12  |ENSES":..10)"...|
00000210: 20 36 20 9A 92 20 D3 41  56 45 2F D3 49 47 4E 2D  | 6 .. .AVE/.IGN-|
00000220: 4F 46 46 22 00 57 0A 18  01 8D 35 30 30 30 3A 91  |OFF".W....5000:.|
00000230: C5 28 41 24 29 89 33 30  38 30 2C 35 30 30 2C 32  |.(A$).3080,500,2|
00000240: 35 39 37 2C 31 34 39 37  2C 33 36 30 30 2C 33 33  |597,1497,3600,33|
00000250: 30 30 3A 89 32 38 30 00  6B 0A F4 01 8D 39 30 30  |00:.280.k....900|
00000260: 30 3A 8B 50 36 B2 32 A7  31 32 30 00 7A 0A F6 01  |0:.P6.2.120.z...|
00000270: 8B 46 33 B3 B1 30 A7 35  30 36 00 BB 0A F7 01 99  |.F3..0.506......|
00000280: 22 93 12 C1 54 54 45 4E  54 49 4F 4E 3A 92 22 3A  |"...TTENTION:.":|
00000290: 99 22 11 D9 4F 55 20 48  41 56 45 20 4E 4F 54 20  |."..OU HAVE NOT |
000002A0: 4C 4F 41 44 45 44 20 41  4E 59 20 44 41 54 41 2E  |LOADED ANY DATA.|
000002B0: 20 C9 46 20 59 4F 55 20  44 4F 22 00 F8 0A F8 01  | .F YOU DO".....|
000002C0: 99 22 53 4F 20 4C 41 54  45 52 2C 20 41 4E 59 20  |."SO LATER, ANY |
000002D0: 45 4E 54 52 49 45 53 20  45 4E 54 45 52 45 44 20  |ENTRIES ENTERED |
000002E0: 42 45 46 4F 52 45 22 3A  99 22 57 49 4C 4C 20 42  |BEFORE":."WILL B|
000002F0: 45 20 4C 4F 53 54 2E 22  00 29 0B F9 01 99 22 11  |E LOST.".)....".|
00000300: 11 C4 4F 20 59 4F 55 20  57 49 53 48 20 54 4F 20  |..O YOU WISH TO |
00000310: 50 52 4F 43 45 45 44 22  3B 3A 8D 36 30 30 30 3A  |PROCEED";:.6000:|
00000320: 8B 50 36 B2 32 A7 31 32  30 00 46 0B FA 01 46 33  |.P6.2.120.F...F3|
00000330: B2 31 3A 46 31 B2 30 3A  8B 59 52 24 B2 22 22 A7  |.1:F1.0:.YR$."".|
00000340: 8D 31 36 30 30 30 00 8C  0B FE 01 99 22 93 22 A3  |.16000......".".|
00000350: 37 29 22 CE A0 C5 A0 D7  A0 A0 A0 C5 A0 CE A0 D4  |7)".............|
00000360: A0 D2 A0 C9 A0 C5 A0 D3  22 3A 99 A3 37 29 22 A3  |........":..7)".|
00000370: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |................|
00000380: A3 A3 A3 A3 11 22 3A 8D  37 30 30 30 00 A5 0B 35  |.....":.7000...5|
00000390: 02 8B 43 B1 31 34 B0 46  31 B2 31 A7 99 22 11 22  |..C.14.F1.1.."."|
000003A0: 3A 89 36 34 30 00 CF 0B  3A 02 99 22 11 C1 4E 59  |:.640...:.."..NY|
000003B0: 20 4E 45 57 20 48 45 41  44 49 4E 47 53 22 3B 3A  | NEW HEADINGS";:|
000003C0: 8D 36 30 30 30 3A 8B 50  36 B2 32 A7 36 34 30 00  |.6000:.P6.2.640.|
000003D0: FD 0B 62 02 99 22 11 C5  4E 54 45 52 20 4E 45 57  |..b.."..NTER NEW|
000003E0: 20 48 45 41 44 49 4E 47  3A 20 22 3B 3A 50 33 B2  | HEADING: ";:P3.|
000003F0: 39 3A 50 34 B2 31 3A 8D  33 30 30 30 30 00 20 0C  |9:P4.1:.30000. .|
00000400: 67 02 41 B2 C6 28 50 24  29 3A 8B 41 B3 36 35 B0  |g.A..(P$):.A.65.|
00000410: 41 B1 39 30 A7 99 22 91  91 91 22 3A 89 36 31 30  |A.90.."...":.610|
00000420: 00 39 0C 6C 02 45 44 24  28 43 29 B2 50 24 3A 43  |.9.l.ED$(C).P$:C|
00000430: B2 43 AA 31 3A 89 35 31  30 00 67 0C 80 02 99 22  |.C.1:.510.g...."|
00000440: 91 D0 4C 45 41 53 45 20  45 4E 54 45 52 20 54 48  |..LEASE ENTER TH|
00000450: 45 20 46 4F 4C 4C 4F 57  49 4E 47 3A 22 3A 8B 46  |E FOLLOWING:":.F|
00000460: 31 B2 31 A7 36 38 30 00  98 0C 8A 02 99 22 11 11  |1.1.680......"..|
00000470: CD 4F 4E 54 48 20 12 C9  4E 20 46 49 47 55 52 45  |.ONTH ..N FIGURE|
00000480: 53 92 20 3A 20 22 3B 3A  50 33 B2 32 3A 50 34 B2  |S. : ";:P3.2:P4.|
00000490: 31 3A 8D 33 30 30 30 30  00 C0 0C 9E 02 59 B2 C5  |1:.30000.....Y..|
000004A0: 28 50 24 29 3A 50 4D B2  59 3A 8B 59 B3 31 B0 59  |(P$):PM.Y:.Y.1.Y|
000004B0: B1 31 32 A7 99 22 91 91  91 91 22 3A 89 36 35 30  |.12.."....":.650|
000004C0: 00 F6 0C A8 02 99 22 11  11 D4 59 50 45 20 4F 46  |......"...YPE OF|
000004D0: 20 45 58 50 45 4E 53 45  20 12 D2 45 46 20 CE 4F  | EXPENSE ..EF .O|
000004E0: 20 4F 4E 4C 59 92 3A 20  22 3B 3A 50 33 B2 32 3A  | ONLY.: ";:P3.2:|
000004F0: 8D 33 30 30 30 30 00 18  0D B2 02 58 B2 C5 28 50  |.30000.....X..(P|
00000500: 24 29 3A 8B 58 B3 31 B0  58 B1 43 A7 99 22 91 91  |$):.X.1.X.C.."..|
00000510: 91 91 22 3A 89 36 38 30  00 28 0D B4 02 58 B2 58  |..":.680.(...X.X|
00000520: AB 31 3A 59 B2 59 AB 31  00 6F 0D B5 02 8B 43 31  |.1:Y.Y.1.o....C1|
00000530: 25 28 58 2C 59 29 B1 31  34 A7 99 22 12 11 11 D3  |%(X,Y).14.."....|
00000540: 4F 52 52 59 2C 4E 4F 20  4D 4F 52 45 20 45 4E 54  |ORRY,NO MORE ENT|
00000550: 52 49 45 53 20 46 52 45  45 20 49 4E 20 54 48 49  |RIES FREE IN THI|
00000560: 53 20 50 41 47 45 92 11  22 3A 89 31 30 33 30 00  |S PAGE..":.1030.|
00000570: BE 0D B6 02 99 22 93 D2  45 43 4F 52 44 20 CE 4F  |....."..ECORD .O|
00000580: 22 43 31 25 28 58 2C 59  29 AA 31 22 4F 46 20 31  |"C1%(X,Y).1"OF 1|
00000590: 35 20 3A 22 3A 99 22 A3  A3 A3 A3 A3 A3 A3 A3 A3  |5 :":.".........|
000005A0: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 22 3A 99 22 11 45  |..........":.".E|
000005B0: 58 50 45 4E 53 45 20 20  20 20 3A 20 22 3B 00 E8  |XPENSE    : ";..|
000005C0: 0D BA 02 99 45 44 24 28  58 29 3A 99 22 11 CD 4F  |....ED$(X):."..O|
000005D0: 4E 54 48 20 20 20 20 20  20 3A 20 22 4D 44 24 28  |NTH      : "MD$(|
000005E0: 59 29 22 20 22 59 52 24  00 25 0E BC 02 99 22 11  |Y)" "YR$.%....".|
000005F0: C4 41 59 20 20 20 20 20  20 20 20 3A 20 22 3B 3A  |.AY        : ";:|
00000600: 8D 33 30 30 30 30 3A 44  24 B2 50 24 3A 8D 31 35  |.30000:D$.P$:.15|
00000610: 30 30 30 3A 8B 50 36 B2  31 A7 99 22 91 91 91 22  |000:.P6.1.."..."|
00000620: 3A 89 37 30 30 00 3C 0E  D0 02 8B C3 28 44 24 29  |:.700.<.....(D$)|
00000630: B3 32 A7 44 24 B2 22 30  22 AA 44 24 00 73 0E DA  |.2.D$."0".D$.s..|
00000640: 02 99 22 91 22 A3 31 33  29 44 24 3A 99 22 11 D0  |..".".13)D$:."..|
00000650: 41 49 44 20 42 59 20 20  20 20 3A 20 31 2E 20 C3  |AID BY    : 1. .|
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 32 21 0B 0C 99 22 93  CC 4F 41 44 20 59 4F 55  |.2!..."..OAD YOU|
00001910: 52 20 54 41 50 45 20 26  20 53 45 54 20 54 4F 20  |R TAPE & SET TO |
00001920: 43 4F 52 52 45 43 54 20  43 4F 55 4E 54 45 52 22  |CORRECT COUNTER"|
00001930: 3A 99 00 7E 21 0D 0C 99  22 C5 4E 54 45 52 20 4E  |:..~!...".NTER N|
00001940: 41 4D 45 20 4F 46 20 46  49 4C 45 20 54 4F 20 42  |AME OF FILE TO B|
00001950: 45 20 4C 4F 41 44 45 44  22 3A 99 22 CD 41 58 20  |E LOADED":.".AX |
00001960: 31 36 20 43 48 41 52 41  43 54 45 52 53 3A 20 22  |16 CHARACTERS: "|
00001970: 3B 3A 50 33 B2 31 36 3A  8D 33 30 30 30 30 00 A3  |;:P3.16:.30000..|
00001980: 21 1C 0C 9F 32 2C 31 2C  30 2C 50 24 3A 84 32 2C  |!...2,1,0,P$:.2,|
00001990: 59 52 24 3A 84 32 2C 43  3A 8B 43 B2 31 30 A7 33  |YR$:.2,C:.C.10.3|
000019A0: 31 31 35 00 C9 21 25 0C  81 58 B2 31 30 A4 43 AB  |115..!%..X.10.C.|
000019B0: 31 3A 84 32 2C 45 44 24  28 58 29 3A 82 58 3A 8B  |1:.2,ED$(X):.X:.|
000019C0: 43 B2 31 35 A7 43 B2 31  34 00 D1 21 2B 0C 59 B2  |C.15.C.14..!+.Y.|
000019D0: 30 00 F9 21 30 0C 81 58  B2 30 A4 43 3A 84 32 2C  |0..!0..X.0.C:.2,|
000019E0: 43 31 25 28 58 2C 59 29  3A 8B 43 31 25 28 58 2C  |C1%(X,Y):.C1%(X,|
000019F0: 59 29 B2 30 A7 33 32 30  30 00 0C 22 4E 0C 84 32  |Y).0.3200.."N..2|
00001A00: 2C 54 54 28 58 2C 59 29  3A 5A B2 30 00 21 22 62  |,TT(X,Y):Z.0.!"b|
00001A10: 0C 8B 5A B2 43 31 25 28  58 2C 59 29 A7 33 32 30  |..Z.C1%(X,Y).320|
00001A20: 30 00 44 22 6C 0C 84 32  2C 45 58 24 28 58 2C 59  |0.D"l..2,EX$(X,Y|
00001A30: 2C 5A 29 3A 5A B2 5A AA  31 3A 8B 5A B3 31 36 A7  |,Z):Z.Z.1:.Z.16.|
00001A40: 33 31 37 30 00 4B 22 80  0C 82 58 00 6D 22 8A 0C  |3170.K"...X.m"..|
00001A50: 84 32 2C 54 54 28 31 35  2C 59 29 3A 59 B2 59 AA  |.2,TT(15,Y):Y.Y.|
00001A60: 31 3A 8B 59 B3 B2 31 31  A7 33 31 32 30 00 9F 22  |1:.Y..11.3120.."|
00001A70: 8C 0C 81 58 B2 30 A4 43  3A 84 32 2C 54 54 28 58  |...X.0.C:.2,TT(X|
00001A80: 2C 31 32 29 3A 82 58 3A  84 32 2C 54 54 28 31 35  |,12):.X:.2,TT(15|
00001A90: 2C 31 32 29 3A 8B 43 B2  31 34 A7 43 B2 31 35 00  |,12):.C.14.C.15.|
00001AA0: B5 22 99 0C A0 32 3A 46  32 B2 30 3A 46 33 B2 31  |."...2:F2.0:F3.1|
00001AB0: 3A 89 31 32 30 00 C4 22  E4 0C 8B 46 32 B2 31 A7  |:.120.."...F2.1.|
00001AC0: 33 33 30 37 00 F5 22 E5  0C 99 22 93 C4 4F 20 59  |3307.."..."..O Y|
00001AD0: 4F 55 20 57 49 53 48 20  54 4F 20 53 49 47 4E 2D  |OU WISH TO SIGN-|
00001AE0: 4F 46 46 22 3B 3A 8D 36  30 30 30 3A 8B 50 36 B2  |OFF";:.6000:.P6.|
00001AF0: 32 A7 31 32 30 00 34 23  E9 0C 99 22 93 11 1D 1D  |2.120.4#..."....|
00001B00: 1D 1D 1D 1D 4F 4B 2C 20  4E 4F 57 20 53 49 47 4E  |....OK, NOW SIGN|
00001B10: 49 4E 47 2D 4F 46 46 22  3A 97 35 33 32 38 30 2C  |ING-OFF":.53280,|
00001B20: 31 34 3A 99 C7 28 39 29  3A 97 35 33 32 37 32 2C  |14:..(9):.53272,|
00001B30: 32 31 3A 80 00 7F 23 EB  0C 99 22 93 D9 4F 55 20  |21:...#..."..OU |
00001B40: 48 41 56 45 20 4D 41 44  45 20 53 4F 4D 45 20 41  |HAVE MADE SOME A|
00001B50: 4C 54 45 52 41 54 49 4F  4E 53 22 3A 99 22 11 C4  |LTERATIONS":."..|
00001B60: 4F 20 59 4F 55 20 57 49  53 48 20 54 4F 20 53 41  |O YOU WISH TO SA|
00001B70: 56 45 20 54 48 45 4D 22  3B 3A 8D 36 30 30 30 00  |VE THEM";:.6000.|
00001B80: 8E 23 EE 0C 8B 50 36 B2  32 A7 33 33 30 31 00 BD  |.#...P6.2.3301..|
00001B90: 23 F3 0C 99 22 11 CC 4F  41 44 20 41 4E 44 20 53  |#..."..OAD AND S|
00001BA0: 45 54 20 54 41 50 45 20  54 4F 20 43 4F 52 52 45  |ET TAPE TO CORRE|
00001BB0: 43 54 20 43 4F 55 4E 54  45 52 22 3A 99 00 08 24  |CT COUNTER":...$|
00001BC0: F5 0C 99 22 C5 4E 54 45  52 20 4E 41 4D 45 20 4F  |...".NTER NAME O|
00001BD0: 46 20 46 49 4C 45 20 54  4F 20 42 45 20 53 41 56  |F FILE TO BE SAV|
00001BE0: 45 44 22 3A 99 22 CD 41  58 20 31 36 20 43 48 41  |ED":.".AX 16 CHA|
00001BF0: 52 41 43 54 45 52 53 3A  20 22 3B 3A 50 33 B2 31  |RACTERS: ";:P3.1|
00001C00: 36 3A 8D 33 30 30 30 30  00 12 24 F8 0C 42 24 B2  |6:.30000..$..B$.|
00001C10: 50 24 00 37 24 0C 0D 9F  32 2C 31 2C 31 2C 42 24  |P$.7$...2,1,1,B$|
00001C20: 3A 98 32 2C 59 52 24 3A  98 32 2C 43 3A 8B 43 B2  |:.2,YR$:.2,C:.C.|
00001C30: 31 30 A7 33 33 36 30 00  5D 24 1A 0D 81 58 B2 31  |10.3360.]$...X.1|
00001C40: 30 A4 43 AB 31 3A 98 32  2C 45 44 24 28 58 29 3A  |0.C.1:.2,ED$(X):|
00001C50: 82 58 3A 8B 43 B2 31 35  A7 43 B2 31 34 00 65 24  |.X:.C.15.C.14.e$|
00001C60: 20 0D 59 B2 30 00 8D 24  2A 0D 81 58 B2 30 A4 43  | .Y.0..$*..X.0.C|
00001C70: 3A 98 32 2C 43 31 25 28  58 2C 59 29 3A 8B 43 31  |:.2,C1%(X,Y):.C1|
00001C80: 25 28 58 2C 59 29 B2 30  A7 33 34 35 30 00 A0 24  |%(X,Y).0.3450..$|
00001C90: 48 0D 98 32 2C 54 54 28  58 2C 59 29 3A 5A B2 30  |H..2,TT(X,Y):Z.0|
00001CA0: 00 B5 24 5C 0D 8B 5A B2  43 31 25 28 58 2C 59 29  |..$\..Z.C1%(X,Y)|
00001CB0: A7 33 34 35 30 00 D8 24  66 0D 98 32 2C 45 58 24  |.3450..$f..2,EX$|
00001CC0: 28 58 2C 59 2C 5A 29 3A  5A B2 5A AA 31 3A 8B 5A  |(X,Y,Z):Z.Z.1:.Z|
00001CD0: B3 31 36 A7 33 34 32 30  00 FD 24 7A 0D 82 58 3A  |.16.3420..$z..X:|
00001CE0: 98 32 2C 54 54 28 31 35  2C 59 29 3A 59 B2 59 AA  |.2,TT(15,Y):Y.Y.|
00001CF0: 31 3A 8B 59 B3 B2 31 31  A7 33 33 37 30 00 32 25  |1:.Y..11.3370.2%|
00001D00: 90 0D 81 58 B2 30 A4 43  3A 98 32 2C 54 54 28 58  |...X.0.C:.2,TT(X|
00001D10: 2C 31 32 29 3A 82 58 3A  98 32 2C 54 54 28 31 35  |,12):.X:.2,TT(15|
00001D20: 2C 31 32 29 3A A0 32 3A  8B 43 B2 31 34 A7 43 B2  |,12):.2:.C.14.C.|
00001D30: 31 35 00 6C 25 A2 0D 99  22 11 11 C4 4F 20 59 4F  |15.l%..."...O YO|
00001D40: 55 20 57 49 53 48 20 54  4F 20 53 41 56 45 20 54  |U WISH TO SAVE T|
00001D50: 48 45 4D 20 41 47 41 49  4E 22 3B 3A 8D 36 30 30  |HEM AGAIN";:.600|
00001D60: 30 3A 8B 50 36 B2 32 A7  33 33 30 31 00 76 25 C0  |0:.P6.2.3301.v%.|
00001D70: 0D 89 33 33 34 30 00 B0  25 10 0E 99 22 93 C5 4E  |..3340..%..."..N|
00001D80: 54 45 52 20 45 58 50 45  4E 53 45 20 41 4E 41 4C  |TER EXPENSE ANAL|
00001D90: 59 53 49 53 20 54 4F 20  42 45 20 50 52 49 4E 54  |YSIS TO BE PRINT|
00001DA0: 45 44 3A 11 22 3A 46 34  B2 31 3A 8D 31 35 31 30  |ED:.":F4.1:.1510|
00001DB0: 00 C5 25 1A 0E 8B 46 35  B2 31 A7 46 35 B2 30 3A  |..%...F5.1.F5.0:|
00001DC0: 89 33 36 33 30 00 F3 25  24 0E 99 22 11 C4 4F 20  |.3630..%$.."..O |
00001DD0: 59 4F 55 20 57 49 53 48  20 54 4F 20 50 52 49 4E  |YOU WISH TO PRIN|
00001DE0: 54 22 3B 3A 8D 36 30 30  30 3A 8B 50 36 B2 32 A7  |T";:.6000:.P6.2.|
00001DF0: 31 32 30 00 06 26 2B 0E  99 22 91 22 53 50 24 3A  |120..&+.."."SP$:|
00001E00: 8D 36 30 30 30 30 00 30  26 2E 0E 99 22 11 11 C1  |.60000.0&..."...|
00001E10: 4E 59 20 4F 54 48 45 52  22 3B 3A 8D 36 30 30 30  |NY OTHER";:.6000|
00001E20: 3A 8B 50 36 B2 32 A7 46  34 B2 30 3A 89 31 32 30  |:.P6.2.F4.0:.120|
00001E30: 00 3A 26 4C 0E 89 33 36  30 30 00 4E 26 88 13 A1  |.:&L..3600.N&...|
00001E40: 41 24 3A 8B 41 24 B2 22  22 A7 35 30 30 30 00 54  |A$:.A$."".5000.T|
00001E50: 26 92 13 8E 00 69 26 70  17 99 22 20 12 81 D9 9A  |&....i&p.." ....|
00001E60: 92 2F 12 81 CE 9A 92 3F  22 00 87 26 7A 17 A1 41  |./.....?"..&z..A|
00001E70: 24 3A 8B 41 24 B3 B1 22  59 22 AF 41 24 B3 B1 22  |$:.A$.."Y".A$.."|
00001E80: 4E 22 A7 36 30 31 30 00  9A 26 84 17 8B 41 24 B2  |N".6010..&...A$.|
00001E90: 22 59 22 A7 50 36 B2 31  3A 8E 00 A5 26 8E 17 50  |"Y".P6.1:...&..P|
00001EA0: 36 B2 32 3A 8E 00 EC 26  58 1B 81 4E B2 30 A4 34  |6.2:...&X..N.0.4|
00001EB0: 3A 99 4E AA 31 22 9D 2E  22 45 44 24 28 4E 29 A3  |:.N.1".."ED$(N).|
00001EC0: 31 32 29 4E AA 36 22 9D  2E 22 45 44 24 28 4E AA  |12)N.6".."ED$(N.|
00001ED0: 35 29 A3 32 35 29 4E AA  31 31 22 9D 2E 22 45 44  |5).25)N.11".."ED|
00001EE0: 24 28 4E AA 31 30 29 3A  99 3A 82 4E 00 F2 26 62  |$(N.10):.:.N..&b|
00001EF0: 1B 8E 00 10 27 28 23 99  22 93 C1 52 45 20 59 4F  |....'(#."..RE YO|
00001F00: 55 20 53 55 52 45 22 3B  3A 8D 36 30 30 30 3A 8E  |U SURE";:.6000:.|
00001F10: 00 24 27 10 27 4E B2 C5  28 43 24 29 3A 4E B2 A5  |.$'.'N..(C$):N..|
00001F20: 42 28 4E 29 00 30 27 1A  27 43 24 B2 C4 28 4E 29  |B(N).0'.'C$..(N)|
00001F30: 00 57 27 1F 27 81 4E B2  C3 28 43 24 29 A4 31 A9  |.W'.'.N..(C$).1.|
00001F40: AB 31 3A 8B CA 28 43 24  2C 4E 2C 31 29 B2 22 2E  |.1:..(C$,N,1).".|
00001F50: 22 A7 31 30 30 35 30 00  71 27 38 27 82 4E 3A 43  |".10050.q'8'.N:C|
00001F60: 24 B2 43 24 AA 22 2E 30  30 22 3A 89 31 30 30 36  |$.C$.".00":.1006|
00001F70: 30 00 8A 27 42 27 8B 4E  B2 C3 28 43 24 29 AB 31  |0..'B'.N..(C$).1|
00001F80: A7 43 24 B2 43 24 AA 22  30 22 00 A2 27 4C 27 43  |.C$.C$."0"..'L'C|
00001F90: 24 B2 C9 28 28 53 50 24  AA 43 24 29 2C 4A 53 29  |$..((SP$.C$),JS)|
00001FA0: 3A 8E 00 BA 27 74 27 54  54 28 41 2C 42 29 B2 54  |:...'t'TT(A,B).T|
00001FB0: 54 28 41 2C 42 29 AB 4D  3A 8E 00 D2 27 D8 27 54  |T(A,B).M:...'.'T|
00001FC0: 54 28 41 2C 42 29 B2 54  54 28 41 2C 42 29 AA 4D  |T(A,B).TT(A,B).M|
00001FD0: 3A 8E 00 09 28 04 29 83  47 52 4F 43 45 52 49 45  |:...(.).GROCERIE|
00001FE0: 53 2C 4A 41 4E 55 41 52  59 2C 43 4C 4F 54 48 45  |S,JANUARY,CLOTHE|
00001FF0: 53 2C 46 45 42 52 55 41  52 59 2C 4D 49 53 43 45  |S,FEBRUARY,MISCE|
00002000: 4C 4C 2E 2C 4D 41 52 43  48 00 52 28 0E 29 83 20  |LL.,MARCH.R(.). |
00002010: 41 53 53 45 54 53 2C 41  50 52 49 4C 2C 52 45 4E  |ASSETS,APRIL,REN|
00002020: 54 2F 4D 4F 52 54 2C 4D  41 59 2C 54 45 4C 45 50  |T/MORT,MAY,TELEP|
00002030: 48 4F 4E 45 2C 4A 55 4E  45 2C 45 4C 45 43 54 52  |HONE,JUNE,ELECTR|
00002040: 49 43 2E 2C 4A 55 4C 59  2C 49 4E 53 55 52 41 4E  |IC.,JULY,INSURAN|
00002050: 43 45 00 9E 28 18 29 83  41 55 47 55 53 54 2C 54  |CE..(.).AUGUST,T|
00002060: 52 41 56 45 4C 2C 53 45  50 54 45 4D 42 45 52 2C  |RAVEL,SEPTEMBER,|
00002070: 4D 4F 54 4F 52 20 43 41  52 2C 4F 43 54 4F 42 45  |MOTOR CAR,OCTOBE|
00002080: 52 2C 2A 2A 2A 2A 2A 2A  2A 2A 2A 2C 4E 4F 56 45  |R,*********,NOVE|
00002090: 4D 42 45 52 2C 2A 2A 2A  2A 2A 2A 2A 2A 2A 00 CB  |MBER,*********..|
000020A0: 28 22 29 83 20 44 45 43  45 4D 42 45 52 2C 2A 2A  |("). DECEMBER,**|
000020B0: 2A 2A 2A 2A 2A 2A 2A 2C  2A 2A 2A 2A 2A 2A 2A 2A  |*******,********|
000020C0: 2A 2C 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 0D 29 98 3A  |*,*********..).:|
000020D0: 41 4D 24 B2 22 33 31 32  38 33 31 33 30 33 31 33  |AM$."31283130313|
000020E0: 30 33 31 33 31 33 30 33  31 33 30 33 31 22 3A 41  |0313130313031":A|
000020F0: 4C 24 B2 22 33 31 32 39  33 31 33 30 33 31 33 30  |L$."312931303130|
00002100: 33 31 33 31 33 30 33 31  33 30 33 31 22 00 16 29  |313130313031"..)|
00002110: AC 3A 50 36 B2 30 00 54  29 B6 3A 50 44 B2 C5 28  |.:P6.0.T).:PD..(|
00002120: 44 24 29 3A 8B 50 44 B3  31 B0 50 44 B1 33 31 A7  |D$):.PD.1.PD.31.|
00002130: 50 36 B2 31 3A 50 59 B2  C5 28 59 52 24 29 3A 8B  |P6.1:PY..(YR$):.|
00002140: B5 28 50 59 AD 34 29 B2  50 59 AD 34 A7 41 4D 24  |.(PY.4).PY.4.AM$|
00002150: B2 41 4C 24 00 74 29 CA  3A 8B 50 44 B1 C5 28 CA  |.AL$.t).:.PD..(.|
00002160: 28 41 4D 24 2C 50 4D AC  32 AB 31 2C 32 29 29 A7  |(AM$,PM.2.1,2)).|
00002170: 50 36 B2 31 00 7A 29 D4  3A 8E 00 C0 29 80 3E 99  |P6.1.z).:...).>.|
00002180: 22 93 D0 4C 45 41 53 45  20 45 4E 54 45 52 20 59  |"..LEASE ENTER Y|
00002190: 45 41 52 20 3A 20 31 39  22 3B 3A 50 33 B2 32 3A  |EAR : 19";:P3.2:|
000021A0: 50 34 B2 31 3A 8D 33 30  30 30 30 3A 59 52 24 B2  |P4.1:.30000:YR$.|
000021B0: 22 31 39 22 AA 50 24 3A  41 B2 C5 28 59 52 24 29  |"19".P$:A..(YR$)|
000021C0: 00 D9 29 8A 3E 8B 41 B3  31 39 37 30 B0 41 B1 31  |..).>.A.1970.A.1|
000021D0: 39 39 39 A7 31 36 30 30  30 00 DF 29 94 3E 8E 00  |999.16000..).>..|
000021E0: 0E 2A 30 75 81 51 B2 31  A4 50 33 3A 99 22 A4 22  |.*0u.Q.1.P3:."."|
000021F0: 3B 3A 82 3A 81 51 B2 31  A4 50 33 3A 99 22 9D 22  |;:.:.Q.1.P3:."."|
00002200: 3B 3A 82 3A 50 24 B2 22  22 3A 50 58 B2 30 00 23  |;:.:P$."":PX.0.#|
00002210: 2A D0 75 A1 41 24 3A 8B  41 24 B2 22 22 A7 33 30  |*.u.A$:.A$."".30|
00002220: 31 36 30 00 42 2A DA 75  41 B2 C6 28 41 24 29 3A  |160.B*.uA..(A$):|
00002230: 8B 41 B1 31 39 31 AF 41  B3 32 31 39 A7 33 30 32  |.A.191.A.219.302|
00002240: 30 30 00 81 2A E4 75 8B  28 41 B1 33 31 AF 41 B3  |00..*.u.(A.31.A.|
00002250: B1 34 34 AF 41 B3 B1 33  34 AF 41 B3 B1 35 38 AF  |.44.A..34.A..58.|
00002260: 41 B3 B1 35 39 AF 41 B3  39 37 29 B0 41 B2 31 33  |A..59.A.97).A.13|
00002270: B0 41 B2 32 30 B0 41 B2  31 35 37 A7 33 30 32 30  |.A.20.A.157.3020|
00002280: 30 00 8C 2A EE 75 89 33  30 31 36 30 00 9C 2A F8  |0..*.u.30160..*.|
00002290: 75 8B 41 B2 31 33 A7 33  30 33 32 30 00 B3 2A 02  |u.A.13.30320..*.|
000022A0: 76 8B 41 B2 31 35 37 AF  50 24 B2 22 22 A7 33 30  |v.A.157.P$."".30|
000022B0: 30 30 30 00 C3 2A 0C 76  8B 41 B2 32 30 A7 33 30  |000..*.v.A.20.30|
000022C0: 32 35 30 00 D4 2A 11 76  8B 50 58 B2 50 33 A7 33  |250..*.v.PX.P3.3|
000022D0: 30 31 36 30 00 E6 2A 16  76 8B 41 B3 B1 31 35 37  |0160..*.v.A..157|
000022E0: A7 33 30 32 38 30 00 0A  2B 1B 76 50 58 B2 C3 28  |.30280..+.vPX..(|
000022F0: 50 24 29 3A 81 51 B2 31  A4 50 58 3A 99 22 9D 22  |P$):.Q.1.PX:."."|
00002300: 3B 3A 82 3A 89 33 30 30  30 30 00 1B 2B 2A 76 8B  |;:.:.30000..+*v.|
00002310: 50 24 B2 22 22 A7 33 30  31 36 30 00 48 2B 34 76  |P$."".30160.H+4v|
00002320: 50 24 B2 C8 28 50 24 2C  C3 28 50 24 29 AB 31 29  |P$..(P$,.(P$).1)|
00002330: 3A 41 24 B2 22 9D A4 9D  22 3A 50 58 B2 50 58 AB  |:A$."...":PX.PX.|
00002340: 31 3A 89 33 30 33 30 30  00 5C 2B 48 76 8B C3 28  |1:.30300.\+Hv..(|
00002350: 50 24 29 B2 50 33 A7 33  30 33 33 30 00 72 2B 52  |P$).P3.30330.r+R|
00002360: 76 50 24 B2 50 24 AA 41  24 3A 50 58 B2 C3 28 50  |vP$.P$.A$:PX..(P|
00002370: 24 29 00 82 2B 5C 76 99  41 24 3B 3A 89 33 30 31  |$)..+\v.A$;:.301|
00002380: 36 30 00 96 2B 70 76 8B  C3 28 50 24 29 B3 50 34  |60..+pv..(P$).P4|
00002390: A7 33 30 31 36 30 00 9E  2B 7A 76 99 3A 8E 00 B6  |.30160..+zv.:...|
000023A0: 2B AC 8A 81 51 B2 31 A4  33 37 3A 99 22 C0 22 3B  |+...Q.1.37:.".";|
000023B0: 3A 82 3A 99 3A 8E 00 E6  2B 60 EA 97 35 33 32 36  |:.:.:...+`..5326|
000023C0: 35 2C 31 31 3A 47 31 24  B2 C7 28 31 37 29 3A 9F  |5,11:G1$..(17):.|
000023D0: 34 2C 34 3A 98 34 2C C7  28 31 35 29 3A 98 34 3A  |4,4:.4,.(15):.4:|
000023E0: 47 31 B2 39 38 34 00 1A  2C 88 EA 81 47 30 B2 30  |G1.984..,...G0.0|
000023F0: A4 32 34 3A 47 30 24 B2  47 31 24 3A 47 31 B2 47  |.24:G0$.G1$:G1.G|
00002400: 31 AA 34 30 3A 81 47 32  B2 47 31 A4 47 31 AA 33  |1.40:.G2.G1.G1.3|
00002410: 39 3A 47 33 B2 C2 28 47  32 29 00 43 2C 92 EA 8B  |9:G3..(G2).C,...|
00002420: 47 33 B1 31 32 38 A7 47  33 B2 47 33 AB 31 32 38  |G3.128.G3.G3.128|
00002430: 3A 47 34 B2 31 3A 47 30  24 B2 47 30 24 AA C7 28  |:G4.1:G0$.G0$..(|
00002440: 31 38 29 00 67 2C 9C EA  8B 28 47 33 B1 30 29 AC  |18).g,...(G3.0).|
00002450: 28 47 33 B3 33 32 29 A7  47 33 B2 47 33 AA 36 34  |(G3.32).G3.G3.64|
00002460: 3A 89 36 30 31 30 30 00  82 2C A6 EA 8B 28 47 33  |:.60100..,...(G3|
00002470: B1 33 31 29 AC 28 47 33  B3 36 34 29 A7 36 30 31  |.31).(G3.64).601|
00002480: 30 30 00 A8 2C B0 EA 8B  28 47 33 B1 36 33 29 AC  |00..,...(G3.63).|
00002490: 28 47 33 B3 39 36 29 A7  47 33 B2 47 33 AA 31 32  |(G3.96).G3.G3.12|
000024A0: 38 3A 89 36 30 31 30 30  00 CE 2C BA EA 8B 28 47  |8:.60100..,...(G|
000024B0: 33 B1 39 35 29 AC 28 47  33 B3 31 32 38 29 A7 47  |3.95).(G3.128).G|
000024C0: 33 B2 47 33 AA 36 34 3A  89 36 30 31 30 30 00 E0  |3.G3.64:.60100..|
000024D0: 2C C4 EA 47 30 24 B2 47  30 24 AA C7 28 47 33 29  |,..G0$.G0$..(G3)|
000024E0: 00 FE 2C CE EA 8B 47 34  B2 31 A7 47 30 24 B2 47  |..,...G4.1.G0$.G|
000024F0: 30 24 AA C7 28 31 34 36  29 3A 47 34 B2 30 00 2D  |0$..(146):G4.0.-|
00002500: 2D D8 EA 82 47 32 3A 98  34 2C 47 30 24 3A 82 47  |-...G2:.4,G0$:.G|
00002510: 30 3A 98 34 3A 98 34 2C  C7 28 31 34 35 29 3A A0  |0:.4:.4,.(145):.|
00002520: 34 3A 97 35 33 32 36 35  2C 32 37 3A 8E 00 3B 2D  |4:.53265,27:..;-|
00002530: FF F9 8F 20 56 32 2E 30  28 54 29 00 00 00 00 D2  |... V2.0(T).....|
00002540: FF                                                |.               |
..?.... *EXPENSE MANAGER* BY BERNARD HAB
ET (C) 1983 ABRASCO LTD...(..".";:.53280
,6:.EX$(14,11,14),TT(15,12),C1%(14,11),E
D$(14),MD$(11).C.,.SP$."                
         ":.N.0.14:.ED$(N):.N.11.90.O.P.
.MD$(N)...Z..N:C.10:..B(N)..(N.100.0.005
).100:.53272,23:.G(8).J.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".F. 
...10)"... 2 .. NEW ENTRIES":..10)"... 3
 .. DELETIONS".......10)"... 4 .. ANALYS
IS".$.....10)"... 5 .. PRINT EXPENSES":.
.10)"... 6 .. SAVE/SIGN-OFF".W....5000:.
E(A$).3080,500,2597,1497,3600,3300:.280.
K....9000:.P6.2.120.Z....F3..0.506......
"..ATTENTION:.":.".YOU HAVE NOT LOADED A
NY DATA. IF YOU DO"......"SO LATER, ANY 
ENTRIES ENTERED BEFORE":."WILL BE LOST."
.)...."..DO YOU WISH TO PROCEED";:.6000:
.P6.2.120.F...F3.1:F1.0:.YR$.""..16000..
....".".7)"N E W   E N T R I E S":..7)".
.....................":.7000...5..C.14.F
1.1..".":.640.O.:..".ANY NEW HEADINGS";:
.6000:.P6.2.640...B..".ENTER NEW HEADING
: ";:P3.9:P4.1:.30000. .G.A.F(P$):.A.65.
A.90.."...":.610.9.L.ED$(C).P$:C.C.1:.51
0.G....".PLEASE ENTER THE FOLLOWING:":.F
1.1.680......"..MONTH .IN FIGURES. : ";:
P3.2:P4.1:.30000.....Y.E(P$):PM.Y:.Y.1.Y
.12.."....":.650......"..TYPE OF EXPENSE
 .REF NO ONLY.: ";:P3.2:.30000.....X.E(P
$):.X.1.X.C.."....":.680.(...X.X.1:Y.Y.1
.O....C1%(X,Y).14.."...SORRY,NO MORE ENT
RIES FREE IN THIS PAGE..":.1030......".R
ECORD 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
.2!...".LOAD YOUR TAPE & SET TO CORRECT 
COUNTER":..~!..."ENTER NAME OF FILE TO B
E LOADED":."MAX 16 CHARACTERS: ";:P3.16:
.30000..!...2,1,0,P$:.2,YR$:.2,C:.C.10.3
115.I!%..X.10.C.1:.2,ED$(X):.X:.C.15.C.1
4.Q!+.Y.0..!0..X.0.C:.2,C1%(X,Y):.C1%(X,
Y).0.3200.."N..2,TT(X,Y):Z.0.!"B..Z.C1%(
X,Y).3200.D"L..2,EX$(X,Y,Z):Z.Z.1:.Z.16.
3170.K"...X.M"...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:F2.0:F3.1:.120.D"
...F2.1.3307.."...".DO YOU WISH TO SIGN-
OFF";:.6000:.P6.2.120.4#..."........OK, 
NOW SIGNING-OFF":.53280,14:.G(9):.53272,
21:..#...".YOU HAVE MADE SOME ALTERATIO
NS":.".DO YOU WISH TO SAVE THEM";:.6000.
.#...P6.2.3301..#...".LOAD AND SET TAPE 
TO CORRECT COUNTER":...$..."ENTER NAME O
F FILE TO BE SAVED":."MAX 16 CHARACTERS:
 ";:P3.16:.30000..$..B$.P$.7$...2,1,1,B$
:.2,YR$:.2,C:.C.10.3360.]$...X.10.C.1:.2
,ED$(X):.X:.C.15.C.14.E$ .Y.0..$*..X.0.C
:.2,C1%(X,Y):.C1%(X,Y).0.3450. $H..2,TT(
X,Y):Z.0..$\..Z.C1%(X,Y).3450.X$F..2,EX$
(X,Y,Z):Z.Z.1:.Z.16.3420..$Z..X:.2,TT(15
,Y):Y.Y.1:.Y..11.3370.2%...X.0.C:.2,TT(X
,12):.X:.2,TT(15,12): 2:.C.14.C.15.L%...
"..DO YOU WISH TO SAVE THEM AGAIN";:.600
0:.P6.2.3301.V%...3340..%...".ENTER EXPE
NSE ANALYSIS TO BE PRINTED:.":F4.1:.1510
.E%...F5.1.F5.0:.3630..%$..".DO YOU WISH
 TO PRINT";:.6000:.P6.2.120..&+.."."SP$:
.60000.0&..."..ANY OTHER";:.6000:.P6.2.F
4.0:.120.:&L..3600.N&...A$:.A$."".5000.T
&....I&P.." ..Y../..N..?"..&Z..A$:.A$.."
Y".A$.."N".6010..&...A$."Y".P6.1:...&..P
6.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:..$'.'N.E
(C$):N..B(N).0'.'C$.D(N).W'.'.N.C(C$).1.
.1:.J(C$,N,1).".".10050.Q'8'.N:C$.C$.".0
0":.10060..'B'.N.C(C$).1.C$.C$."0"..'L'C
$.I((SP$.C$),JS):...'T'TT(A,B).TT(A,B).M
:..R'X'TT(A,B).TT(A,B).M:...(.).GROCERIE
S,JANUARY,CLOTHES,FEBRUARY,MISCELL.,MARC
H.R(.). ASSETS,APRIL,RENT/MORT,MAY,TELEP
HONE,JUNE,ELECTRIC.,JULY,INSURANCE..(.).
AUGUST,TRAVEL,SEPTEMBER,MOTOR CAR,OCTOBE
R,*********,NOVEMBER,*********.K("). DEC
EMBER,*********,*********,*********..).:
AM$."312831303130313130313031":AL$."3129
31303130313130313031"..).:P6.0.T).:PD.E(
D$):.PD.1.PD.31.P6.1:PY.E(YR$):..(PY.4).
PY.4.AM$.AL$.T)J:.PD.E(J(AM$,PM.2.1,2)).
P6.1.Z)T:...).>.".PLEASE ENTER YEAR : 19
";:P3.2:P4.1:.30000:YR$."19".P$:A.E(YR$)
.Y).>.A.1970.A.1999.16000..).>...*0U.Q.1
.P3:.".";:.:.Q.1.P3:.".";:.:P$."":PX.0.#
*PU.A$:.A$."".30160.B*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.3
0160..*.U.A.13.30320..*.V.A.157.P$."".30
000.C*.V.A.20.30250.T*.V.PX.P3.30160..*.
V.A..157.30280..+.VPX.C(P$):.Q.1.PX:."."
;:.:.30000..+*V.P$."".30160.H+4VP$.H(P$,
C(P$).1):A$."...":PX.PX.1:.30300.\+HV.C(
P$).P3.30330.R+RVP$.P$.A$:PX.C(P$)..+\V.
A$;:.30160..+PV.C(P$).P4.30160..+ZV.:...
+...Q.1.37:.".";:.:.:...+`..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(G
2).C,...G3.128.G3.G3.128:G4.1:G0$.G0$.G(
18).G,...(G3.0).(G3.32).G3.G3.64:.60100.
.,...(G3.31).(G3.64).60100..,...(G3.63).
(G3.96).G3.G3.128:.60100.N,...(G3.95).(G
3.128).G3.G3.64:.60100..,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:..;-
... V2.0(T)....R.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL