BUDGET 110487
FILE INFORMATION
FILENAME(S): BUDGET 110487
FILE TYPE(S): PRG
FILE SIZE: 5.7K
FIRST SEEN: 2025-11-30 19:36:58
APPEARS ON: 1 disk(s)
FILE HASH
d4561da23f89057bd5a8921875bd50f7306feeac88bf6dff4d818b3770bf587c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| S0REN WORK DISK | BUDGET 110487 | PRG | Curtcool, Bo | 19 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1B 08 01 00 8F 20 53 41 56 45 22 42 55 44 |....... SAVE"BUD| 00000010: 47 45 54 20 31 33 30 33 38 36 22 00 37 08 05 00 |GET 130386".7...| 00000020: 97 35 33 32 38 30 2C 30 3A 97 35 33 32 38 31 2C |.53280,0:.53281,| 00000030: 30 3A 99 22 05 93 22 00 47 08 0A 00 86 20 43 24 |0:."..".G.... C$| 00000040: 28 32 32 2C 31 35 29 00 90 08 3C 00 86 41 24 28 |(22,15)...<..A$(| 00000050: 32 32 29 3A 86 42 24 28 31 36 29 3A 4C 49 4E B2 |22):.B$(16):LIN.| 00000060: 31 3A 43 4F 4C B2 30 3A 47 4C 49 4E B2 31 3A 47 |1:COL.0:GLIN.1:G| 00000070: 43 4F 4C B2 30 3A 54 4C 49 4E B2 31 3A 47 54 4C |COL.0:TLIN.1:GTL| 00000080: 49 4E B2 32 3A 54 24 B2 22 22 3A 51 24 B2 22 22 |IN.2:T$."":Q$.""| 00000090: 00 AD 08 46 00 53 55 4D B2 30 3A 50 4C 41 B2 31 |...F.SUM.0:PLA.1| 000000A0: 3A 4E 41 24 B2 22 42 55 44 47 45 54 22 00 F5 08 |:NA$."BUDGET"...| 000000B0: 50 00 83 22 54 45 4B 53 54 20 20 20 20 20 22 2C |P.."TEKST ",| 000000C0: 22 20 4A 41 4E 20 20 22 2C 22 20 46 45 42 20 20 |" JAN "," FEB | 000000D0: 22 2C 22 20 4D 41 52 20 20 22 2C 22 20 41 50 52 |"," MAR "," APR| 000000E0: 20 20 22 2C 22 20 4D 41 4A 20 20 22 2C 22 20 4A | "," MAJ "," J| 000000F0: 55 4E 49 20 22 00 39 09 55 00 83 22 20 4A 55 4C |UNI ".9.U.." JUL| 00000100: 49 20 22 2C 22 20 41 55 47 20 20 22 2C 22 20 53 |I "," AUG "," S| 00000110: 45 50 54 20 22 2C 22 20 4F 4B 54 20 20 22 2C 22 |EPT "," OKT ","| 00000120: 20 4E 4F 56 20 20 22 2C 22 20 44 45 43 20 20 22 | NOV "," DEC "| 00000130: 2C 22 20 53 55 4D 20 20 22 00 50 09 57 00 83 22 |," SUM ".P.W.."| 00000140: 31 2E 48 41 4C 56 22 2C 22 32 2E 48 41 4C 56 22 |1.HALV","2.HALV"| 00000150: 00 66 09 64 00 81 58 B2 31 A4 31 36 3A 87 42 24 |.f.d..X.1.16:.B$| 00000160: 28 58 29 3A 82 58 00 7E 09 6E 00 41 24 28 32 30 |(X):.X.~.n.A$(20| 00000170: 29 B2 22 55 44 47 49 46 54 20 20 20 20 22 00 96 |)."UDGIFT "..| 00000180: 09 78 00 41 24 28 32 31 29 B2 22 49 4E 44 54 5C |.x.A$(21)."INDT\| 00000190: 47 54 20 20 20 22 00 AE 09 82 00 41 24 28 32 32 |GT ".....A$(22| 000001A0: 29 B2 22 42 41 4C 41 4E 43 45 20 20 20 22 00 CC |)."BALANCE "..| 000001B0: 09 E8 03 8F 2A 2A 2A 2A 2A 2A 2A 20 4F 50 53 54 |....******* OPST| 000001C0: 41 52 54 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 D5 09 F2 |ART*********....| 000001D0: 03 99 22 93 22 00 E9 09 FC 03 59 43 B2 36 3A 58 |..".".....YC.6:X| 000001E0: 43 B2 36 3A 8D 36 30 30 30 00 0D 0A 06 04 99 22 |C.6:.6000......"| 000001F0: 56 45 4C 4B 4F 4D 4D 45 4E 20 54 49 4C 20 42 55 |VELKOMMEN TIL BU| 00000200: 44 47 45 54 20 56 45 52 2E 32 2C 30 22 00 21 0A |DGET VER.2,0".!.| 00000210: 10 04 59 43 B2 38 3A 58 43 B2 39 3A 8D 36 30 30 |..YC.8:XC.9:.600| 00000220: 30 00 3E 0A 1A 04 99 22 56 49 4C 20 44 55 20 48 |0.>...."VIL DU H| 00000230: 45 4E 54 45 20 45 54 20 53 41 56 45 54 22 00 54 |ENTE ET SAVET".T| 00000240: 0A 24 04 59 43 B2 31 30 3A 58 43 B2 31 36 3A 8D |.$.YC.10:XC.16:.| 00000250: 36 30 30 30 00 62 0A 2E 04 99 22 42 55 44 47 45 |6000.b...."BUDGE| 00000260: 54 22 00 78 0A 38 04 59 43 B2 31 32 3A 58 43 B2 |T".x.8.YC.12:XC.| 00000270: 31 31 3A 8D 36 30 30 30 00 91 0A 42 04 99 22 54 |11:.6000...B.."T| 00000280: 41 53 54 20 4A 41 20 45 4C 4C 45 52 20 4E 45 4A |AST JA ELLER NEJ| 00000290: 22 00 A3 0A 4C 04 8D 31 38 30 30 3A 8F 20 49 4E |"...L..1800:. IN| 000002A0: 4B 45 59 00 C4 0A 56 04 8B 20 54 24 B3 B1 22 4A |KEY...V.. T$.."J| 000002B0: 22 20 AF 20 54 24 B3 B1 22 4E 22 20 A7 20 89 20 |" . T$.."N" . . | 000002C0: 31 31 30 30 00 ED 0A 60 04 8B 20 54 24 B2 22 4E |1100...`.. T$."N| 000002D0: 22 20 A7 20 8D 32 37 30 30 3A 8F 20 4F 50 52 45 |" . .2700:. OPRE| 000002E0: 54 20 54 4F 4D 54 20 54 41 4C 41 52 4B 00 0E 0B |T TOMT TALARK...| 000002F0: 6A 04 8B 20 54 24 B2 22 4A 22 20 A7 20 8D 33 37 |j.. T$."J" . .37| 00000300: 30 30 3A 8F 20 48 45 4E 54 20 44 41 54 41 00 2A |00:. HENT DATA.*| 00000310: 0B 74 04 99 22 93 22 3A 8D 20 32 30 30 30 3A 8F |.t..".":. 2000:.| 00000320: 20 42 49 4C 4C 45 44 45 20 31 00 40 0B 7E 04 8D | BILLEDE 1.@.~..| 00000330: 32 38 30 30 3A 8D 34 30 30 30 3A 89 33 32 30 30 |2800:.4000:.3200| 00000340: 00 55 0B 08 07 8F 2A 2A 2A 20 49 4E 4B 45 59 20 |.U....*** INKEY | 00000350: 2A 2A 2A 2A 2A 00 6E 0B 12 07 A1 20 54 24 3A 8B |*****.n.... T$:.| 00000360: 20 54 24 B3 B1 22 22 20 A7 20 31 38 31 30 00 86 | T$.."" . 1810..| 00000370: 0B 1C 07 A1 20 54 24 3A 8B 20 54 24 B2 22 22 20 |.... T$:. T$."" | 00000380: A7 20 31 38 32 30 00 8C 0B 26 07 8E 00 A2 0B D0 |. 1820...&......| 00000390: 07 8F 20 2A 2A 2A 42 49 4C 4C 45 44 45 20 31 2A |.. ***BILLEDE 1*| 000003A0: 2A 2A 00 D8 0B DA 07 99 22 13 22 3B 42 24 28 31 |**......".";B$(1| 000003B0: 29 3B A3 31 31 29 3B 22 C2 22 3B 42 24 28 50 4C |);.11);".";B$(PL| 000003C0: 41 AA 31 29 3B A3 31 38 29 3B 22 C2 22 3B 42 24 |A.1);.18);".";B$| 000003D0: 28 50 4C 41 AA 32 29 3B 00 00 0C E4 07 99 A3 32 |(PLA.2);.......2| 000003E0: 35 29 3B 22 C2 22 3B 42 24 28 50 4C 41 AA 33 29 |5);".";B$(PLA.3)| 000003F0: 3B A3 33 32 29 3B 22 C2 22 3B 42 24 28 31 34 29 |;.32);".";B$(14)| 00000400: 00 0F 0C EE 07 81 20 58 B2 31 20 A4 20 32 32 00 |...... X.1 . 22.| 00000410: 31 0C F8 07 54 45 B2 AB 31 AC 28 34 33 AC 28 58 |1...TE..1.(43.(X| 00000420: B3 36 29 AA 28 58 AA 35 39 29 AC 28 58 B1 35 29 |.6).(X.59).(X.5)| 00000430: 29 00 46 0C FD 07 99 A3 31 29 3B 41 24 28 58 29 |).F.....1);A$(X)| 00000440: 3B A3 31 31 29 3B 00 6E 0C 02 08 99 C7 28 31 38 |;.11);.n.....(18| 00000450: 29 3B C7 28 54 45 29 3B C7 28 31 34 36 29 3B 43 |);.(TE);.(146);C| 00000460: 24 28 58 2C 50 4C 41 29 3B A3 31 38 29 3B 00 98 |$(X,PLA);.18);..| 00000470: 0C 0C 08 99 C7 28 31 38 29 3B C7 28 54 45 29 3B |.....(18);.(TE);| 00000480: C7 28 31 34 36 29 3B 43 24 28 58 2C 50 4C 41 AA |.(146);C$(X,PLA.| 00000490: 31 29 3B A3 32 35 29 3B 00 C2 0C 16 08 99 C7 28 |1);.25);.......(| 000004A0: 31 38 29 3B C7 28 54 45 29 3B C7 28 31 34 36 29 |18);.(TE);.(146)| 000004B0: 3B 43 24 28 58 2C 50 4C 41 AA 32 29 3B A3 33 32 |;C$(X,PLA.2);.32| 000004C0: 29 3B 00 E3 0C 20 08 99 C7 28 31 38 29 3B C7 28 |);... ...(18);.(| 000004D0: 54 45 29 3B C7 28 31 34 36 29 3B 43 24 28 58 2C |TE);.(146);C$(X,| 000004E0: 31 33 29 00 F6 0C 2A 08 82 58 3A 8D 34 30 30 30 |13)...*..X:.4000| 000004F0: 3A 8D 32 38 30 30 00 FC 0C 34 08 8E 00 14 0D 60 |:.2800...4.....`| 00000500: 09 8F 2A 2A 2A 42 49 4C 4C 45 44 45 20 32 2A 2A |..***BILLEDE 2**| 00000510: 2A 2A 2A 2A 00 2A 0D 6A 09 8D 20 32 39 30 30 3A |****.*.j.. 2900:| 00000520: 8F 20 43 4C 52 20 4D 45 4E 55 00 50 0D 74 09 59 |. CLR MENU.P.t.Y| 00000530: 43 B2 30 3A 58 43 B2 31 32 AA 37 AC 43 4F 4C 3A |C.0:XC.12.7.COL:| 00000540: 8D 36 30 30 30 3A 8F 20 50 52 49 4E 54 20 41 54 |.6000:. PRINT AT| 00000550: 00 64 0D 7E 09 99 42 24 28 50 4C 41 AA 31 AA 43 |.d.~..B$(PLA.1.C| 00000560: 4F 4C 29 3B 00 70 0D 88 09 81 58 B2 31 A4 32 32 |OL);.p....X.1.22| 00000570: 00 90 0D 92 09 59 43 B2 58 3A 8D 36 30 30 30 3A |.....YC.X:.6000:| 00000580: 8F 20 20 20 20 20 20 20 50 52 49 4E 54 20 41 54 |. PRINT AT| 00000590: 00 A3 0D 9C 09 99 43 24 28 58 2C 50 4C 41 AA 43 |......C$(X,PLA.C| 000005A0: 4F 4C 29 00 AA 0D A6 09 82 58 00 BB 0D B0 09 8D |OL)......X......| 000005B0: 32 38 30 30 3A 8F 20 4D 45 4E 55 00 D5 0D BA 09 |2800:. MENU.....| 000005C0: 8D 34 30 30 30 3A 8F 20 43 55 52 53 4F 52 53 5C |.4000:. CURSORS\| 000005D0: 54 4E 49 4E 47 00 DB 0D C4 09 8E 00 FA 0D 28 0A |TNING.........(.| 000005E0: 8F 2A 2A 2A 2A 2A 2A 53 55 4D 20 42 49 4C 4C 45 |.******SUM BILLE| 000005F0: 44 45 20 33 2A 2A 2A 2A 2A 2A 00 1A 0E 32 0A 59 |DE 3******...2.Y| 00000600: 43 B2 30 3A 58 43 B2 33 33 3A 8D 36 30 30 30 3A |C.0:XC.33:.6000:| 00000610: 8F 20 50 52 49 4E 54 20 41 54 00 27 0E 3C 0A 99 |. PRINT AT.'.<..| 00000620: 42 24 28 31 34 29 3B 00 33 0E 46 0A 81 58 B2 31 |B$(14);.3.F..X.1| 00000630: A4 32 32 00 42 0E 50 0A 59 43 B2 58 3A 8D 36 30 |.22.B.P.YC.X:.60| 00000640: 30 30 00 51 0E 5A 0A 99 43 24 28 58 2C 31 33 29 |00.Q.Z..C$(X,13)| 00000650: 3B 00 58 0E 64 0A 82 58 00 5E 0E 6E 0A 8E 00 7F |;.X.d..X.^.n....| 00000660: 0E 8C 0A 8F 2A 2A 2A 2A 2A 4F 50 52 45 54 20 54 |....*****OPRET T| 00000670: 4F 4D 54 20 54 41 4C 41 52 4B 2A 2A 2A 2A 2A 00 |OMT TALARK*****.| 00000680: 95 0E 96 0A 59 43 B2 31 30 3A 58 43 B2 31 33 3A |....YC.10:XC.13:| 00000690: 8D 36 30 30 30 00 B5 0E A0 0A 99 C7 28 31 38 29 |.6000.......(18)| 000006A0: 3B 22 20 4F 50 52 45 54 54 45 52 20 22 3B C7 28 |;" OPRETTER ";.(| 000006B0: 31 34 36 29 3B 00 C1 0E AA 0A 81 58 B2 31 A4 32 |146);......X.1.2| 000006C0: 32 00 DE 0E B4 0A 8B 58 B3 32 30 A7 41 24 28 58 |2......X.20.A$(X| 000006D0: 29 B2 22 20 20 20 20 20 20 20 20 20 20 22 00 EA |)." "..| 000006E0: 0E BE 0A 81 59 B2 31 A4 31 33 00 FF 0E C8 0A 43 |....Y.1.13.....C| 000006F0: 24 28 58 2C 59 29 B2 22 20 20 20 20 20 20 22 00 |$(X,Y)." ".| 00000700: 09 0F D2 0A 82 59 3A 82 58 00 0F 0F DC 0A 8E 00 |.....Y:.X.......| 00000710: 25 0F F0 0A 8F 2A 2A 2A 2A 2A 2A 2A 4D 45 4E 55 |%....*******MENU| 00000720: 2A 2A 2A 2A 2A 00 3A 0F FA 0A 59 43 B2 32 33 3A |*****.:...YC.23:| 00000730: 58 43 B2 31 3A 8D 36 30 30 30 00 68 0F 04 0B 99 |XC.1:.6000.h....| 00000740: 22 1C 4D 45 4E 55 3A 20 46 31 2D 54 45 4B 53 54 |".MENU: F1-TEKST| 00000750: 20 20 46 33 2D 53 41 56 45 20 20 46 35 2D 50 52 | F3-SAVE F5-PR| 00000760: 49 4E 54 45 52 05 22 3B 00 6E 0F 0E 0B 8E 00 89 |INTER.";.n......| 00000770: 0F 54 0B 8F 2A 2A 2A 2A 2A 2A 2A 43 4C 45 41 52 |.T..*******CLEAR| 00000780: 20 4D 45 4E 55 2A 2A 2A 2A 00 9E 0F 5E 0B 59 43 | MENU****...^.YC| 00000790: B2 32 33 3A 58 43 B2 31 3A 8D 36 30 30 30 00 CE |.23:XC.1:.6000..| 000007A0: 0F 68 0B 99 22 20 20 20 20 20 20 20 20 20 20 20 |.h.." | 000007B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000007C0: 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 00 E3 | ";..| 000007D0: 0F 72 0B 59 43 B2 32 34 3A 58 43 B2 31 3A 8D 36 |.r.YC.24:XC.1:.6| 000007E0: 30 30 30 00 12 10 7C 0B 99 22 20 20 20 20 20 20 |000...|.." | 000007F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000810: 22 3B 00 18 10 86 0B 8E 00 2F 10 B8 0B 8F 2A 2A |";......./....**| 00000820: 2A 2A 20 53 54 59 52 45 20 2A 2A 2A 2A 2A 2A 00 |** STYRE ******.| 00000830: 39 10 C2 0B 8D 31 38 30 30 00 79 10 C7 0B 8B 20 |9....1800.y.... | 00000840: C3 28 51 24 29 B3 36 20 AF 28 54 24 B2 22 20 22 |.(Q$).6 .(T$." "| 00000850: 20 AF 20 C3 28 51 24 29 B3 31 20 B0 20 54 24 B2 | . .(Q$).1 . T$.| 00000860: B1 22 30 22 20 AF 20 54 24 B3 B2 22 39 22 29 A7 |."0" . T$.."9").| 00000870: 20 51 24 B2 51 24 AA 54 24 00 98 10 CC 0B 8B 20 | Q$.Q$.T$...... | 00000880: 54 24 B2 22 85 22 20 A7 20 8D 35 30 30 30 3A 8F |T$."." . .5000:.| 00000890: 20 2A 2A 54 45 4B 53 54 00 B5 10 D6 0B 8B 20 54 | **TEKST...... T| 000008A0: 24 B2 22 86 22 20 A7 20 8D 33 34 30 30 3A 8F 20 |$."." . .3400:. | 000008B0: 2A 2A 47 45 4D 00 D4 10 E0 0B 8B 20 54 24 B2 22 |**GEM...... T$."| 000008C0: 87 22 20 A7 20 8D 37 30 30 30 3A 8F 20 2A 2A 50 |." . .7000:. **P| 000008D0: 52 49 4E 54 00 1A 11 EA 0B 91 AB 28 54 24 B2 22 |RINT.......(T$."| 000008E0: 9D 22 29 AB 32 AC 28 54 24 B2 22 1D 22 29 AB 33 |.").2.(T$.".").3| 000008F0: AC 28 54 24 B2 22 11 22 29 AB 34 AC 28 54 24 B2 |.(T$.".").4.(T$.| 00000900: 22 91 22 29 20 89 20 33 33 31 30 2C 33 33 33 30 |".") . 3310,3330| 00000910: 2C 33 33 35 30 2C 33 33 37 30 00 48 11 F4 0B 8B |,3350,3370.H....| 00000920: 20 C6 28 54 24 29 B2 31 33 AF 20 C3 28 51 24 29 | .(T$).13. .(Q$)| 00000930: 20 B1 30 20 A7 20 8D 34 31 30 30 3A 8D 32 34 30 | .0 . .4100:.240| 00000940: 30 3A 89 20 33 30 30 30 00 74 11 FE 0B 8B 20 C6 |0:. 3000.t.... .| 00000950: 28 54 24 29 B2 32 30 20 AF 20 C3 28 51 24 29 B1 |(T$).20 . .(Q$).| 00000960: 30 20 A7 20 51 24 B2 C8 28 51 24 2C C3 28 51 24 |0 . Q$..(Q$,.(Q$| 00000970: 29 AB 31 29 00 91 11 80 0C 8F 2A 2A 2A 2A 2A 20 |).1)......***** | 00000980: 54 45 4B 53 54 4C 49 4E 49 45 2A 2A 2A 2A 2A 2A |TEKSTLINIE******| 00000990: 2A 00 A6 11 8A 0C 59 43 B2 32 34 3A 58 43 B2 31 |*.....YC.24:XC.1| 000009A0: 3A 8D 36 30 30 30 00 BC 11 94 0C 99 22 3E 22 3B |:.6000......">";| 000009B0: 51 24 3B 22 20 20 20 20 20 20 22 3B 00 CB 11 9E |Q$;" ";....| 000009C0: 0C 58 43 B2 38 3A 8D 36 30 30 30 00 D5 11 A8 0C |.XC.8:.6000.....| 000009D0: 99 22 3C 22 3B 00 DF 11 B2 0C 89 33 30 30 30 00 |."<";......3000.| 000009E0: FD 11 E4 0C 8F 2A 2A 2A 2A 2A 2A 43 55 52 53 4F |.....******CURSO| 000009F0: 52 4B 4F 4E 54 52 4F 4C 2A 2A 2A 2A 2A 00 35 12 |RKONTROL*****.5.| 00000A00: EE 0C 43 4F 4C B2 43 4F 4C AB 31 3A 8B 43 4F 4C |..COL.COL.1:.COL| 00000A10: B3 30 A7 43 4F 4C B2 30 3A 8B 50 4C 41 B1 33 A7 |.0.COL.0:.PLA.3.| 00000A20: 50 4C 41 B2 50 4C 41 AB 33 3A 43 4F 4C B2 32 3A |PLA.PLA.3:COL.2:| 00000A30: 8D 32 30 30 30 00 45 12 F8 0C 8D 34 30 30 30 3A |.2000.E....4000:| 00000A40: 89 33 30 30 30 00 7E 12 02 0D 43 4F 4C B2 43 4F |.3000.~...COL.CO| 00000A50: 4C AA 31 3A 8B 43 4F 4C B1 32 A7 43 4F 4C B2 32 |L.1:.COL.2.COL.2| 00000A60: 3A 8B 50 4C 41 B3 38 20 A7 50 4C 41 B2 50 4C 41 |:.PLA.8 .PLA.PLA| 00000A70: AA 33 3A 43 4F 4C B2 30 3A 8D 32 30 30 30 00 8E |.3:COL.0:.2000..| 00000A80: 12 0C 0D 8D 34 30 30 30 3A 89 33 30 30 30 00 AB |....4000:.3000..| 00000A90: 12 16 0D 4C 49 4E B2 4C 49 4E AA 31 3A 8B 4C 49 |...LIN.LIN.1:.LI| 00000AA0: 4E B1 31 39 A7 4C 49 4E B2 31 39 00 BB 12 20 0D |N.19.LIN.19... .| 00000AB0: 8D 34 30 30 30 3A 89 33 30 30 30 00 D6 12 2A 0D |.4000:.3000...*.| 00000AC0: 4C 49 4E B2 4C 49 4E AB 31 3A 8B 4C 49 4E B3 31 |LIN.LIN.1:.LIN.1| 00000AD0: A7 4C 49 4E B2 31 00 E6 12 34 0D 8D 34 30 30 30 |.LIN.1...4..4000| 00000AE0: 3A 89 33 30 30 30 00 02 13 48 0D 8F 2A 2A 2A 2A |:.3000...H..****| 00000AF0: 2A 53 41 56 45 20 44 41 54 41 2A 2A 2A 2A 2A 2A |*SAVE DATA******| 00000B00: 2A 2A 00 17 13 52 0D 8D 32 39 30 30 3A 8F 20 43 |**...R..2900:. C| 00000B10: 4C 52 20 4D 45 4E 55 00 35 13 5C 0D 9F 32 2C 38 |LR MENU.5.\..2,8| 00000B20: 2C 32 2C 22 42 55 44 2E 4D 49 44 4C 45 52 54 2E |,2,"BUD.MIDLERT.| 00000B30: 2C 53 2C 57 22 00 41 13 66 0D 81 58 B2 31 A4 32 |,S,W".A.f..X.1.2| 00000B40: 32 00 59 13 70 0D 98 32 2C 22 2A 22 AA 41 24 28 |2.Y.p..2,"*".A$(| 00000B50: 58 29 3B C7 28 31 33 29 3B 00 65 13 7A 0D 81 59 |X);.(13);.e.z..Y| 00000B60: B2 31 A4 31 33 00 7F 13 84 0D 98 32 2C 22 2A 22 |.1.13......2,"*"| 00000B70: AA 43 24 28 58 2C 59 29 3B C7 28 31 33 29 3B 00 |.C$(X,Y);.(13);.| 00000B80: 89 13 8E 0D 82 59 3A 82 58 00 90 13 98 0D A0 32 |.....Y:.X......2| 00000B90: 00 AA 13 A2 0D 8D 33 38 30 30 3A 8F 20 54 45 53 |......3800:. TES| 00000BA0: 54 20 53 45 51 20 46 49 4C 45 00 CB 13 AC 0D 8F |T SEQ FILE......| 00000BB0: 2A 2A 2A 2A 53 4C 45 54 20 47 41 4D 4D 45 4C 20 |****SLET GAMMEL | 00000BC0: 46 49 4C 45 2A 2A 2A 2A 2A 2A 2A 00 D7 13 B6 0D |FILE*******.....| 00000BD0: 9F 34 2C 38 2C 31 35 00 EE 13 C0 0D 98 34 2C 22 |.4,8,15......4,"| 00000BE0: 53 3A 42 55 44 47 45 54 20 46 49 4C 45 22 00 12 |S:BUDGET FILE"..| 00000BF0: 14 CA 0D 98 34 2C 22 52 3A 42 55 44 47 45 54 20 |....4,"R:BUDGET | 00000C00: 46 49 4C 45 3D 42 55 44 2E 4D 49 44 4C 45 52 54 |FILE=BUD.MIDLERT| 00000C10: 2E 22 00 19 14 D4 0D A0 34 00 33 14 DE 0D 8D 33 |."......4.3....3| 00000C20: 38 30 30 3A 8F 20 54 45 53 54 20 53 45 51 20 46 |800:. TEST SEQ F| 00000C30: 49 4C 45 00 44 14 E8 0D 8D 32 38 30 30 3A 8F 20 |ILE.D....2800:. | 00000C40: 4D 45 4E 55 00 4A 14 F2 0D 8E 00 68 14 74 0E 8F |MENU.J.....h.t..| 00000C50: 2A 2A 2A 2A 2A 2A 48 45 4E 54 20 44 41 54 41 2A |******HENT DATA*| 00000C60: 2A 2A 2A 2A 2A 2A 2A 2A 00 85 14 7E 0E 9F 32 2C |********...~..2,| 00000C70: 38 2C 32 2C 22 42 55 44 47 45 54 20 46 49 4C 45 |8,2,"BUDGET FILE| 00000C80: 2C 53 2C 52 22 00 91 14 88 0E 81 58 B2 31 A4 32 |,S,R"......X.1.2| 00000C90: 32 00 B0 14 92 0E 84 32 2C 41 24 28 58 29 3A 41 |2......2,A$(X):A| 00000CA0: 24 28 58 29 B2 C9 28 41 24 28 58 29 2C 31 30 29 |$(X)..(A$(X),10)| 00000CB0: 00 BC 14 9C 0E 81 59 B2 31 A4 31 33 00 E0 14 A6 |......Y.1.13....| 00000CC0: 0E 84 32 2C 43 24 28 58 2C 59 29 3A 43 24 28 58 |..2,C$(X,Y):C$(X| 00000CD0: 2C 59 29 B2 C9 28 43 24 28 58 2C 59 29 2C 36 29 |,Y)..(C$(X,Y),6)| 00000CE0: 00 EC 14 B0 0E 82 59 2C 58 3A A0 32 00 02 15 BA |......Y,X:.2....| 00000CF0: 0E 8D 33 38 30 30 3A 8F 20 54 45 53 54 20 46 49 |..3800:. TEST FI| 00000D00: 4C 45 00 08 15 C4 0E 8E 00 26 15 D8 0E 8F 2A 2A |LE.......&....**| 00000D10: 2A 2A 2A 54 45 53 54 20 53 45 51 20 46 49 4C 45 |***TEST SEQ FILE| 00000D20: 2A 2A 2A 2A 2A 2A 00 33 15 E2 0E 9F 31 35 2C 38 |******.3....15,8| 00000D30: 2C 31 35 00 48 15 EC 0E 84 31 35 2C 45 4E 2C 45 |,15.H....15,EN,E| 00000D40: 4D 24 2C 45 54 2C 45 53 00 50 15 F6 0E A0 31 35 |M$,ET,ES.P....15| 00000D50: 00 5E 15 00 0F 8B 20 45 4E B2 30 A7 20 8E 00 71 |.^.... EN.0. ..q| 00000D60: 15 0A 0F 99 20 45 4E 2C 45 4D 24 2C 45 54 2C 45 |.... EN,EM$,ET,E| 00000D70: 53 00 77 15 14 0F 90 00 96 15 A0 0F 8F 2A 2A 2A |S.w..........***| 00000D80: 2A 2A 43 55 52 53 4F 52 53 5C 54 4E 49 4E 47 2A |**CURSORS\TNING*| 00000D90: 2A 2A 2A 2A 2A 2A 00 B5 15 AA 0F 59 43 B2 47 4C |******.....YC.GL| 00000DA0: 49 4E 3A 58 43 B2 47 43 4F 4C AC 37 AA 31 32 3A |IN:XC.GCOL.7.12:| 00000DB0: 8D 36 30 30 30 00 D4 15 B4 0F 99 C7 28 31 34 36 |.6000.......(146| 00000DC0: 29 3B 43 24 28 47 4C 49 4E 2C 47 43 4F 4C AA 50 |);C$(GLIN,GCOL.P| 00000DD0: 4C 41 29 3B 00 EA 15 BE 0F 47 4C 49 4E B2 4C 49 |LA);.....GLIN.LI| 00000DE0: 4E 3A 47 43 4F 4C B2 43 4F 4C 00 07 16 C8 0F 59 |N:GCOL.COL.....Y| 00000DF0: 43 B2 4C 49 4E 3A 58 43 B2 43 4F 4C AC 37 AA 31 |C.LIN:XC.COL.7.1| 00000E00: 32 3A 8D 36 30 30 30 00 2A 16 D2 0F 99 C7 28 31 |2:.6000.*.....(1| 00000E10: 38 29 3B 43 24 28 4C 49 4E 2C 43 4F 4C AA 50 4C |8);C$(LIN,COL.PL| 00000E20: 41 29 3B C7 28 31 34 36 29 3B 00 30 16 DC 0F 8E |A);.(146);.0....| 00000E30: 00 53 16 04 10 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 4F |.S....*********O| 00000E40: 50 53 55 4D 45 52 49 4E 47 2A 2A 2A 2A 2A 2A 2A |PSUMERING*******| 00000E50: 2A 2A 2A 00 5E 16 0E 10 8D 20 32 39 30 30 00 73 |***.^.... 2900.s| 00000E60: 16 18 10 59 43 B2 32 34 3A 58 43 B2 31 3A 8D 36 |...YC.24:XC.1:.6| 00000E70: 30 30 30 00 A5 16 22 10 99 C7 28 31 38 29 22 20 |000..."...(18)" | 00000E80: 20 20 20 20 20 20 20 20 20 52 45 47 4E 45 52 20 | REGNER | 00000E90: 20 20 20 20 20 20 20 20 20 20 20 20 22 3B C7 28 | ";.(| 00000EA0: 31 34 36 29 3B 00 C2 16 2C 10 8B C3 28 51 24 29 |146);...,...(Q$)| 00000EB0: B3 36 A7 51 24 B2 22 20 22 AA 51 24 3A 89 34 31 |.6.Q$." ".Q$:.41| 00000EC0: 34 30 00 CD 16 36 10 81 58 B2 31 A4 36 00 E4 16 |40...6..X.1.6...| 00000ED0: 40 10 8B CA 28 51 24 2C 58 2C 31 29 B2 22 20 22 |@...(Q$,X,1)." "| 00000EE0: A7 20 82 58 00 EF 16 4A 10 81 58 B2 58 A4 36 00 |. .X...J..X.X.6.| 00000EF0: 05 17 54 10 8B CA 28 51 24 2C 58 2C 31 29 B2 22 |..T...(Q$,X,1)."| 00000F00: 20 22 A7 20 8E 00 0C 17 5E 10 82 58 00 23 17 68 | ". ....^..X.#.h| 00000F10: 10 43 24 28 4C 49 4E 2C 43 4F 4C AA 50 4C 41 29 |.C$(LIN,COL.PLA)| 00000F20: B2 51 24 00 37 17 72 10 51 24 B2 22 22 3A 53 55 |.Q$.7.r.Q$."":SU| 00000F30: B2 30 3A 53 4D B2 30 00 43 17 7C 10 81 58 B2 31 |.0:SM.0.C.|..X.1| 00000F40: A4 31 32 00 5F 17 86 10 8B 43 24 28 4C 49 4E 2C |.12._....C$(LIN,| 00000F50: 58 29 B2 22 20 20 20 20 20 22 A7 34 32 35 30 00 |X)." ".4250.| 00000F60: 76 17 90 10 53 55 B2 53 55 AA C5 28 43 24 28 4C |v...SU.SU..(C$(L| 00000F70: 49 4E 2C 58 29 29 00 7D 17 9A 10 82 58 00 90 17 |IN,X)).}....X...| 00000F80: A4 10 51 24 B2 C4 28 53 55 29 3A 8D 34 39 39 30 |..Q$..(SU):.4990| 00000F90: 00 A7 17 AE 10 43 24 28 4C 49 4E 2C 31 33 29 B2 |.....C$(LIN,13).| 00000FA0: 51 24 3A 53 55 B2 30 00 B2 17 B8 10 81 58 B2 31 |Q$:SU.0......X.1| 00000FB0: A4 35 00 D3 17 C2 10 8B 43 24 28 58 2C 43 4F 4C |.5......C$(X,COL| 00000FC0: AA 50 4C 41 29 B2 22 20 20 20 20 20 20 22 A7 34 |.PLA)." ".4| 00000FD0: 33 31 30 00 EE 17 CC 10 53 55 B2 53 55 AA C5 28 |310.....SU.SU..(| 00000FE0: 43 24 28 58 2C 43 4F 4C AA 50 4C 41 29 29 00 F5 |C$(X,COL.PLA))..| 00000FF0: 17 D6 10 82 58 00 08 18 E0 10 51 24 B2 C4 28 53 |....X.....Q$..(S| 00001000: 55 29 3A 8D 34 39 39 30 00 24 18 EA 10 43 24 28 |U):.4990.$...C$(| 00001010: 32 31 2C 43 4F 4C AA 50 4C 41 29 B2 51 24 3A 51 |21,COL.PLA).Q$:Q| 00001020: 24 B2 22 22 00 30 18 F4 10 81 58 B2 36 A4 31 39 |$."".0....X.6.19| 00001030: 00 52 18 FE 10 8B 43 24 28 58 2C 43 4F 4C AA 50 |.R....C$(X,COL.P| 00001040: 4C 41 29 B2 22 20 20 20 20 20 20 22 A7 89 34 33 |LA)." "..43| 00001050: 37 30 00 6D 18 08 11 53 4D B2 53 4D AA C5 28 43 |70.m...SM.SM..(C| 00001060: 24 28 58 2C 43 4F 4C AA 50 4C 41 29 29 00 74 18 |$(X,COL.PLA)).t.| 00001070: 12 11 82 58 00 87 18 1C 11 51 24 B2 C4 28 53 4D |...X.....Q$..(SM| 00001080: 29 3A 8D 34 39 39 30 00 A3 18 26 11 43 24 28 32 |):.4990...&.C$(2| 00001090: 30 2C 43 4F 4C AA 50 4C 41 29 B2 51 24 3A 51 24 |0,COL.PLA).Q$:Q$| 000010A0: B2 22 22 00 B9 18 30 11 51 24 B2 C4 28 53 55 AB |.""...0.Q$..(SU.| 000010B0: 53 4D 29 3A 8D 34 39 39 30 00 D9 18 3A 11 43 24 |SM):.4990...:.C$| 000010C0: 28 32 32 2C 43 4F 4C AA 50 4C 41 29 B2 51 24 3A |(22,COL.PLA).Q$:| 000010D0: 53 55 B2 30 3A 53 4D B2 30 00 E5 18 44 11 81 58 |SU.0:SM.0...D..X| 000010E0: B2 31 A4 31 32 00 01 19 4E 11 8B 43 24 28 32 30 |.1.12...N..C$(20| 000010F0: 2C 58 29 B2 22 20 20 20 20 20 20 22 A7 54 31 B2 |,X)." ".T1.| 00001100: 30 00 14 19 58 11 54 31 B2 C5 28 43 24 28 32 30 |0...X.T1..(C$(20| 00001110: 2C 58 29 29 00 21 19 62 11 53 55 B2 53 55 AA 54 |,X)).!.b.SU.SU.T| 00001120: 31 00 3D 19 6C 11 8B 43 24 28 32 31 2C 58 29 B2 |1.=.l..C$(21,X).| 00001130: 22 20 20 20 20 20 20 22 A7 54 32 B2 30 00 50 19 |" ".T2.0.P.| 00001140: 76 11 54 32 B2 C5 28 43 24 28 32 31 2C 58 29 29 |v.T2..(C$(21,X))| 00001150: 00 5D 19 80 11 53 4D B2 53 4D AA 54 32 00 73 19 |.]...SM.SM.T2.s.| 00001160: 8A 11 51 24 B2 C4 28 54 32 AB 54 31 29 3A 8D 34 |..Q$..(T2.T1):.4| 00001170: 39 39 30 00 83 19 94 11 43 24 28 32 32 2C 58 29 |990.....C$(22,X)| 00001180: B2 51 24 00 8A 19 9E 11 82 58 00 9D 19 A8 11 51 |.Q$......X.....Q| 00001190: 24 B2 C4 28 53 55 29 3A 8D 34 39 39 30 00 AE 19 |$..(SU):.4990...| 000011A0: B2 11 43 24 28 32 30 2C 31 33 29 B2 51 24 00 C1 |..C$(20,13).Q$..| 000011B0: 19 BC 11 51 24 B2 C4 28 53 4D 29 3A 8D 34 39 39 |...Q$..(SM):.499| 000011C0: 30 00 D2 19 C6 11 43 24 28 32 31 2C 31 33 29 B2 |0.....C$(21,13).| 000011D0: 51 24 00 E8 19 D0 11 51 24 B2 C4 28 53 4D AB 53 |Q$.....Q$..(SM.S| 000011E0: 55 29 3A 8D 34 39 39 30 00 09 1A DA 11 43 24 28 |U):.4990.....C$(| 000011F0: 32 32 2C 31 33 29 B2 51 24 3A 51 24 B2 22 22 3A |22,13).Q$:Q$."":| 00001200: 53 55 B2 30 3A 53 4D B2 30 00 1F 1A E4 11 8D 32 |SU.0:SM.0......2| 00001210: 36 30 30 3A 8F 20 42 49 4C 4C 45 44 45 20 33 00 |600:. BILLEDE 3.| 00001220: 25 1A EE 11 8E 00 46 1A 7E 13 8F 2A 2A 2A 2A 2A |%.....F.~..*****| 00001230: 2A 2A 48 4F 4A 52 45 53 54 49 4C 4C 49 4E 47 2A |**HOJRESTILLING*| 00001240: 2A 2A 2A 2A 2A 2A 00 68 1A 80 13 8B C8 28 51 24 |******.h.....(Q$| 00001250: 2C 31 29 B2 22 20 22 A7 51 24 B2 C9 28 51 24 2C |,1)." ".Q$..(Q$,| 00001260: C3 28 51 24 29 AB 31 29 00 85 1A 82 13 8B C3 28 |.(Q$).1).......(| 00001270: 51 24 29 B3 36 A7 51 24 B2 22 20 22 AA 51 24 3A |Q$).6.Q$." ".Q$:| 00001280: 89 34 39 39 34 00 9E 1A 84 13 8B C3 28 51 24 29 |.4994.......(Q$)| 00001290: B1 36 A7 51 24 B2 22 2A 2A 2A 2A 2A 2A 22 00 A4 |.6.Q$."******"..| 000012A0: 1A 86 13 8E 00 BF 1A 88 13 8F 2A 2A 2A 2A 54 45 |..........****TE| 000012B0: 4B 53 54 20 45 44 49 54 4F 52 2A 2A 2A 2A 2A 00 |KST EDITOR*****.| 000012C0: C9 1A 92 13 8D 32 39 30 30 00 DE 1A 9C 13 59 43 |.....2900.....YC| 000012D0: B2 32 33 3A 58 43 B2 31 3A 8D 36 30 30 30 00 FD |.23:XC.1:.6000..| 000012E0: 1A A6 13 99 22 4D 45 4E 55 3A 46 31 2D 52 45 54 |...."MENU:F1-RET| 000012F0: 55 52 20 54 49 4C 20 4D 45 4E 55 22 3B 00 1F 1B |UR TIL MENU";...| 00001300: B0 13 8D 20 35 38 30 30 3A 8F 20 2A 2A 2A 2A 2A |... 5800:. *****| 00001310: 54 45 4B 53 54 20 43 55 52 53 4F 52 2A 2A 2A 00 |TEKST CURSOR***.| 00001320: 29 1B BA 13 8D 31 38 30 30 00 41 1B C4 13 8B 20 |)....1800.A.... | 00001330: 54 24 B2 22 85 22 20 A7 20 8D 20 35 39 30 30 3A |T$."." . . 5900:| 00001340: 8E 00 6D 1B CE 13 8B 20 C6 28 54 24 29 B2 32 30 |..m.... .(T$).20| 00001350: 20 AF 20 C3 28 51 24 29 B1 30 20 A7 20 51 24 B2 | . .(Q$).0 . Q$.| 00001360: C8 28 51 24 2C C3 28 51 24 29 AB 31 29 00 94 1B |.(Q$,.(Q$).1)...| 00001370: D8 13 8B 20 C6 28 54 24 29 B2 31 33 20 AF 20 C3 |... .(T$).13 . .| 00001380: 28 51 24 29 B1 30 20 A7 20 8D 35 37 30 30 3A 89 |(Q$).0 . .5700:.| 00001390: 35 30 30 30 00 C4 1B E2 13 8B 20 54 24 B2 22 11 |5000...... T$.".| 000013A0: 22 20 AF 20 54 4C 49 4E B3 31 39 20 B0 20 54 24 |" . TLIN.19 . T$| 000013B0: B2 22 91 22 AF 20 54 4C 49 4E B1 31 20 A7 20 8D |.".". TLIN.1 . .| 000013C0: 35 38 30 30 00 E7 1B EC 13 8B 20 54 24 B2 B1 22 |5800...... T$.."| 000013D0: 20 22 20 AF 20 54 24 B2 B3 22 5A 22 20 A7 20 51 | " . T$.."Z" . Q| 000013E0: 24 B2 51 24 AA 54 24 00 F7 1B F6 13 51 24 B2 C8 |$.Q$.T$.....Q$..| 000013F0: 28 51 24 2C 31 30 29 00 0C 1C 00 14 59 43 B2 32 |(Q$,10).....YC.2| 00001400: 34 3A 58 43 B2 31 3A 8D 36 30 30 30 00 26 1C 0A |4:XC.1:.6000.&..| 00001410: 14 99 22 3E 22 3B 51 24 3B 22 20 20 20 20 20 20 |..">";Q$;" | 00001420: 20 20 20 20 22 3B 00 3C 1C 14 14 59 43 B2 32 34 | ";.<...YC.24| 00001430: 3A 58 43 B2 31 32 3A 8D 36 30 30 30 00 46 1C 1E |:XC.12:.6000.F..| 00001440: 14 99 22 3C 22 3B 00 50 1C 28 14 89 35 30 35 30 |.."<";.P.(..5050| 00001450: 00 62 1C 44 16 8F 20 2A 2A 2A 2A 47 45 4D 2A 2A |.b.D.. ****GEM**| 00001460: 2A 2A 00 83 1C 4E 16 8B 20 C3 28 51 24 29 B3 31 |**...N.. .(Q$).1| 00001470: 30 20 A7 20 51 24 B2 51 24 AA 22 20 22 3A 89 35 |0 . Q$.Q$." ":.5| 00001480: 37 31 30 00 99 1C 58 16 41 24 28 54 4C 49 4E 29 |710...X.A$(TLIN)| 00001490: B2 51 24 3A 51 24 B2 22 22 00 BB 1C 62 16 59 43 |.Q$:Q$.""...b.YC| 000014A0: B2 54 4C 49 4E 3A 58 43 B2 31 3A 8D 36 30 30 30 |.TLIN:XC.1:.6000| 000014B0: 3A 99 41 24 28 54 4C 49 4E 29 3B 00 D3 1C 6C 16 |:.A$(TLIN);...l.| 000014C0: 54 4C 49 4E B2 54 4C 49 4E AB 28 54 4C 49 4E B3 |TLIN.TLIN.(TLIN.| 000014D0: 31 39 29 00 EB 1C 71 16 8B 20 54 4C 49 4E B2 31 |19)...q.. TLIN.1| 000014E0: 39 20 A7 20 47 54 4C 49 4E B2 32 00 F1 1C 76 16 |9 . GTLIN.2...v.| 000014F0: 8E 00 15 1D A8 16 8F 20 2A 2A 2A 2A 2A 2A 20 43 |....... ****** C| 00001500: 55 52 53 4F 52 20 53 5C 54 4E 49 4E 47 20 54 45 |URSOR S\TNING TE| 00001510: 4B 53 54 2A 2A 00 35 1D B2 16 54 4C 49 4E B2 54 |KST**.5...TLIN.T| 00001520: 4C 49 4E AB 28 54 24 B2 22 11 22 29 AA 28 54 24 |LIN.(T$.".").(T$| 00001530: B2 22 91 22 29 00 53 1D BC 16 59 43 B2 54 4C 49 |.".").S...YC.TLI| 00001540: 4E 3A 58 43 B2 31 3A 8D 36 30 30 30 3A 8F 20 3F |N:XC.1:.6000:. ?| 00001550: 20 41 54 00 6F 1D C6 16 99 C7 28 31 38 29 3B 41 | AT.o.....(18);A| 00001560: 24 28 54 4C 49 4E 29 3B C7 28 31 34 36 29 3B 00 |$(TLIN);.(146);.| 00001570: 8E 1D D0 16 59 43 B2 47 54 4C 49 4E 3A 58 43 B2 |....YC.GTLIN:XC.| 00001580: 31 3A 8D 36 30 30 30 3A 8F 20 3F 20 41 54 00 9F |1:.6000:. ? AT..| 00001590: 1D DA 16 99 20 41 24 28 47 54 4C 49 4E 29 3B 00 |.... A$(GTLIN);.| 000015A0: AE 1D E4 16 47 54 4C 49 4E B2 54 4C 49 4E 00 B4 |....GTLIN.TLIN..| 000015B0: 1D EE 16 8E 00 D5 1D 0C 17 8F 2A 2A 2A 2A 20 53 |..........**** S| 000015C0: 4C 45 54 20 54 45 4B 53 54 20 43 55 52 53 4F 52 |LET TEKST CURSOR| 000015D0: 2A 2A 2A 2A 2A 00 EC 1D 16 17 59 43 B2 54 4C 49 |*****.....YC.TLI| 000015E0: 4E 3A 58 43 B2 31 3A 8D 36 30 30 30 00 FB 1D 20 |N:XC.1:.6000... | 000015F0: 17 99 41 24 28 54 4C 49 4E 29 3B 00 05 1E 2A 17 |..A$(TLIN);...*.| 00001600: 8D 32 39 30 30 00 0F 1E 34 17 8D 32 38 30 30 00 |.2900...4..2800.| 00001610: 22 1E 39 17 54 4C 49 4E B2 31 3A 47 54 4C 49 4E |".9.TLIN.1:GTLIN| 00001620: B2 32 00 28 1E 3E 17 8E 00 45 1E 70 17 8F 2A 2A |.2.(.>...E.p..**| 00001630: 2A 2A 2A 2A 50 52 49 4E 54 50 4F 53 49 54 49 4F |****PRINTPOSITIO| 00001640: 4E 2A 2A 2A 2A 00 52 1E 7A 17 97 20 37 38 31 2C |N****.R.z.. 781,| 00001650: 59 43 00 5F 1E 84 17 97 20 37 38 32 2C 58 43 00 |YC._.... 782,XC.| 00001660: 6B 1E 8E 17 9E 20 36 35 35 32 30 00 71 1E 98 17 |k.... 65520.q...| 00001670: 8E 00 79 1E 28 23 59 B2 30 00 88 1E 32 23 81 20 |..y.(#Y.0...2#. | 00001680: 58 B2 31 20 A4 20 32 30 00 93 1E 3C 23 99 20 20 |X.1 . 20...<#. | 00001690: 20 58 2C 00 B0 1E 46 23 8B 20 58 B2 31 30 20 A7 | X,...F#. X.10 .| 000016A0: 20 59 B2 59 AA 31 3A 20 20 20 89 20 39 30 35 30 | Y.Y.1: . 9050| 000016B0: 00 B6 1E 50 23 82 00 C4 1E 5A 23 99 20 22 55 44 |...P#....Z#. "UD| 000016C0: 45 22 3B 59 00 CF 1E 64 23 89 20 39 30 31 30 00 |E";Y...d#. 9010.| 000016D0: 00 00 |.. |
....... SAVE"BUDGET 130386".7....53280,0
:.53281,0:."..".G.... C$(22,15)...<..A$(
22):.B$(16):LIN.1:COL.0:GLIN.1:GCOL.0:TL
IN.1:GTLIN.2:T$."":Q$.""...F.SUM.0:PLA.1
:NA$."BUDGET"...P.."TEKST "," JAN "
," FEB "," MAR "," APR "," MAJ "," J
UNI ".9.U.." JULI "," AUG "," SEPT ","
OKT "," NOV "," DEC "," SUM ".P.W.."
1.HALV","2.HALV".F.D..X.1.16:.B$(X):.X.~
.N.A$(20)."UDGIFT "...X.A$(21)."INDT\
GT ".....A$(22)."BALANCE ".L....****
*** OPSTART*********.U....".".....YC.6:X
C.6:.6000......"VELKOMMEN TIL BUDGET VER
.2,0".!...YC.8:XC.9:.6000.>...."VIL DU H
ENTE ET SAVET".T.$.YC.10:XC.16:.6000.B..
.."BUDGET".X.8.YC.12:XC.11:.6000...B.."T
AST JA ELLER NEJ"...L..1800:. INKEY.D.V.
. T$.."J" . T$.."N" . . 1100...`.. T$."N
" . .2700:. OPRET TOMT TALARK...J.. T$."
J" . .3700:. HENT DATA.*.T..".":. 2000:.
BILLEDE 1.@.~..2800:.4000:.3200.U....**
* INKEY *****.N.... T$:. T$.."" . 1810..
.... T$:. T$."" . 1820...&.....P.. ***BI
LLEDE 1***.X.Z..".";B$(1);.11);"B";B$(PL
A.1);.18);"B";B$(PLA.2);.......25);"B";B
$(PLA.3);.32);"B";B$(14)...... X.1 . 22.
1...TE..1.(43.(X.6).(X.59).(X.5)).F.....
1);A$(X);.11);.N....G(18);G(TE);G(146);C
$(X,PLA);.18);......G(18);G(TE);G(146);C
$(X,PLA.1);.25);.B....G(18);G(TE);G(146)
;C$(X,PLA.2);.32);... ..G(18);G(TE);G(14
6);C$(X,13)...*..X:.4000:.2800...4.....`
..***BILLEDE 2******.*.J.. 2900:. CLR ME
NU.P.T.YC.0:XC.12.7.COL:.6000:. PRINT AT
.D.~..B$(PLA.1.COL);.P....X.1.22.....YC.
X:.6000:. PRINT AT......C$(X,PLA.C
OL)......X......2800:. MENU.U....4000:.
CURSORS\TNING...D.....(..******SUM BILLE
DE 3******...2.YC.0:XC.33:.6000:. PRINT
AT.'.<..B$(14);.3.F..X.1.22.B.P.YC.X:.60
00.Q.Z..C$(X,13);.X.D..X.^.N.......****
*OPRET TOMT TALARK*****.....YC.10:XC.13:
.6000... ..G(18);" OPRETTER ";G(146);.A.
...X.1.22......X.20.A$(X)." "..
....Y.1.13...H.C$(X,Y)." "...R..Y:.
X.......%....*******MENU*****.:...YC.23:
XC.1:.6000.H....".MENU: F1-TEKST F3-SAV
E F5-PRINTER.";.N.......T..*******CLEAR
MENU****...^.YC.23:XC.1:.6000.N.H.."
";..
.R.YC.24:XC.1:.6000...|.."
";......./....**
** STYRE ******.9.B..1800.Y.G.. C(Q$).6
.(T$." " . C(Q$).1 . T$.."0" . T$.."9").
Q$.Q$.T$...L.. T$."." . .5000:. **TEKST
...V.. T$."." . .3400:. **GEM.T.... T$."
." . .7000:. **PRINT.......(T$.".").2.(T
$.".").3.(T$.".").4.(T$.".") . 3310,3330
,3350,3370.H.... F(T$).13. C(Q$) .0 . .4
100:.2400:. 3000.T.... F(T$).20 . C(Q$).
0 . Q$.H(Q$,C(Q$).1)......***** TEKSTLIN
IE*******.....YC.24:XC.1:.6000......">";
Q$;" ";.K...XC.8:.6000.U...."<";...
...3000......******CURSORKONTROL*****.5.
..COL.COL.1:.COL.0.COL.0:.PLA.3.PLA.PLA.
3:COL.2:.2000.E....4000:.3000.~...COL.CO
L.1:.COL.2.COL.2:.PLA.8 .PLA.PLA.3:COL.0
:.2000......4000:.3000.....LIN.LIN.1:.LI
N.19.LIN.19... ..4000:.3000.V.*.LIN.LIN.
1:.LIN.1.LIN.1...4..4000:.3000...H..****
*SAVE DATA********...R..2900:. CLR MENU.
5.\..2,8,2,"BUD.MIDLERT.,S,W".A.F..X.1.2
2.Y.P..2,"*".A$(X);G(13);.E.Z..Y.1.13..
...2,"*".C$(X,Y);G(13);......Y:.X..... 2
......3800:. TEST SEQ FILE.K....****SLET
GAMMEL FILE*******.W....4,8,15......4,"
S:BUDGET FILE"...J..4,"R:BUDGET FILE=BUD
.MIDLERT."...T. 4.3....3800:. TEST SEQ F
ILE.D....2800:. MENU.J.....H.T..******HE
NT DATA*********...~..2,8,2,"BUDGET FILE
,S,R"......X.1.22......2,A$(X):A$(X).I(A
$(X),10)......Y.1.13......2,C$(X,Y):C$(X
,Y).I(C$(X,Y),6)......Y,X: 2......3800:.
TEST FILE...D...&.X..*****TEST SEQ FILE
******.3....15,8,15.H....15,EN,EM$,ET,ES
.P... 15.^.... EN.0. ..Q.... EN,EM$,ET,E
S.W....... ..*****CURSORS\TNING*******..
...YC.GLIN:XC.GCOL.7.12:.6000.T....G(146
);C$(GLIN,GCOL.PLA);.....GLIN.LIN:GCOL.C
OL...H.YC.LIN:XC.COL.7.12:.6000.*.R..G(1
8);C$(LIN,COL.PLA);G(146);.0.....S....**
*******OPSUMERING**********.^.... 2900.S
...YC.24:XC.1:.6000..."..G(18)"
REGNER ";G(146);.B.,..C(Q$)
.6.Q$." ".Q$:.4140.M.6..X.1.6...@..J(Q$,
X,1)." ". .X...J..X.X.6...T..J(Q$,X,1)."
". ....^..X.#.H.C$(LIN,COL.PLA).Q$.7.R.
Q$."":SU.0:SM.0.C.|..X.1.12._....C$(LIN,
X)." ".4250.V...SU.SU.E(C$(LIN,X)).}
....X.....Q$.D(SU):.4990.....C$(LIN,13).
Q$:SU.0......X.1.5.S.B..C$(X,COL.PLA)."
".4310...L.SU.SU.E(C$(X,COL.PLA))..
.V..X.....Q$.D(SU):.4990.$...C$(21,COL.P
LA).Q$:Q$."".0....X.6.19.R....C$(X,COL.P
LA)." "..4370.M...SM.SM.E(C$(X,COL.
PLA)).T....X.....Q$.D(SM):.4990...&.C$(2
0,COL.PLA).Q$:Q$.""...0.Q$.D(SU.SM):.499
0.Y.:.C$(22,COL.PLA).Q$:SU.0:SM.0...D..X
.1.12...N..C$(20,X)." ".T1.0...X.T1
.E(C$(20,X)).!.B.SU.SU.T1.=.L..C$(21,X).
" ".T2.0.P.V.T2.E(C$(21,X)).]...SM.
SM.T2.S...Q$.D(T2.T1):.4990.....C$(22,X)
.Q$......X.....Q$.D(SU):.4990.....C$(20,
13).Q$.A...Q$.D(SM):.4990.R.F.C$(21,13).
Q$...P.Q$.D(SM.SU):.4990...Z.C$(22,13).Q
$:Q$."":SU.0:SM.0......2600:. BILLEDE 3.
%.....F.~..*******HOJRESTILLING*******.H
....H(Q$,1)." ".Q$.I(Q$,C(Q$).1)......C(
Q$).6.Q$." ".Q$:.4994......C(Q$).6.Q$."*
*****"............****TEKST EDITOR*****.
I....2900.....YC.23:XC.1:.6000......"MEN
U:F1-RETUR TIL MENU";...... 5800:. *****
TEKST CURSOR***.)....1800.A.D.. T$."." .
. 5900:..M.N.. F(T$).20 . C(Q$).0 . Q$.
H(Q$,C(Q$).1)...X.. F(T$).13 . C(Q$).0 .
.5700:.5000.D.... T$."." . TLIN.19 . T$
.".". TLIN.1 . .5800...... T$.." " . T$.
."Z" . Q$.Q$.T$.....Q$.H(Q$,10).....YC.2
4:XC.1:.6000.&....">";Q$;" ";.<
...YC.24:XC.12:.6000.F...."<";.P.(..5050
.B.D.. ****GEM****...N.. C(Q$).10 . Q$.Q
$." ":.5710...X.A$(TLIN).Q$:Q$.""...B.YC
.TLIN:XC.1:.6000:.A$(TLIN);.S.L.TLIN.TLI
N.(TLIN.19)...Q.. TLIN.19 . GTLIN.2...V.
....... ****** CURSOR S\TNING TEKST**.5.
..TLIN.TLIN.(T$.".").(T$.".").S...YC.TLI
N:XC.1:.6000:. ? AT.O.F..G(18);A$(TLIN);
G(146);...P.YC.GTLIN:XC.1:.6000:. ? AT..
.Z.. A$(GTLIN);.....GTLIN.TLIN.......U..
..**** SLET TEKST CURSOR*****.....YC.TLI
N:XC.1:.6000... ..A$(TLIN);...*..2900...
4..2800.".9.TLIN.1:GTLIN.2.(.>...E.P..**
****PRINTPOSITION****.R.Z.. 781,YC._....
782,XC.K.... 65520.Q.....Y.(#Y.0...2#.
X.1 . 20...<#. X,...F#. X.10 . Y.Y.1:
. 9050...P#..D.Z#. "UDE";Y.O.D#. 9010.
..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL