BUDGETEREN
FILE INFORMATION
FILENAME(S): BUDGETEREN
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-11-30 21:27:51
APPEARS ON: 2 disk(s)
FILE HASH
29313ee45328e8112a7c0e277a87a4efe8d8861a811bc7b114e23eb895b3c825
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ADMINISTRATIEF | BUDGETEREN | PRG | DuncanTwain | 8 | 0 | DOWNLOAD FILE |
| DISKETTE 1 | BUDGETEREN | PRG | DuncanTwain | 28 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 12 08 01 00 8F 20 42 55 44 47 45 54 45 52 |....... BUDGETER|
00000010: 45 4E 00 2E 08 02 00 97 35 33 32 38 31 2C 31 3A |EN......53281,1:|
00000020: 99 22 93 1C 42 55 44 47 45 54 45 52 45 4E 00 50 |."..BUDGETEREN.P|
00000030: 08 03 00 8B C2 28 35 35 29 B3 B1 30 A7 97 35 35 |.....(55)..0..55|
00000040: 2C 30 3A 97 35 36 2C C2 28 35 36 29 AA 31 3A 9C |,0:.56,.(56).1:.|
00000050: 00 8A 08 04 00 99 22 1F 28 43 29 20 43 4F 50 59 |......".(C) COPY|
00000060: 52 49 47 48 54 20 31 39 38 32 22 3A 99 22 52 4F |RIGHT 1982":."RO|
00000070: 59 20 43 20 57 41 49 4E 57 52 49 47 48 54 22 3A |Y C WAINWRIGHT":|
00000080: 81 55 B2 31 A4 39 39 39 3A 82 00 BA 08 05 00 86 |.U.1.999:.......|
00000090: 41 24 28 38 29 2C 50 28 34 29 2C 51 28 39 29 2C |A$(8),P(4),Q(9),|
000000A0: 52 28 39 29 3A 51 24 B2 C7 28 33 34 29 3A 53 24 |R(9):Q$..(34):S$|
000000B0: B2 C7 28 31 33 29 3A 53 B2 31 00 E4 08 06 00 57 |..(13):S.1.....W|
000000C0: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." |
000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000E0: 20 20 20 22 00 09 09 07 00 83 22 92 A5 22 2C 22 | "......"..","|
000000F0: 92 B4 22 2C 22 92 B5 22 2C 22 92 A1 22 2C 22 B6 |..","..","..",".|
00000100: 22 2C 22 AA 22 2C 22 A7 22 00 21 09 08 00 81 49 |",".",".".!....I|
00000110: B2 31 A4 37 3A 87 41 24 28 49 29 3A 82 3A 89 31 |.1.7:.A$(I):.:.1|
00000120: 33 00 3D 09 09 00 99 C9 28 C4 28 57 29 2C 32 29 |3.=.....(.(W),2)|
00000130: 22 12 22 52 24 28 57 29 22 1F 22 3A 8E 00 5E 09 |"."R$(W)".":..^.|
00000140: 0A 00 85 22 12 13 31 53 54 20 52 4F 57 92 22 3B |..."..1ST ROW.";|
00000150: 53 3A 8B 53 B1 48 B0 53 B3 30 A7 53 B2 48 00 64 |S:.S.H.S.0.S.H.d|
00000160: 09 0B 00 8E 00 79 09 0C 00 81 57 B2 53 A4 53 AA |.....y....W.S.S.|
00000170: 31 39 3A 8D 39 3A 82 3A 8E 00 95 09 0D 00 99 22 |19:.9:.:......."|
00000180: 93 11 11 20 31 3D 53 48 4F 57 22 3A 99 22 20 32 |... 1=SHOW":." 2|
00000190: 3D 4C 4F 41 44 00 B1 09 0E 00 99 22 20 33 3D 54 |=LOAD......" 3=T|
000001A0: 4F 54 41 4C 53 22 3A 99 22 20 34 3D 53 45 54 55 |OTALS":." 4=SETU|
000001B0: 50 00 D7 09 0F 00 99 22 20 35 3D 43 41 4C 43 22 |P......" 5=CALC"|
000001C0: 3A 99 22 20 36 3D 47 52 41 50 48 22 3A 99 22 20 |:." 6=GRAPH":." |
000001D0: 37 3D 43 52 20 43 44 00 FC 09 10 00 99 22 20 38 |7=CR CD......" 8|
000001E0: 3D 12 54 41 50 45 20 57 52 49 54 45 22 3A 99 22 |=.TAPE WRITE":."|
000001F0: 20 39 3D 54 41 50 45 20 52 45 41 44 00 2D 0A 11 | 9=TAPE READ.-..|
00000200: 00 99 22 31 30 3D 12 44 49 53 4B 20 57 52 49 54 |.."10=.DISK WRIT|
00000210: 45 22 3A 99 22 31 31 3D 44 49 53 4B 20 52 45 41 |E":."11=DISK REA|
00000220: 44 22 3A 99 22 31 32 3D 50 52 49 4E 54 00 3E 0A |D":."12=PRINT.>.|
00000230: 12 00 99 3A 99 B8 28 30 29 22 46 52 45 45 00 5F |...:..(0)"FREE._|
00000240: 0A 13 00 85 22 13 46 55 4E 43 54 49 4F 4E 20 20 |....".FUNCTION |
00000250: 20 20 20 20 30 20 20 9D 9D 9D 9D 9D 22 3B 46 00 | 0 .....";F.|
00000260: 6B 0A 14 00 8B 46 B2 30 A7 31 33 00 99 0A 15 00 |k....F.0.13.....|
00000270: 91 46 89 32 39 2C 33 31 2C 37 31 2C 31 33 36 2C |.F.29,31,71,136,|
00000280: 37 39 2C 39 34 2C 31 32 33 2C 34 37 2C 35 39 2C |79,94,123,47,59,|
00000290: 34 35 2C 35 38 2C 31 35 33 00 A1 0A 16 00 89 31 |45,58,153......1|
000002A0: 33 00 AA 0A 17 00 99 22 93 22 00 C9 0A 18 00 85 |3......"."......|
000002B0: 22 13 43 4F 4C 20 23 20 20 20 20 20 20 20 30 20 |".COL # 0 |
000002C0: 20 9D 9D 9D 9D 9D 22 3B 4D 00 D9 0A 19 00 8B 4D | .....";M......M|
000002D0: B1 43 B0 4D B3 30 A7 32 33 00 E4 0A 1A 00 8B 4D |.C.M.0.23......M|
000002E0: B2 30 A7 8E 00 FE 0A 1B 00 99 22 93 11 20 20 20 |.0........".. |
000002F0: 20 20 22 3B A3 31 34 29 3B 4D 24 28 4D 29 00 04 | ";.14);M$(M)..|
00000300: 0B 1C 00 8E 00 14 0B 1D 00 8D 32 34 3A 8B 4D B2 |..........24:.M.|
00000310: 30 A7 31 39 00 21 0B 1E 00 8D 31 31 39 3A 89 32 |0.19.!....119:.2|
00000320: 39 00 31 0B 1F 00 8D 32 33 3A 8B 4D B2 30 A7 31 |9.1....23:.M.0.1|
00000330: 39 00 3A 0B 20 00 8D 31 31 39 00 56 0B 21 00 85 |9.:. ..119.V.!..|
00000340: 22 52 4F 57 20 23 20 20 20 20 20 30 20 20 9D 9D |"ROW # 0 ..|
00000350: 9D 9D 9D 22 3B 52 00 62 0B 22 00 8B 52 B2 30 89 |...";R.b."..R.0.|
00000360: 33 31 00 72 0B 23 00 8B 52 B1 42 B0 52 B3 30 A7 |31.r.#..R.B.R.0.|
00000370: 33 33 00 95 0B 24 00 85 22 44 41 54 41 20 20 20 |33...$.."DATA |
00000380: 20 20 30 20 20 20 20 20 20 9D 9D 9D 9D 9D 9D 9D | 0 .......|
00000390: 9D 9D 22 3B 44 00 A8 0B 25 00 8B B6 28 44 29 B1 |..";D...%...(D).|
000003A0: 33 32 37 36 37 A7 33 36 00 BF 0B 26 00 45 25 28 |32767.36...&.E%(|
000003B0: 4D 2C 52 29 B2 44 3A 8D 31 32 30 3A 89 33 33 00 |M,R).D:.120:.33.|
000003C0: DE 0B 27 00 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 |..'..15,EN,EM$,E|
000003D0: 54 24 2C 45 53 24 3A 8B 45 4E B2 30 A7 8E 00 07 |T$,ES$:.EN.0....|
000003E0: 0C 28 00 99 22 12 44 53 4B 20 45 52 52 22 3B 3A |.(..".DSK ERR";:|
000003F0: 99 45 4D 24 2C 45 4E 2C 45 54 24 2C 45 53 24 3A |.EM$,EN,ET$,ES$:|
00000400: 8D 39 31 3A 89 31 33 00 1A 0C 29 00 9F 31 35 2C |.91:.13...)..15,|
00000410: 38 2C 31 35 3A 8D 34 32 3A 8E 00 27 0C 2A 00 91 |8,15:.42:..'.*..|
00000420: 56 89 34 33 2C 33 39 00 50 0C 2B 00 53 58 B2 53 |V.43,39.P.+.SX.S|
00000430: 54 3A 8B 53 54 B3 B1 30 AF 53 54 B3 B1 36 34 A7 |T:.ST..0.ST..64.|
00000440: 99 22 12 54 50 20 45 52 52 22 3A 8D 39 31 3A 8E |.".TP ERR":.91:.|
00000450: 00 56 0C 2C 00 8E 00 7F 0C 2D 00 8D 34 36 3A 8D |.V.,.....-..46:.|
00000460: 34 31 3A 9F 31 2C 38 2C 32 2C 47 24 AA 22 2C 53 |41:.1,8,2,G$.",S|
00000470: 2C 57 22 3A 8D 33 39 3A 56 B2 32 3A 89 34 39 00 |,W":.39:V.2:.49.|
00000480: 97 0C 2E 00 85 22 93 11 46 49 4C 45 20 4E 41 4D |....."..FILE NAM|
00000490: 45 22 3B 47 24 3A 8E 00 A3 0C 2F 00 56 B2 31 3A |E";G$:..../.V.1:|
000004A0: 8D 34 36 00 B1 0C 30 00 9F 31 2C 31 2C 31 2C 47 |.46...0..1,1,1,G|
000004B0: 24 00 C7 0C 31 00 98 31 2C 43 3B 53 24 3B 42 3B |$...1..1,C;S$;B;|
000004C0: 53 24 3B 3A 8D 34 32 00 D9 0C 32 00 81 4D B2 31 |S$;:.42...2..M.1|
000004D0: A4 43 3A 81 4B B2 31 A4 42 00 F0 0C 33 00 98 31 |.C:.K.1.B...3..1|
000004E0: 2C 45 25 28 4D 2C 4B 29 3B 53 24 3B 3A 8D 34 32 |,E%(M,K);S$;:.42|
000004F0: 00 F9 0C 34 00 82 4B 2C 4D 00 1D 0D 35 00 81 49 |...4..K,M...5..I|
00000500: B2 30 A4 43 3A 98 31 2C 51 24 3B 4D 24 28 49 29 |.0.C:.1,Q$;M$(I)|
00000510: 3B 51 24 3B 53 24 3B 3A 82 3A 8D 34 32 00 41 0D |;Q$;S$;:.:.42.A.|
00000520: 36 00 81 49 B2 31 A4 42 3A 98 31 2C 51 24 3B 52 |6..I.1.B:.1,Q$;R|
00000530: 24 28 49 29 3B 51 24 3B 53 24 3B 3A 82 3A 8D 34 |$(I);Q$;S$;:.:.4|
00000540: 32 00 66 0D 37 00 81 49 B2 31 A4 39 3A 98 31 2C |2.f.7..I.1.9:.1,|
00000550: 51 28 49 29 3B 53 24 3B 52 28 49 29 3B 53 24 3B |Q(I);S$;R(I);S$;|
00000560: 3A 82 3A 8D 34 32 00 73 0D 38 00 8B 56 B2 32 A7 |:.:.42.s.8..V.2.|
00000570: A0 31 35 00 83 0D 39 00 A0 31 3A 99 22 93 22 3A |.15...9..1:.".":|
00000580: 89 31 39 00 A8 0D 3A 00 56 B2 32 3A 8D 34 36 3A |.19...:.V.2:.46:|
00000590: 9F 31 2C 38 2C 32 2C 47 24 AA 22 2C 53 2C 52 22 |.1,8,2,G$.",S,R"|
000005A0: 3A 8D 34 31 3A 89 36 31 00 B4 0D 3B 00 56 B2 31 |:.41:.61...;.V.1|
000005B0: 3A 8D 34 36 00 CB 0D 3C 00 9F 31 2C 31 2C 30 2C |:.46...<..1,1,0,|
000005C0: 47 24 3A 99 22 46 4F 55 4E 44 22 00 DF 0D 3D 00 |G$:."FOUND"...=.|
000005D0: 84 31 2C 43 2C 42 3A 8D 34 32 3A 8D 31 35 31 00 |.1,C,B:.42:.151.|
000005E0: F1 0D 3E 00 81 4D B2 31 A4 43 3A 81 4B B2 31 A4 |..>..M.1.C:.K.1.|
000005F0: 42 00 04 0E 3F 00 84 31 2C 45 25 28 4D 2C 4B 29 |B...?..1,E%(M,K)|
00000600: 3A 8D 34 32 00 23 0E 40 00 8B 53 54 B1 B3 30 AF |:.42.#.@..ST..0.|
00000610: 53 54 B1 B3 36 34 A7 99 22 54 50 20 45 52 52 22 |ST..64.."TP ERR"|
00000620: 3B 53 54 00 2C 0E 41 00 82 4B 2C 4D 00 46 0E 42 |;ST.,.A..K,M.F.B|
00000630: 00 81 49 B2 30 A4 43 3A 84 31 2C 4D 24 28 49 29 |..I.0.C:.1,M$(I)|
00000640: 3A 8D 34 32 3A 82 00 60 0E 43 00 81 49 B2 31 A4 |:.42:..`.C..I.1.|
00000650: 42 3A 84 31 2C 52 24 28 49 29 3A 8D 34 32 3A 82 |B:.1,R$(I):.42:.|
00000660: 00 7E 0E 44 00 81 49 B2 31 A4 39 3A 84 31 2C 51 |.~.D..I.1.9:.1,Q|
00000670: 28 49 29 2C 52 28 49 29 3A 8D 34 32 3A 82 00 8B |(I),R(I):.42:...|
00000680: 0E 45 00 8B 56 B2 32 A7 A0 31 35 00 9B 0E 46 00 |.E..V.2..15...F.|
00000690: A0 31 3A 99 22 93 22 3A 89 31 39 00 C3 0E 47 00 |.1:.".":.19...G.|
000006A0: 99 22 93 11 22 3A 8D 31 30 3A 99 22 13 11 22 3A |."..":.10:."..":|
000006B0: 8D 31 32 3A 99 22 13 11 22 A3 31 35 29 22 54 4F |.12:."..".15)"TO|
000006C0: 54 41 4C 00 D1 0E 48 00 81 52 B2 53 A4 53 AA 31 |TAL...H..R.S.S.1|
000006D0: 39 00 E5 0E 49 00 55 B2 C6 28 C8 28 52 24 28 52 |9...I.U..(.(R$(R|
000006E0: 29 2C 31 29 29 00 FD 0E 4A 00 8B 55 B2 38 39 A7 |),1))...J..U.89.|
000006F0: 45 B2 45 25 28 31 2C 52 29 3A 89 37 37 00 28 0F |E.E%(1,R):.77.(.|
00000700: 4B 00 8B 28 55 B1 34 38 AF 55 B3 35 38 29 B0 28 |K..(U.48.U.58).(|
00000710: 55 B1 38 38 AF 55 B3 39 31 29 A7 45 B2 45 25 28 |U.88.U.91).E.E%(|
00000720: 43 2C 52 29 3A 89 37 37 00 46 0F 4C 00 45 B2 30 |C,R):.77.F.L.E.0|
00000730: 3A 81 4D B2 31 A4 43 3A 45 B2 45 AA 45 25 28 4D |:.M.1.C:E.E.E%(M|
00000740: 2C 52 29 3A 82 4D 00 53 0F 4D 00 57 53 24 B2 C4 |,R):.M.S.M.WS$..|
00000750: 28 45 29 00 6D 0F 4E 00 99 A3 32 30 AB C3 28 57 |(E).m.N...20..(W|
00000760: 53 24 29 29 3B 45 3A 82 52 3A 89 31 39 00 A2 0F |S$));E:.R:.19...|
00000770: 4F 00 99 22 93 43 41 4C 43 53 22 3A 81 49 B2 30 |O..".CALCS":.I.0|
00000780: A4 34 3A 50 28 49 29 B2 30 3A 82 3A 81 49 B2 31 |.4:P(I).0:.:.I.1|
00000790: A4 42 3A 59 B2 C6 28 C8 28 52 24 28 49 29 2C 31 |.B:Y..(.(R$(I),1|
000007A0: 29 29 00 BF 0F 50 00 8B 59 B1 38 35 AF 59 B3 39 |))...P..Y.85.Y.9|
000007B0: 31 A7 59 B2 59 AB 38 36 3A 50 28 59 29 B2 49 00 |1.Y.Y.86:P(Y).I.|
000007C0: C5 0F 51 00 82 00 F8 0F 52 00 59 B2 30 3A 81 49 |..Q.....R.Y.0:.I|
000007D0: B2 30 A4 34 3A 8B 50 28 49 29 B2 30 A7 99 22 12 |.0.4:.P(I).0..".|
000007E0: 4E 4F 20 54 4F 54 20 52 4F 57 2E 2E 22 C7 28 49 |NO TOT ROW..".(I|
000007F0: AA 38 36 29 3A 59 B2 31 00 09 10 53 00 82 3A 8B |.86):Y.1...S..:.|
00000800: 59 A7 8D 39 31 3A 89 31 33 00 24 10 54 00 81 4D |Y..91:.13.$.T..M|
00000810: B2 31 A4 43 3A 47 B2 30 3A 49 54 B2 30 3A 81 49 |.1.C:G.0:IT.0:.I|
00000820: B2 31 A4 42 00 44 10 55 00 8B C8 28 52 24 28 49 |.1.B.D.U...(R$(I|
00000830: 29 2C 31 29 B2 22 40 22 A7 47 B2 47 AA 45 25 28 |),1)."@".G.G.E%(|
00000840: 4D 2C 49 29 00 66 10 56 00 8B C8 28 52 24 28 49 |M,I).f.V...(R$(I|
00000850: 29 2C 31 29 B2 22 24 22 A7 49 54 B2 49 54 AA 45 |),1)."$".IT.IT.E|
00000860: 25 28 4D 2C 49 29 00 88 10 57 00 82 49 3A 45 25 |%(M,I)...W..I:E%|
00000870: 28 4D 2C 50 28 30 29 29 B2 49 54 3A 45 25 28 4D |(M,P(0)).IT:E%(M|
00000880: 2C 50 28 31 29 29 B2 47 00 BD 10 58 00 45 25 28 |,P(1)).G...X.E%(|
00000890: 4D 2C 50 28 32 29 29 B2 49 54 AB 47 3A 4E 42 B2 |M,P(2)).IT.G:NB.|
000008A0: 45 25 28 4D 2C 50 28 33 29 29 AB 47 AA 49 54 3A |E%(M,P(3)).G.IT:|
000008B0: 45 25 28 4D 2C 50 28 34 29 29 B2 4E 42 00 D7 10 |E%(M,P(4)).NB...|
000008C0: 59 00 8B 4D B3 B1 43 A7 45 25 28 4D AA 31 2C 50 |Y..M..C.E%(M.1,P|
000008D0: 28 33 29 29 B2 4E 42 00 E2 10 5A 00 82 4D 3A 89 |(3)).NB...Z..M:.|
000008E0: 31 33 00 EA 10 5B 00 99 22 58 00 FE 10 5C 00 A1 |13...[.."X...\..|
000008F0: 5A 24 3A 8B 5A 24 B3 B1 22 58 22 A7 39 32 00 04 |Z$:.Z$.."X".92..|
00000900: 11 5D 00 8E 00 1E 11 5E 00 99 22 93 22 3A 8D 31 |.].....^..".":.1|
00000910: 30 3A 8B 53 B2 30 A7 53 B2 31 3A 89 31 39 00 26 |0:.S.0.S.1:.19.&|
00000920: 11 5F 00 8D 31 32 00 4A 11 60 00 85 22 52 4F 57 |._..12.J.`.."ROW|
00000930: 20 23 20 20 20 20 20 30 20 20 9D 9D 9D 9D 9D 22 | # 0 ....."|
00000940: 3B 57 3A 8B 57 B2 30 A7 39 34 00 56 11 61 00 8B |;W:.W.0.94.V.a..|
00000950: 57 B3 30 A7 31 33 00 62 11 62 00 8B 57 B1 42 A7 |W.0.13.b.b..W.B.|
00000960: 39 36 00 6F 11 63 00 99 22 93 22 3A 45 B2 30 00 |96.o.c..".":E.0.|
00000970: 76 11 64 00 8D 39 00 87 11 65 00 4E 4D 25 B2 30 |v.d..9...e.NM%.0|
00000980: 3A 4E 58 25 B2 31 30 00 9C 11 66 00 81 4D B2 31 |:NX%.10...f..M.1|
00000990: A4 43 3A 55 B2 45 25 28 4D 2C 57 29 00 AD 11 67 |.C:U.E%(M,W)...g|
000009A0: 00 8B 55 B1 4E 58 25 A7 4E 58 25 B2 55 00 BE 11 |..U.NX%.NX%.U...|
000009B0: 68 00 8B 55 B3 4E 4D 25 A7 4E 4D 25 B2 55 00 CA |h..U.NM%.NM%.U..|
000009C0: 11 69 00 45 B2 45 AA 55 3A 82 00 D9 11 6A 00 52 |.i.E.E.U:....j.R|
000009D0: 25 B2 4E 58 25 AB 4E 4D 25 00 00 12 6B 00 44 24 |%.NX%.NM%...k.D$|
000009E0: B2 C4 28 4E 4D 25 29 3A 45 24 B2 C4 28 4E 4D 25 |..(NM%):E$..(NM%|
000009F0: AA 52 25 AD 32 29 3A 46 24 B2 C4 28 4E 58 25 29 |.R%.2):F$..(NX%)|
00000A00: 00 17 12 6C 00 99 22 11 22 3B A3 31 35 AB C3 28 |...l..".";.15..(|
00000A10: 45 24 29 29 3B 45 24 00 37 12 6D 00 99 A3 39 AB |E$));E$.7.m...9.|
00000A20: C3 28 44 24 29 29 3B 44 24 3B A3 32 31 AB C3 28 |.(D$));D$;.21..(|
00000A30: 46 24 29 29 3B 46 24 00 56 12 6E 00 99 A3 37 29 |F$));F$.V.n...7)|
00000A40: 3B 22 A7 22 3B A3 31 34 29 3B 22 C2 22 3B A3 32 |;".";.14);".";.2|
00000A50: 31 29 3B 22 A5 22 00 72 12 6F 00 81 4D B2 31 A4 |1);".".r.o..M.1.|
00000A60: 43 3A 55 B2 45 25 28 4D 2C 57 29 3A 8D 31 31 34 |C:U.E%(M,W):.114|
00000A70: 3A 82 00 8A 12 70 00 4D B2 30 3A 55 B2 B5 28 45 |:....p.M.0:U..(E|
00000A80: AD 43 29 3A 99 3A 8D 31 31 34 00 92 12 71 00 89 |.C):.:.114...q..|
00000A90: 39 36 00 A6 12 72 00 58 B2 28 55 AB 4E 4D 25 29 |96...r.X.(U.NM%)|
00000AA0: AC 31 33 AD 52 25 00 B1 12 73 00 59 B2 B5 28 58 |.13.R%...s.Y..(X|
00000AB0: 29 00 D8 12 74 00 44 24 B2 C4 28 55 29 3A 99 C8 |)...t.D$..(U):..|
00000AC0: 28 4D 24 28 4D 29 2C 31 29 3B A3 37 AB C3 28 44 |(M$(M),1);.7..(D|
00000AD0: 24 29 29 3B 44 24 3B 3B 00 FB 12 75 00 99 A3 38 |$));D$;;...u...8|
00000AE0: 29 3B 22 12 22 3B C8 28 57 24 2C 59 29 3B 41 24 |);".";.(W$,Y);A$|
00000AF0: 28 38 AC 28 58 AB 59 29 29 3A 8E 00 08 13 76 00 |(8.(X.Y)):....v.|
00000B00: 8D 31 31 39 3A 89 31 39 00 10 13 77 00 8D 31 30 |.119:.19...w..10|
00000B10: 00 2E 13 78 00 99 22 13 11 22 3A 8D 31 32 3A 99 |...x.."..":.12:.|
00000B20: 22 13 11 22 3A 81 4B B2 53 A4 53 AA 31 39 00 4F |"..":.K.S.S.19.O|
00000B30: 13 79 00 57 53 24 B2 C4 28 45 25 28 4D 2C 4B 29 |.y.WS$..(E%(M,K)|
00000B40: 29 3A 99 A3 31 35 29 3B 22 20 20 20 20 91 22 00 |):..15);" .".|
00000B50: 69 13 7A 00 99 A3 32 31 AB C3 28 57 53 24 29 29 |i.z...21..(WS$))|
00000B60: 3B 57 53 24 3A 82 4B 3A 8E 00 8A 13 7B 00 85 22 |;WS$:.K:....{.."|
00000B70: 93 43 23 28 31 2D 39 20 30 3D 53 54 4F 50 29 22 |.C#(1-9 0=STOP)"|
00000B80: 3B 50 3A 8B 50 B2 30 A7 31 33 00 B3 13 7C 00 50 |;P:.P.0.13...|.P|
00000B90: 28 30 29 B2 30 3A 50 28 31 29 B2 30 3A 81 49 B2 |(0).0:P(1).0:.I.|
00000BA0: 31 A4 42 3A 55 B2 C6 28 C8 28 52 24 28 49 29 2C |1.B:U..(.(R$(I),|
00000BB0: 31 29 29 00 C6 13 7D 00 8B 55 B2 50 AA 34 38 A7 |1))...}..U.P.48.|
00000BC0: 50 28 30 29 B2 49 00 D9 13 7E 00 8B 55 B2 50 AA |P(0).I...~..U.P.|
00000BD0: 36 34 A7 50 28 31 29 B2 49 00 DF 13 7F 00 82 00 |64.P(1).I.......|
00000BE0: F4 13 80 00 8B 50 28 30 29 B2 30 A7 99 22 4E 4F |.....P(0).0.."NO|
00000BF0: 20 42 41 4C 00 09 14 81 00 8B 50 28 31 29 B2 30 | BAL......P(1).0|
00000C00: A7 99 22 4E 4F 20 45 58 50 00 24 14 82 00 8B 50 |.."NO EXP.$....P|
00000C10: 28 30 29 B2 30 B0 50 28 31 29 B2 30 A7 8D 39 31 |(0).0.P(1).0..91|
00000C20: 3A 89 31 33 00 3D 14 83 00 85 22 31 53 54 20 43 |:.13.=...."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: 84 00 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 85 00 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 31 33 35 00 B0 14 86 00 45 25 28 49 AA 31 2C |.135.....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 87 00 82 3A 89 31 32 33 00 C3 14 88 00 |......:.123.....|
00000CC0: 99 22 93 00 D8 14 89 00 99 22 53 2C 43 2C 52 2C |."......."S,C,R,|
00000CD0: 51 20 30 3D 53 54 4F 50 00 EB 14 8A 00 A1 5A 24 |Q 0=STOP......Z$|
00000CE0: 3A 8B 5A 24 B2 22 22 A7 31 33 38 00 FA 14 8B 00 |:.Z$."".138.....|
00000CF0: 8B 5A 24 B2 22 30 22 A7 31 39 00 0A 15 8C 00 8B |.Z$."0".19......|
00000D00: 5A 24 B2 22 53 22 A7 31 34 37 00 1A 15 8D 00 8B |Z$."S".147......|
00000D10: 5A 24 B2 22 52 22 A7 31 34 35 00 2A 15 8E 00 8B |Z$."R".145.*....|
00000D20: 5A 24 B2 22 43 22 A7 31 34 36 00 3A 15 8F 00 8B |Z$."C".146.:....|
00000D30: 5A 24 B2 22 51 22 A7 31 34 39 00 43 15 90 00 89 |Z$."Q".149.C....|
00000D40: 31 33 38 00 6A 15 91 00 85 22 52 4F 57 22 3B 52 |138.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 31 33 37 00 91 15 92 00 85 |R$(R):.137......|
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 31 33 |"NAME";M$(M):.13|
00000D90: 37 00 B1 15 93 00 85 22 43 4F 4C 53 2C 52 4F 57 |7......"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 94 00 8D 31 35 31 3A 89 31 33 37 00 |0......151:.137.|
00000DC0: DD 15 95 00 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: 96 00 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 31 33 37 00 30 16 |(A),R(A):.137.0.|
00000E00: 97 00 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 98 00 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 99 00 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: 9A 00 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 31 35 38 00 A5 |:.Q.C.2..:.158..|
00000E90: 16 9B 00 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 9C 00 4C B2 51 3A 54 B2 |T.Q.5.....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 9D 00 8D 31 35 39 3A 98 34 3A 98 34 3A |......159:.4:.4:|
00000ED0: 82 00 DF 16 9E 00 98 34 3A A0 34 3A 89 31 33 00 |.......4:.4:.13.|
00000EE0: F7 16 9F 00 98 34 2C C9 28 57 24 2C 31 38 29 3B |.....4,.(W$,18);|
00000EF0: 3A 81 49 B2 4C A4 54 00 18 17 A0 00 8B 49 B3 B2 |:.I.L.T......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 31 36 32 00 35 17 A1 00 98 34 2C |8);:.162.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 A2 00 82 3A 98 34 3A 98 |AGE";.A....:.4:.|
00000F40: 34 00 77 17 A3 00 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 A4 00 8B 49 B3 B2 |:.I.L.T......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 31 36 37 00 BA 17 |,J)),8);:.167...|
00000FA0: A5 00 48 B2 30 3A 81 5A B2 31 A4 43 3A 48 B2 48 |..H.0:.Z.1.C:H.H|
00000FB0: AA 45 25 28 5A 2C 4A 29 3A 82 00 E1 17 A6 00 98 |.E%(Z,J):.......|
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 A7 00 82 3A 98 34 3A 82 3A 8E 00 00 |;......:.4:.:...|
00000FF0: 00 30 33 FF |.03. |
....... BUDGETEREN......53281,1:."..BUDG
ETEREN.P....B(55)..0..55,0:.56,B(56).1:.
......".(C) COPYRIGHT 1982":."ROY C WAIN
WRIGHT":.U.1.999:.......A$(8),P(4),Q(9),
R(9):Q$.G(34):S$.G(13):S.1.....W$."
"......"..","
..","..","..",".",".",".".!....I.1.7:.A$
(I):.:.13.=....I(D(W),2)"."R$(W)".":..^.
..."..1ST ROW.";S:.S.H.S.0.S.H.D.....Y..
..W.S.S.19:.9:.:......."... 1=SHOW":." 2
=LOAD......" 3=TOTALS":." 4=SETUP.W...."
5=CALC":." 6=GRAPH":." 7=CR CD......" 8
=.TAPE WRITE":." 9=TAPE READ.-...."10=.D
ISK WRITE":."11=DISK READ":."12=PRINT.>.
...:..(0)"FREE._....".FUNCTION 0 .
....";F.K....F.0.13......F.29,31,71,136,
79,94,123,47,59,45,58,153......13......"
.".I....".COL # 0 .....";M.Y....M
.C.M.0.23......M.0........".. ";.14)
;M$(M)............24:.M.0.19.!....119:.2
9.1....23:.M.0.19.:. ..119.V.!.."ROW #
0 .....";R.B."..R.0.31.R.#..R.B.R.0.
33...$.."DATA 0 .........";D...
%...(D).32767.36...&.E%(M,R).D:.120:.33.
..'..15,EN,EM$,ET$,ES$:.EN.0.....(..".DS
K ERR";:.EM$,EN,ET$,ES$:.91:.13...)..15,
8,15:.42:..'.*..V.43,39.P.+.SX.ST:.ST..0
.ST..64..".TP ERR":.91:..V.,....-..46:.
41:.1,8,2,G$.",S,W":.39:V.2:.49......"..
FILE NAME";G$:..../.V.1:.46...0..1,1,1,G
$.G.1..1,C;S$;B;S$;:.42.Y.2..M.1.C:.K.1.
B...3..1,E%(M,K);S$;:.42...4..K,M...5..I
.0.C:.1,Q$;M$(I);Q$;S$;:.:.42.A.6..I.1.B
:.1,Q$;R$(I);Q$;S$;:.:.42.F.7..I.1.9:.1,
Q(I);S$;R(I);S$;:.:.42.S.8..V.2. 15...9.
1:.".":.19...:.V.2:.46:.1,8,2,G$.",S,R"
:.41:.61...;.V.1:.46.K.<..1,1,0,G$:."FOU
ND"...=..1,C,B:.42:.151...>..M.1.C:.K.1.
B...?..1,E%(M,K):.42.#.@..ST..0.ST..64..
"TP ERR";ST.,.A..K,M.F.B..I.0.C:.1,M$(I)
:.42:..`.C..I.1.B:.1,R$(I):.42:..~.D..I.
1.9:.1,Q(I),R(I):.42:....E..V.2. 15...F.
1:.".":.19.C.G.."..":.10:."..":.12:."..
".15)"TOTAL.Q.H..R.S.S.19...I.U.F(H(R$(R
),1))...J..U.89.E.E%(1,R):.77.(.K..(U.48
.U.58).(U.88.U.91).E.E%(C,R):.77.F.L.E.0
:.M.1.C:E.E.E%(M,R):.M.S.M.WS$.D(E).M.N.
..20.C(WS$));E:.R:.19...O..".CALCS":.I.0
.4:P(I).0:.:.I.1.B:Y.F(H(R$(I),1))...P..
Y.85.Y.91.Y.Y.86:P(Y).I.E.Q.....R.Y.0:.I
.0.4:.P(I).0..".NO TOT ROW.."G(I.86):Y.1
...S..:.Y..91:.13.$.T..M.1.C:G.0:IT.0:.I
.1.B.D.U..H(R$(I),1)."@".G.G.E%(M,I).F.V
..H(R$(I),1)."$".IT.IT.E%(M,I)...W..I:E%
(M,P(0)).IT:E%(M,P(1)).G...X.E%(M,P(2)).
IT.G:NB.E%(M,P(3)).G.IT:E%(M,P(4)).NB.W.
Y..M..C.E%(M.1,P(3)).NB...Z..M:.13...[..
"X...\..Z$:.Z$.."X".92...].....^..".":.1
0:.S.0.S.1:.19.&._..12.J.`.."ROW # 0
.....";W:.W.0.94.V.A..W.0.13.B.B..W.B.
96.O.C..".":E.0.V.D..9...E.NM%.0:NX%.10.
..F..M.1.C:U.E%(M,W)...G..U.NX%.NX%.U...
H..U.NM%.NM%.U.J.I.E.E.U:..Y.J.R%.NX%.NM
%...K.D$.D(NM%):E$.D(NM%.R%.2):F$.D(NX%)
...L..".";.15.C(E$));E$.7.M...9.C(D$));D
$;.21.C(F$));F$.V.N...7);".";.14);"B";.2
1);".".R.O..M.1.C:U.E%(M,W):.114:....P.M
.0:U..(E.C):.:.114...Q..96...R.X.(U.NM%)
.13.R%...S.Y..(X).X.T.D$.D(U):.H(M$(M),1
);.7.C(D$));D$;;...U...8);".";H(W$,Y);A$
(8.(X.Y)):....V..119:.19...W..10...X..".
.":.12:."..":.K.S.S.19.O.Y.WS$.D(E%(M,K)
):..15);" .".I.Z...21.C(WS$));WS$:.K:
....{..".C#(1-9 0=STOP)";P:.P.0.13...|.P
(0).0:P(1).0:.I.1.B:U.F(H(R$(I),1)).F.}.
.U.P.48.P(0).I.Y.~..U.P.64.P(1).I......
.....P(0).0.."NO BAL......P(1).0.."NO EX
P.$....P(0).0.P(1).0..91:.13.=...."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
.135.....E%(I.1,P(0))..(E%(I,P(0)).U.E%(
I,P(1)))......:.123.C...."..X...."S,C,R,
Q 0=STOP......Z$:.Z$."".138......Z$."0".
19......Z$."S".147......Z$."R".145.*....
Z$."C".146.:....Z$."Q".149.C....138.J...
."ROW";R:.R$(R):."NAME";R$(R):.137......
"COL";M:.M$(M):."NAME";M$(M):.137......"
COLS,ROWS";C,B:.B.20.B.20......151:.137.
....A.0:."CARD#";A:.Q(A),R(A)......"INT,
REPAY";Q(A),R(A):.137.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.
.:.158......T.C.1.Q.Q.1:T.Q.5.....L.Q:T.
Q.6:.T.C.1.T.C.1.Q....159:.4:.4:.......4
: 4:.13......4,I(W$,18);:.I.L.T... ..I..
C..4,I(W$.M$(I),8);:.162.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.
.....I..C..4,I(W$.D(E%(I,J)),8);:.167...
..H.0:.Z.1.C:H.H.E%(Z,J):.......4,I(W$.D
(H),8);I(W$.D(.(H.C)),8);......:.4:.:...
.03.
> CLICK IMAGE PREVIEW FOR FULL MODAL