HOUSEHOLD 2
FILE INFORMATION
FILENAME(S): HOUSEHOLD 2
FILE TYPE(S): PRG
FILE SIZE: 13.3K
FIRST SEEN: 2025-11-30 21:11:33
APPEARS ON: 2 disk(s)
FILE HASH
e5d58d478c7156daa139e8a32ef4c0be337114c1fe9ff5d590f6ede80ad46f86
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DIVERSEN | HOUSEHOLD 2 | PRG | DuncanTwain | 19 | 0 | DOWNLOAD FILE |
| C64 HULP 45 2 | HOUSEHOLD 2 | PRG | DuncanTwain | 11 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 4C 08 01 00 8F 20 20 43 42 4D 2D 36 34 20 |..L.... CBM-64 |
00000010: 48 4F 55 53 45 48 4F 4C 44 20 46 49 4E 41 4E 43 |HOUSEHOLD FINANC|
00000020: 45 20 50 41 52 54 20 32 20 20 20 20 20 20 20 20 |E PART 2 |
00000030: 20 20 28 43 29 20 31 39 38 33 20 43 52 45 41 54 | (C) 1983 CREAT|
00000040: 49 56 45 20 53 4F 46 54 57 41 52 45 00 5A 08 02 |IVE SOFTWARE.Z..|
00000050: 00 8F 20 20 37 2F 36 2F 38 33 00 85 08 0A 00 83 |.. 7/6/83......|
00000060: 20 41 55 43 4C 45 44 45 4E 46 44 47 49 48 48 49 | AUCLEDENFDGIHHI|
00000070: 4E 4D 44 4D 52 53 41 54 58 55 54 56 41 5A 5A 53 |NMDMRSATXUTVAZZS|
00000080: 57 44 49 4F 54 00 D0 08 14 00 83 20 41 55 54 4F |WDIOT...... AUTO|
00000090: 2C 43 4C 4F 54 48 49 4E 47 2C 45 44 55 43 41 54 |,CLOTHING,EDUCAT|
000000A0: 49 4F 4E 2C 45 4E 54 45 52 54 41 49 4E 4D 45 4E |ION,ENTERTAINMEN|
000000B0: 54 2C 46 4F 4F 44 2C 47 49 46 54 53 2C 48 4F 55 |T,FOOD,GIFTS,HOU|
000000C0: 53 45 48 4F 4C 44 2C 49 4E 53 55 52 41 4E 43 45 |SEHOLD,INSURANCE|
000000D0: 00 14 09 1E 00 83 20 4D 45 44 49 43 41 4C 2F 44 |...... MEDICAL/D|
000000E0: 45 4E 54 41 4C 2C 4D 4F 52 54 47 41 47 45 2F 52 |ENTAL,MORTGAGE/R|
000000F0: 45 4E 54 2C 53 41 56 49 4E 47 53 2C 54 41 58 45 |ENT,SAVINGS,TAXE|
00000100: 53 2C 55 54 49 4C 49 54 49 45 53 2C 56 41 43 41 |S,UTILITIES,VACA|
00000110: 54 49 4F 4E 00 4C 09 28 00 83 20 4D 49 53 43 45 |TION.L.(.. MISCE|
00000120: 4C 4C 41 4E 45 4F 55 53 2C 53 41 4C 41 52 59 2F |LLANEOUS,SALARY/|
00000130: 57 41 47 45 53 2C 44 49 56 49 44 45 4E 44 53 2C |WAGES,DIVIDENDS,|
00000140: 4F 54 48 45 52 20 49 4E 43 4F 4D 45 00 52 09 32 |OTHER INCOME.R.2|
00000150: 00 8F 00 81 09 3C 00 99 22 93 22 3A 49 4E B2 31 |.....<..".":IN.1|
00000160: 3A 43 B2 30 3A 86 4E 43 24 28 31 38 29 2C 45 24 |:C.0:.NC$(18),E$|
00000170: 28 34 29 2C 53 46 24 28 32 34 29 2C 4D 24 28 35 |(4),SF$(24),M$(5|
00000180: 29 00 C9 09 46 00 86 53 55 28 32 34 2C 31 38 2C |)...F..SU(24,18,|
00000190: 34 29 2C 42 55 28 32 34 29 2C 42 44 28 32 34 29 |4),BU(24),BD(24)|
000001A0: 2C 41 44 28 32 34 29 2C 41 43 28 32 34 29 2C 54 |,AD(24),AC(24),T|
000001B0: 58 28 32 34 29 2C 54 43 28 32 34 29 2C 44 44 28 |X(24),TC(24),DD(|
000001C0: 32 34 29 2C 57 28 31 35 29 00 E9 09 50 00 45 47 |24),W(15)...P.EG|
000001D0: B2 35 33 32 38 30 3A 97 45 47 2C 33 3A 97 45 47 |.53280:.EG,3:.EG|
000001E0: AA 31 2C 31 3A 8D 37 30 30 00 1F 0A 5A 00 96 A5 |.1,1:.700...Z...|
000001F0: 41 28 57 29 B2 B5 28 57 AC 31 30 AA 2E 35 29 AD |A(W)..(W.10..5).|
00000200: 31 30 3A 96 A5 42 28 57 29 B2 B5 28 57 AC 31 30 |10:..B(W)..(W.10|
00000210: 30 AA 2E 35 29 AD 31 30 30 3A 89 31 30 30 30 00 |0..5).100:.1000.|
00000220: 44 0A 64 00 8B 43 46 B2 30 A7 99 45 4F 24 A3 34 |D.d..CF.0..EO$.4|
00000230: 30 29 41 24 3B 3A 8D 31 39 30 3A 43 46 B2 31 3A |0)A$;:.190:CF.1:|
00000240: 89 31 30 34 00 65 0A 66 00 8B 43 46 B2 31 A7 99 |.104.e.f..CF.1..|
00000250: 45 4F 24 A3 34 30 29 41 31 24 3B 3A 8D 31 39 30 |EO$.40)A1$;:.190|
00000260: 3A 43 46 B2 30 00 8A 0A 68 00 A1 49 24 3A 91 AB |:CF.0...h..I$:..|
00000270: 28 49 24 B2 22 22 29 89 31 30 30 3A 49 B2 C6 28 |(I$."").100:I..(|
00000280: 49 24 29 3A 8D 31 31 30 3A 8E 00 9A 0A 6E 00 99 |I$):.110:....n..|
00000290: 45 4F 24 42 24 42 24 3B 3A 8E 00 B5 0A 78 00 8B |EO$B$B$;:....x..|
000002A0: 43 46 B2 30 A7 99 22 A6 9D 22 3B 3A 43 46 B2 31 |CF.0.."..";:CF.1|
000002B0: 3A 89 31 32 34 00 CD 0A 7A 00 8B 43 46 B2 31 A7 |:.124...z..CF.1.|
000002C0: 99 22 12 A6 9D 92 22 3B 3A 43 46 B2 30 00 ED 0A |."....";:CF.0...|
000002D0: 7C 00 A1 49 24 3A 91 AB 28 49 24 B2 22 22 29 89 ||..I$:..(I$."").|
000002E0: 31 32 30 3A 49 B2 C6 28 49 24 29 3A 8E 00 04 0B |120:I..(I$):....|
000002F0: 82 00 99 45 4F 24 A3 34 30 29 41 24 3B 3A 8D 31 |...EO$.40)A$;:.1|
00000300: 38 30 3A 8E 00 29 0B B4 00 A1 49 24 3A 91 AB 28 |80:..)....I$:..(|
00000310: 49 24 B2 22 22 29 89 31 38 30 3A 49 B2 C6 28 49 |I$."").180:I..(I|
00000320: 24 29 3A 8D 31 31 30 3A 8E 00 3B 0B BE 00 81 49 |$):.110:..;....I|
00000330: B2 30 A4 31 30 30 3A 82 49 3A 8E 00 4C 0B C8 00 |.0.100:.I:..L...|
00000340: 4E 43 B2 30 3A 81 58 B2 31 A4 31 38 00 87 0B CA |NC.0:.X.1.18....|
00000350: 00 8B 58 24 B2 CA 28 43 43 24 2C 58 AA 58 AB 31 |..X$..(CC$,X.X.1|
00000360: 2C 32 29 A7 4E 43 B2 58 3A 58 24 B2 C4 28 4E 43 |,2).NC.X:X$..(NC|
00000370: 29 3A 58 24 B2 C9 28 58 24 2C C3 28 58 24 29 AB |):X$..(X$,.(X$).|
00000380: 31 29 3A 58 B2 31 38 00 98 0B CC 00 82 58 3A 8B |1):X.18......X:.|
00000390: 4E 43 B2 30 A7 45 B2 34 00 9E 0B CE 00 8E 00 D3 |NC.0.E.4........|
000003A0: 0B 22 01 4D 4E B2 30 3A 81 58 B2 31 A4 31 32 3A |.".MN.0:.X.1.12:|
000003B0: 8B C8 28 4D 4E 24 2C 33 29 B2 CA 28 4D 53 24 2C |..(MN$,3)..(MS$,|
000003C0: 28 58 AA 32 AC 28 58 AB 31 29 29 2C 33 29 A7 4D |(X.2.(X.1)),3).M|
000003D0: 4E B2 58 00 EF 0B 24 01 8B 4D 4E B2 58 A7 4D 49 |N.X...$..MN.X.MI|
000003E0: 24 B2 C8 28 4D 4E 24 2C 33 29 3A 58 B2 31 32 00 |$..(MN$,3):X.12.|
000003F0: 02 0C 26 01 82 58 3A 8B 4D 4E B2 30 A7 45 B2 33 |..&..X:.MN.0.E.3|
00000400: 3A 8E 00 28 0C 28 01 4D 44 B2 33 31 3A 8B 4D 4E |:..(.(.MD.31:.MN|
00000410: B2 34 B0 4D 4E B2 36 B0 4D 4E B2 39 B0 4D 4E B2 |.4.MN.6.MN.9.MN.|
00000420: 31 31 A7 4D 44 B2 33 30 00 52 0C 2A 01 8B 4D 4E |11.MD.30.R.*..MN|
00000430: B2 32 A7 4D 44 B2 32 38 3A 8B C5 28 59 52 24 29 |.2.MD.28:..(YR$)|
00000440: B2 B5 28 C5 28 59 52 24 29 AD 34 29 A7 4D 44 B2 |..(.(YR$).4).MD.|
00000450: 32 39 00 58 0C 2B 01 8E 00 6B 0C 2C 01 4C 44 B2 |29.X.+...k.,.LD.|
00000460: C3 28 44 46 24 29 3A 8D 33 39 32 00 8C 0C 2E 01 |.(DF$):.392.....|
00000470: 8D 31 32 30 3A 58 B2 49 AF 31 32 37 3A 8B 58 24 |.120:X.I.127:.X$|
00000480: B2 22 22 AF 49 B2 31 33 A7 33 39 36 00 9A 0C 30 |."".I.13.396...0|
00000490: 01 8B 49 B2 31 33 A7 33 39 39 00 B2 0C 32 01 8B |..I.13.399...2..|
000004A0: 49 B2 32 30 B0 49 B2 33 32 B0 49 B2 33 38 A7 33 |I.20.I.32.I.38.3|
000004B0: 31 34 00 C3 0C 34 01 8B 49 B2 31 33 36 A7 4A B2 |14...4..I.136.J.|
000004C0: 38 3A 8E 00 D6 0C 36 01 8B 49 B3 34 35 B0 49 B1 |8:....6..I.45.I.|
000004D0: 39 30 A7 33 30 32 00 0A 0D 38 01 8B 28 49 B2 35 |90.302...8..(I.5|
000004E0: 38 B0 49 B2 35 39 B0 49 B2 36 31 B0 49 B2 36 33 |8.I.59.I.61.I.63|
000004F0: B0 49 B2 36 34 B0 58 B3 33 32 B0 58 B1 39 36 29 |.I.64.X.32.X.96)|
00000500: AF 49 B3 B1 32 30 A7 33 30 32 00 19 0D 3A 01 8B |.I..20.302...:..|
00000510: 49 B3 B1 32 30 A7 33 32 34 00 28 0D 3C 01 8B 58 |I..20.324.(.<..X|
00000520: 24 B2 22 22 A7 33 30 32 00 43 0D 3E 01 8B C3 28 |$."".302.C.>...(|
00000530: 58 24 29 B2 4C 4C A7 99 22 20 9D 9D 22 3B 3A 89 |X$).LL.." ..";:.|
00000540: 33 32 32 00 4F 0D 40 01 99 22 A4 9D 9D 22 3B 00 |322.O.@.."...";.|
00000550: 69 0D 42 01 58 24 B2 C8 28 58 24 2C C3 28 58 24 |i.B.X$..(X$,.(X$|
00000560: 29 AB 31 29 3A 89 33 30 32 00 7F 0D 44 01 8B 58 |).1):.302...D..X|
00000570: 24 B2 22 22 A7 99 22 20 22 3B 3A 8D 33 39 30 00 |$."".." ";:.390.|
00000580: 9C 0D 46 01 8B 20 C3 28 58 24 29 B3 4C 4C A7 58 |..F.. .(X$).LL.X|
00000590: 24 B2 58 24 AA 49 24 3A 99 49 24 3B 00 A5 0D 48 |$.X$.I$:.I$;...H|
000005A0: 01 89 33 30 32 00 B8 0D 4A 01 4C 4C B2 31 3A 4C |..302...J.LL.1:L|
000005B0: 44 B2 31 3A 8D 33 39 32 00 D9 0D 4C 01 8D 31 32 |D.1:.392...L..12|
000005C0: 30 3A 58 B2 49 AF 31 32 37 3A 8B 58 24 B2 22 22 |0:X.I.127:.X$.""|
000005D0: AF 49 B2 31 33 A7 33 39 36 00 E7 0D 4E 01 8B 49 |.I.13.396...N..I|
000005E0: B2 31 33 A7 33 39 39 00 F5 0D 50 01 8B 49 B2 32 |.13.399...P..I.2|
000005F0: 30 A7 33 34 34 00 02 0E 52 01 8B 49 B2 31 33 36 |0.344...R..I.136|
00000600: A7 8E 00 15 0E 54 01 8B 49 B3 36 34 B0 49 B1 39 |.....T..I.64.I.9|
00000610: 30 A7 33 33 32 00 24 0E 58 01 8B 49 B3 B1 32 30 |0.332.$.X..I..20|
00000620: A7 33 35 34 00 33 0E 5A 01 8B 58 24 B2 22 22 A7 |.354.3.Z..X$."".|
00000630: 33 33 32 00 4E 0E 5C 01 8B C3 28 58 24 29 B2 4C |332.N.\...(X$).L|
00000640: 4C A7 99 22 20 9D 9D 22 3B 3A 89 33 35 32 00 5A |L.." ..";:.352.Z|
00000650: 0E 5E 01 99 22 A4 9D 9D 22 3B 00 74 0E 60 01 58 |.^.."...";.t.`.X|
00000660: 24 B2 C8 28 58 24 2C C3 28 58 24 29 AB 31 29 3A |$..(X$,.(X$).1):|
00000670: 89 33 33 32 00 8A 0E 62 01 8B 58 24 B2 22 22 A7 |.332...b..X$."".|
00000680: 99 22 20 22 3B 3A 8D 33 39 30 00 A7 0E 64 01 8B |." ";:.390...d..|
00000690: 20 C3 28 58 24 29 B3 4C 4C A7 58 24 B2 58 24 AA | .(X$).LL.X$.X$.|
000006A0: 49 24 3A 99 49 24 3B 00 B0 0E 66 01 89 33 33 32 |I$:.I$;...f..332|
000006B0: 00 C3 0E 68 01 4C 44 B2 C3 28 44 46 24 29 3A 8D |...h.LD..(DF$):.|
000006C0: 33 39 32 00 DC 0E 6A 01 8D 31 32 30 3A 8B 58 24 |392...j..120:.X$|
000006D0: B2 22 22 AF 49 B2 31 33 A7 33 39 36 00 EA 0E 6C |."".I.13.396...l|
000006E0: 01 8B 49 B2 31 33 A7 33 39 39 00 F7 0E 6E 01 8B |..I.13.399...n..|
000006F0: 49 B2 31 33 36 A7 8E 00 18 0F 70 01 8B 28 49 B3 |I.136.....p..(I.|
00000700: 34 38 B0 49 B1 35 37 29 AF 49 B3 B1 34 36 AF 49 |48.I.57).I..46.I|
00000710: B3 B1 32 30 A7 33 36 32 00 27 0F 72 01 8B 49 B3 |..20.362.'.r..I.|
00000720: B1 32 30 A7 33 37 39 00 36 0F 74 01 8B 58 24 B2 |.20.379.6.t..X$.|
00000730: 22 22 A7 33 36 32 00 51 0F 76 01 8B C3 28 58 24 |"".362.Q.v...(X$|
00000740: 29 B2 4C 4C A7 99 22 20 9D 9D 22 3B 3A 89 33 37 |).LL.." ..";:.37|
00000750: 38 00 5D 0F 78 01 99 22 A4 9D 9D 22 3B 00 77 0F |8.].x.."...";.w.|
00000760: 7A 01 58 24 B2 C8 28 58 24 2C C3 28 58 24 29 AB |z.X$..(X$,.(X$).|
00000770: 31 29 3A 89 33 36 32 00 8D 0F 7B 01 8B 58 24 B2 |1):.362...{..X$.|
00000780: 22 22 A7 99 22 20 22 3B 3A 8D 33 39 30 00 A9 0F |"".." ";:.390...|
00000790: 7C 01 8B C3 28 58 24 29 B3 4C 4C A7 58 24 B2 58 ||...(X$).LL.X$.X|
000007A0: 24 AA 49 24 3A 99 49 24 3B 00 B2 0F 7E 01 89 33 |$.I$:.I$;...~..3|
000007B0: 36 32 00 DF 0F 86 01 99 C8 28 43 44 24 2C 59 43 |62.......(CD$,YC|
000007C0: 29 A3 58 43 29 C8 28 4C 24 2C 4C 4C 29 C8 28 43 |).XC).(L$,LL).(C|
000007D0: 4C 24 2C 4C 4C 29 3B 3A 58 24 B2 22 22 3A 8E 00 |L$,LL);:X$."":..|
000007E0: 0C 10 88 01 99 C8 28 43 44 24 2C 59 43 29 A3 58 |......(CD$,YC).X|
000007F0: 43 29 44 46 24 C8 28 4C 24 2C 4C 4C AB 4C 44 29 |C)DF$.(L$,LL.LD)|
00000800: C8 28 43 4C 24 2C 4C 4C AA 31 29 3B 00 1D 10 8A |.(CL$,LL.1);....|
00000810: 01 58 24 B2 22 22 3A 58 30 B2 30 3A 8E 00 50 10 |.X$."":X0.0:..P.|
00000820: 8C 01 99 22 20 9D 22 3A 8D 33 39 30 3A 99 44 46 |..." .":.390:.DF|
00000830: 24 C8 28 42 24 2C 4C 4C AB 4C 44 29 3B 3A 58 24 |$.(B$,LL.LD);:X$|
00000840: B2 44 46 24 3A 58 30 B2 C5 28 44 46 24 29 3A 8E |.DF$:X0..(DF$):.|
00000850: 00 75 10 8F 01 99 C8 28 42 24 2C 4C 4C AB C3 28 |.u.....(B$,LL..(|
00000860: 58 24 29 AA 31 29 3B 3A 58 30 B2 B6 28 C5 28 58 |X$).1);:X0..(.(X|
00000870: 24 29 29 3A 8E 00 A2 10 90 01 57 B2 C5 28 57 24 |$)):......W..(W$|
00000880: 29 3A 8B C8 28 C9 28 57 24 2C 32 29 2C 31 29 B2 |):..(.(W$,2),1).|
00000890: 22 2E 22 A7 57 24 B2 57 24 AA 22 30 22 3A 89 34 |".".W$.W$."0":.4|
000008A0: 30 32 00 BA 10 91 01 8B 57 B2 B5 28 57 29 A7 57 |02......W..(W).W|
000008B0: 24 B2 57 24 AA 22 2E 30 30 22 00 C0 10 92 01 8E |$.W$.".00"......|
000008C0: 00 E1 10 94 01 57 B2 C5 28 57 24 29 3A 8B 57 B2 |.....W..(W$):.W.|
000008D0: B5 28 57 29 A7 57 24 B2 57 24 AA 22 2E 30 22 3A |.(W).W$.W$.".0":|
000008E0: 8E 00 E7 10 95 01 8E 00 04 11 96 01 57 24 B2 C9 |............W$..|
000008F0: 28 C4 28 57 29 2C 28 C3 28 C4 28 57 29 29 AB 31 |(.(W),(.(.(W)).1|
00000900: 29 29 3A 8E 00 40 11 A4 01 56 B2 35 34 32 37 32 |)):..@...V.54272|
00000910: 3A 46 52 B2 33 30 3A 81 4C B2 30 A4 32 34 3A 97 |:FR.30:.L.0.24:.|
00000920: 56 AA 4C 2C 30 3A 82 3A 97 56 AA 31 2C 31 33 30 |V.L,0:.:.V.1,130|
00000930: 3A 97 56 AA 35 2C 39 3A 97 56 AA 31 35 2C 46 52 |:.V.5,9:.V.15,FR|
00000940: 00 76 11 A6 01 97 56 AA 32 34 2C 31 30 3A 81 4C |.v....V.24,10:.L|
00000950: B2 31 A4 32 3A 97 56 AA 34 2C 32 31 3A 97 56 AA |.1.2:.V.4,21:.V.|
00000960: 31 35 2C 46 52 AB 4C AC 36 3A 81 54 B2 31 A4 4C |15,FR.L.6:.T.1.L|
00000970: AC 33 30 30 3A 82 00 A6 11 A8 01 97 56 AA 34 2C |.300:.......V.4,|
00000980: 32 30 3A 81 54 B2 31 A4 28 4C AC 31 30 29 3A 82 |20:.T.1.(L.10):.|
00000990: 54 3A 82 3A 81 4C B2 30 A4 32 34 3A 97 56 AA 4C |T:.:.L.0.24:.V.L|
000009A0: 2C 30 3A 82 3A 8E 00 EB 11 AE 01 45 24 28 30 29 |,0:.:......E$(0)|
000009B0: B2 22 54 48 41 54 27 53 20 4E 4F 54 20 4F 4E 45 |."THAT'S NOT ONE|
000009C0: 20 4F 46 20 54 48 45 20 43 48 4F 49 43 45 53 22 | OF THE CHOICES"|
000009D0: 3A 45 24 28 31 29 B2 22 4E 4F 20 50 52 49 4E 54 |:E$(1)."NO PRINT|
000009E0: 45 52 20 4F 4E 20 4C 49 4E 45 22 00 30 12 B2 01 |ER ON LINE".0...|
000009F0: 45 24 28 32 29 B2 22 50 4C 45 41 53 45 20 55 53 |E$(2)."PLEASE US|
00000A00: 45 20 4A 55 4C 49 41 4E 20 43 41 4C 45 4E 44 41 |E JULIAN CALENDA|
00000A10: 52 22 3A 45 24 28 33 29 B2 22 49 4E 56 41 4C 49 |R":E$(3)."INVALI|
00000A20: 44 20 43 41 54 45 47 4F 52 59 20 43 4F 44 45 22 |D CATEGORY CODE"|
00000A30: 00 57 12 B3 01 45 24 28 34 29 B2 22 49 4E 56 41 |.W...E$(4)."INVA|
00000A40: 4C 49 44 20 45 4E 54 52 49 45 53 2E 20 54 52 59 |LID ENTRIES. TRY|
00000A50: 20 41 47 41 49 4E 22 00 86 12 B8 01 99 45 4F 24 | AGAIN"......EO$|
00000A60: 22 96 20 12 45 52 52 4F 52 92 3D 3D 3E 20 22 45 |". .ERROR.==> "E|
00000A70: 24 28 45 AB 31 29 3A 8D 34 32 30 3A 8D 31 30 30 |$(E.1):.420:.100|
00000A80: 3A 45 B2 30 3A 8E 00 B3 12 C2 01 99 45 4F 24 42 |:E.0:.......EO$B|
00000A90: 24 45 4F 24 A3 35 29 45 52 2C 45 52 24 3A 8D 31 |$EO$.5)ER,ER$:.1|
00000AA0: 30 30 3A 9F 31 35 2C 38 2C 31 35 2C 22 49 22 3A |00:.15,8,15,"I":|
00000AB0: A0 31 35 00 BF 12 C4 01 A0 31 3A A0 35 3A 8E 00 |.15......1:.5:..|
00000AC0: D4 12 EA 01 99 C8 28 43 44 24 2C 59 43 29 A3 58 |......(CD$,YC).X|
00000AD0: 43 29 3A 8E 00 0E 13 F4 01 4D 24 28 30 29 B2 22 |C):......M$(0)."|
00000AE0: 95 9D 9D 4D 41 49 4E 20 4D 45 4E 55 3A 20 48 4F |...MAIN MENU: HO|
00000AF0: 55 53 45 48 4F 4C 44 20 46 49 4E 41 4E 43 45 20 |USEHOLD FINANCE |
00000B00: 32 22 3A 4D 43 24 B2 22 41 42 43 54 45 22 00 36 |2":MC$."ABCTE".6|
00000B10: 13 F5 01 4D 24 28 31 29 B2 22 1F 12 20 41 20 92 |...M$(1).".. A .|
00000B20: 20 2D 20 41 43 54 55 41 4C 20 56 53 20 42 55 44 | - ACTUAL VS BUD|
00000B30: 47 45 54 45 44 22 00 5F 13 F6 01 4D 24 28 32 29 |GETED"._...M$(2)|
00000B40: B2 22 12 20 42 20 92 20 2D 20 42 55 44 47 45 54 |.". B . - BUDGET|
00000B50: 20 44 45 54 45 52 4D 49 4E 41 54 49 4F 4E 22 00 | DETERMINATION".|
00000B60: 85 13 F7 01 4D 24 28 33 29 B2 22 12 20 43 20 92 |....M$(3).". C .|
00000B70: 20 2D 20 43 41 54 45 47 4F 52 59 20 41 4E 41 4C | - CATEGORY ANAL|
00000B80: 59 53 49 53 22 00 AD 13 F8 01 4D 24 28 34 29 B2 |YSIS".....M$(4).|
00000B90: 22 12 20 54 20 92 20 2D 20 54 41 58 20 49 4D 50 |". T . - TAX IMP|
00000BA0: 41 43 54 20 41 4E 41 4C 59 53 49 53 22 00 D0 13 |ACT ANALYSIS"...|
00000BB0: F9 01 4D 24 28 35 29 B2 22 81 12 20 45 20 92 20 |..M$(5).".. E . |
00000BC0: 2D 20 45 58 49 54 20 50 52 4F 47 52 41 4D 95 22 |- EXIT PROGRAM."|
00000BD0: 00 EE 13 FC 01 4D 43 B2 35 3A 97 45 47 2C 36 3A |.....MC.5:.EG,6:|
00000BE0: 59 43 B2 36 3A 58 43 B2 37 3A 89 35 33 30 00 00 |YC.6:XC.7:.530..|
00000BF0: 14 08 02 99 A3 31 32 39 29 4D 24 28 43 29 3A 8E |.....129)M$(C):.|
00000C00: 00 23 14 12 02 43 24 B2 22 22 3A 99 22 93 22 C8 |.#...C$."":.".".|
00000C10: 28 43 44 24 2C 59 43 29 A3 58 43 29 4D 24 28 30 |(CD$,YC).XC)M$(0|
00000C20: 29 52 24 00 3F 14 14 02 81 58 B2 31 A4 4D 43 3A |)R$.?....X.1.MC:|
00000C30: 99 A3 34 30 AA 58 43 29 4D 24 28 58 29 3A 82 00 |..40.XC)M$(X):..|
00000C40: 7A 14 15 02 43 B2 30 3A 99 A3 38 30 AA 58 43 29 |z...C.0:..80.XC)|
00000C50: 45 24 3B 3A 58 43 B2 58 43 AA C3 28 45 24 29 AA |E$;:XC.XC..(E$).|
00000C60: 32 3A 59 43 B2 59 43 AA 32 AC 4D 43 AA 34 3A 44 |2:YC.YC.2.MC.4:D|
00000C70: 46 24 B2 22 22 3A 8D 33 33 30 00 B0 14 16 02 43 |F$."":.330.....C|
00000C80: 24 B2 C8 28 58 24 2C 31 29 3A 4A B2 C3 28 4D 43 |$..(X$,1):J..(MC|
00000C90: 24 29 3A 81 58 B2 31 A4 4A 3A 8B CA 28 4D 43 24 |$):.X.1.J:..(MC$|
00000CA0: 2C 58 2C 31 29 B2 43 24 A7 43 B2 58 3A 4A B2 58 |,X,1).C$.C.X:J.X|
00000CB0: 00 B9 14 17 02 82 58 3A 8E 00 E5 14 58 02 99 22 |......X:....X.."|
00000CC0: 93 9A 22 A3 31 32 35 29 22 49 53 20 59 4F 55 52 |..".125)"IS YOUR|
00000CD0: 20 1C 12 20 22 4D 49 24 59 49 24 22 20 92 9A 20 | .. "MI$YI$" .. |
00000CE0: 46 49 4C 45 22 00 18 15 5E 02 99 A3 38 37 29 22 |FILE"...^...87)"|
00000CF0: 1F 4F 4E 20 12 20 54 20 92 20 54 41 50 45 22 A3 |.ON . T . TAPE".|
00000D00: 35 35 29 22 4F 52 22 A3 35 30 29 22 12 20 44 20 |55)"OR".50)". D |
00000D10: 92 20 44 49 53 4B 3F 22 00 2F 15 60 02 44 46 24 |. DISK?"./.`.DF$|
00000D20: B2 22 44 22 3A 8D 33 33 30 3A 49 24 B2 58 24 00 |."D":.330:I$.X$.|
00000D30: 5B 15 62 02 44 56 B2 38 3A 44 56 24 B2 22 44 49 |[.b.DV.8:DV$."DI|
00000D40: 53 4B 22 3A 8B 49 24 B2 22 54 22 A7 44 56 B2 31 |SK":.I$."T".DV.1|
00000D50: 3A 44 56 24 B2 22 54 41 50 45 22 00 61 15 64 02 |:DV$."TAPE".a.d.|
00000D60: 8E 00 9A 15 6C 02 4E 46 24 B2 4D 49 24 AA 59 49 |....l.NF$.MI$.YI|
00000D70: 24 3A 49 43 24 B2 C8 28 4E 46 24 2C 31 29 3A 8B |$:IC$..(NF$,1):.|
00000D80: 44 56 B3 B1 38 A7 58 43 B2 35 3A 59 43 B2 32 33 |DV..8.XC.5:YC.23|
00000D90: 3A 8D 34 39 30 3A 89 36 32 36 00 C6 15 6D 02 99 |:.490:.626...m..|
00000DA0: A3 31 36 33 29 22 57 48 49 43 48 20 46 49 4C 45 |.163)"WHICH FILE|
00000DB0: 20 44 4F 20 59 4F 55 20 57 49 53 48 20 54 4F 20 | DO YOU WISH TO |
00000DC0: 4C 4F 41 44 3F 22 00 FA 15 6E 02 99 A3 34 35 29 |LOAD?"...n...45)|
00000DD0: 22 1F 12 20 22 49 43 24 22 20 92 20 22 4E 46 24 |".. "IC$" . "NF$|
00000DE0: 3A 99 A3 34 35 29 22 12 20 42 20 92 20 22 4E 46 |:..45)". B . "NF|
00000DF0: 24 22 20 42 41 43 4B 55 50 22 00 1D 16 6F 02 59 |$" BACKUP"...o.Y|
00000E00: 43 B2 31 37 3A 58 43 B2 32 37 3A 44 46 24 B2 49 |C.17:XC.27:DF$.I|
00000E10: 43 24 3A 8D 33 33 30 3A 49 24 B2 58 24 00 3A 16 |C$:.330:I$.X$.:.|
00000E20: 70 02 58 43 B2 34 3A 59 43 B2 32 33 3A 8D 34 39 |p.XC.4:YC.23:.49|
00000E30: 30 3A 8B 49 B2 31 33 36 A7 8E 00 5B 16 71 02 42 |0:.I.136...[.q.B|
00000E40: 55 24 B2 22 22 3A 8B 58 24 B2 22 42 22 A7 42 55 |U$."":.X$."B".BU|
00000E50: 24 B2 22 20 42 41 43 4B 55 50 22 00 8F 16 72 02 |$." BACKUP"...r.|
00000E60: 99 46 24 44 56 24 22 2E 22 3A 99 A3 37 29 22 50 |.F$DV$".":..7)"P|
00000E70: 52 45 53 53 20 41 4E 59 20 4B 45 59 20 57 48 45 |RESS ANY KEY WHE|
00000E80: 4E 20 52 45 41 44 59 2E 22 3B 3A 8D 31 38 30 00 |N READY.";:.180.|
00000E90: AC 16 73 02 99 45 4F 24 A3 35 29 42 24 45 4F 24 |..s..EO$.5)B$EO$|
00000EA0: 2C 22 1F 22 54 53 24 4E 46 24 3A 8E 00 D3 16 76 |,"."TS$NF$:....v|
00000EB0: 02 8B 44 56 B2 31 A7 99 22 91 91 91 91 91 91 91 |..DV.1..".......|
00000EC0: 91 22 3B 3A 9F 31 2C 31 2C 30 2C 4E 46 24 3A 89 |.";:.1,1,0,NF$:.|
00000ED0: 36 33 38 00 ED 16 78 02 9F 31 2C 38 2C 39 2C 4E |638...x..1,8,9,N|
00000EE0: 46 24 AA 42 55 24 AA 22 2C 53 2C 52 22 00 03 17 |F$.BU$.",S,R"...|
00000EF0: 7A 02 9F 35 2C 38 2C 31 35 3A 84 35 2C 45 52 2C |z..5,8,15:.5,ER,|
00000F00: 45 52 24 00 17 17 7C 02 8B 45 52 B1 31 A7 8D 34 |ER$...|..ER.1..4|
00000F10: 35 30 3A A0 35 3A 8E 00 23 17 7D 02 8B 42 53 B2 |50:.5:..#.}..BS.|
00000F20: 31 A7 8E 00 5D 17 7E 02 81 5A B2 31 A4 31 38 3A |1...].~..Z.1.18:|
00000F30: 84 31 2C 53 55 28 4A 2C 5A 2C 31 29 2C 53 55 28 |.1,SU(J,Z,1),SU(|
00000F40: 4A 2C 5A 2C 32 29 2C 53 55 28 4A 2C 5A 2C 33 29 |J,Z,2),SU(J,Z,3)|
00000F50: 2C 53 55 28 4A 2C 5A 2C 34 29 3A 82 5A 00 6E 17 |,SU(J,Z,4):.Z.n.|
00000F60: 7F 02 A0 31 3A 8B 44 56 B2 31 A7 36 34 36 00 7F |...1:.DV.1.646..|
00000F70: 17 80 02 84 35 2C 45 52 2C 45 52 24 3A A0 35 00 |....5,ER,ER$:.5.|
00000F80: 90 17 84 02 8B 45 52 B1 31 A7 8D 34 35 30 3A 8E |.....ER.1..450:.|
00000F90: 00 A2 17 86 02 99 45 4F 24 42 24 3A 45 46 B2 30 |......EO$B$:EF.0|
00000FA0: 3A 8E 00 BE 17 8A 02 9F 35 2C 38 2C 31 35 2C 22 |:.......5,8,15,"|
00000FB0: 49 22 3A 8B 42 55 24 B2 22 22 A7 36 35 34 00 ED |I":.BU$."".654..|
00000FC0: 17 8C 02 98 35 2C 22 53 30 3A 22 4E 46 24 42 55 |....5,"S0:"NF$BU|
00000FD0: 24 3A 98 35 2C 22 52 30 3A 22 4E 46 24 42 55 24 |$:.5,"R0:"NF$BU$|
00000FE0: 22 3D 22 4E 46 24 3A 42 55 24 B2 22 22 00 07 18 |"="NF$:BU$.""...|
00000FF0: 8E 02 98 35 2C 22 53 30 3A 22 4E 46 24 3A 84 35 |...5,"S0:"NF$:.5|
00001000: 2C 45 52 2C 45 52 24 00 2E 18 90 02 8B 45 52 B1 |,ER,ER$......ER.|
00001010: 31 A7 99 45 4F 24 42 24 45 4F 24 A3 35 29 45 52 |1..EO$B$EO$.5)ER|
00001020: 2C 45 52 24 3A 8D 31 30 30 3A A0 35 3A 8E 00 4F |,ER$:.100:.5:..O|
00001030: 18 94 02 9F 31 2C 44 56 2C 39 2C 4E 46 24 AA 22 |....1,DV,9,NF$."|
00001040: 2C 53 2C 57 22 3A 8B 44 56 B2 31 A7 36 36 34 00 |,S,W":.DV.1.664.|
00001050: 60 18 96 02 8B 45 52 B1 31 A7 8D 34 35 30 3A 8E |`....ER.1..450:.|
00001060: 00 89 18 98 02 81 5A B2 30 A4 31 38 3A 98 31 2C |......Z.0.18:.1,|
00001070: 53 55 28 30 2C 5A 2C 30 29 3A 82 5A 3A A0 31 3A |SU(0,Z,0):.Z:.1:|
00001080: 8B 44 56 B2 31 A7 36 37 30 00 95 18 9C 02 A0 35 |.DV.1.670......5|
00001090: 3A 8D 34 32 30 00 C6 18 9E 02 99 45 4F 24 A3 35 |:.420......EO$.5|
000010A0: 29 42 24 A3 35 29 42 24 45 4F 24 A3 38 29 22 1C |)B$.5)B$EO$.8)".|
000010B0: 22 4E 46 24 42 55 24 22 20 53 41 56 45 44 2E 22 |"NF$BU$" SAVED."|
000010C0: A3 34 30 29 41 24 00 D6 18 A0 02 8D 31 38 30 3A |.40)A$......180:|
000010D0: 45 46 B2 30 3A 8E 00 1C 19 BC 02 48 46 24 B2 22 |EF.0:......HF$."|
000010E0: 20 48 4F 55 53 45 48 4F 4C 44 20 46 49 4E 41 4E | HOUSEHOLD FINAN|
000010F0: 43 45 20 22 3A 48 42 24 B2 22 48 46 20 42 55 44 |CE ":HB$."HF BUD|
00001100: 47 45 54 22 3A 50 32 24 B2 22 20 50 41 52 54 20 |GET":P2$." PART |
00001110: 32 20 22 3A 52 24 B2 C7 28 31 33 29 00 5B 19 BE |2 ":R$..(13).[..|
00001120: 02 99 22 11 11 11 11 11 11 11 1E 22 2C 48 46 24 |.."........",HF$|
00001130: 52 24 52 24 2C 22 20 20 20 20 20 22 50 32 24 52 |R$R$," "P2$R|
00001140: 24 52 24 52 24 2C 22 9A 20 43 4F 50 59 52 49 47 |$R$R$,". COPYRIG|
00001150: 48 54 20 31 39 38 33 20 42 59 22 00 97 19 C0 02 |HT 1983 BY".....|
00001160: 99 22 11 22 2C 22 9C 20 43 52 45 41 54 49 56 45 |.".",". CREATIVE|
00001170: 20 53 4F 46 54 57 41 52 45 22 3A 99 22 11 11 22 | SOFTWARE":.".."|
00001180: 2C 22 9A 41 4C 4C 20 52 49 47 48 54 53 20 52 45 |,".ALL RIGHTS RE|
00001190: 53 45 52 56 45 44 22 00 B8 19 D1 02 45 24 B2 22 |SERVED".....E$."|
000011A0: 45 4E 54 45 52 20 4C 45 54 54 45 52 20 4F 46 20 |ENTER LETTER OF |
000011B0: 43 48 4F 49 43 45 20 22 00 EA 19 D2 02 41 24 B2 |CHOICE ".....A$.|
000011C0: 22 20 20 20 20 20 12 20 20 50 52 45 53 53 20 41 |" . PRESS A|
000011D0: 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E |NY KEY TO CONTIN|
000011E0: 55 45 20 20 92 20 20 20 20 22 00 1B 1A D3 02 41 |UE . ".....A|
000011F0: 31 24 B2 22 20 20 20 20 20 20 20 50 52 45 53 53 |1$." PRESS|
00001200: 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 | ANY KEY TO CONT|
00001210: 49 4E 55 45 20 20 20 20 20 20 22 00 41 1A D4 02 |INUE ".A...|
00001220: 46 24 B2 22 1F 50 52 45 50 41 52 45 20 54 48 45 |F$.".PREPARE THE|
00001230: 20 46 49 4E 41 4E 43 49 41 4C 20 44 41 54 41 20 | FINANCIAL DATA |
00001240: 22 00 6E 1A D5 02 46 37 24 B2 22 1F 50 52 45 53 |".n...F7$.".PRES|
00001250: 53 20 12 20 46 37 20 92 20 54 4F 20 50 52 45 53 |S . F7 . TO PRES|
00001260: 45 52 56 45 20 54 48 45 20 49 54 45 4D 22 00 AD |ERVE THE ITEM"..|
00001270: 1A DC 02 43 44 24 B2 22 13 11 11 11 11 11 11 11 |...CD$."........|
00001280: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001290: 11 22 3A 4F 46 24 B2 C8 28 43 44 24 2C 39 29 3A |.":OF$..(CD$,9):|
000012A0: 45 4F 24 B2 C8 28 43 44 24 2C 32 33 29 00 F8 1A |EO$..(CD$,23)...|
000012B0: DE 02 4C 24 B2 22 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |..L$."..........|
000012C0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 3A 42 24 B2 22 |..........":B$."|
000012D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000012E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000012F0: 20 20 20 20 20 20 20 22 00 3C 1B E0 02 43 4C 24 | ".<...CL$|
00001300: B2 22 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |."..............|
00001310: 9D 9D 9D 9D 9D 9D 9D 22 3A 43 52 24 B2 22 1D 1D |.......":CR$."..|
00001320: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001330: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 6B 1B 00 |...........".k..|
00001340: 03 4D 53 24 B2 22 4A 41 4E 46 45 42 4D 41 52 41 |.MS$."JANFEBMARA|
00001350: 50 52 4D 41 59 4A 55 4E 4A 55 4C 41 55 47 53 45 |PRMAYJUNJULAUGSE|
00001360: 50 4F 43 54 4E 4F 56 44 45 43 22 00 88 1B 02 03 |POCTNOVDEC".....|
00001370: 87 43 43 24 3A 81 49 B2 31 A4 31 38 3A 87 4E 43 |.CC$:.I.1.18:.NC|
00001380: 24 28 49 29 3A 82 3A 8E 00 C3 1B 20 03 97 45 47 |$(I):.:.... ..EG|
00001390: 2C 37 3A 99 22 93 11 95 20 20 45 58 50 45 4E 53 |,7:."... EXPENS|
000013A0: 45 53 20 47 52 41 50 48 20 20 20 20 20 20 1F 22 |ES GRAPH ."|
000013B0: 53 41 24 22 2D 22 46 41 24 3A 99 22 97 20 20 20 |SA$"-"FA$:.". |
000013C0: 20 22 3B 00 F1 1B 22 03 4D 4B B2 B5 28 4D 41 AD | ";...".MK..(MA.|
000013D0: 37 AA 2E 36 29 3A 8B 4D 41 B1 39 39 39 39 A7 4D |7..6):.MA.9999.M|
000013E0: 4B B2 B5 28 B5 28 4D 4B AD 35 AA 2E 35 29 AC 35 |K..(.(MK.5..5).5|
000013F0: 29 00 11 1C 24 03 8B 4D 41 B1 39 39 39 39 39 A7 |)...$..MA.99999.|
00001400: 4D 4B B2 B5 28 B5 28 4D 4B AD 31 30 29 AC 31 30 |MK..(.(MK.10).10|
00001410: 29 00 33 1C 25 03 81 4A B2 31 A4 37 3A 57 B2 B5 |).3.%..J.1.7:W..|
00001420: 28 4D 4B AC 4A 29 3A 57 24 B2 C4 28 57 29 3A 8D |(MK.J):W$..(W):.|
00001430: 34 30 36 00 4D 1C 26 03 99 22 1F 22 A6 35 AB C3 |406.M.&..".".5..|
00001440: 28 57 24 29 29 57 24 3B 3A 82 4A 3A 99 00 7D 1C |(W$))W$;:.J:..}.|
00001450: 27 03 99 22 98 20 20 20 20 20 20 20 20 A7 20 20 |'..". . |
00001460: 20 20 A7 20 20 20 20 A7 20 20 20 20 A7 20 20 20 | . . . |
00001470: 20 A7 20 20 20 20 A7 20 20 20 20 A7 22 00 AC 1C | . . ."...|
00001480: 28 03 99 22 43 4F 44 45 20 20 20 20 A7 20 20 20 |(.."CODE . |
00001490: 20 A7 20 20 20 20 A7 20 20 20 20 A7 20 20 20 20 | . . . |
000014A0: A7 20 20 20 20 A7 20 20 20 20 A7 22 00 C0 1C 2A |. . ."...*|
000014B0: 03 81 5A B2 31 A4 31 35 3A 8D 38 38 30 3A 82 5A |..Z.1.15:.880:.Z|
000014C0: 00 FD 1C 2C 03 99 52 24 22 1F 20 20 4C 45 47 45 |...,..R$". LEGE|
000014D0: 4E 44 3A 20 12 A2 A2 A2 92 20 41 43 54 55 41 4C |ND: ..... ACTUAL|
000014E0: 20 20 22 3A 99 22 20 20 20 20 20 20 20 20 20 20 | ":." |
000014F0: A8 A8 A8 20 42 55 44 47 45 54 20 20 22 00 17 1D |... BUDGET "...|
00001500: 33 03 99 22 11 9C 22 41 24 3B 3A 8D 31 38 30 3A |3..".."A$;:.180:|
00001510: 97 45 47 2C 36 3A 8E 00 37 1D 70 03 49 24 B2 CA |.EG,6:..7.p.I$..|
00001520: 28 22 9F 96 1F 98 99 9A 9B 9C 97 9E 1C 1E 1F 81 |("..............|
00001530: 90 22 2C 5A 2C 31 29 00 66 1D 79 03 99 49 24 22 |.",Z,1).f.y..I$"|
00001540: 20 22 CA 28 43 43 24 2C 5A AA 5A AB 31 2C 32 29 | ".(CC$,Z.Z.1,2)|
00001550: 22 20 22 3B 3A 41 42 B2 41 44 28 5A 29 3A 42 42 |" ";:AB.AD(Z):BB|
00001560: B2 42 44 28 5A 29 00 88 1D 7A 03 58 47 B2 30 3A |.BD(Z)...z.XG.0:|
00001570: 53 47 B2 30 3A 4C 47 B2 30 3A 8B 41 42 B2 30 AF |SG.0:LG.0:.AB.0.|
00001580: 42 42 B2 30 A7 38 39 39 00 A4 1D 7C 03 4C 47 B2 |BB.0.899...|.LG.|
00001590: 42 42 3A 53 47 B2 41 42 3A 8B 42 42 B1 B2 41 42 |BB:SG.AB:.BB..AB|
000015A0: 89 38 39 34 00 C6 1D 7D 03 8B 41 42 B1 42 42 A7 |.894...}..AB.BB.|
000015B0: 53 47 B2 42 42 3A 58 47 B2 B5 28 41 42 AB 42 42 |SG.BB:XG..(AB.BB|
000015C0: 29 3A 89 38 39 36 00 DE 1D 7E 03 8B 4C 47 A7 81 |):.896...~..LG..|
000015D0: 58 B2 31 A4 4C 47 3A 99 22 A8 22 3B 3A 82 00 00 |X.1.LG:.".";:...|
000015E0: 1E 7F 03 8B 4C 47 A7 99 52 24 22 91 1D 1D 1D 1D |....LG..R$".....|
000015F0: 22 3B 3A 8B 50 46 B2 31 A7 99 22 20 20 20 20 22 |";:.PF.1.." "|
00001600: 00 19 1E 80 03 8B 53 47 A7 81 58 B2 31 A4 53 47 |......SG..X.1.SG|
00001610: 3A 99 22 12 A8 22 3B 3A 82 00 33 1E 81 03 8B 53 |:."..";:..3....S|
00001620: 47 A7 99 22 92 22 3B 3A 8B 42 42 B1 B2 41 42 A7 |G..".";:.BB..AB.|
00001630: 38 39 39 00 4C 1E 82 03 8B 58 47 A7 81 58 B2 31 |899.L....XG..X.1|
00001640: A4 58 47 3A 99 22 12 A2 22 3B 3A 82 00 54 1E 83 |.XG:."..";:..T..|
00001650: 03 99 3A 8E 00 75 1E 84 03 4D 41 B2 30 3A 4D 4B |..:..u...MA.0:MK|
00001660: B2 30 3A 81 58 B2 31 A4 31 35 3A 57 28 58 29 B2 |.0:.X.1.15:W(X).|
00001670: 41 44 28 58 29 00 91 1E 86 03 8B 42 44 28 58 29 |AD(X)......BD(X)|
00001680: B1 41 44 28 58 29 A7 57 28 58 29 B2 42 44 28 58 |.AD(X).W(X).BD(X|
00001690: 29 00 A6 1E 88 03 8B 57 28 58 29 B1 4D 41 A7 4D |)......W(X).MA.M|
000016A0: 41 B2 57 28 58 29 00 AC 1E 8A 03 82 00 EA 1E 8C |A.W(X)..........|
000016B0: 03 81 58 B2 31 A4 31 35 3A 42 44 28 58 29 B2 B5 |..X.1.15:BD(X)..|
000016C0: 28 28 42 44 28 58 29 AD 4D 41 29 AC 33 34 29 3A |((BD(X).MA).34):|
000016D0: 41 44 28 58 29 B2 B5 28 28 41 44 28 58 29 AD 4D |AD(X)..((AD(X).M|
000016E0: 41 29 AC 33 34 29 3A 82 3A 8E 00 18 1F E8 03 8D |A).34):.:.......|
000016F0: 31 38 30 30 3A 99 A3 38 35 29 22 45 4E 54 45 52 |1800:..85)"ENTER|
00001700: 20 46 49 4C 45 4E 41 4D 45 53 20 54 4F 20 42 45 | FILENAMES TO BE|
00001710: 20 4C 4F 41 44 45 44 22 00 33 1F EA 03 99 A3 31 | LOADED".3.....1|
00001720: 32 29 22 28 45 2E 47 2E 2D 20 90 4A 41 4E 38 33 |2)"(E.G.- .JAN83|
00001730: 20 29 22 00 5B 1F EC 03 99 A3 39 30 29 22 1C 53 | )".[.....90)".S|
00001740: 54 41 52 54 49 4E 47 20 2D 22 A3 39 30 29 22 20 |TARTING -".90)" |
00001750: 20 45 4E 44 49 4E 47 20 2D 90 22 00 99 1F EE 03 | ENDING -.".....|
00001760: 59 43 B2 31 30 3A 58 43 B2 32 31 3A 4C 4C B2 35 |YC.10:XC.21:LL.5|
00001770: 3A 44 46 24 B2 22 4A 41 4E 38 33 22 3A 8D 33 30 |:DF$."JAN83":.30|
00001780: 30 3A 53 4D 24 B2 58 24 3A 8B 49 B2 31 33 36 A7 |0:SM$.X$:.I.136.|
00001790: 49 B2 30 3A 89 31 30 30 30 00 CD 1F EF 03 4D 4E |I.0:.1000.....MN|
000017A0: 24 B2 53 4D 24 3A 8D 32 39 30 3A 53 4D B2 4D 4E |$.SM$:.290:SM.MN|
000017B0: 3A 53 59 B2 C5 28 C9 28 4D 4E 24 2C 32 29 29 3A |:SY..(.(MN$,2)):|
000017C0: 8B 45 A7 8D 34 33 30 3A 89 31 30 30 36 00 06 20 |.E..430:.1006.. |
000017D0: F0 03 59 43 B2 31 32 3A 58 43 B2 32 31 3A 4C 4C |..YC.12:XC.21:LL|
000017E0: B2 35 3A 44 46 24 B2 22 22 3A 8D 33 30 30 3A 46 |.5:DF$."":.300:F|
000017F0: 4D 24 B2 58 24 3A 8B 49 B2 31 33 36 A7 49 B2 30 |M$.X$:.I.136.I.0|
00001800: 3A 89 31 30 30 30 00 3A 20 F1 03 4D 4E 24 B2 46 |:.1000.: ..MN$.F|
00001810: 4D 24 3A 8D 32 39 30 3A 46 4D B2 4D 4E 3A 46 59 |M$:.290:FM.MN:FY|
00001820: B2 C5 28 C9 28 4D 4E 24 2C 32 29 29 3A 8B 45 A7 |..(.(MN$,2)):.E.|
00001830: 8D 34 33 30 3A 89 31 30 30 38 00 4A 20 F2 03 8B |.430:.1008.J ...|
00001840: 53 59 B1 46 59 89 31 30 31 38 00 64 20 F6 03 8B |SY.FY.1018.d ...|
00001850: 46 59 B1 53 59 A7 46 4D B2 46 4D AA 31 32 3A 89 |FY.SY.FM.FM.12:.|
00001860: 31 30 32 30 00 7B 20 F8 03 8B 46 59 B2 53 59 AF |1020.{ ...FY.SY.|
00001870: 53 4D B3 B2 46 4D 89 31 30 32 30 00 8E 20 FA 03 |SM..FM.1020.. ..|
00001880: 45 B2 35 3A 8D 34 33 30 3A 89 31 30 30 30 00 AA |E.5:.430:.1000..|
00001890: 20 FC 03 81 4A B2 53 4D A4 46 4D 3A 59 49 24 B2 | ...J.SM.FM:YI$.|
000018A0: C9 28 C4 28 53 59 29 2C 32 29 00 CE 20 FE 03 5A |.(.(SY),2).. ..Z|
000018B0: B2 4A 3A 8B 4A B1 31 32 A7 5A B2 4A AB 31 32 3A |.J:.J.12.Z.J.12:|
000018C0: 59 49 24 B2 C9 28 C4 28 46 59 29 2C 32 29 00 F0 |YI$..(.(FY),2)..|
000018D0: 20 00 04 4D 49 24 B2 CA 28 4D 53 24 2C 28 5A AA | ..MI$..(MS$,(Z.|
000018E0: 32 AC 28 5A AB 31 29 29 2C 33 29 3A 4D 46 B2 34 |2.(Z.1)),3):MF.4|
000018F0: 00 10 21 01 04 8B C5 28 59 49 24 29 B3 31 30 A7 |..!....(YI$).10.|
00001900: 59 49 24 B2 22 30 22 AA CA 28 59 49 24 2C 32 29 |YI$."0"..(YI$,2)|
00001910: 00 3C 21 10 04 59 43 B2 39 3A 58 43 B2 32 37 3A |.<!..YC.9:XC.27:|
00001920: 8D 36 30 30 3A 8B 49 B2 31 33 36 A7 49 B2 30 3A |.600:.I.136.I.0:|
00001930: 4A B2 46 4D 3A 82 3A 89 31 30 30 30 00 65 21 12 |J.FM:.:.1000.e!.|
00001940: 04 54 53 24 B2 22 4C 4F 41 44 49 4E 47 20 22 3A |.TS$."LOADING ":|
00001950: 8D 36 32 30 3A 8B 49 B2 31 33 36 A7 49 B2 30 3A |.620:.I.136.I.0:|
00001960: 89 31 30 34 30 00 7F 21 14 04 8D 36 33 30 3A 8B |.1040..!...630:.|
00001970: 49 B2 31 33 36 A7 49 B2 30 3A 89 31 30 34 30 00 |I.136.I.0:.1040.|
00001980: 8F 21 16 04 8B 45 52 B2 36 32 A7 31 30 34 39 00 |.!...ER.62.1049.|
00001990: A4 21 17 04 8B 45 52 B1 31 A7 45 52 B2 30 3A 89 |.!...ER.1.ER.0:.|
000019A0: 31 30 34 30 00 BC 21 18 04 53 46 24 28 4A 29 B2 |1040..!..SF$(J).|
000019B0: C9 28 4D 49 24 2C 33 29 AA 59 49 24 00 C8 21 19 |.(MI$,3).YI$..!.|
000019C0: 04 82 4A 3A 8D 34 32 30 00 DE 21 1A 04 8D 35 30 |..J:.420..!...50|
000019D0: 30 3A 8B 43 24 B2 22 45 22 A7 38 30 30 30 00 EA |0:.C$."E".8000..|
000019E0: 21 20 04 8B 43 89 31 30 36 30 00 FD 21 22 04 45 |! ..C.1060..!".E|
000019F0: B2 31 3A 8D 34 33 30 3A 89 31 30 35 30 00 18 22 |.1:.430:.1050.."|
00001A00: 24 04 91 43 8D 31 31 30 30 2C 31 32 30 30 2C 31 |$..C.1100,1200,1|
00001A10: 33 30 30 2C 31 34 30 30 00 22 22 26 04 89 31 30 |300,1400.""&..10|
00001A20: 35 30 00 41 22 4C 04 8F 20 2A 2A 2A 2A 2A 2A 20 |50.A"L.. ****** |
00001A30: 41 4E 41 4C 59 5A 45 20 56 41 52 49 41 4E 43 45 |ANALYZE VARIANCE|
00001A40: 53 00 70 22 56 04 99 22 93 22 3A 8D 35 32 30 3A |S.p"V..".":.520:|
00001A50: 99 A3 35 30 29 22 95 41 56 41 49 4C 41 42 4C 45 |..50)".AVAILABLE|
00001A60: 20 4D 4F 4E 54 48 53 20 41 52 45 3A 90 22 52 24 | MONTHS ARE:."R$|
00001A70: 00 A0 22 60 04 81 5A 31 B2 30 A4 31 38 A9 36 3A |.."`..Z1.0.18.6:|
00001A80: 99 A3 32 29 3A 81 5A 32 B2 31 A4 36 3A 99 A6 36 |..2):.Z2.1.6:..6|
00001A90: AB C3 28 53 46 24 28 5A 31 AA 5A 32 29 29 29 3B |..(SF$(Z1.Z2)));|
00001AA0: 00 BD 22 61 04 99 53 46 24 28 5A 31 AA 5A 32 29 |.."a..SF$(Z1.Z2)|
00001AB0: 3B 3A 82 5A 32 3A 99 52 24 3A 82 5A 31 00 EC 22 |;:.Z2:.R$:.Z1.."|
00001AC0: 62 04 99 A3 32 29 22 95 54 48 45 20 4D 4F 4E 54 |b...2)".THE MONT|
00001AD0: 48 53 20 59 4F 55 20 57 49 53 48 20 54 4F 20 41 |HS YOU WISH TO A|
00001AE0: 4E 41 4C 59 5A 45 20 41 52 45 3A 22 00 1E 23 64 |NALYZE ARE:"..#d|
00001AF0: 04 99 A3 35 30 29 22 1F 53 54 41 52 54 49 4E 47 |...50)".STARTING|
00001B00: 20 2D 20 22 3A 99 A3 34 39 29 22 46 49 4E 49 53 | - ":..49)"FINIS|
00001B10: 48 49 4E 47 20 2D 20 22 3A 8D 31 38 38 30 00 59 |HING - ":.1880.Y|
00001B20: 23 66 04 99 22 90 22 3A 59 43 B2 31 39 3A 58 43 |#f..".":YC.19:XC|
00001B30: B2 32 32 3A 4C 4C B2 35 3A 44 46 24 B2 53 46 24 |.22:LL.5:DF$.SF$|
00001B40: 28 53 44 29 3A 8D 33 30 30 3A 53 41 24 B2 58 24 |(SD):.300:SA$.X$|
00001B50: 3A 8B 49 B2 31 33 36 A7 8E 00 8D 23 67 04 4D 4E |:.I.136....#g.MN|
00001B60: 24 B2 53 41 24 3A 8D 32 39 30 3A 53 41 B2 4D 4E |$.SA$:.290:SA.MN|
00001B70: 3A 53 59 B2 C5 28 C9 28 4D 4E 24 2C 32 29 29 3A |:SY..(.(MN$,2)):|
00001B80: 8B 45 A7 8D 34 33 30 3A 89 31 31 32 36 00 B8 23 |.E..430:.1126..#|
00001B90: 68 04 59 43 B2 32 31 3A 44 46 24 B2 53 46 24 28 |h.YC.21:DF$.SF$(|
00001BA0: 46 44 29 3A 8D 33 30 30 3A 46 41 24 B2 58 24 3A |FD):.300:FA$.X$:|
00001BB0: 8B 49 B2 31 33 36 A7 8E 00 EC 23 69 04 4D 4E 24 |.I.136....#i.MN$|
00001BC0: B2 46 41 24 3A 8D 32 39 30 3A 46 41 B2 4D 4E 3A |.FA$:.290:FA.MN:|
00001BD0: 46 59 B2 C5 28 C9 28 4D 4E 24 2C 32 29 29 3A 8B |FY..(.(MN$,2)):.|
00001BE0: 45 A7 8D 34 33 30 3A 89 31 31 32 38 00 06 24 6C |E..430:.1128..$l|
00001BF0: 04 8B 53 59 B1 46 59 A7 45 B2 35 3A 8D 34 33 30 |..SY.FY.E.5:.430|
00001C00: 3A 89 31 31 30 30 00 20 24 6D 04 8B 46 59 B1 53 |:.1100. $m..FY.S|
00001C10: 59 A7 46 41 B2 46 41 AA 31 32 3A 89 31 31 33 37 |Y.FA.FA.12:.1137|
00001C20: 00 37 24 6E 04 8B 46 59 B2 53 59 AF 53 41 B3 B2 |.7$n..FY.SY.SA..|
00001C30: 46 41 89 31 31 33 37 00 4A 24 70 04 45 B2 35 3A |FA.1137.J$p.E.5:|
00001C40: 8D 34 33 30 3A 89 31 31 30 30 00 5B 24 71 04 8B |.430:.1100.[$q..|
00001C50: 46 41 B1 46 44 A7 89 31 31 33 36 00 9E 24 72 04 |FA.FD..1136..$r.|
00001C60: 99 52 24 52 24 A6 31 31 AB 28 28 C3 28 53 41 24 |.R$R$.11.((.(SA$|
00001C70: 29 AA C3 28 46 41 24 29 29 AD 32 29 29 22 1F 43 |)..(FA$)).2))".C|
00001C80: 41 4C 43 55 4C 41 54 49 4E 47 20 90 22 53 41 24 |ALCULATING ."SA$|
00001C90: 22 1F 20 54 4F 20 90 22 46 41 24 22 1F 22 00 BD |". TO ."FA$"."..|
00001CA0: 24 73 04 43 4D B2 B8 28 30 29 3A 43 4D B2 31 AA |$s.CM..(0):CM.1.|
00001CB0: 28 46 41 AB 53 41 29 3A 8D 31 38 31 30 00 CE 24 |(FA.SA):.1810..$|
00001CC0: 74 04 8B 41 46 B2 31 A7 41 46 B2 30 3A 8E 00 F9 |t..AF.1.AF.0:...|
00001CD0: 24 76 04 99 22 93 20 20 1F 45 58 50 45 4E 53 45 |$v..". .EXPENSE|
00001CE0: 20 41 4E 41 4C 59 53 49 53 20 20 20 20 20 22 53 | ANALYSIS "S|
00001CF0: 41 24 22 2D 22 46 41 24 22 00 42 25 78 04 99 22 |A$"-"FA$".B%x.."|
00001D00: 1C 20 43 4F 44 45 20 42 55 44 47 45 54 20 20 20 |. CODE BUDGET |
00001D10: 41 43 54 55 41 4C 20 44 49 46 46 45 52 45 4E 43 |ACTUAL DIFFERENC|
00001D20: 45 20 20 25 47 41 49 4E 1F 22 3A 53 B2 31 3A 46 |E %GAIN.":S.1:F|
00001D30: B2 31 35 3A 48 46 B2 30 3A 4C 42 24 B2 22 45 58 |.15:HF.0:LB$."EX|
00001D40: 50 22 00 5A 25 7A 04 54 42 B2 30 3A 54 41 B2 30 |P".Z%z.TB.0:TA.0|
00001D50: 3A 54 44 B2 30 3A 54 50 B2 30 00 8B 25 7E 04 81 |:TD.0:TP.0..%~..|
00001D60: 5A B2 53 A4 46 3A 42 44 28 5A 29 B2 A5 42 28 B5 |Z.S.F:BD(Z)..B(.|
00001D70: 28 53 55 28 30 2C 5A 2C 30 29 AC 43 4D 29 29 3A |(SU(0,Z,0).CM)):|
00001D80: 8B 5A B2 31 36 A7 99 22 91 22 3B 00 B9 25 7F 04 |.Z.16..".";..%..|
00001D90: 99 22 1F 20 20 22 CA 28 43 43 24 2C 5A AA 5A AB |.". ".(CC$,Z.Z.|
00001DA0: 31 2C 32 29 A6 37 AB C3 28 C4 28 42 44 28 5A 29 |1,2).7..(.(BD(Z)|
00001DB0: 29 29 29 42 44 28 5A 29 3B 00 E4 25 80 04 4A B2 |)))BD(Z);..%..J.|
00001DC0: A5 42 28 41 44 28 5A 29 29 3A 4E 43 B2 5A 3A 8D |.B(AD(Z)):NC.Z:.|
00001DD0: 31 38 33 30 3A 99 A6 37 AB C3 28 57 24 29 29 57 |1830:..7..(W$))W|
00001DE0: 24 3A 82 5A 00 17 26 88 04 8D 31 38 34 30 3A 99 |$:.Z..&...1840:.|
00001DF0: 22 90 20 22 4C 42 24 22 2E 24 22 A6 35 AB C3 28 |". "LB$".$".5..(|
00001E00: 54 42 24 29 29 54 42 24 A6 31 30 AB C3 28 54 41 |TB$))TB$.10..(TA|
00001E10: 24 29 29 54 41 24 3B 00 3F 26 8A 04 99 22 20 20 |$))TA$;.?&..." |
00001E20: 22 A6 39 AB C3 28 54 44 24 29 29 54 44 24 A6 37 |".9..(TD$))TD$.7|
00001E30: AB C3 28 54 50 24 29 29 54 50 24 22 25 1F 22 00 |..(TP$))TP$"%.".|
00001E40: 54 26 8C 04 8B 48 46 B2 31 A7 48 46 B2 30 3A 89 |T&...HF.1.HF.0:.|
00001E50: 31 31 36 38 00 77 26 8E 04 53 B2 31 36 3A 46 B2 |1168.w&..S.16:F.|
00001E60: 31 38 3A 48 46 B2 31 3A 4C 42 24 B2 22 49 4E 43 |18:HF.1:LB$."INC|
00001E70: 22 3A 89 31 31 34 36 00 86 26 90 04 8B 50 46 B2 |":.1146..&...PF.|
00001E80: 31 89 31 31 38 30 00 CC 26 92 04 59 43 B2 32 34 |1.1180..&..YC.24|
00001E90: 3A 58 43 B2 32 3A 8D 34 39 30 3A 99 22 95 53 45 |:XC.2:.490:.".SE|
00001EA0: 4C 45 43 54 20 4F 4E 45 3A 20 28 20 12 90 50 92 |LECT ONE: ( ..P.|
00001EB0: 95 52 49 4E 54 20 12 90 47 92 95 52 41 50 48 20 |.RINT ..G..RAPH |
00001EC0: 12 90 45 92 95 58 49 54 20 29 90 22 00 F2 26 94 |..E..XIT )."..&.|
00001ED0: 04 59 43 B2 32 34 3A 58 43 B2 33 36 3A 44 46 24 |.YC.24:XC.36:DF$|
00001EE0: B2 22 47 22 3A 8D 33 33 30 3A 8B 49 B2 31 33 36 |."G":.330:.I.136|
00001EF0: A7 8E 00 14 27 96 04 8B 58 24 B3 B1 22 47 22 AF |....'...X$.."G".|
00001F00: 58 24 B3 B1 22 50 22 AF 58 24 B3 B1 22 45 22 89 |X$.."P".X$.."E".|
00001F10: 31 31 37 30 00 22 27 98 04 8B 58 24 B2 22 45 22 |1170."'...X$."E"|
00001F20: A7 8E 00 3A 27 99 04 8B 58 24 B2 22 47 22 A7 8D |...:'...X$."G"..|
00001F30: 39 30 30 3A 8D 38 30 30 3A 8E 00 60 27 9A 04 9F |900:.800:..`'...|
00001F40: 34 2C 34 2C 30 3A A0 34 3A 8B 53 54 A7 45 B2 32 |4,4,0:.4:.ST.E.2|
00001F50: 3A 8D 34 33 30 3A 50 46 B2 30 3A 89 31 31 34 30 |:.430:PF.0:.1140|
00001F60: 00 79 27 9B 04 50 46 B2 31 3A 9F 34 2C 34 2C 30 |.y'..PF.1:.4,4,0|
00001F70: 3A 9D 34 3A 89 31 31 34 30 00 99 27 9C 04 50 46 |:.4:.1140..'..PF|
00001F80: B2 30 3A 81 58 B2 31 A4 34 33 3A 98 34 3A 82 58 |.0:.X.1.43:.4:.X|
00001F90: 3A A0 34 3A 89 31 31 34 30 00 A5 27 B0 04 42 59 |:.4:.1140..'..BY|
00001FA0: B2 31 39 38 33 00 D1 27 BA 04 99 22 93 95 22 A3 |.1983..'..."..".|
00001FB0: 38 33 29 22 57 49 53 48 20 54 4F 20 4C 4F 41 44 |83)"WISH TO LOAD|
00001FC0: 20 41 20 42 55 44 47 45 54 20 46 49 4C 45 3F 90 | A BUDGET FILE?.|
00001FD0: 22 00 FA 27 BC 04 59 43 B2 33 3A 58 43 B2 33 33 |"..'..YC.3:XC.33|
00001FE0: 3A 44 46 24 B2 22 4E 22 3A 8D 33 33 30 3A 8B 49 |:DF$."N":.330:.I|
00001FF0: B2 31 33 36 A7 49 B2 30 3A 8E 00 12 28 BE 04 8B |.136.I.0:...(...|
00002000: 58 24 B3 B1 22 59 22 A7 99 22 93 22 3A 89 31 32 |X$.."Y"..".":.12|
00002010: 33 30 00 36 28 C0 04 99 22 13 9A 22 A3 32 30 35 |30.6(..."..".205|
00002020: 29 22 49 53 20 59 4F 55 52 20 22 48 42 24 22 20 |)"IS YOUR "HB$" |
00002030: 46 49 4C 45 91 22 00 5C 28 C2 04 59 43 B2 31 30 |FILE.".\(..YC.10|
00002040: 3A 58 43 B2 32 37 3A 8D 36 30 36 3A 8B 49 B2 31 |:XC.27:.606:.I.1|
00002050: 33 36 A7 49 B2 30 3A 89 31 32 31 30 00 8C 28 C4 |36.I.0:.1210..(.|
00002060: 04 4E 46 24 B2 48 42 24 3A 49 43 24 B2 22 48 22 |.NF$.HB$:IC$."H"|
00002070: 3A 8B 44 56 B3 B1 38 A7 58 43 B2 35 3A 59 43 B2 |:.DV..8.XC.5:YC.|
00002080: 32 33 3A 8D 34 39 30 3A 8D 36 32 36 00 B9 28 C5 |23:.490:.626..(.|
00002090: 04 8B 44 56 B3 B1 38 A7 99 22 91 91 91 91 91 91 |..DV..8.."......|
000020A0: 91 91 22 3A 9F 31 2C 31 2C 30 2C 4E 46 24 3A 42 |..":.1,1,0,NF$:B|
000020B0: 53 B2 31 3A 89 31 32 32 35 00 E9 28 C6 04 54 53 |S.1:.1225..(..TS|
000020C0: 24 B2 22 4C 4F 41 44 49 4E 47 20 22 3A 99 22 95 |$."LOADING ":.".|
000020D0: 91 22 3B 3A 8D 36 32 31 3A 8B 49 B2 31 33 36 A7 |.";:.621:.I.136.|
000020E0: 49 B2 30 3A 89 31 32 31 30 00 05 29 C7 04 42 53 |I.0:.1210..)..BS|
000020F0: B2 31 3A 8D 36 33 30 3A 8B 49 B2 31 33 36 A7 49 |.1:.630:.I.136.I|
00002100: B2 30 3A 8E 8A 00 1A 29 C8 04 8B 45 52 B1 31 A7 |.0:....)...ER.1.|
00002110: 45 52 B2 30 3A 89 31 32 31 30 00 51 29 C9 04 8B |ER.0:.1210.Q)...|
00002120: 42 53 B2 31 A7 42 53 B2 30 3A 81 5A B2 30 A4 31 |BS.1.BS.0:.Z.0.1|
00002130: 38 3A 84 31 2C 53 55 28 30 2C 5A 2C 30 29 3A 82 |8:.1,SU(0,Z,0):.|
00002140: 5A 3A 8D 36 33 39 3A 8B 44 56 B2 31 89 31 32 32 |Z:.639:.DV.1.122|
00002150: 38 00 61 29 CA 04 8B 45 52 B2 36 32 89 31 32 30 |8.a)...ER.62.120|
00002160: 30 00 76 29 CB 04 8B 45 52 B1 31 A7 45 52 B2 30 |0.v)...ER.1.ER.0|
00002170: 3A 89 31 32 31 30 00 85 29 CC 04 8D 31 38 31 38 |:.1210..)...1818|
00002180: 3A 99 22 93 22 00 B9 29 CE 04 4F 46 B2 B5 28 53 |:."."..)..OF..(S|
00002190: 55 28 30 2C 30 2C 30 29 AD 31 30 30 29 3A 59 49 |U(0,0,0).100):YI|
000021A0: B2 38 33 AA 28 4F 46 AB 31 29 3A 59 49 24 B2 C9 |.83.(OF.1):YI$..|
000021B0: 28 C4 28 59 49 29 2C 32 29 00 EC 29 D0 04 42 4D |(.(YI),2)..)..BM|
000021C0: B2 B5 28 28 53 55 28 30 2C 30 2C 30 29 AB 28 4F |..((SU(0,0,0).(O|
000021D0: 46 AC 31 30 30 29 29 29 3A 8B 42 4D B3 B2 30 A7 |F.100))):.BM..0.|
000021E0: 42 4D 24 B2 22 22 3A 89 31 32 34 30 00 0F 2A D2 |BM$."":.1240..*.|
000021F0: 04 42 4D 24 B2 CA 28 4D 53 24 2C 28 42 4D AA 32 |.BM$..(MS$,(BM.2|
00002200: AC 28 42 4D AB 31 29 29 2C 33 29 AA 59 49 24 00 |.(BM.1)),3).YI$.|
00002210: 43 2A D8 04 99 22 13 1F 12 22 48 46 24 22 92 97 |C*..."..."HF$"..|
00002220: 4D 4F 4E 54 48 4C 59 20 42 55 44 47 45 54 90 22 |MONTHLY BUDGET."|
00002230: 3B 3A 8B 42 4D 24 B3 B1 22 22 A7 99 22 20 22 42 |;:.BM$.."".." "B|
00002240: 4D 24 3B 00 74 2A DC 04 99 52 24 22 1C 20 49 54 |M$;.t*...R$". IT|
00002250: 45 4D 23 20 43 4F 44 45 20 50 52 45 53 45 4E 54 |EM# CODE PRESENT|
00002260: 20 20 50 52 4F 50 4F 53 45 44 20 20 43 48 41 4E | PROPOSED CHAN|
00002270: 47 45 1F 22 00 94 2A DE 04 53 B2 31 3A 46 B2 31 |GE."..*..S.1:F.1|
00002280: 35 3A 48 46 B2 30 3A 4C 42 24 B2 22 45 58 50 45 |5:HF.0:LB$."EXPE|
00002290: 4E 53 45 22 00 AE 2A E2 04 54 42 B2 30 3A 54 41 |NSE"..*..TB.0:TA|
000022A0: B2 30 3A 54 43 B2 30 3A 81 5A B2 53 A4 46 00 D7 |.0:TC.0:.Z.S.F..|
000022B0: 2A E3 04 99 22 1F 20 20 22 A6 33 AB C3 28 C4 28 |*...". ".3..(.(|
000022C0: 5A 29 29 29 5A A6 32 29 CA 28 43 43 24 2C 5A AA |Z)))Z.2).(CC$,Z.|
000022D0: 5A AB 31 2C 32 29 3B 00 13 2B E4 04 99 22 1F 22 |Z.1,2);..+..."."|
000022E0: A6 39 AB C3 28 C4 28 53 55 28 30 2C 5A 2C 30 29 |.9..(.(SU(0,Z,0)|
000022F0: 29 29 29 53 55 28 30 2C 5A 2C 30 29 3B 3A 54 41 |)))SU(0,Z,0);:TA|
00002300: B2 B5 28 54 41 AA B5 28 53 55 28 30 2C 5A 2C 30 |..(TA..(SU(0,Z,0|
00002310: 29 29 29 00 40 2B E6 04 99 22 1F 22 A6 39 AB C3 |))).@+...".".9..|
00002320: 28 C4 28 42 55 28 5A 29 29 29 29 42 55 28 5A 29 |(.(BU(Z))))BU(Z)|
00002330: 3B 3A 54 42 B2 54 42 AA B5 28 42 55 28 5A 29 29 |;:TB.TB..(BU(Z))|
00002340: 00 76 2B E8 04 57 B2 B5 28 42 55 28 5A 29 AB 53 |.v+..W..(BU(Z).S|
00002350: 55 28 30 2C 5A 2C 30 29 29 3A 99 22 1F 22 A6 37 |U(0,Z,0)):.".".7|
00002360: AB C3 28 C4 28 57 29 29 29 57 3A 54 43 B2 A5 42 |..(.(W)))W:TC..B|
00002370: 28 54 43 AA 57 29 00 7D 2B EA 04 82 5A 00 B0 2B |(TC.W).}+...Z..+|
00002380: EC 04 99 22 90 20 20 22 4C 42 24 22 20 20 24 22 |...". "LB$" $"|
00002390: A6 37 AB C3 28 C4 28 54 41 29 29 29 54 41 22 20 |.7..(.(TA)))TA" |
000023A0: 22 A6 38 AB C3 28 C4 28 54 42 29 29 29 54 42 3B |".8..(.(TB)))TB;|
000023B0: 00 D7 2B ED 04 57 B2 54 43 3A 8D 34 30 36 3A 54 |..+..W.TC:.406:T|
000023C0: 43 24 B2 57 24 3A 99 A6 37 AB C3 28 54 43 24 29 |C$.W$:..7..(TC$)|
000023D0: 29 54 43 24 22 1F 22 00 EC 2B EE 04 8B 48 46 B2 |)TC$"."..+...HF.|
000023E0: 31 A7 48 46 B2 30 3A 89 31 32 36 36 00 13 2C F0 |1.HF.0:.1266..,.|
000023F0: 04 53 B2 31 36 3A 46 B2 31 38 3A 48 46 B2 31 3A |.S.16:F.18:HF.1:|
00002400: 4C 42 24 B2 22 49 4E 43 4F 4D 45 20 22 3A 89 31 |LB$."INCOME ":.1|
00002410: 32 35 30 00 22 2C F2 04 8B 50 46 B2 31 89 31 32 |250.",...PF.1.12|
00002420: 39 38 00 37 2C 00 05 8B 41 50 B2 31 A7 41 50 B2 |98.7,...AP.1.AP.|
00002430: 30 3A 89 31 32 39 30 00 7D 2C 01 05 59 43 B2 32 |0:.1290.},..YC.2|
00002440: 34 3A 58 43 B2 32 3A 8D 34 39 30 3A 99 22 95 45 |4:XC.2:.490:.".E|
00002450: 4E 54 45 52 20 49 54 45 4D 20 23 20 54 4F 20 43 |NTER ITEM # TO C|
00002460: 48 41 4E 47 45 20 28 30 3D 44 4F 4E 45 29 20 20 |HANGE (0=DONE) |
00002470: 20 20 90 22 3B 3A 44 46 24 B2 22 30 22 00 A0 2C | .";:DF$."0"..,|
00002480: 02 05 59 43 B2 32 34 3A 58 43 B2 33 34 3A 4C 4C |..YC.24:XC.34:LL|
00002490: B2 32 3A 8D 33 36 30 3A 8B 49 B2 31 33 36 A7 8E |.2:.360:.I.136..|
000024A0: 00 B8 2C 03 05 4E 49 B2 B5 28 58 30 29 3A 8B 4E |..,..NI..(X0):.N|
000024B0: 49 B2 30 89 31 32 39 30 00 CD 2C 04 05 8B 4E 49 |I.0.1290..,...NI|
000024C0: B3 31 B0 4E 49 B1 31 38 89 31 32 38 31 00 E8 2C |.1.NI.18.1281..,|
000024D0: 05 05 59 43 B2 32 AA 58 30 3A 8B 58 30 B1 31 35 |..YC.2.X0:.X0.15|
000024E0: A7 59 43 B2 59 43 AA 31 00 1F 2D 06 05 58 43 B2 |.YC.YC.1..-..XC.|
000024F0: 32 34 3A 4C 4C B2 35 3A 44 46 24 B2 C4 28 53 55 |24:LL.5:DF$..(SU|
00002500: 28 30 2C 58 30 2C 30 29 29 3A 44 46 24 B2 C9 28 |(0,X0,0)):DF$..(|
00002510: 44 46 24 2C 28 C3 28 44 46 24 29 AB 31 29 29 00 |DF$,(.(DF$).1)).|
00002520: 39 2D 07 05 8D 33 36 30 3A 8B 49 B2 31 33 36 A7 |9-...360:.I.136.|
00002530: 49 B2 30 3A 89 31 32 33 30 00 68 2D 08 05 42 55 |I.0:.1230.h-..BU|
00002540: 28 4E 49 29 B2 B5 28 58 30 29 3A 8D 34 39 30 3A |(NI)..(X0):.490:|
00002550: 99 C8 28 42 24 2C 31 33 29 3B 3A 8B 58 24 B3 B1 |..(B$,13);:.X$..|
00002560: 44 46 24 A7 45 46 B2 31 00 87 2D 09 05 8D 34 39 |DF$.EF.1..-...49|
00002570: 30 3A 99 22 1F 22 A6 35 AB C3 28 58 24 29 29 58 |0:.".".5..(X$))X|
00002580: 24 3A 89 31 32 33 30 00 CA 2D 0A 05 59 43 B2 32 |$:.1230..-..YC.2|
00002590: 34 3A 58 43 B2 32 3A 8D 34 39 30 3A 99 22 95 28 |4:XC.2:.490:.".(|
000025A0: 12 90 50 92 95 52 49 4E 54 20 12 90 53 92 95 41 |..P..RINT ..S..A|
000025B0: 56 45 20 12 90 52 92 95 45 44 4F 20 12 90 45 92 |VE ..R..EDO ..E.|
000025C0: 95 58 49 54 20 29 90 20 22 3B 00 00 2E 0B 05 99 |.XIT ). ";......|
000025D0: 22 43 48 4F 49 43 45 3F 20 20 20 20 20 22 3A 59 |"CHOICE? ":Y|
000025E0: 43 B2 32 34 3A 58 43 B2 33 36 3A 44 46 24 B2 22 |C.24:XC.36:DF$."|
000025F0: 45 22 3A 8D 33 33 30 3A 8B 49 B2 31 33 36 A7 8E |E":.330:.I.136..|
00002600: 00 2A 2E 0C 05 8B 58 24 B3 B1 22 50 22 AF 58 24 |.*....X$.."P".X$|
00002610: B3 B1 22 53 22 AF 58 24 B3 B1 22 52 22 AF 58 24 |.."S".X$.."R".X$|
00002620: B3 B1 22 45 22 89 31 32 39 30 00 3B 2E 0D 05 8B |.."E".1290.;....|
00002630: 58 24 B2 22 52 22 89 31 32 38 31 00 4F 2E 0E 05 |X$."R".1281.O...|
00002640: 8B 58 24 B2 22 45 22 A7 8D 31 38 32 30 3A 8E 00 |.X$."E"..1820:..|
00002650: 77 2E 0F 05 8B 58 24 B2 22 53 22 A7 8D 31 38 32 |w....X$."S"..182|
00002660: 30 3A 8D 31 36 30 30 3A 41 50 B2 31 3A 99 22 93 |0:.1600:AP.1:.".|
00002670: 22 3A 89 31 32 33 30 00 9D 2E 10 05 9F 34 2C 34 |":.1230......4,4|
00002680: 2C 30 3A A0 34 3A 8B 53 54 A7 45 B2 32 3A 8D 34 |,0:.4:.ST.E.2:.4|
00002690: 33 30 3A 50 46 B2 30 3A 89 31 32 34 30 00 B4 2E |30:PF.0:.1240...|
000026A0: 11 05 50 46 B2 31 3A 9F 34 2C 34 3A 9D 34 3A 89 |..PF.1:.4,4:.4:.|
000026B0: 31 32 33 30 00 D9 2E 12 05 50 46 B2 30 3A 81 58 |1230.....PF.0:.X|
000026C0: B2 31 A4 34 33 3A 98 34 3A 82 58 3A A0 34 3A 41 |.1.43:.4:.X:.4:A|
000026D0: 50 B2 31 3A 89 31 32 33 30 00 FB 2E 14 05 8F 20 |P.1:.1230...... |
000026E0: 2A 2A 2A 2A 2A 2A 20 20 20 20 43 41 54 45 47 4F |****** CATEGO|
000026F0: 52 59 20 41 4E 41 4C 59 53 49 53 00 28 2F 1E 05 |RY ANALYSIS.(/..|
00002700: 99 22 93 22 3A 8D 35 32 30 3A 99 A3 35 30 29 22 |.".":.520:..50)"|
00002710: 95 54 48 45 20 43 41 54 45 47 4F 52 49 45 53 20 |.THE CATEGORIES |
00002720: 41 52 45 3A 90 22 52 24 00 36 2F 20 05 81 5A B2 |ARE:."R$.6/ ..Z.|
00002730: 31 A4 31 37 A9 32 00 6B 2F 22 05 99 22 90 20 20 |1.17.2.k/"..". |
00002740: 22 CA 28 43 43 24 2C 5A AA 5A AB 31 2C 32 29 A6 |".(CC$,Z.Z.1,2).|
00002750: 32 29 22 1F 22 4E 43 24 28 5A 29 3B A6 31 35 AB |2)"."NC$(Z);.15.|
00002760: C3 28 4E 43 24 28 5A 29 29 29 3B 00 93 2F 23 05 |.(NC$(Z)));../#.|
00002770: 99 22 90 22 CA 28 43 43 24 2C 5A AA 5A AA 31 2C |.".".(CC$,Z.Z.1,|
00002780: 32 29 A6 32 29 22 1F 22 4E 43 24 28 5A AA 31 29 |2).2)"."NC$(Z.1)|
00002790: 3A 82 5A 00 C4 2F 24 05 59 43 B2 32 31 3A 58 43 |:.Z../$.YC.21:XC|
000027A0: B2 34 3A 8D 34 39 30 3A 99 22 95 45 4E 54 45 52 |.4:.490:.".ENTER|
000027B0: 20 54 48 45 20 43 41 54 45 47 4F 52 59 20 43 4F | THE CATEGORY CO|
000027C0: 44 45 90 22 00 F4 2F 26 05 59 43 B2 32 31 3A 58 |DE."../&.YC.21:X|
000027D0: 43 B2 33 32 3A 4C 4C B2 32 3A 44 46 24 B2 22 41 |C.32:LL.2:DF$."A|
000027E0: 55 22 3A 8D 33 30 30 3A 8B 49 B2 31 33 36 A7 49 |U":.300:.I.136.I|
000027F0: B2 30 3A 8E 00 14 30 27 05 43 48 24 B2 58 24 3A |.0:...0'.CH$.X$:|
00002800: 8D 32 30 30 3A 8B 45 B2 34 A7 8D 34 33 30 3A 89 |.200:.E.4..430:.|
00002810: 31 33 30 30 00 2C 30 28 05 41 46 B2 31 3A 8D 31 |1300.,0(.AF.1:.1|
00002820: 31 31 30 3A 8B 49 B2 31 33 36 A7 8E 00 36 30 3C |110:.I.136...60<|
00002830: 05 8D 31 38 37 30 00 5A 30 42 05 54 42 B2 30 3A |..1870.Z0B.TB.0:|
00002840: 54 41 B2 30 3A 54 44 B2 30 3A 54 50 B2 30 3A 4C |TA.0:TD.0:TP.0:L|
00002850: 42 24 B2 22 54 4F 54 41 4C 22 00 90 30 46 05 81 |B$."TOTAL"..0F..|
00002860: 5A B2 53 41 A4 46 41 3A 42 44 28 4E 43 29 B2 B5 |Z.SA.FA:BD(NC)..|
00002870: 28 53 55 28 30 2C 4E 43 2C 30 29 29 3A 5A 31 B2 |(SU(0,NC,0)):Z1.|
00002880: 5A 3A 8B 5A B1 31 32 A7 5A 31 B2 5A 31 AB 31 32 |Z:.Z.12.Z1.Z1.12|
00002890: 00 C6 30 48 05 99 22 1F 20 20 22 CA 28 4D 53 24 |..0H..". ".(MS$|
000028A0: 2C 5A 31 AA 32 AC 28 5A 31 AB 31 29 2C 33 29 A6 |,Z1.2.(Z1.1),3).|
000028B0: 36 AB C3 28 C4 28 42 44 28 4E 43 29 29 29 29 42 |6..(.(BD(NC))))B|
000028C0: 44 28 4E 43 29 3B 00 DD 30 4A 05 4A B2 53 55 28 |D(NC);..0J.J.SU(|
000028D0: 5A 2C 4E 43 2C 31 29 3A 8D 31 38 33 30 00 0B 31 |Z,NC,1):.1830..1|
000028E0: 4C 05 99 A6 37 AB C3 28 57 24 29 29 57 24 3A 4C |L...7..(W$))W$:L|
000028F0: B2 4C AA 31 3A 8B 50 46 B2 30 A7 8B 4C B1 32 31 |.L.1:.PF.0..L.21|
00002900: A7 8D 31 30 30 3A 8D 31 38 37 30 00 3D 31 50 05 |..100:.1870.=1P.|
00002910: 82 5A 3A 8D 31 38 34 30 3A 99 22 90 20 22 4C 42 |.Z:.1840:.". "LB|
00002920: 24 A6 35 AB C3 28 54 42 24 29 29 54 42 24 A6 31 |$.5..(TB$))TB$.1|
00002930: 30 AB C3 28 54 41 24 29 29 54 41 24 3B 00 6B 31 |0..(TA$))TA$;.k1|
00002940: 52 05 99 22 20 20 22 A6 39 AB C3 28 54 44 24 29 |R.." ".9..(TD$)|
00002950: 29 54 44 24 A6 37 AB C3 28 54 50 24 29 29 54 50 |)TD$.7..(TP$))TP|
00002960: 24 22 25 1F 22 3A 4C B2 4C AA 31 00 7A 31 54 05 |$"%.":L.L.1.z1T.|
00002970: 8B 50 46 B2 31 89 31 33 38 30 00 BB 31 5A 05 59 |.PF.1.1380..1Z.Y|
00002980: 43 B2 32 34 3A 58 43 B2 32 3A 8D 34 39 30 3A 99 |C.24:XC.2:.490:.|
00002990: 22 95 20 20 53 45 4C 45 43 54 20 4F 4E 45 3A 20 |". SELECT ONE: |
000029A0: 20 20 28 20 12 90 50 92 95 52 49 4E 54 20 12 90 | ( ..P..RINT ..|
000029B0: 45 92 95 58 49 54 20 29 90 20 22 00 E1 31 5C 05 |E..XIT ). "..1\.|
000029C0: 59 43 B2 32 34 3A 58 43 B2 33 36 3A 44 46 24 B2 |YC.24:XC.36:DF$.|
000029D0: 22 45 22 3A 8D 33 33 30 3A 8B 49 B2 31 33 36 A7 |"E":.330:.I.136.|
000029E0: 8E 00 EF 31 5E 05 8B 58 24 B2 22 45 22 A7 8E 00 |...1^..X$."E"...|
000029F0: 09 32 60 05 8B 58 24 B3 B1 22 50 22 AF 58 24 B3 |.2`..X$.."P".X$.|
00002A00: B1 22 45 22 89 31 33 37 30 00 2F 32 62 05 9F 34 |."E".1370./2b..4|
00002A10: 2C 34 2C 30 3A A0 34 3A 8B 53 54 A7 45 B2 32 3A |,4,0:.4:.ST.E.2:|
00002A20: 8D 34 33 30 3A 50 46 B2 30 3A 89 31 33 34 30 00 |.430:PF.0:.1340.|
00002A30: 46 32 63 05 50 46 B2 31 3A 9F 34 2C 34 3A 9D 34 |F2c.PF.1:.4,4:.4|
00002A40: 3A 89 31 33 34 30 00 5E 32 64 05 50 46 B2 30 3A |:.1340.^2d.PF.0:|
00002A50: 8D 31 38 35 30 3A A0 34 3A 89 31 33 34 30 00 7F |.1850:.4:.1340..|
00002A60: 32 78 05 8F 20 2A 2A 2A 2A 2A 2A 20 44 45 44 55 |2x.. ****** DEDU|
00002A70: 43 54 49 42 4C 45 20 41 4E 41 4C 59 53 49 53 00 |CTIBLE ANALYSIS.|
00002A80: 97 32 82 05 41 46 B2 31 3A 8D 31 31 31 30 3A 8B |.2..AF.1:.1110:.|
00002A90: 49 B2 31 33 36 A7 8E 00 C2 32 A0 05 99 22 93 97 |I.136....2..."..|
00002AA0: 20 20 54 41 58 20 49 4D 50 41 43 54 20 41 4E 41 | TAX IMPACT ANA|
00002AB0: 4C 59 53 49 53 20 20 1F 22 53 41 24 22 2D 22 46 |LYSIS ."SA$"-"F|
00002AC0: 41 24 00 F2 32 A4 05 99 22 1C 20 20 20 20 43 41 |A$..2...". CA|
00002AD0: 54 45 47 4F 52 59 20 20 20 20 20 54 4F 54 41 4C |TEGORY TOTAL|
00002AE0: 20 20 20 20 44 45 44 55 43 54 2E 20 20 20 20 25 | DEDUCT. %|
00002AF0: 1F 22 00 12 33 A5 05 53 B2 31 3A 46 B2 31 35 3A |."..3..S.1:F.15:|
00002B00: 48 46 B2 30 3A 4C 42 24 B2 22 45 58 50 45 4E 53 |HF.0:LB$."EXPENS|
00002B10: 45 22 00 38 33 AA 05 54 41 B2 30 3A 54 44 B2 30 |E".83..TA.0:TD.0|
00002B20: 3A 54 50 B2 30 3A 81 5A B2 53 A4 46 3A 8B 5A B2 |:TP.0:.Z.S.F:.Z.|
00002B30: 31 36 A7 99 22 91 22 3B 00 58 33 AB 05 99 22 1F |16..".";.X3...".|
00002B40: 20 22 4E 43 24 28 5A 29 3B A6 31 34 AB C3 28 4E | "NC$(Z);.14..(N|
00002B50: 43 24 28 5A 29 29 29 3B 00 8B 33 AC 05 57 24 B2 |C$(Z)));..3..W$.|
00002B60: C4 28 41 44 28 5A 29 29 3A 8D 34 30 30 3A 99 A6 |.(AD(Z)):.400:..|
00002B70: 39 AB C3 28 57 24 29 29 57 24 3B 3A 54 41 B2 A5 |9..(W$))W$;:TA..|
00002B80: 42 28 54 41 AA 41 44 28 5A 29 29 00 C1 33 AD 05 |B(TA.AD(Z))..3..|
00002B90: 57 24 B2 C4 28 54 58 28 5A 29 29 3A 8D 34 30 30 |W$..(TX(Z)):.400|
00002BA0: 3A 99 22 1F 22 A6 39 AB C3 28 57 24 29 29 57 24 |:.".".9..(W$))W$|
00002BB0: 3B 3A 54 44 B2 A5 42 28 54 44 AA 54 58 28 5A 29 |;:TD..B(TD.TX(Z)|
00002BC0: 29 00 D9 33 AE 05 8B 41 44 28 5A 29 B2 30 A7 50 |)..3...AD(Z).0.P|
00002BD0: 43 B2 30 3A 89 31 34 35 36 00 F6 33 AF 05 50 43 |C.0:.1456..3..PC|
00002BE0: B2 A5 41 28 28 54 58 28 5A 29 AD 41 44 28 5A 29 |..A((TX(Z).AD(Z)|
00002BF0: 29 AC 31 30 30 29 00 15 34 B0 05 57 24 B2 C4 28 |).100)..4..W$..(|
00002C00: 50 43 29 3A 8D 34 30 34 3A 99 A6 36 AB C3 28 57 |PC):.404:..6..(W|
00002C10: 24 29 29 57 24 00 31 34 B1 05 82 5A 3A 57 24 B2 |$))W$.14...Z:W$.|
00002C20: C4 28 54 41 29 3A 8D 34 30 30 3A 54 41 24 B2 57 |.(TA):.400:TA$.W|
00002C30: 24 00 4A 34 B2 05 57 24 B2 C4 28 54 44 29 3A 8D |$.J4..W$..(TD):.|
00002C40: 34 30 30 3A 54 44 24 B2 57 24 00 6F 34 B3 05 54 |400:TD$.W$.o4..T|
00002C50: 50 B2 A5 41 28 28 54 44 AD 54 41 29 AC 31 30 30 |P..A((TD.TA).100|
00002C60: 29 3A 57 24 B2 C4 28 54 50 29 3A 8D 34 30 34 00 |):W$..(TP):.404.|
00002C70: A0 34 B4 05 99 22 90 20 22 4C 42 24 22 20 20 20 |.4...". "LB$" |
00002C80: 20 20 20 24 22 A6 39 AB C3 28 54 41 24 29 29 54 | $".9..(TA$))T|
00002C90: 41 24 A6 39 AB C3 28 54 44 24 29 29 54 44 24 3B |A$.9..(TD$))TD$;|
00002CA0: 00 B5 34 B6 05 99 A6 36 AB C3 28 57 24 29 29 57 |..4....6..(W$))W|
00002CB0: 24 22 25 1F 22 00 CA 34 B8 05 8B 48 46 B2 31 A7 |$"%."..4...HF.1.|
00002CC0: 48 46 B2 30 3A 89 31 34 36 38 00 F1 34 BA 05 53 |HF.0:.1468..4..S|
00002CD0: B2 31 36 3A 46 B2 31 38 3A 48 46 B2 31 3A 4C 42 |.16:F.18:HF.1:LB|
00002CE0: 24 B2 22 49 4E 43 4F 4D 45 20 22 3A 89 31 34 35 |$."INCOME ":.145|
00002CF0: 30 00 00 35 BC 05 8B 50 46 B2 31 89 31 34 38 30 |0..5...PF.1.1480|
00002D00: 00 3F 35 BE 05 59 43 B2 32 34 3A 58 43 B2 32 3A |.?5..YC.24:XC.2:|
00002D10: 8D 34 39 30 3A 99 22 95 20 53 45 4C 45 43 54 20 |.490:.". SELECT |
00002D20: 4F 4E 45 3A 20 20 28 20 12 90 50 92 95 52 49 4E |ONE: ( ..P..RIN|
00002D30: 54 20 12 90 45 92 95 58 49 54 20 29 90 20 22 00 |T ..E..XIT ). ".|
00002D40: 65 35 C0 05 59 43 B2 32 34 3A 58 43 B2 33 34 3A |e5..YC.24:XC.34:|
00002D50: 44 46 24 B2 22 45 22 3A 8D 33 33 30 3A 8B 49 B2 |DF$."E":.330:.I.|
00002D60: 31 33 36 A7 8E 00 7F 35 C2 05 8B 58 24 B3 B1 22 |136....5...X$.."|
00002D70: 50 22 AF 58 24 B3 B1 22 45 22 89 31 34 37 30 00 |P".X$.."E".1470.|
00002D80: 8D 35 C4 05 8B 58 24 B2 22 45 22 A7 8E 00 B3 35 |.5...X$."E"....5|
00002D90: C6 05 9F 34 2C 34 2C 30 3A A0 34 3A 8B 53 54 A7 |...4,4,0:.4:.ST.|
00002DA0: 45 B2 32 3A 8D 34 33 30 3A 50 46 B2 30 3A 89 31 |E.2:.430:PF.0:.1|
00002DB0: 34 34 30 00 CA 35 C7 05 50 46 B2 31 3A 9F 34 2C |440..5..PF.1:.4,|
00002DC0: 34 3A 9D 34 3A 89 31 34 34 30 00 EA 35 C8 05 50 |4:.4:.1440..5..P|
00002DD0: 46 B2 30 3A 81 58 B2 31 A4 34 33 3A 98 34 3A 82 |F.0:.X.1.43:.4:.|
00002DE0: 58 3A A0 34 3A 89 31 34 34 30 00 04 36 40 06 8F |X:.4:.1440..6@..|
00002DF0: 20 2E 2E 2E 53 41 56 45 20 42 55 44 47 45 54 20 | ...SAVE BUDGET |
00002E00: 46 49 4C 45 00 2C 36 54 06 99 22 93 22 A3 31 36 |FILE.,6T..".".16|
00002E10: 33 29 22 1F 20 53 41 56 49 4E 47 20 54 48 45 20 |3)". SAVING THE |
00002E20: 22 48 42 24 22 20 46 49 4C 45 2E 22 00 5D 36 55 |"HB$" FILE.".]6U|
00002E30: 06 99 22 13 22 A3 32 34 35 29 22 95 20 53 41 56 |..".".245)". SAV|
00002E40: 45 20 54 48 45 20 46 49 4C 45 22 3B 3A 59 43 B2 |E THE FILE";:YC.|
00002E50: 31 31 3A 58 43 B2 32 35 3A 8D 36 30 36 00 6A 36 |11:XC.25:.606.j6|
00002E60: 56 06 8B 49 B2 31 33 36 A7 8E 00 87 36 57 06 8B |V..I.136....6W..|
00002E70: 44 56 24 B2 22 54 41 50 45 22 A7 49 24 B2 22 4E |DV$."TAPE".I$."N|
00002E80: 22 3A 89 31 36 33 36 00 AE 36 58 06 99 A3 31 36 |":.1636..6X...16|
00002E90: 35 29 22 95 44 4F 20 59 4F 55 20 57 49 53 48 20 |5)".DO YOU WISH |
00002EA0: 54 4F 20 53 41 56 45 20 57 49 54 48 91 22 00 DE |TO SAVE WITH."..|
00002EB0: 36 5A 06 99 A3 34 35 29 22 1F 12 20 42 20 92 20 |6Z...45)".. B . |
00002EC0: 42 41 43 4B 55 50 22 A3 38 35 29 22 12 20 4E 20 |BACKUP".85)". N |
00002ED0: 92 20 4E 4F 20 42 41 43 4B 55 50 3F 91 22 00 FB |. NO BACKUP?."..|
00002EE0: 36 5E 06 59 43 B2 31 38 3A 58 43 B2 32 35 3A 44 |6^.YC.18:XC.25:D|
00002EF0: 46 24 B2 22 42 22 3A 8D 33 33 30 00 08 37 60 06 |F$."B":.330..7`.|
00002F00: 8B 49 B2 49 33 36 A7 8E 00 2A 37 64 06 4E 46 24 |.I.I36...*7d.NF$|
00002F10: B2 22 48 46 20 42 55 44 47 45 54 22 3A 54 53 24 |."HF BUDGET":TS$|
00002F20: B2 22 53 41 56 49 4E 47 20 22 00 5A 37 66 06 59 |."SAVING ".Z7f.Y|
00002F30: 43 B2 32 33 3A 58 43 B2 34 3A 8D 34 39 30 3A 8D |C.23:XC.4:.490:.|
00002F40: 36 32 35 3A 8B 44 56 B2 31 A7 99 22 91 91 91 91 |625:.DV.1.."....|
00002F50: 91 91 91 91 22 3A 89 36 36 30 00 63 37 68 06 89 |....":.660.c7h..|
00002F60: 36 35 30 00 80 37 08 07 99 22 93 22 A3 38 36 29 |650..7...".".86)|
00002F70: 22 9C 12 22 48 46 24 22 92 1F 22 50 32 24 3A 8E |".."HF$".."P2$:.|
00002F80: 00 AE 37 12 07 81 58 B2 31 A4 31 38 3A 41 44 28 |..7...X.1.18:AD(|
00002F90: 58 29 B2 30 3A 41 43 28 58 29 B2 30 3A 54 58 28 |X).0:AC(X).0:TX(|
00002FA0: 58 29 B2 30 3A 54 43 28 58 29 B2 30 3A 82 00 EF |X).0:TC(X).0:...|
00002FB0: 37 14 07 81 58 B2 31 A4 31 38 3A 81 5A B2 53 41 |7...X.1.18:.Z.SA|
00002FC0: A4 46 41 3A 41 44 28 58 29 B2 41 44 28 58 29 AA |.FA:AD(X).AD(X).|
00002FD0: 53 55 28 5A 2C 58 2C 31 29 3A 41 43 28 58 29 B2 |SU(Z,X,1):AC(X).|
00002FE0: 41 43 28 58 29 AA 53 55 28 5A 2C 58 2C 32 29 00 |AC(X).SU(Z,X,2).|
00002FF0: 25 38 16 07 54 58 28 58 29 B2 54 58 28 58 29 AA |%8..TX(X).TX(X).|
00003000: 53 55 28 5A 2C 58 2C 33 29 3A 54 43 28 58 29 B2 |SU(Z,X,3):TC(X).|
00003010: 54 43 28 58 29 AA 53 55 28 5A 2C 58 2C 34 29 3A |TC(X).SU(Z,X,4):|
00003020: 82 3A 82 3A 8E 00 45 38 1A 07 81 58 B2 31 A4 31 |.:.:..E8...X.1.1|
00003030: 38 3A 42 55 28 58 29 B2 53 55 28 30 2C 58 2C 30 |8:BU(X).SU(0,X,0|
00003040: 29 3A 82 3A 8E 00 6D 38 1C 07 81 58 B2 31 A4 31 |):.:..m8...X.1.1|
00003050: 38 3A 53 55 28 30 2C 58 2C 30 29 B2 42 55 28 58 |8:SU(0,X,0).BU(X|
00003060: 29 3A 82 3A 8B 58 24 B2 22 45 22 A7 8E 00 B4 38 |):.:.X$."E"....8|
00003070: 1D 07 59 43 B2 32 34 3A 58 43 B2 31 3A 8D 34 39 |..YC.24:XC.1:.49|
00003080: 30 3A 99 22 1C 45 4E 54 45 52 20 54 48 45 20 4D |0:.".ENTER THE M|
00003090: 4F 2E 2F 59 52 2E 28 90 45 2E 47 2E 4A 41 4E 38 |O./YR.(.E.G.JAN8|
000030A0: 33 1C 29 20 20 20 90 22 3A 59 43 B2 32 34 3A 58 |3.) .":YC.24:X|
000030B0: 43 B2 33 32 00 DA 38 1E 07 4C 4C B2 35 3A 44 46 |C.32..8..LL.5:DF|
000030C0: 24 B2 42 4D 24 3A 8D 33 30 30 3A 42 4D 24 B2 58 |$.BM$:.300:BM$.X|
000030D0: 24 3A 8B 49 B2 31 33 36 A7 8E 00 FE 38 1F 07 4D |$:.I.136....8..M|
000030E0: 4E 24 B2 C8 28 42 4D 24 2C 33 29 3A 8D 32 39 30 |N$..(BM$,3):.290|
000030F0: 3A 8B 45 A7 8D 34 33 30 3A 89 31 38 32 31 00 19 |:.E..430:.1821..|
00003100: 39 20 07 42 4D B2 4D 4E 3A 8B 42 4D B3 31 B0 42 |9 .BM.MN:.BM.1.B|
00003110: 4D B1 31 32 89 31 38 32 31 00 37 39 21 07 59 49 |M.12.1821.79!.YI|
00003120: B2 C5 28 C9 28 42 4D 24 2C 32 29 29 3A 8B 59 49 |..(.(BM$,2)):.YI|
00003130: B2 30 89 31 38 32 31 00 4C 39 22 07 8B 59 49 B3 |.0.1821.L9"..YI.|
00003140: 38 33 A7 59 49 B2 59 49 AA 31 30 30 00 7B 39 23 |83.YI.YI.100.{9#|
00003150: 07 4F 46 B2 31 39 30 30 AA 59 49 AB 42 59 3A 53 |.OF.1900.YI.BY:S|
00003160: 55 28 30 2C 30 2C 30 29 B2 B5 28 28 31 AA 4F 46 |U(0,0,0)..((1.OF|
00003170: 29 AC 31 30 30 29 AA 42 4D 3A 8E 00 9D 39 26 07 |).100).BM:...9&.|
00003180: 57 24 B2 C4 28 4A 29 3A 8D 34 30 30 3A 99 22 1F |W$..(J):.400:.".|
00003190: 22 A6 39 AB C3 28 57 24 29 29 57 24 3B 00 E3 39 |".9..(W$))W$;..9|
000031A0: 28 07 54 42 B2 A5 42 28 54 42 AA 42 44 28 4E 43 |(.TB..B(TB.BD(NC|
000031B0: 29 29 3A 54 41 B2 A5 42 28 54 41 AA 4A 29 3A 57 |)):TA..B(TA.J):W|
000031C0: B2 A5 42 28 42 44 28 4E 43 29 AB 4A 29 3A 8B 4E |..B(BD(NC).J):.N|
000031D0: 43 B1 31 35 A7 57 B2 A5 42 28 4A AB 42 44 28 4E |C.15.W..B(J.BD(N|
000031E0: 43 29 29 00 0E 3A 2A 07 44 44 28 5A 29 B2 57 3A |C))..:*.DD(Z).W:|
000031F0: 57 24 B2 C4 28 57 29 3A 8D 34 30 30 3A 99 22 1F |W$..(W):.400:.".|
00003200: 22 A6 31 31 AB C3 28 57 24 29 29 57 24 3B 00 48 |".11..(W$))W$;.H|
00003210: 3A 2C 07 54 44 B2 A5 42 28 54 44 AA 57 29 3A 57 |:,.TD..B(TD.W):W|
00003220: 24 B2 C4 28 54 44 29 3A 8D 34 30 30 3A 54 44 24 |$..(TD):.400:TD$|
00003230: B2 57 24 3A 8B 42 44 28 4E 43 29 B2 30 A7 57 24 |.W$:.BD(NC).0.W$|
00003240: B2 22 4E 2F 41 22 3A 8E 00 76 3A 2E 07 50 43 B2 |."N/A":..v:..PC.|
00003250: A5 41 28 28 44 44 28 5A 29 AD 42 44 28 4E 43 29 |.A((DD(Z).BD(NC)|
00003260: 29 AC 31 30 30 29 3A 57 24 B2 C4 28 50 43 29 3A |).100):W$..(PC):|
00003270: 8D 34 30 34 3A 8E 00 8F 3A 30 07 57 24 B2 C4 28 |.404:...:0.W$..(|
00003280: 54 41 29 3A 8D 34 30 30 3A 54 41 24 B2 57 24 00 |TA):.400:TA$.W$.|
00003290: B6 3A 32 07 57 B2 54 42 3A 8D 34 30 36 3A 54 42 |.:2.W.TB:.406:TB|
000032A0: 24 B2 57 24 3A 8B 54 42 B2 30 A7 54 50 24 B2 22 |$.W$:.TB.0.TP$."|
000032B0: 4E 2F 41 22 3A 8E 00 E4 3A 34 07 54 50 B2 A5 41 |N/A":...:4.TP..A|
000032C0: 28 28 54 44 AD 54 42 29 AC 31 30 30 29 3A 57 24 |((TD.TB).100):W$|
000032D0: B2 C4 28 54 50 29 3A 8D 34 30 34 3A 54 50 24 B2 |..(TP):.404:TP$.|
000032E0: 57 24 3A 8E 00 FD 3A 3A 07 81 20 4C B2 4C A4 36 |W$:...::.. L.L.6|
000032F0: 35 3A 98 34 3A 82 4C 3A 4C B2 30 3A 8E 00 26 3B |5:.4:.L:L.0:..&;|
00003300: 4E 07 99 22 93 20 20 97 45 58 50 45 4E 53 45 20 |N..". .EXPENSE |
00003310: 41 4E 41 4C 59 53 49 53 20 46 4F 52 20 1F 22 4E |ANALYSIS FOR ."N|
00003320: 43 24 28 4E 43 29 00 5D 3B 50 07 99 22 1C 20 4D |C$(NC).];P..". M|
00003330: 4F 4E 54 48 20 42 55 44 47 45 54 20 20 41 43 54 |ONTH BUDGET ACT|
00003340: 55 41 4C 20 44 49 46 46 45 52 45 4E 43 45 20 20 |UAL DIFFERENCE |
00003350: 25 47 41 49 4E 1F 22 3A 4C B2 33 3A 8E 00 8E 3B |%GAIN.":L.3:...;|
00003360: 58 07 48 46 B2 30 3A 4D 4C B2 30 3A 81 5A B2 31 |X.HF.0:ML.0:.Z.1|
00003370: A4 32 34 3A 8B 53 46 24 28 5A 29 B3 B1 22 22 AF |.24:.SF$(Z).."".|
00003380: 48 46 B2 30 A7 53 44 B2 5A 3A 48 46 B2 31 00 AB |HF.0.SD.Z:HF.1..|
00003390: 3B 5A 07 8B 53 46 24 28 5A 29 B3 B1 22 22 A7 46 |;Z..SF$(Z).."".F|
000033A0: 44 B2 5A 3A 4D 4C B2 4D 4C AA 31 00 B4 3B 5C 07 |D.Z:ML.ML.1..;\.|
000033B0: 82 5A 3A 8E 00 C9 3B 40 1F 97 45 47 2C 33 3A 8B |.Z:...;@..EG,3:.|
000033C0: 45 46 B2 30 89 38 30 39 30 00 FA 3B 4A 1F 99 22 |EF.0.8090..;J.."|
000033D0: 93 22 A3 38 32 29 22 1C 59 4F 55 20 48 41 56 45 |.".82)".YOU HAVE|
000033E0: 4E 27 54 20 59 45 54 20 53 41 56 45 44 20 54 48 |N'T YET SAVED TH|
000033F0: 45 20 43 48 41 4E 47 45 53 22 00 26 3C 4C 1F 99 |E CHANGES".&<L..|
00003400: 22 20 20 57 48 49 43 48 20 59 4F 55 20 4D 41 44 |" WHICH YOU MAD|
00003410: 45 20 54 4F 20 54 48 45 20 42 55 44 47 45 54 20 |E TO THE BUDGET |
00003420: 44 41 54 41 2E 22 00 51 3C 4E 1F 99 A3 38 33 29 |DATA.".Q<N...83)|
00003430: 22 9C 49 46 20 59 4F 55 20 57 41 4E 54 20 54 4F |".IF YOU WANT TO|
00003440: 20 53 41 56 45 20 54 48 45 20 44 41 54 41 2C 11 | SAVE THE DATA,.|
00003450: 22 00 82 3C 50 1F 99 22 50 52 45 53 53 20 12 20 |"..<P.."PRESS . |
00003460: 46 37 20 92 20 54 4F 20 52 45 54 55 52 4E 20 54 |F7 . TO RETURN T|
00003470: 4F 20 42 55 44 47 45 54 20 44 49 53 50 4C 41 59 |O BUDGET DISPLAY|
00003480: 2E 22 00 B1 3C 54 1F 99 A3 38 32 29 22 1E 49 46 |."..<T...82)".IF|
00003490: 20 59 4F 55 20 52 45 41 4C 4C 59 20 12 20 44 4F | YOU REALLY . DO|
000034A0: 20 92 20 57 41 4E 54 20 54 4F 20 45 58 49 54 2C | . WANT TO EXIT,|
000034B0: 22 00 DA 3C 5E 1F 99 A3 34 36 29 22 50 52 45 53 |"..<^...46)"PRES|
000034C0: 53 20 12 20 41 4E 59 20 4F 54 48 45 52 20 4B 45 |S . ANY OTHER KE|
000034D0: 59 20 92 2E 22 3A 8D 31 38 30 00 FA 3C 68 1F 8B |Y ..":.180..<h..|
000034E0: 49 B2 31 33 36 A7 43 B2 32 3A 99 22 93 22 3A 8D |I.136.C.2:.".":.|
000034F0: 31 32 33 30 3A 89 31 30 35 30 00 15 3D 9A 1F 99 |1230:.1050..=...|
00003500: 22 93 22 4F 46 24 2C 22 9A 44 4F 4E 45 2E 09 11 |"."OF$,".DONE...|
00003510: 11 11 22 3A 80 00 2C 3D C4 22 81 58 B2 31 A4 39 |..":..,=.".X.1.9|
00003520: 3A A0 58 3A 82 58 3A 89 31 30 35 30 00 00 00 F9 |:.X:.X:.1050....|
00003530: 31 00 BE 55 00 |1..U. |
..L.... CBM-64 HOUSEHOLD FINANCE PART 2
(C) 1983 CREATIVE SOFTWARE.Z..
.. 7/6/83...... AUCLEDENFDGIHHINMDMRSAT
XUTVAZZSWDIOT.P.... AUTO,CLOTHING,EDUCAT
ION,ENTERTAINMENT,FOOD,GIFTS,HOUSEHOLD,I
NSURANCE...... MEDICAL/DENTAL,MORTGAGE/R
ENT,SAVINGS,TAXES,UTILITIES,VACATION.L.(
.. MISCELLANEOUS,SALARY/WAGES,DIVIDENDS,
OTHER INCOME.R.2.....<..".":IN.1:C.0:.NC
$(18),E$(4),SF$(24),M$(5).I.F..SU(24,18,
4),BU(24),BD(24),AD(24),AC(24),TX(24),TC
(24),DD(24),W(15)...P.EG.53280:.EG,3:.EG
.1,1:.700...Z...A(W)..(W.10..5).10:..B(W
)..(W.100..5).100:.1000.D.D..CF.0..EO$.4
0)A$;:.190:CF.1:.104.E.F..CF.1..EO$.40)A
1$;:.190:CF.0...H..I$:..(I$."").100:I.F(
I$):.110:....N..EO$B$B$;:....X..CF.0..".
.";:CF.1:.124.M.Z..CF.1.."....";:CF.0...
|..I$:..(I$."").120:I.F(I$):.......EO$.4
0)A$;:.180:..)....I$:..(I$."").180:I.F(I
$):.110:..;....I.0.100:.I:..L.H.NC.0:.X.
1.18...J..X$.J(CC$,X.X.1,2).NC.X:X$.D(NC
):X$.I(X$,C(X$).1):X.18...L..X:.NC.0.E.4
...N...S.".MN.0:.X.1.12:.H(MN$,3).J(MS$,
(X.2.(X.1)),3).MN.X...$..MN.X.MI$.H(MN$,
3):X.12...&..X:.MN.0.E.3:..(.(.MD.31:.MN
.4.MN.6.MN.9.MN.11.MD.30.R.*..MN.2.MD.28
:.E(YR$)..(E(YR$).4).MD.29.X.+...K.,.LD.
C(DF$):.392......120:X.I.127:.X$."".I.13
.396...0..I.13.399...2..I.20.I.32.I.38.3
14.C.4..I.136.J.8:..V.6..I.45.I.90.302..
.8..(I.58.I.59.I.61.I.63.I.64.X.32.X.96)
.I..20.302...:..I..20.324.(.<..X$."".302
.C.>..C(X$).LL.." ..";:.322.O.@.."...";.
I.B.X$.H(X$,C(X$).1):.302..D..X$."".."
";:.390...F.. C(X$).LL.X$.X$.I$:.I$;...H
..302...J.LL.1:LD.1:.392.Y.L..120:X.I.12
7:.X$."".I.13.396...N..I.13.399...P..I.2
0.344...R..I.136.....T..I.64.I.90.332.$.
X..I..20.354.3.Z..X$."".332.N.\..C(X$).L
L.." ..";:.352.Z.^.."...";.T.`.X$.H(X$,C
(X$).1):.332...B..X$."".." ";:.390...D..
C(X$).LL.X$.X$.I$:.I$;...F..332.C.H.LD.
C(DF$):.392...J..120:.X$."".I.13.396...L
..I.13.399...N..I.136.....P..(I.48.I.57)
.I..46.I..20.362.'.R..I..20.379.6.T..X$.
"".362.Q.V..C(X$).LL.." ..";:.378.].X.."
...";.W.Z.X$.H(X$,C(X$).1):.362...{..X$.
"".." ";:.390...|..C(X$).LL.X$.X$.I$:.I$
;...~..362......H(CD$,YC).XC)H(L$,LL)H(C
L$,LL);:X$."":.......H(CD$,YC).XC)DF$H(L
$,LL.LD)H(CL$,LL.1);.....X$."":X0.0:..P.
..." .":.390:.DF$H(B$,LL.LD);:X$.DF$:X0.
E(DF$):..U....H(B$,LL.C(X$).1);:X0..(E(X
$)):......W.E(W$):.H(I(W$,2),1).".".W$.W
$."0":.402......W..(W).W$.W$.".00"......
.....W.E(W$):.W..(W).W$.W$.".0":........
....W$.I(D(W),(C(D(W)).1)):..@...V.54272
:FR.30:.L.0.24:.V.L,0:.:.V.1,130:.V.5,9:
.V.15,FR.V....V.24,10:.L.1.2:.V.4,21:.V.
15,FR.L.6:.T.1.L.300:.......V.4,20:.T.1.
(L.10):.T:.:.L.0.24:.V.L,0:.:......E$(0)
."THAT'S NOT ONE OF THE CHOICES":E$(1)."
NO PRINTER ON LINE".0...E$(2)."PLEASE US
E JULIAN CALENDAR":E$(3)."INVALID CATEGO
RY CODE".W...E$(4)."INVALID ENTRIES. TRY
AGAIN"......EO$". .ERROR.==> "E$(E.1):.
420:.100:E.0:....B..EO$B$EO$.5)ER,ER$:.1
00:.15,8,15,"I": 15...D. 1: 5:..T....H(C
D$,YC).XC):......M$(0)."...MAIN MENU: HO
USEHOLD FINANCE 2":MC$."ABCTE".6...M$(1)
.".. A . - ACTUAL VS BUDGETED"._...M$(2)
.". B . - BUDGET DETERMINATION".....M$(3
).". C . - CATEGORY ANALYSIS".....M$(4).
". T . - TAX IMPACT ANALYSIS".P...M$(5).
".. E . - EXIT PROGRAM.".....MC.5:.EG,6:
YC.6:XC.7:.530.......129)M$(C):..#...C$.
"":."."H(CD$,YC).XC)M$(0)R$.?....X.1.MC:
..40.XC)M$(X):..Z...C.0:..80.XC)E$;:XC.X
C.C(E$).2:YC.YC.2.MC.4:DF$."":.330.....C
$.H(X$,1):J.C(MC$):.X.1.J:.J(MC$,X,1).C$
.C.X:J.X......X:....X.."..".125)"IS YOUR
.. "MI$YI$" .. FILE"...^...87)".ON . T
. TAPE".55)"OR".50)". D . DISK?"./.`.DF$
."D":.330:I$.X$.[.B.DV.8:DV$."DISK":.I$.
"T".DV.1:DV$."TAPE".A.D.....L.NF$.MI$.YI
$:IC$.H(NF$,1):.DV..8.XC.5:YC.23:.490:.6
26.F.M...163)"WHICH FILE DO YOU WISH TO
LOAD?"...N...45)".. "IC$" . "NF$:..45)".
B . "NF$" BACKUP"...O.YC.17:XC.27:DF$.I
C$:.330:I$.X$.:.P.XC.4:YC.23:.490:.I.136
...[.Q.BU$."":.X$."B".BU$." BACKUP"...R.
.F$DV$".":..7)"PRESS ANY KEY WHEN READY.
";:.180...S..EO$.5)B$EO$,"."TS$NF$:..S.V
..DV.1.."........";:.1,1,0,NF$:.638...X.
.1,8,9,NF$.BU$.",S,R"...Z..5,8,15:.5,ER,
ER$...|..ER.1..450: 5:..#.}..BS.1...].~.
.Z.1.18:.1,SU(J,Z,1),SU(J,Z,2),SU(J,Z,3)
,SU(J,Z,4):.Z.N.. 1:.DV.1.646.....5,ER
,ER$: 5......ER.1..450:.......EO$B$:EF.0
:.......5,8,15,"I":.BU$."".654......5,"S
0:"NF$BU$:.5,"R0:"NF$BU$"="NF$:BU$.""...
...5,"S0:"NF$:.5,ER,ER$......ER.1..EO$B$
EO$.5)ER,ER$:.100: 5:..O....1,DV,9,NF$."
,S,W":.DV.1.664.`....ER.1..450:.......Z.
0.18:.1,SU(0,Z,0):.Z: 1:.DV.1.670..... 5
:.420.F....EO$.5)B$.5)B$EO$.8)"."NF$BU$"
SAVED.".40)A$.V. ..180:EF.0:......HF$."
HOUSEHOLD FINANCE ":HB$."HF BUDGET":P2$
." PART 2 ":R$.G(13).[...."........",HF$
R$R$," "P2$R$R$R$,". COPYRIGHT 1983
BY"......".",". CREATIVE SOFTWARE":.".."
,".ALL RIGHTS RESERVED"...Q.E$."ENTER LE
TTER OF CHOICE "...R.A$." . PRESS A
NY KEY TO CONTINUE . "...S.A1$."
PRESS ANY KEY TO CONTINUE ".A.T.
F$.".PREPARE THE FINANCIAL DATA ".N.U.F7
$.".PRESS . F7 . TO PRESERVE THE ITEM"..
...CD$.".........................":OF$.H
(CD$,9):EO$.H(CD$,23).....L$."..........
..........":B$."
".<...CL$."..............
.......":CR$."..........................
...".K...MS$."JANFEBMARAPRMAYJUNJULAUGSE
POCTNOVDEC"......CC$:.I.1.18:.NC$(I):.:.
.C. ..EG,7:."... EXPENSES GRAPH ."
SA$"-"FA$:.". ";...".MK..(MA.7..6):.M
A.9999.MK..(.(MK.5..5).5)...$..MA.99999.
MK..(.(MK.10).10).3.%..J.1.7:W..(MK.J):W
$.D(W):.406.M.&..".".5.C(W$))W$;:.J:..}.
'..". . . . . . .
."...(.."CODE . . . .
. . ."...*..Z.1.15:.880:.Z...,..R$
". LEGEND: ..... ACTUAL ":."
... BUDGET "...3..".."A$;:.180:.EG,6:..
7.P.I$.J("...............",Z,1).F.Y..I$"
"J(CC$,Z.Z.1,2)" ";:AB.AD(Z):BB.BD(Z)..
.Z.XG.0:SG.0:LG.0:.AB.0.BB.0.899...|.LG.
BB:SG.AB:.BB..AB.894.F.}..AB.BB.SG.BB:XG
..(AB.BB):.896...~..LG..X.1.LG:.".";:...
...LG..R$".....";:.PF.1.." "......SG
..X.1.SG:."..";:..3....SG..".";:.BB..AB.
899.L....XG..X.1.XG:."..";:..T....:..U..
.MA.0:MK.0:.X.1.15:W(X).AD(X)......BD(X)
.AD(X).W(X).BD(X)......W(X).MA.MA.W(X)..
..........X.1.15:BD(X)..((BD(X).MA).34):
AD(X)..((AD(X).MA).34):.:.......1800:..8
5)"ENTER FILENAMES TO BE LOADED".3.....1
2)"(E.G.- .JAN83 )".[.....90)".STARTING
-".90)" ENDING -.".....YC.10:XC.21:LL.5
:DF$."JAN83":.300:SM$.X$:.I.136.I.0:.100
0.M...MN$.SM$:.290:SM.MN:SY.E(I(MN$,2)):
.E..430:.1006.. ..YC.12:XC.21:LL.5:DF$."
":.300:FM$.X$:.I.136.I.0:.1000.: ..MN$.F
M$:.290:FM.MN:FY.E(I(MN$,2)):.E..430:.10
08.J ...SY.FY.1018.D ...FY.SY.FM.FM.12:.
1020.{ ...FY.SY.SM..FM.1020.. ..E.5:.430
:.1000.. ...J.SM.FM:YI$.I(D(SY),2).N ..Z
.J:.J.12.Z.J.12:YI$.I(D(FY),2).. ..MI$.J
(MS$,(Z.2.(Z.1)),3):MF.4..!...E(YI$).10.
YI$."0".J(YI$,2).<!..YC.9:XC.27:.600:.I.
136.I.0:J.FM:.:.1000.E!..TS$."LOADING ":
.620:.I.136.I.0:.1040.!...630:.I.136.I.
0:.1040..!...ER.62.1049..!...ER.1.ER.0:.
1040..!..SF$(J).I(MI$,3).YI$.H!...J:.420
..!...500:.C$."E".8000..! ..C.1060..!".E
.1:.430:.1050.."$..C.1100,1200,1300,1400
.""&..1050.A"L.. ****** ANALYZE VARIANCE
S.P"V..".":.520:..50)".AVAILABLE MONTHS
ARE:."R$. "`..Z1.0.18.6:..2):.Z2.1.6:..6
.C(SF$(Z1.Z2)));.."A..SF$(Z1.Z2);:.Z2:.R
$:.Z1.."B...2)".THE MONTHS YOU WISH TO A
NALYZE ARE:"..#D...50)".STARTING - ":..4
9)"FINISHING - ":.1880.Y#F..".":YC.19:XC
.22:LL.5:DF$.SF$(SD):.300:SA$.X$:.I.136.
...#G.MN$.SA$:.290:SA.MN:SY.E(I(MN$,2)):
.E..430:.1126..#H.YC.21:DF$.SF$(FD):.300
:FA$.X$:.I.136....#I.MN$.FA$:.290:FA.MN:
FY.E(I(MN$,2)):.E..430:.1128..$L..SY.FY.
E.5:.430:.1100. $M..FY.SY.FA.FA.12:.1137
.7$N..FY.SY.SA..FA.1137.J$P.E.5:.430:.11
00.[$Q..FA.FD..1136..$R..R$R$.11.((C(SA$
).C(FA$)).2))".CALCULATING ."SA$". TO ."
FA$"."..$S.CM..(0):CM.1.(FA.SA):.1810.N$
T..AF.1.AF.0:...$V..". .EXPENSE ANALYSI
S "SA$"-"FA$".B%X..". CODE BUDGET
ACTUAL DIFFERENCE %GAIN.":S.1:F.15:HF.0
:LB$."EXP".Z%Z.TB.0:TA.0:TD.0:TP.0..%~..
Z.S.F:BD(Z)..B(.(SU(0,Z,0).CM)):.Z.16.."
.";..%..". "J(CC$,Z.Z.1,2).7.C(D(BD(Z)
)))BD(Z);..%..J..B(AD(Z)):NC.Z:.1830:..7
.C(W$))W$:.Z..&...1840:.". "LB$".$".5.C(
TB$))TB$.10.C(TA$))TA$;.?&..." ".9.C(TD
$))TD$.7.C(TP$))TP$"%.".T&...HF.1.HF.0:.
1168.W&..S.16:F.18:HF.1:LB$."INC":.1146.
.&...PF.1.1180.L&..YC.24:XC.2:.490:.".SE
LECT ONE: ( ..P..RINT ..G..RAPH ..E..XIT
)."..&..YC.24:XC.36:DF$."G":.330:.I.136
....'...X$.."G".X$.."P".X$.."E".1170."'.
..X$."E"...:'...X$."G"..900:.800:..`'...
4,4,0: 4:.ST.E.2:.430:PF.0:.1140.Y'..PF.
1:.4,4,0:.4:.1140..'..PF.0:.X.1.43:.4:.X
: 4:.1140..'..BY.1983.Q'..."..".83)"WISH
TO LOAD A BUDGET FILE?."..'..YC.3:XC.33
:DF$."N":.330:.I.136.I.0:...(...X$.."Y".
.".":.1230.6(..."..".205)"IS YOUR "HB$"
FILE.".\(B.YC.10:XC.27:.606:.I.136.I.0:.
1210..(D.NF$.HB$:IC$."H":.DV..8.XC.5:YC.
23:.490:.626..(E..DV..8.."........":.1,1
,0,NF$:BS.1:.1225..(F.TS$."LOADING ":.".
.";:.621:.I.136.I.0:.1210..)G.BS.1:.630:
.I.136.I.0:....)H..ER.1.ER.0:.1210.Q)I..
BS.1.BS.0:.Z.0.18:.1,SU(0,Z,0):.Z:.639:.
DV.1.1228.A)J..ER.62.1200.V)K..ER.1.ER.0
:.1210..)L..1818:."."..)N.OF..(SU(0,0,0)
.100):YI.83.(OF.1):YI$.I(D(YI),2)..)P.BM
..((SU(0,0,0).(OF.100))):.BM..0.BM$."":.
1240..*R.BM$.J(MS$,(BM.2.(BM.1)),3).YI$.
C*X.."..."HF$"..MONTHLY BUDGET.";:.BM$..
"".." "BM$;.T*...R$". ITEM# CODE PRESENT
PROPOSED CHANGE."..*..S.1:F.15:HF.0:L
B$."EXPENSE"..*..TB.0:TA.0:TC.0:.Z.S.F.W
*...". ".3.C(D(Z)))Z.2)J(CC$,Z.Z.1,2);.
.+...".".9.C(D(SU(0,Z,0))))SU(0,Z,0);:TA
..(TA..(SU(0,Z,0))).@+...".".9.C(D(BU(Z)
)))BU(Z);:TB.TB..(BU(Z)).V+..W..(BU(Z).S
U(0,Z,0)):.".".7.C(D(W)))W:TC..B(TC.W).}
+...Z..+...". "LB$" $".7.C(D(TA)))TA"
".8.C(D(TB)))TB;.W+..W.TC:.406:TC$.W$:..
7.C(TC$))TC$"."..+...HF.1.HF.0:.1266..,.
.S.16:F.18:HF.1:LB$."INCOME ":.1250.",..
.PF.1.1298.7,...AP.1.AP.0:.1290.},..YC.2
4:XC.2:.490:.".ENTER ITEM # TO CHANGE (0
=DONE) .";:DF$."0". ,..YC.24:XC.34:LL
.2:.360:.I.136....,..NI..(X0):.NI.0.1290
.M,...NI.1.NI.18.1281..,..YC.2.X0:.X0.15
.YC.YC.1..-..XC.24:LL.5:DF$.D(SU(0,X0,0)
):DF$.I(DF$,(C(DF$).1)).9-...360:.I.136.
I.0:.1230.H-..BU(NI)..(X0):.490:.H(B$,13
);:.X$..DF$.EF.1..-...490:.".".5.C(X$))X
$:.1230.J-..YC.24:XC.2:.490:.".(..P..RIN
T ..S..AVE ..R..EDO ..E..XIT ). ";......
"CHOICE? ":YC.24:XC.36:DF$."E":.330:
.I.136...*....X$.."P".X$.."S".X$.."R".X$
.."E".1290.;....X$."R".1281.O....X$."E".
.1820:..W....X$."S"..1820:.1600:AP.1:.".
":.1230......4,4,0: 4:.ST.E.2:.430:PF.0:
.1240.....PF.1:.4,4:.4:.1230.Y...PF.0:.X
.1.43:.4:.X: 4:AP.1:.1230...... ******
CATEGORY ANALYSIS.(/...".":.520:..50)"
.THE CATEGORIES ARE:."R$.6/ ..Z.1.17.2.K
/"..". "J(CC$,Z.Z.1,2).2)"."NC$(Z);.15.
C(NC$(Z)));../#.."."J(CC$,Z.Z.1,2).2)"."
NC$(Z.1):.Z.D/$.YC.21:XC.4:.490:.".ENTER
THE CATEGORY CODE."../&.YC.21:XC.32:LL.
2:DF$."AU":.300:.I.136.I.0:...0'.CH$.X$:
.200:.E.4..430:.1300.,0(.AF.1:.1110:.I.1
36...60<..1870.Z0B.TB.0:TA.0:TD.0:TP.0:L
B$."TOTAL"..0F..Z.SA.FA:BD(NC)..(SU(0,NC
,0)):Z1.Z:.Z.12.Z1.Z1.12.F0H..". "J(MS$
,Z1.2.(Z1.1),3).6.C(D(BD(NC))))BD(NC);..
0J.J.SU(Z,NC,1):.1830..1L...7.C(W$))W$:L
.L.1:.PF.0..L.21..100:.1870.=1P..Z:.1840
:.". "LB$.5.C(TB$))TB$.10.C(TA$))TA$;.K1
R.." ".9.C(TD$))TD$.7.C(TP$))TP$"%.":L.
L.1.Z1T..PF.1.1380..1Z.YC.24:XC.2:.490:.
". SELECT ONE: ( ..P..RINT ..E..XIT )
. "..1\.YC.24:XC.36:DF$."E":.330:.I.136.
...1^..X$."E"....2`..X$.."P".X$.."E".137
0./2B..4,4,0: 4:.ST.E.2:.430:PF.0:.1340.
F2C.PF.1:.4,4:.4:.1340.^2D.PF.0:.1850: 4
:.1340.2X.. ****** DEDUCTIBLE ANALYSIS.
.2..AF.1:.1110:.I.136...B2 ..".. TAX IM
PACT ANALYSIS ."SA$"-"FA$..2...". CA
TEGORY TOTAL DEDUCT. %."..3..S
.1:F.15:HF.0:LB$."EXPENSE".83..TA.0:TD.0
:TP.0:.Z.S.F:.Z.16..".";.X3...". "NC$(Z)
;.14.C(NC$(Z)));..3..W$.D(AD(Z)):.400:..
9.C(W$))W$;:TA..B(TA.AD(Z)).A3..W$.D(TX(
Z)):.400:.".".9.C(W$))W$;:TD..B(TD.TX(Z)
).Y3...AD(Z).0.PC.0:.1456..3..PC..A((TX(
Z).AD(Z)).100)..4..W$.D(PC):.404:..6.C(W
$))W$.14...Z:W$.D(TA):.400:TA$.W$.J4..W$
.D(TD):.400:TD$.W$.O4..TP..A((TD.TA).100
):W$.D(TP):.404. 4...". "LB$" $".9.
C(TA$))TA$.9.C(TD$))TD$;..4....6.C(W$))W
$"%.".J4...HF.1.HF.0:.1468..4..S.16:F.18
:HF.1:LB$."INCOME ":.1450..5...PF.1.1480
.?5..YC.24:XC.2:.490:.". SELECT ONE: (
..P..RINT ..E..XIT ). ".E5..YC.24:XC.34:
DF$."E":.330:.I.136...5B..X$.."P".X$.."
E".1470..5D..X$."E"....5F..4,4,0: 4:.ST.
E.2:.430:PF.0:.1440.J5G.PF.1:.4,4:.4:.14
40..5H.PF.0:.X.1.43:.4:.X: 4:.1440..6@..
...SAVE BUDGET FILE.,6T..".".163)". SAV
ING THE "HB$" FILE.".]6U..".".245)". SAV
E THE FILE";:YC.11:XC.25:.606.J6V..I.136
....6W..DV$."TAPE".I$."N":.1636..6X...16
5)".DO YOU WISH TO SAVE WITH."..6Z...45)
".. B . BACKUP".85)". N . NO BACKUP?."..
6^.YC.18:XC.25:DF$."B":.330..7`..I.I36..
.*7D.NF$."HF BUDGET":TS$."SAVING ".Z7F.Y
C.23:XC.4:.490:.625:.DV.1.."........":.6
60.C7H..650..7...".".86)".."HF$".."P2$:.
..7...X.1.18:AD(X).0:AC(X).0:TX(X).0:TC(
X).0:...7...X.1.18:.Z.SA.FA:AD(X).AD(X).
SU(Z,X,1):AC(X).AC(X).SU(Z,X,2).%8..TX(X
).TX(X).SU(Z,X,3):TC(X).TC(X).SU(Z,X,4):
.:.:..E8...X.1.18:BU(X).SU(0,X,0):.:..M8
...X.1.18:SU(0,X,0).BU(X):.:.X$."E"....8
..YC.24:XC.1:.490:.".ENTER THE MO./YR.(.
E.G.JAN83.) .":YC.24:XC.32.Z8..LL.5:DF
$.BM$:.300:BM$.X$:.I.136....8..MN$.H(BM$
,3):.290:.E..430:.1821..9 .BM.MN:.BM.1.B
M.12.1821.79!.YI.E(I(BM$,2)):.YI.0.1821.
L9"..YI.83.YI.YI.100.{9#.OF.1900.YI.BY:S
U(0,0,0)..((1.OF).100).BM:...9&.W$.D(J):
.400:.".".9.C(W$))W$;..9(.TB..B(TB.BD(NC
)):TA..B(TA.J):W..B(BD(NC).J):.NC.15.W..
B(J.BD(NC))..:*.DD(Z).W:W$.D(W):.400:.".
".11.C(W$))W$;.H:,.TD..B(TD.W):W$.D(TD):
.400:TD$.W$:.BD(NC).0.W$."N/A":..V:..PC.
.A((DD(Z).BD(NC)).100):W$.D(PC):.404:...
:0.W$.D(TA):.400:TA$.W$..:2.W.TB:.406:TB
$.W$:.TB.0.TP$."N/A":...:4.TP..A((TD.TB)
.100):W$.D(TP):.404:TP$.W$:...::.. L.L.6
5:.4:.L:L.0:..&;N..". .EXPENSE ANALYSIS
FOR ."NC$(NC).];P..". MONTH BUDGET ACT
UAL DIFFERENCE %GAIN.":L.3:...;X.HF.0:M
L.0:.Z.1.24:.SF$(Z).."".HF.0.SD.Z:HF.1..
;Z..SF$(Z).."".FD.Z:ML.ML.1..;\..Z:..I;@
..EG,3:.EF.0.8090..;J..".".82)".YOU HAVE
N'T YET SAVED THE CHANGES".&<L.." WHICH
YOU MADE TO THE BUDGET DATA.".Q<N...83)
".IF YOU WANT TO SAVE THE DATA,."..<P.."
PRESS . F7 . TO RETURN TO BUDGET DISPLAY
."..<T...82)".IF YOU REALLY . DO . WANT
TO EXIT,".Z<^...46)"PRESS . ANY OTHER KE
Y ..":.180..<H..I.136.C.2:.".":.1230:.10
50..=..."."OF$,".DONE.....":..,=D".X.1.9
: X:.X:.1050....1..U.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL