BUDGETEER
FILE INFORMATION
FILENAME(S): BUDGETEER
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-11-30 21:24:39
APPEARS ON: 1 disk(s)
FILE HASH
f1898f26dfaaea5ebc9fc21b227dc6c11da530b1443d1dc3e884260e651a4387
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| INFORMATIEF | BUDGETEER | PRG | DuncanTwain | 30 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 01 00 97 35 33 32 38 31 2C 31 3A 99 |.......53281,1:.|
00000010: 22 93 1C 42 55 44 47 45 54 45 45 52 00 3E 08 03 |"..BUDGETEER.>..|
00000020: 00 8B C2 28 35 35 29 B3 B1 30 A7 97 35 35 2C 30 |...(55)..0..55,0|
00000030: 3A 97 35 36 2C C2 28 35 36 29 AA 31 3A 9C 00 78 |:.56,.(56).1:..x|
00000040: 08 05 00 99 22 1F 28 43 29 20 43 4F 50 59 52 49 |....".(C) COPYRI|
00000050: 47 48 54 20 31 39 38 32 22 3A 99 22 52 4F 59 20 |GHT 1982":."ROY |
00000060: 43 20 57 41 49 4E 57 52 49 47 48 54 22 3A 81 55 |C WAINWRIGHT":.U|
00000070: B2 31 A4 39 39 39 3A 82 00 A8 08 07 00 86 41 24 |.1.999:.......A$|
00000080: 28 38 29 2C 50 28 34 29 2C 51 28 39 29 2C 52 28 |(8),P(4),Q(9),R(|
00000090: 39 29 3A 51 24 B2 C7 28 33 34 29 3A 53 24 B2 C7 |9):Q$..(34):S$..|
000000A0: 28 31 33 29 3A 53 B2 31 00 D2 08 09 00 57 24 B2 |(13):S.1.....W$.|
000000B0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000D0: 20 22 00 F7 08 0B 00 83 22 92 A5 22 2C 22 92 B4 | "......"..","..|
000000E0: 22 2C 22 92 B5 22 2C 22 92 A1 22 2C 22 B6 22 2C |","..","..",".",|
000000F0: 22 AA 22 2C 22 A7 22 00 0F 09 0D 00 81 49 B2 31 |".","."......I.1|
00000100: A4 37 3A 87 41 24 28 49 29 3A 82 3A 89 32 33 00 |.7:.A$(I):.:.23.|
00000110: 2B 09 0F 00 99 C9 28 C4 28 57 29 2C 32 29 22 12 |+.....(.(W),2)".|
00000120: 22 52 24 28 57 29 22 1F 22 3A 8E 00 4C 09 11 00 |"R$(W)".":..L...|
00000130: 85 22 12 13 31 53 54 20 52 4F 57 92 22 3B 53 3A |."..1ST ROW.";S:|
00000140: 8B 53 B1 48 B0 53 B3 30 A7 53 B2 48 00 52 09 13 |.S.H.S.0.S.H.R..|
00000150: 00 8E 00 68 09 15 00 81 57 B2 53 A4 53 AA 31 39 |...h....W.S.S.19|
00000160: 3A 8D 31 35 3A 82 3A 8E 00 84 09 17 00 99 22 93 |:.15:.:.......".|
00000170: 11 11 20 31 3D 53 48 4F 57 22 3A 99 22 20 32 3D |.. 1=SHOW":." 2=|
00000180: 4C 4F 41 44 00 A0 09 19 00 99 22 20 33 3D 54 4F |LOAD......" 3=TO|
00000190: 54 41 4C 53 22 3A 99 22 20 34 3D 53 45 54 55 50 |TALS":." 4=SETUP|
000001A0: 00 C6 09 1B 00 99 22 20 35 3D 43 41 4C 43 22 3A |......" 5=CALC":|
000001B0: 99 22 20 36 3D 47 52 41 50 48 22 3A 99 22 20 37 |." 6=GRAPH":." 7|
000001C0: 3D 43 52 20 43 44 00 EB 09 1D 00 99 22 20 38 3D |=CR CD......" 8=|
000001D0: 12 54 41 50 45 20 57 52 49 54 45 22 3A 99 22 20 |.TAPE WRITE":." |
000001E0: 39 3D 54 41 50 45 20 52 45 41 44 00 1C 0A 1F 00 |9=TAPE READ.....|
000001F0: 99 22 31 30 3D 12 44 49 53 4B 20 57 52 49 54 45 |."10=.DISK WRITE|
00000200: 22 3A 99 22 31 31 3D 44 49 53 4B 20 52 45 41 44 |":."11=DISK READ|
00000210: 22 3A 99 22 31 32 3D 50 52 49 4E 54 00 2D 0A 21 |":."12=PRINT.-.!|
00000220: 00 99 3A 99 B8 28 30 29 22 46 52 45 45 00 4E 0A |..:..(0)"FREE.N.|
00000230: 23 00 85 22 13 46 55 4E 43 54 49 4F 4E 20 20 20 |#..".FUNCTION |
00000240: 20 20 20 30 20 20 9D 9D 9D 9D 9D 22 3B 46 00 5A | 0 .....";F.Z|
00000250: 0A 25 00 8B 46 B2 30 A7 32 33 00 8D 0A 27 00 91 |.%..F.0.23...'..|
00000260: 46 89 35 35 2C 35 39 2C 31 33 39 2C 32 36 37 2C |F.55,59,139,267,|
00000270: 31 35 35 2C 31 38 35 2C 32 34 31 2C 39 31 2C 31 |155,185,241,91,1|
00000280: 31 35 2C 38 37 2C 31 31 33 2C 32 39 39 00 95 0A |15,87,113,299...|
00000290: 29 00 89 32 33 00 9E 0A 2B 00 99 22 93 22 00 BD |)..23...+.."."..|
000002A0: 0A 2D 00 85 22 13 43 4F 4C 20 23 20 20 20 20 20 |.-..".COL # |
000002B0: 20 20 30 20 20 9D 9D 9D 9D 9D 22 3B 4D 00 CD 0A | 0 .....";M...|
000002C0: 2F 00 8B 4D B1 43 B0 4D B3 30 A7 34 33 00 D8 0A |/..M.C.M.0.43...|
000002D0: 31 00 8B 4D B2 30 A7 8E 00 F2 0A 33 00 99 22 93 |1..M.0.....3..".|
000002E0: 11 20 20 20 20 20 22 3B A3 31 34 29 3B 4D 24 28 |. ";.14);M$(|
000002F0: 4D 29 00 F8 0A 35 00 8E 00 08 0B 37 00 8D 34 35 |M)...5.....7..45|
00000300: 3A 8B 4D B2 30 A7 33 35 00 15 0B 39 00 8D 32 33 |:.M.0.35...9..23|
00000310: 35 3A 89 35 35 00 25 0B 3B 00 8D 34 33 3A 8B 4D |5:.55.%.;..43:.M|
00000320: B2 30 A7 33 35 00 2E 0B 3D 00 8D 32 33 35 00 4A |.0.35...=..235.J|
00000330: 0B 3F 00 85 22 52 4F 57 20 23 20 20 20 20 20 30 |.?.."ROW # 0|
00000340: 20 20 9D 9D 9D 9D 9D 22 3B 52 00 56 0B 41 00 8B | .....";R.V.A..|
00000350: 52 B2 30 89 35 39 00 66 0B 43 00 8B 52 B1 42 B0 |R.0.59.f.C..R.B.|
00000360: 52 B3 30 A7 36 33 00 89 0B 45 00 85 22 44 41 54 |R.0.63...E.."DAT|
00000370: 41 20 20 20 20 20 30 20 20 20 20 20 20 9D 9D 9D |A 0 ...|
00000380: 9D 9D 9D 9D 9D 9D 22 3B 44 00 9C 0B 47 00 8B B6 |......";D...G...|
00000390: 28 44 29 B1 33 32 37 36 37 A7 36 39 00 B3 0B 49 |(D).32767.69...I|
000003A0: 00 45 25 28 4D 2C 52 29 B2 44 3A 8D 32 33 36 3A |.E%(M,R).D:.236:|
000003B0: 89 36 33 00 D2 0B 4B 00 84 31 35 2C 45 4E 2C 45 |.63...K..15,EN,E|
000003C0: 4D 24 2C 45 54 24 2C 45 53 24 3A 8B 45 4E B2 30 |M$,ET$,ES$:.EN.0|
000003D0: A7 8E 00 FC 0B 4D 00 99 22 12 44 53 4B 20 45 52 |.....M..".DSK ER|
000003E0: 52 22 3B 3A 99 45 4D 24 2C 45 4E 2C 45 54 24 2C |R";:.EM$,EN,ET$,|
000003F0: 45 53 24 3A 8D 31 37 39 3A 89 32 33 00 0F 0C 4F |ES$:.179:.23...O|
00000400: 00 9F 31 35 2C 38 2C 31 35 3A 8D 38 31 3A 8E 00 |..15,8,15:.81:..|
00000410: 1C 0C 51 00 91 56 89 38 33 2C 37 35 00 46 0C 53 |..Q..V.83,75.F.S|
00000420: 00 53 58 B2 53 54 3A 8B 53 54 B3 B1 30 AF 53 54 |.SX.ST:.ST..0.ST|
00000430: B3 B1 36 34 A7 99 22 12 54 50 20 45 52 52 22 3A |..64..".TP ERR":|
00000440: 8D 31 37 39 3A 8E 00 4C 0C 55 00 8E 00 75 0C 57 |.179:..L.U...u.W|
00000450: 00 8D 38 39 3A 8D 37 39 3A 9F 31 2C 38 2C 32 2C |..89:.79:.1,8,2,|
00000460: 47 24 AA 22 2C 53 2C 57 22 3A 8D 37 35 3A 56 B2 |G$.",S,W":.75:V.|
00000470: 32 3A 89 39 35 00 8D 0C 59 00 85 22 93 11 46 49 |2:.95...Y.."..FI|
00000480: 4C 45 20 4E 41 4D 45 22 3B 47 24 3A 8E 00 99 0C |LE NAME";G$:....|
00000490: 5B 00 56 B2 31 3A 8D 38 39 00 A7 0C 5D 00 9F 31 |[.V.1:.89...]..1|
000004A0: 2C 31 2C 31 2C 47 24 00 BD 0C 5F 00 98 31 2C 43 |,1,1,G$..._..1,C|
000004B0: 3B 53 24 3B 42 3B 53 24 3B 3A 8D 38 31 00 CF 0C |;S$;B;S$;:.81...|
000004C0: 61 00 81 4D B2 31 A4 43 3A 81 4B B2 31 A4 42 00 |a..M.1.C:.K.1.B.|
000004D0: E6 0C 63 00 98 31 2C 45 25 28 4D 2C 4B 29 3B 53 |..c..1,E%(M,K);S|
000004E0: 24 3B 3A 8D 38 31 00 EF 0C 65 00 82 4B 2C 4D 00 |$;:.81...e..K,M.|
000004F0: 13 0D 67 00 81 49 B2 30 A4 43 3A 98 31 2C 51 24 |..g..I.0.C:.1,Q$|
00000500: 3B 4D 24 28 49 29 3B 51 24 3B 53 24 3B 3A 82 3A |;M$(I);Q$;S$;:.:|
00000510: 8D 38 31 00 37 0D 69 00 81 49 B2 31 A4 42 3A 98 |.81.7.i..I.1.B:.|
00000520: 31 2C 51 24 3B 52 24 28 49 29 3B 51 24 3B 53 24 |1,Q$;R$(I);Q$;S$|
00000530: 3B 3A 82 3A 8D 38 31 00 5C 0D 6B 00 81 49 B2 31 |;:.:.81.\.k..I.1|
00000540: A4 39 3A 98 31 2C 51 28 49 29 3B 53 24 3B 52 28 |.9:.1,Q(I);S$;R(|
00000550: 49 29 3B 53 24 3B 3A 82 3A 8D 38 31 00 69 0D 6D |I);S$;:.:.81.i.m|
00000560: 00 8B 56 B2 32 A7 A0 31 35 00 79 0D 6F 00 A0 31 |..V.2..15.y.o..1|
00000570: 3A 99 22 93 22 3A 89 33 35 00 9F 0D 71 00 56 B2 |:.".":.35...q.V.|
00000580: 32 3A 8D 38 39 3A 9F 31 2C 38 2C 32 2C 47 24 AA |2:.89:.1,8,2,G$.|
00000590: 22 2C 53 2C 52 22 3A 8D 37 39 3A 89 31 31 39 00 |",S,R":.79:.119.|
000005A0: AB 0D 73 00 56 B2 31 3A 8D 38 39 00 C2 0D 75 00 |..s.V.1:.89...u.|
000005B0: 9F 31 2C 31 2C 30 2C 47 24 3A 99 22 46 4F 55 4E |.1,1,0,G$:."FOUN|
000005C0: 44 22 00 D6 0D 77 00 84 31 2C 43 2C 42 3A 8D 38 |D"...w..1,C,B:.8|
000005D0: 31 3A 8D 32 39 35 00 E8 0D 79 00 81 4D B2 31 A4 |1:.295...y..M.1.|
000005E0: 43 3A 81 4B B2 31 A4 42 00 FB 0D 7B 00 84 31 2C |C:.K.1.B...{..1,|
000005F0: 45 25 28 4D 2C 4B 29 3A 8D 38 31 00 1A 0E 7D 00 |E%(M,K):.81...}.|
00000600: 8B 53 54 B1 B3 30 AF 53 54 B1 B3 36 34 A7 99 22 |.ST..0.ST..64.."|
00000610: 54 50 20 45 52 52 22 3B 53 54 00 23 0E 7F 00 82 |TP ERR";ST.#....|
00000620: 4B 2C 4D 00 3D 0E 81 00 81 49 B2 30 A4 43 3A 84 |K,M.=....I.0.C:.|
00000630: 31 2C 4D 24 28 49 29 3A 8D 38 31 3A 82 00 57 0E |1,M$(I):.81:..W.|
00000640: 83 00 81 49 B2 31 A4 42 3A 84 31 2C 52 24 28 49 |...I.1.B:.1,R$(I|
00000650: 29 3A 8D 38 31 3A 82 00 75 0E 85 00 81 49 B2 31 |):.81:..u....I.1|
00000660: A4 39 3A 84 31 2C 51 28 49 29 2C 52 28 49 29 3A |.9:.1,Q(I),R(I):|
00000670: 8D 38 31 3A 82 00 82 0E 87 00 8B 56 B2 32 A7 A0 |.81:.......V.2..|
00000680: 31 35 00 92 0E 89 00 A0 31 3A 99 22 93 22 3A 89 |15......1:.".":.|
00000690: 33 35 00 BA 0E 8B 00 99 22 93 11 22 3A 8D 31 37 |35......"..":.17|
000006A0: 3A 99 22 13 11 22 3A 8D 32 31 3A 99 22 13 11 22 |:."..":.21:.".."|
000006B0: A3 31 35 29 22 54 4F 54 41 4C 00 C8 0E 8D 00 81 |.15)"TOTAL......|
000006C0: 52 B2 53 A4 53 AA 31 39 00 DC 0E 8F 00 55 B2 C6 |R.S.S.19.....U..|
000006D0: 28 C8 28 52 24 28 52 29 2C 31 29 29 00 F5 0E 91 |(.(R$(R),1))....|
000006E0: 00 8B 55 B2 38 39 A7 45 B2 45 25 28 31 2C 52 29 |..U.89.E.E%(1,R)|
000006F0: 3A 89 31 35 31 00 21 0F 93 00 8B 28 55 B1 34 38 |:.151.!....(U.48|
00000700: AF 55 B3 35 38 29 B0 28 55 B1 38 38 AF 55 B3 39 |.U.58).(U.88.U.9|
00000710: 31 29 A7 45 B2 45 25 28 43 2C 52 29 3A 89 31 35 |1).E.E%(C,R):.15|
00000720: 31 00 3F 0F 95 00 45 B2 30 3A 81 4D B2 31 A4 43 |1.?...E.0:.M.1.C|
00000730: 3A 45 B2 45 AA 45 25 28 4D 2C 52 29 3A 82 4D 00 |:E.E.E%(M,R):.M.|
00000740: 4C 0F 97 00 57 53 24 B2 C4 28 45 29 00 66 0F 99 |L...WS$..(E).f..|
00000750: 00 99 A3 32 30 AB C3 28 57 53 24 29 29 3B 45 3A |...20..(WS$));E:|
00000760: 82 52 3A 89 33 35 00 9B 0F 9B 00 99 22 93 43 41 |.R:.35......".CA|
00000770: 4C 43 53 22 3A 81 49 B2 30 A4 34 3A 50 28 49 29 |LCS":.I.0.4:P(I)|
00000780: B2 30 3A 82 3A 81 49 B2 31 A4 42 3A 59 B2 C6 28 |.0:.:.I.1.B:Y..(|
00000790: C8 28 52 24 28 49 29 2C 31 29 29 00 B8 0F 9D 00 |.(R$(I),1)).....|
000007A0: 8B 59 B1 38 35 AF 59 B3 39 31 A7 59 B2 59 AB 38 |.Y.85.Y.91.Y.Y.8|
000007B0: 36 3A 50 28 59 29 B2 49 00 BE 0F 9F 00 82 00 F1 |6:P(Y).I........|
000007C0: 0F A1 00 59 B2 30 3A 81 49 B2 30 A4 34 3A 8B 50 |...Y.0:.I.0.4:.P|
000007D0: 28 49 29 B2 30 A7 99 22 12 4E 4F 20 54 4F 54 20 |(I).0..".NO TOT |
000007E0: 52 4F 57 2E 2E 22 C7 28 49 AA 38 36 29 3A 59 B2 |ROW..".(I.86):Y.|
000007F0: 31 00 03 10 A3 00 82 3A 8B 59 A7 8D 31 37 39 3A |1......:.Y..179:|
00000800: 89 32 33 00 1E 10 A5 00 81 4D B2 31 A4 43 3A 47 |.23......M.1.C:G|
00000810: B2 30 3A 49 54 B2 30 3A 81 49 B2 31 A4 42 00 3E |.0:IT.0:.I.1.B.>|
00000820: 10 A7 00 8B C8 28 52 24 28 49 29 2C 31 29 B2 22 |.....(R$(I),1)."|
00000830: 40 22 A7 47 B2 47 AA 45 25 28 4D 2C 49 29 00 60 |@".G.G.E%(M,I).`|
00000840: 10 A9 00 8B C8 28 52 24 28 49 29 2C 31 29 B2 22 |.....(R$(I),1)."|
00000850: 24 22 A7 49 54 B2 49 54 AA 45 25 28 4D 2C 49 29 |$".IT.IT.E%(M,I)|
00000860: 00 82 10 AB 00 82 49 3A 45 25 28 4D 2C 50 28 30 |......I:E%(M,P(0|
00000870: 29 29 B2 49 54 3A 45 25 28 4D 2C 50 28 31 29 29 |)).IT:E%(M,P(1))|
00000880: B2 47 00 B7 10 AD 00 45 25 28 4D 2C 50 28 32 29 |.G.....E%(M,P(2)|
00000890: 29 B2 49 54 AB 47 3A 4E 42 B2 45 25 28 4D 2C 50 |).IT.G:NB.E%(M,P|
000008A0: 28 33 29 29 AB 47 AA 49 54 3A 45 25 28 4D 2C 50 |(3)).G.IT:E%(M,P|
000008B0: 28 34 29 29 B2 4E 42 00 D1 10 AF 00 8B 4D B3 B1 |(4)).NB......M..|
000008C0: 43 A7 45 25 28 4D AA 31 2C 50 28 33 29 29 B2 4E |C.E%(M.1,P(3)).N|
000008D0: 42 00 DC 10 B1 00 82 4D 3A 89 32 33 00 E4 10 B3 |B......M:.23....|
000008E0: 00 99 22 58 00 F9 10 B5 00 A1 5A 24 3A 8B 5A 24 |.."X......Z$:.Z$|
000008F0: B3 B1 22 58 22 A7 31 38 31 00 FF 10 B7 00 8E 00 |.."X".181.......|
00000900: 19 11 B9 00 99 22 93 22 3A 8D 31 37 3A 8B 53 B2 |.....".":.17:.S.|
00000910: 30 A7 53 B2 31 3A 89 33 35 00 21 11 BB 00 8D 32 |0.S.1:.35.!....2|
00000920: 31 00 46 11 BD 00 85 22 52 4F 57 20 23 20 20 20 |1.F...."ROW # |
00000930: 20 20 30 20 20 9D 9D 9D 9D 9D 22 3B 57 3A 8B 57 | 0 .....";W:.W|
00000940: B2 30 A7 31 38 35 00 52 11 BF 00 8B 57 B3 30 A7 |.0.185.R....W.0.|
00000950: 32 33 00 5F 11 C1 00 8B 57 B1 42 A7 31 38 39 00 |23._....W.B.189.|
00000960: 6C 11 C3 00 99 22 93 22 3A 45 B2 30 00 74 11 C5 |l....".":E.0.t..|
00000970: 00 8D 31 35 00 85 11 C7 00 4E 4D 25 B2 30 3A 4E |..15.....NM%.0:N|
00000980: 58 25 B2 31 30 00 9A 11 C9 00 81 4D B2 31 A4 43 |X%.10......M.1.C|
00000990: 3A 55 B2 45 25 28 4D 2C 57 29 00 AB 11 CB 00 8B |:U.E%(M,W)......|
000009A0: 55 B1 4E 58 25 A7 4E 58 25 B2 55 00 BC 11 CD 00 |U.NX%.NX%.U.....|
000009B0: 8B 55 B3 4E 4D 25 A7 4E 4D 25 B2 55 00 C8 11 CF |.U.NM%.NM%.U....|
000009C0: 00 45 B2 45 AA 55 3A 82 00 D7 11 D1 00 52 25 B2 |.E.E.U:......R%.|
000009D0: 4E 58 25 AB 4E 4D 25 00 FE 11 D3 00 44 24 B2 C4 |NX%.NM%.....D$..|
000009E0: 28 4E 4D 25 29 3A 45 24 B2 C4 28 4E 4D 25 AA 52 |(NM%):E$..(NM%.R|
000009F0: 25 AD 32 29 3A 46 24 B2 C4 28 4E 58 25 29 00 15 |%.2):F$..(NX%)..|
00000A00: 12 D5 00 99 22 11 22 3B A3 31 35 AB C3 28 45 24 |....".";.15..(E$|
00000A10: 29 29 3B 45 24 00 35 12 D7 00 99 A3 39 AB C3 28 |));E$.5.....9..(|
00000A20: 44 24 29 29 3B 44 24 3B A3 32 31 AB C3 28 46 24 |D$));D$;.21..(F$|
00000A30: 29 29 3B 46 24 00 54 12 D9 00 99 A3 37 29 3B 22 |));F$.T.....7);"|
00000A40: A7 22 3B A3 31 34 29 3B 22 C2 22 3B A3 32 31 29 |.";.14);".";.21)|
00000A50: 3B 22 A5 22 00 70 12 DB 00 81 4D B2 31 A4 43 3A |;".".p....M.1.C:|
00000A60: 55 B2 45 25 28 4D 2C 57 29 3A 8D 32 32 35 3A 82 |U.E%(M,W):.225:.|
00000A70: 00 88 12 DD 00 4D B2 30 3A 55 B2 B5 28 45 AD 43 |.....M.0:U..(E.C|
00000A80: 29 3A 99 3A 8D 32 32 35 00 91 12 DF 00 89 31 38 |):.:.225......18|
00000A90: 39 00 A5 12 E1 00 58 B2 28 55 AB 4E 4D 25 29 AC |9.....X.(U.NM%).|
00000AA0: 31 33 AD 52 25 00 B0 12 E3 00 59 B2 B5 28 58 29 |13.R%.....Y..(X)|
00000AB0: 00 D7 12 E5 00 44 24 B2 C4 28 55 29 3A 99 C8 28 |.....D$..(U):..(|
00000AC0: 4D 24 28 4D 29 2C 31 29 3B A3 37 AB C3 28 44 24 |M$(M),1);.7..(D$|
00000AD0: 29 29 3B 44 24 3B 3B 00 FA 12 E7 00 99 A3 38 29 |));D$;;.......8)|
00000AE0: 3B 22 12 22 3B C8 28 57 24 2C 59 29 3B 41 24 28 |;".";.(W$,Y);A$(|
00000AF0: 38 AC 28 58 AB 59 29 29 3A 8E 00 07 13 E9 00 8D |8.(X.Y)):.......|
00000B00: 32 33 35 3A 89 33 35 00 0F 13 EB 00 8D 31 37 00 |235:.35......17.|
00000B10: 2D 13 EC 00 99 22 13 11 22 3A 8D 32 31 3A 99 22 |-...."..":.21:."|
00000B20: 13 11 22 3A 81 4B B2 53 A4 53 AA 31 39 00 4E 13 |..":.K.S.S.19.N.|
00000B30: ED 00 57 53 24 B2 C4 28 45 25 28 4D 2C 4B 29 29 |..WS$..(E%(M,K))|
00000B40: 3A 99 A3 31 35 29 3B 22 20 20 20 20 91 22 00 68 |:..15);" .".h|
00000B50: 13 EF 00 99 A3 32 31 AB C3 28 57 53 24 29 29 3B |.....21..(WS$));|
00000B60: 57 53 24 3A 82 4B 3A 8E 00 89 13 F1 00 85 22 93 |WS$:.K:.......".|
00000B70: 43 23 28 31 2D 39 20 30 3D 53 54 4F 50 29 22 3B |C#(1-9 0=STOP)";|
00000B80: 50 3A 8B 50 B2 30 A7 32 33 00 B2 13 F3 00 50 28 |P:.P.0.23.....P(|
00000B90: 30 29 B2 30 3A 50 28 31 29 B2 30 3A 81 49 B2 31 |0).0:P(1).0:.I.1|
00000BA0: A4 42 3A 55 B2 C6 28 C8 28 52 24 28 49 29 2C 31 |.B:U..(.(R$(I),1|
00000BB0: 29 29 00 C5 13 F5 00 8B 55 B2 50 AA 34 38 A7 50 |))......U.P.48.P|
00000BC0: 28 30 29 B2 49 00 D8 13 F7 00 8B 55 B2 50 AA 36 |(0).I......U.P.6|
00000BD0: 34 A7 50 28 31 29 B2 49 00 DE 13 F9 00 82 00 F3 |4.P(1).I........|
00000BE0: 13 FB 00 8B 50 28 30 29 B2 30 A7 99 22 4E 4F 20 |....P(0).0.."NO |
00000BF0: 42 41 4C 00 08 14 FD 00 8B 50 28 31 29 B2 30 A7 |BAL......P(1).0.|
00000C00: 99 22 4E 4F 20 45 58 50 00 24 14 FF 00 8B 50 28 |."NO EXP.$....P(|
00000C10: 30 29 B2 30 B0 50 28 31 29 B2 30 A7 8D 31 37 39 |0).0.P(1).0..179|
00000C20: 3A 89 32 33 00 3D 14 01 01 85 22 31 53 54 20 43 |:.23.=...."1ST C|
00000C30: 4F 4C 22 3B 4D 3A 81 49 B2 4D A4 31 32 00 56 14 |OL";M:.I.M.12.V.|
00000C40: 03 01 55 B2 45 25 28 49 2C 50 28 30 29 29 AC 51 |..U.E%(I,P(0)).Q|
00000C50: 28 50 29 AA 2E 35 00 84 14 05 01 45 25 28 49 2C |(P)..5.....E%(I,|
00000C60: 50 28 31 29 29 B2 B5 28 45 25 28 49 2C 50 28 30 |P(1))..(E%(I,P(0|
00000C70: 29 29 AC 52 28 50 29 AA 2E 35 29 3A 8B 49 B2 43 |)).R(P)..5):.I.C|
00000C80: A7 32 36 35 00 B0 14 07 01 45 25 28 49 AA 31 2C |.265.....E%(I.1,|
00000C90: 50 28 30 29 29 B2 B5 28 45 25 28 49 2C 50 28 30 |P(0))..(E%(I,P(0|
00000CA0: 29 29 AA 55 AB 45 25 28 49 2C 50 28 31 29 29 29 |)).U.E%(I,P(1)))|
00000CB0: 00 BB 14 09 01 82 3A 89 32 34 31 00 C3 14 0B 01 |......:.241.....|
00000CC0: 99 22 93 00 D8 14 0D 01 99 22 53 2C 43 2C 52 2C |."......."S,C,R,|
00000CD0: 51 20 30 3D 53 54 4F 50 00 EB 14 0F 01 A1 5A 24 |Q 0=STOP......Z$|
00000CE0: 3A 8B 5A 24 B2 22 22 A7 32 37 31 00 FA 14 11 01 |:.Z$."".271.....|
00000CF0: 8B 5A 24 B2 22 30 22 A7 33 35 00 0A 15 13 01 8B |.Z$."0".35......|
00000D00: 5A 24 B2 22 53 22 A7 32 38 39 00 1A 15 15 01 8B |Z$."S".289......|
00000D10: 5A 24 B2 22 52 22 A7 32 38 35 00 2A 15 17 01 8B |Z$."R".285.*....|
00000D20: 5A 24 B2 22 43 22 A7 32 38 37 00 3A 15 19 01 8B |Z$."C".287.:....|
00000D30: 5A 24 B2 22 51 22 A7 32 39 31 00 43 15 1B 01 89 |Z$."Q".291.C....|
00000D40: 32 37 31 00 6A 15 1D 01 85 22 52 4F 57 22 3B 52 |271.j...."ROW";R|
00000D50: 3A 99 52 24 28 52 29 3A 85 22 4E 41 4D 45 22 3B |:.R$(R):."NAME";|
00000D60: 52 24 28 52 29 3A 89 32 36 39 00 91 15 1F 01 85 |R$(R):.269......|
00000D70: 22 43 4F 4C 22 3B 4D 3A 99 4D 24 28 4D 29 3A 85 |"COL";M:.M$(M):.|
00000D80: 22 4E 41 4D 45 22 3B 4D 24 28 4D 29 3A 89 32 36 |"NAME";M$(M):.26|
00000D90: 39 00 B1 15 21 01 85 22 43 4F 4C 53 2C 52 4F 57 |9...!.."COLS,ROW|
00000DA0: 53 22 3B 43 2C 42 3A 8B 42 B3 32 30 A7 42 B2 32 |S";C,B:.B.20.B.2|
00000DB0: 30 00 BF 15 22 01 8D 32 39 35 3A 89 32 36 39 00 |0..."..295:.269.|
00000DC0: DD 15 23 01 41 B2 30 3A 85 22 43 41 52 44 23 22 |..#.A.0:."CARD#"|
00000DD0: 3B 41 3A 99 51 28 41 29 2C 52 28 41 29 00 FD 15 |;A:.Q(A),R(A)...|
00000DE0: 25 01 85 22 49 4E 54 2C 52 45 50 41 59 22 3B 51 |%.."INT,REPAY";Q|
00000DF0: 28 41 29 2C 52 28 41 29 3A 89 32 36 39 00 30 16 |(A),R(A):.269.0.|
00000E00: 27 01 86 45 25 28 43 2C 42 29 2C 4D 24 28 43 29 |'..E%(C,B),M$(C)|
00000E10: 2C 52 24 28 42 29 3A 48 B2 42 AB 31 39 3A 81 49 |,R$(B):H.B.19:.I|
00000E20: B2 31 A4 43 3A 4D 24 28 49 29 B2 22 20 22 3A 82 |.1.C:M$(I)." ":.|
00000E30: 00 49 16 29 01 81 49 B2 31 A4 42 3A 52 24 28 49 |.I.)..I.1.B:R$(I|
00000E40: 29 B2 22 20 22 3A 82 3A 8E 00 6D 16 2B 01 85 22 |)." ":.:..m.+.."|
00000E50: 48 45 41 44 22 3B 52 48 24 3A 9F 34 2C 34 3A 98 |HEAD";RH$:.4,4:.|
00000E60: 34 2C 54 49 24 3B 22 20 22 3B 52 48 24 00 8E 16 |4,TI$;" ";RH$...|
00000E70: 2D 01 54 B2 30 3A 81 51 B2 31 A4 43 AA 32 A9 37 |-.T.0:.Q.1.C.2.7|
00000E80: 3A 8B 51 B1 43 AA 32 A7 82 3A 89 33 30 39 00 A5 |:.Q.C.2..:.309..|
00000E90: 16 2F 01 8B 54 B2 43 AA 31 A7 51 B2 51 AB 31 3A |./..T.C.1.Q.Q.1:|
00000EA0: 54 B2 51 AA 35 00 C0 16 31 01 4C B2 51 3A 54 B2 |T.Q.5...1.L.Q:T.|
00000EB0: 51 AA 36 3A 8B 54 B1 43 AA 31 A7 54 B2 43 AA 31 |Q.6:.T.C.1.T.C.1|
00000EC0: 00 D1 16 33 01 8D 33 31 31 3A 98 34 3A 98 34 3A |...3..311:.4:.4:|
00000ED0: 82 00 DF 16 35 01 98 34 3A A0 34 3A 89 32 33 00 |....5..4:.4:.23.|
00000EE0: F7 16 37 01 98 34 2C C9 28 57 24 2C 31 38 29 3B |..7..4,.(W$,18);|
00000EF0: 3A 81 49 B2 4C A4 54 00 18 17 39 01 8B 49 B3 B2 |:.I.L.T...9..I..|
00000F00: 43 A7 98 34 2C C9 28 57 24 AA 4D 24 28 49 29 2C |C..4,.(W$.M$(I),|
00000F10: 38 29 3B 3A 89 33 31 37 00 35 17 3B 01 98 34 2C |8);:.317.5.;..4,|
00000F20: 22 20 20 20 54 4F 54 41 4C 20 20 20 41 56 45 52 |" TOTAL AVER|
00000F30: 41 47 45 22 3B 00 41 17 3D 01 82 3A 98 34 3A 98 |AGE";.A.=..:.4:.|
00000F40: 34 00 77 17 3F 01 81 4A B2 31 A4 42 3A 98 34 2C |4.w.?..J.1.B:.4,|
00000F50: C9 28 57 24 AA C4 28 4A 29 AA 22 20 22 2C 33 29 |.(W$..(J)." ",3)|
00000F60: 3B C8 28 52 24 28 4A 29 AA 57 24 2C 31 37 29 3B |;.(R$(J).W$,17);|
00000F70: 3A 81 49 B2 4C A4 54 00 9D 17 41 01 8B 49 B3 B2 |:.I.L.T...A..I..|
00000F80: 43 A7 98 34 2C C9 28 57 24 AA C4 28 45 25 28 49 |C..4,.(W$..(E%(I|
00000F90: 2C 4A 29 29 2C 38 29 3B 3A 89 33 32 37 00 BA 17 |,J)),8);:.327...|
00000FA0: 43 01 48 B2 30 3A 81 5A B2 31 A4 43 3A 48 B2 48 |C.H.0:.Z.1.C:H.H|
00000FB0: AA 45 25 28 5A 2C 4A 29 3A 82 00 E1 17 45 01 98 |.E%(Z,J):....E..|
00000FC0: 34 2C C9 28 57 24 AA C4 28 48 29 2C 38 29 3B C9 |4,.(W$..(H),8);.|
00000FD0: 28 57 24 AA C4 28 B5 28 48 AD 43 29 29 2C 38 29 |(W$..(.(H.C)),8)|
00000FE0: 3B 00 EE 17 47 01 82 3A 98 34 3A 82 3A 8E 00 00 |;...G..:.4:.:...|
00000FF0: 00 30 31 00 |.01. |
.......53281,1:."..BUDGETEER.>....B(55).
.0..55,0:.56,B(56).1:..X....".(C) COPYRI
GHT 1982":."ROY C WAINWRIGHT":.U.1.999:.
......A$(8),P(4),Q(9),R(9):Q$.G(34):S$.G
(13):S.1.R...W$."
"......"..","..","..","..",".",
".","."......I.1.7:.A$(I):.:.23.+....I(D
(W),2)"."R$(W)".":..L...."..1ST ROW.";S:
.S.H.S.0.S.H.R.....H....W.S.S.19:.15:.:.
......"... 1=SHOW":." 2=LOAD. ...." 3=TO
TALS":." 4=SETUP.F...." 5=CALC":." 6=GRA
PH":." 7=CR CD......" 8=.TAPE WRITE":."
9=TAPE READ......"10=.DISK WRITE":."11=D
ISK READ":."12=PRINT.-.!..:..(0)"FREE.N.
#..".FUNCTION 0 .....";F.Z.%..F.0.
23...'..F.55,59,139,267,155,185,241,91,1
15,87,113,299...)..23...+.."."...-..".CO
L # 0 .....";M.M./..M.C.M.0.43.X.
1..M.0.....3..".. ";.14);M$(M)...5..
...7..45:.M.0.35...9..235:.55.%.;..43:.M
.0.35...=..235.J.?.."ROW # 0 ....."
;R.V.A..R.0.59.F.C..R.B.R.0.63...E.."DAT
A 0 .........";D...G...(D).3276
7.69...I.E%(M,R).D:.236:.63.R.K..15,EN,E
M$,ET$,ES$:.EN.0.....M..".DSK ERR";:.EM$
,EN,ET$,ES$:.179:.23...O..15,8,15:.81:..
..Q..V.83,75.F.S.SX.ST:.ST..0.ST..64..".
TP ERR":.179:..L.U...U.W..89:.79:.1,8,2,
G$.",S,W":.75:V.2:.95...Y.."..FILE NAME"
;G$:....[.V.1:.89...]..1,1,1,G$..._..1,C
;S$;B;S$;:.81.O.A..M.1.C:.K.1.B...C..1,E
%(M,K);S$;:.81...E..K,M...G..I.0.C:.1,Q$
;M$(I);Q$;S$;:.:.81.7.I..I.1.B:.1,Q$;R$(
I);Q$;S$;:.:.81.\.K..I.1.9:.1,Q(I);S$;R(
I);S$;:.:.81.I.M..V.2. 15.Y.O. 1:.".":.3
5...Q.V.2:.89:.1,8,2,G$.",S,R":.79:.119.
..S.V.1:.89.B.U..1,1,0,G$:."FOUND".V.W..
1,C,B:.81:.295...Y..M.1.C:.K.1.B...{..1,
E%(M,K):.81...}..ST..0.ST..64.."TP ERR";
ST.#...K,M.=....I.0.C:.1,M$(I):.81:..W.
...I.1.B:.1,R$(I):.81:..U....I.1.9:.1,Q(
I),R(I):.81:.......V.2. 15..... 1:.".":.
35......"..":.17:."..":.21:."..".15)"TOT
AL.H....R.S.S.19.....U.F(H(R$(R),1))....
..U.89.E.E%(1,R):.151.!....(U.48.U.58).(
U.88.U.91).E.E%(C,R):.151.?...E.0:.M.1.C
:E.E.E%(M,R):.M.L...WS$.D(E).F.....20.C(
WS$));E:.R:.35......".CALCS":.I.0.4:P(I)
.0:.:.I.1.B:Y.F(H(R$(I),1))......Y.85.Y.
91.Y.Y.86:P(Y).I...........Y.0:.I.0.4:.P
(I).0..".NO TOT ROW.."G(I.86):Y.1......:
.Y..179:.23......M.1.C:G.0:IT.0:.I.1.B.>
....H(R$(I),1)."@".G.G.E%(M,I).`....H(R$
(I),1)."$".IT.IT.E%(M,I)......I:E%(M,P(0
)).IT:E%(M,P(1)).G.....E%(M,P(2)).IT.G:N
B.E%(M,P(3)).G.IT:E%(M,P(4)).NB.Q....M..
C.E%(M.1,P(3)).NB......M:.23......"X....
..Z$:.Z$.."X".181............".":.17:.S.
0.S.1:.35.!....21.F...."ROW # 0 ...
..";W:.W.0.185.R....W.0.23._.A..W.B.189.
L.C..".":E.0.T.E..15...G.NM%.0:NX%.10...
I..M.1.C:U.E%(M,W)...K..U.NX%.NX%.U...M.
.U.NM%.NM%.U.H.O.E.E.U:..W.Q.R%.NX%.NM%.
..S.D$.D(NM%):E$.D(NM%.R%.2):F$.D(NX%)..
.U..".";.15.C(E$));E$.5.W...9.C(D$));D$;
.21.C(F$));F$.T.Y...7);".";.14);"B";.21)
;".".P....M.1.C:U.E%(M,W):.225:......M.0
:U..(E.C):.:.225......189.....X.(U.NM%).
13.R%.....Y..(X).W...D$.D(U):.H(M$(M),1)
;.7.C(D$));D$;;.......8);".";H(W$,Y);A$(
8.(X.Y)):.......235:.35......17.-...."..
":.21:."..":.K.S.S.19.N...WS$.D(E%(M,K))
:..15);" .".H.....21.C(WS$));WS$:.K:.
......".C#(1-9 0=STOP)";P:.P.0.23.....P(
0).0:P(1).0:.I.1.B:U.F(H(R$(I),1)).E....
U.P.48.P(0).I.X....U.P.64.P(1).I........
....P(0).0.."NO BAL......P(1).0.."NO EXP
.$....P(0).0.P(1).0..179:.23.=...."1ST C
OL";M:.I.M.12.V...U.E%(I,P(0)).Q(P)..5..
...E%(I,P(1))..(E%(I,P(0)).R(P)..5):.I.C
.265.....E%(I.1,P(0))..(E%(I,P(0)).U.E%(
I,P(1)))......:.241.C...."..X...."S,C,R,
Q 0=STOP......Z$:.Z$."".271......Z$."0".
35......Z$."S".289......Z$."R".285.*....
Z$."C".287.:....Z$."Q".291.C....271.J...
."ROW";R:.R$(R):."NAME";R$(R):.269......
"COL";M:.M$(M):."NAME";M$(M):.269...!.."
COLS,ROWS";C,B:.B.20.B.20..."..295:.269.
..#.A.0:."CARD#";A:.Q(A),R(A)...%.."INT,
REPAY";Q(A),R(A):.269.0.'..E%(C,B),M$(C)
,R$(B):H.B.19:.I.1.C:M$(I)." ":..I.)..I.
1.B:R$(I)." ":.:..M.+.."HEAD";RH$:.4,4:.
4,TI$;" ";RH$...-.T.0:.Q.1.C.2.7:.Q.C.2.
.:.309.../..T.C.1.Q.Q.1:T.Q.5...1.L.Q:T.
Q.6:.T.C.1.T.C.1.Q.3..311:.4:.4:....5..4
: 4:.23...7..4,I(W$,18);:.I.L.T...9..I..
C..4,I(W$.M$(I),8);:.317.5.;..4," TOTA
L AVERAGE";.A.=..:.4:.4.W.?..J.1.B:.4,
I(W$.D(J)." ",3);H(R$(J).W$,17);:.I.L.T.
..A..I..C..4,I(W$.D(E%(I,J)),8);:.327...
C.H.0:.Z.1.C:H.H.E%(Z,J):....E..4,I(W$.D
(H),8);I(W$.D(.(H.C)),8);...G..:.4:.:...
.01.
> CLICK IMAGE PREVIEW FOR FULL MODAL