PRIVATREGNSKAB 2
FILE INFORMATION
FILENAME(S): PRIVATREGNSKAB 2
FILE TYPE(S): PRG
FILE SIZE: 11.3K
FIRST SEEN: 2025-11-30 19:55:10
APPEARS ON: 1 disk(s)
FILE HASH
8233afa67951824ea5fa702870b13ebcd949322b7b3e8a56fd097280f369fe5f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FRA RUN 1 2 3 84 | PRIVATREGNSKAB 2 | PRG | Curtcool, Hans Curt | 6 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 25 08 10 27 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..%..'.*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 00 37 08 11 27 8F 20 49 4E 49 54 |*****.7..'. INIT|
00000030: 49 41 4C 49 53 45 52 00 5B 08 12 27 8F 2A 2A 2A |IALISER.[..'.***|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000050: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 7E 08 1A 27 |***********.~..'|
00000060: 86 54 45 24 28 31 30 30 29 3A 86 4D 44 24 28 31 |.TE$(100):.MD$(1|
00000070: 32 29 3A 86 42 55 28 31 32 2C 31 30 30 29 00 9D |2):.BU(12,100)..|
00000080: 08 24 27 48 4A 24 B2 22 20 20 20 20 20 20 20 20 |.$'HJ$." |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 B8 08 | "...|
000000A0: 2E 27 81 20 49 B2 30 A4 31 30 30 3A 54 45 24 28 |.'. I.0.100:TE$(|
000000B0: 49 29 B2 48 4A 24 3A 82 00 C1 08 38 27 47 32 B2 |I).HJ$:....8'G2.|
000000C0: 30 00 F7 08 42 27 53 54 52 45 47 24 B2 22 C3 C3 |0...B'STREG$."..|
000000D0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
000000E0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
000000F0: C3 C3 C3 C3 C3 C3 22 00 1C 09 43 27 4D 44 24 28 |......"...C'MD$(|
00000100: 30 29 B2 22 4A 41 4E 55 41 52 22 3A 4D 44 24 28 |0)."JANUAR":MD$(|
00000110: 31 29 B2 22 46 45 42 52 55 41 52 22 00 3E 09 44 |1)."FEBRUAR".>.D|
00000120: 27 4D 44 24 28 32 29 B2 22 4D 41 52 54 53 22 3A |'MD$(2)."MARTS":|
00000130: 4D 44 24 28 33 29 B2 22 41 50 52 49 4C 22 00 5D |MD$(3)."APRIL".]|
00000140: 09 45 27 4D 44 24 28 34 29 B2 22 4D 41 4A 22 3A |.E'MD$(4)."MAJ":|
00000150: 4D 44 24 28 35 29 B2 22 4A 55 4E 49 22 00 7F 09 |MD$(5)."JUNI"...|
00000160: 46 27 4D 44 24 28 36 29 B2 22 4A 55 4C 49 22 3A |F'MD$(6)."JULI":|
00000170: 4D 44 24 28 37 29 B2 22 41 55 47 55 53 54 22 00 |MD$(7)."AUGUST".|
00000180: A7 09 47 27 4D 44 24 28 38 29 B2 22 53 45 50 54 |..G'MD$(8)."SEPT|
00000190: 45 4D 42 45 52 22 3A 4D 44 24 28 39 29 B2 22 4F |EMBER":MD$(9)."O|
000001A0: 4B 54 4F 42 45 52 22 00 D1 09 48 27 4D 44 24 28 |KTOBER"...H'MD$(|
000001B0: 31 30 29 B2 22 4E 4F 56 45 4D 42 45 52 22 3A 4D |10)."NOVEMBER":M|
000001C0: 44 24 28 31 31 29 B2 22 44 45 43 45 4D 42 45 52 |D$(11)."DECEMBER|
000001D0: 22 00 E5 09 49 27 4D 44 24 28 31 32 29 B2 22 54 |"...I'MD$(12)."T|
000001E0: 4F 54 41 4C 22 00 F0 09 F7 2A 89 32 39 30 30 30 |OTAL"....*.29000|
000001F0: 00 14 0A F8 2A 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....*.**********|
00000200: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000210: 2A 2A 2A 2A 00 36 0A F9 2A 8F 20 42 49 4C 4C 45 |****.6..*. BILLE|
00000220: 44 45 20 54 49 4C 20 54 45 4B 53 54 52 45 44 49 |DE TIL TEKSTREDI|
00000230: 47 45 52 49 4E 47 00 5A 0A FB 2A 8F 2A 2A 2A 2A |GERING.Z..*.****|
00000240: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000250: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 86 0A 02 2B 58 |**********....+X|
00000260: B2 31 30 3A 59 B2 32 3A 99 22 93 05 22 3A 97 35 |.10:Y.2:."..":.5|
00000270: 33 32 38 31 2C 32 3A 97 35 33 32 38 30 2C 30 3A |3281,2:.53280,0:|
00000280: 8D 32 30 30 30 30 00 A5 0A 0C 2B 99 22 12 52 45 |.20000....+.".RE|
00000290: 44 49 47 45 52 49 4E 47 20 41 46 20 54 45 4B 53 |DIGERING AF TEKS|
000002A0: 54 45 52 92 22 00 BA 0A 16 2B 58 B2 31 30 3A 59 |TER."....+X.10:Y|
000002B0: B2 36 3A 8D 20 32 30 30 30 30 00 D2 0A 20 2B 99 |.6:. 20000... +.|
000002C0: 22 4B 4F 4E 54 4F 20 20 20 20 20 20 54 45 4B 53 |"KONTO TEKS|
000002D0: 54 22 00 E8 0A 2A 2B 81 49 B2 30 A4 39 3A 58 B2 |T"...*+.I.0.9:X.|
000002E0: 31 35 3A 59 B2 38 AA 49 00 F4 0A 34 2B 8D 20 32 |15:Y.8.I...4+. 2|
000002F0: 30 30 30 30 00 10 0B 3E 2B 99 22 12 20 20 20 20 |0000...>+.". |
00000300: 20 20 20 20 20 20 20 20 20 20 20 20 92 22 3A 82 | .":.|
00000310: 00 2C 0B 43 2B 58 B2 30 3A 59 B2 32 30 3A 8D 32 |.,.C+X.0:Y.20:.2|
00000320: 30 30 30 30 3A 99 53 54 52 45 47 24 00 50 0B C0 |0000:.STREG$.P..|
00000330: 2B 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |+.**************|
00000340: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000350: 00 68 0B C1 2B 8F 20 49 4E 50 55 54 20 4E 59 45 |.h..+. INPUT NYE|
00000360: 20 54 45 4B 53 54 45 52 00 8C 0B C2 2B 8F 2A 2A | TEKSTER....+.**|
00000370: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000380: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A8 0B CA |************....|
00000390: 2B 8D 32 30 34 30 30 3A 58 B2 32 3A 59 B2 32 32 |+.20400:X.2:Y.22|
000003A0: 3A 8D 20 32 30 30 30 30 00 D6 0B D4 2B 85 20 22 |:. 20000....+. "|
000003B0: 12 54 41 53 54 20 4B 4F 4E 54 4F 2C 54 45 4B 53 |.TAST KONTO,TEKS|
000003C0: 54 22 3B 51 24 2C 51 51 24 3A 8B 51 24 B2 22 22 |T";Q$,QQ$:.Q$.""|
000003D0: A7 31 31 32 31 30 00 FE 0B D5 2B 8B 51 24 B2 22 |.11210....+.Q$."|
000003E0: 53 41 56 45 22 B0 51 24 B2 22 4C 4F 41 44 22 A7 |SAVE".Q$."LOAD".|
000003F0: 20 51 51 24 B2 51 24 3A 89 31 31 34 30 30 00 13 | QQ$.Q$:.11400..|
00000400: 0C D7 2B 8B 51 24 B2 22 4D 45 4E 55 22 A7 32 39 |..+.Q$."MENU".29|
00000410: 30 30 30 00 30 0C D8 2B 8B C3 28 51 51 24 29 B1 |000.0..+..(QQ$).|
00000420: 31 36 A7 51 51 24 B2 C8 28 51 51 24 2C 31 36 29 |16.QQ$..(QQ$,16)|
00000430: 00 4A 0C D9 2B 8B C3 28 51 24 29 B1 32 31 A7 51 |.J..+..(Q$).21.Q|
00000440: 24 B2 C9 28 51 24 2C 32 31 29 00 6E 0C DA 2B 51 |$..(Q$,21).n..+Q|
00000450: 24 B2 51 24 AA 22 20 20 22 AA 51 51 24 AA C8 28 |$.Q$." ".QQ$..(|
00000460: 48 4A 24 2C 31 36 AB C3 28 51 51 24 29 29 00 89 |HJ$,16..(QQ$))..|
00000470: 0C DE 2B 8B C5 28 51 24 29 B1 30 AF 51 51 24 B2 |..+..(Q$).0.QQ$.|
00000480: 22 2A 22 A7 31 31 33 30 30 00 B4 0C E8 2B 8B 20 |"*".11300....+. |
00000490: C5 28 51 24 29 B3 31 20 B0 20 C5 28 51 24 29 B1 |.(Q$).1 . .(Q$).|
000004A0: 31 30 30 20 A7 20 8D 20 32 30 34 30 30 3A 89 31 |100 . . 20400:.1|
000004B0: 31 32 31 30 00 D8 0C F2 2B 4B 4E B2 C5 28 51 24 |1210....+KN..(Q$|
000004C0: 29 3A 47 31 B2 4B 4E AB 28 4B 4E AB B5 28 4B 4E |):G1.KN.(KN..(KN|
000004D0: AD 31 30 29 AC 31 30 29 00 FE 0C FC 2B 8B 47 31 |.10).10)....+.G1|
000004E0: B3 B1 47 32 20 AF 20 47 32 B3 B1 30 20 A7 20 8D |..G2 . G2..0 . .|
000004F0: 20 32 30 34 30 30 3A 20 89 31 31 32 31 30 00 3B | 20400: .11210.;|
00000500: 0D 06 2C 54 45 24 28 4B 4E 29 B2 51 24 3A 47 32 |..,TE$(KN).Q$:G2|
00000510: B2 47 31 3A 51 24 B2 22 22 3A 59 59 B2 C5 28 54 |.G1:Q$."":YY..(T|
00000520: 45 24 28 4B 4E 29 29 AB B5 28 C5 28 54 45 24 28 |E$(KN))..(.(TE$(|
00000530: 4B 4E 29 29 AD 31 30 29 AC 31 30 00 52 0D 10 2C |KN)).10).10.R..,|
00000540: 8D 32 30 32 30 30 3A 59 59 B2 30 3A 89 31 31 32 |.20200:YY.0:.112|
00000550: 31 30 00 76 0D 24 2C 8F 2A 2A 2A 2A 2A 2A 2A 2A |10.v.$,.********|
00000560: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000570: 2A 2A 2A 2A 2A 2A 00 98 0D 25 2C 8F 20 50 52 49 |******...%,. PRI|
00000580: 4E 54 20 41 46 20 47 41 4D 4C 45 20 4B 4F 4E 54 |NT AF GAMLE KONT|
00000590: 4F 54 45 4B 53 54 45 52 00 BC 0D 27 2C 8F 2A 2A |OTEKSTER...',.**|
000005A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000005B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E2 0D 2E |************....|
000005C0: 2C 4B 4E B2 C5 28 51 24 29 3A 4B 4E B2 4B 4E AB |,KN..(Q$):KN.KN.|
000005D0: 31 AB 28 4B 4E AB B5 28 4B 4E AD 31 30 29 AC 31 |1.(KN..(KN.10).1|
000005E0: 30 29 00 02 0E 38 2C 81 59 59 B2 30 20 A4 20 39 |0)...8,.YY.0 . 9|
000005F0: 20 3A 4B 4E B2 4B 4E AA 31 3A 8D 32 30 32 30 30 | :KN.KN.1:.20200|
00000600: 3A 82 00 13 0E 42 2C 47 32 B2 30 3A 89 20 31 31 |:....B,G2.0:. 11|
00000610: 32 31 30 00 37 0E 88 2C 8F 2A 2A 2A 2A 2A 2A 2A |210.7..,.*******|
00000620: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000630: 2A 2A 2A 2A 2A 2A 2A 00 57 0E 89 2C 8F 20 4C 4F |*******.W..,. LO|
00000640: 41 44 20 45 4C 4C 45 52 20 53 41 56 45 20 4B 4F |AD ELLER SAVE KO|
00000650: 4E 54 4F 50 4C 41 4E 00 7B 0E 8A 2C 8F 2A 2A 2A |NTOPLAN.{..,.***|
00000660: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000670: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 90 0E 92 2C |***********....,|
00000680: 58 B2 20 32 3A 59 B2 32 32 3A 8D 32 30 30 30 30 |X. 2:Y.22:.20000|
00000690: 00 C1 0E 9C 2C 99 22 12 20 92 54 12 41 50 45 20 |....,.". .T.APE |
000006A0: 45 4C 4C 45 52 20 92 44 12 49 53 4B 45 54 54 45 |ELLER .D.ISKETTE|
000006B0: 20 2D 20 20 49 4E 44 54 41 53 54 20 54 2F 44 20 | - INDTAST T/D |
000006C0: 22 00 E2 0E A6 2C A1 51 24 3A 8B 51 24 B3 B1 22 |"....,.Q$:.Q$.."|
000006D0: 54 22 20 AF 20 51 24 B3 B1 22 44 22 A7 31 31 34 |T" . Q$.."D".114|
000006E0: 33 30 00 F9 0E AB 2C 8B 51 51 24 B2 22 4C 4F 41 |30....,.QQ$."LOA|
000006F0: 44 22 A7 20 31 31 34 36 30 00 0C 0F B0 2C 8B 51 |D". 11460....,.Q|
00000700: 24 B2 22 44 22 A7 20 31 31 35 30 30 00 1F 0F BA |$."D". 11500....|
00000710: 2C 8B 51 24 B2 22 54 22 A7 20 31 31 36 30 30 00 |,.Q$."T". 11600.|
00000720: 32 0F C4 2C 8B 51 24 B2 22 44 22 A7 20 31 31 35 |2..,.Q$."D". 115|
00000730: 35 30 00 45 0F CE 2C 8B 51 24 B2 22 54 22 A7 20 |50.E..,.Q$."T". |
00000740: 31 31 36 35 30 00 69 0F EC 2C 8F 2A 2A 2A 2A 2A |11650.i..,.*****|
00000750: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000760: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8B 0F ED 2C 8F 20 |*********....,. |
00000770: 53 41 56 45 20 4B 4F 4E 54 4F 50 4C 41 4E 20 50 |SAVE KONTOPLAN P|
00000780: 41 41 20 44 49 53 4B 45 54 54 45 00 AF 0F EF 2C |AA DISKETTE....,|
00000790: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
000007A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000007B0: CD 0F F6 2C 9F 31 2C 38 2C 32 2C 22 40 30 3A 4B |...,.1,8,2,"@0:K|
000007C0: 4F 4E 54 4F 50 4C 41 4E 2C 53 2C 57 22 00 E6 0F |ONTOPLAN,S,W"...|
000007D0: 00 2D 81 49 B2 30 A4 31 30 30 3A 98 31 2C 54 45 |.-.I.0.100:.1,TE|
000007E0: 24 28 49 29 3A 82 00 F5 0F 0A 2D A0 20 31 3A 89 |$(I):.....-. 1:.|
000007F0: 31 31 30 30 30 00 19 10 1E 2D 8F 2A 2A 2A 2A 2A |11000....-.*****|
00000800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3B 10 1F 2D 8F 20 |*********.;..-. |
00000820: 4C 4F 41 44 20 4B 4F 4E 54 4F 50 4C 41 4E 20 46 |LOAD KONTOPLAN F|
00000830: 52 41 20 44 49 53 4B 45 54 54 45 00 5F 10 21 2D |RA DISKETTE._.!-|
00000840: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000850: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000860: 7C 10 28 2D 9F 31 2C 38 2C 32 2C 22 30 3A 4B 4F ||.(-.1,8,2,"0:KO|
00000870: 4E 54 4F 50 4C 41 4E 2C 53 2C 52 22 00 93 10 32 |NTOPLAN,S,R"...2|
00000880: 2D 81 49 B2 30 A4 31 30 30 3A 84 31 2C 54 45 24 |-.I.0.100:.1,TE$|
00000890: 28 49 29 00 AD 10 37 2D 8B 54 45 24 28 49 29 B2 |(I)...7-.TE$(I).|
000008A0: 22 22 A7 54 45 24 28 49 29 B2 48 4A 24 00 B3 10 |"".TE$(I).HJ$...|
000008B0: 38 2D 82 00 C9 10 3C 2D A0 20 31 3A 51 51 24 B2 |8-....<-. 1:QQ$.|
000008C0: 22 22 3A 89 31 31 30 30 30 00 ED 10 50 2D 8F 2A |"":.11000...P-.*|
000008D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000008E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 0C 11 |*************...|
000008F0: 51 2D 8F 20 53 41 56 45 20 4B 4F 4E 54 4F 50 4C |Q-. SAVE KONTOPL|
00000900: 41 4E 20 50 41 41 20 42 41 41 4E 44 00 30 11 53 |AN PAA BAAND.0.S|
00000910: 2D 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |-.**************|
00000920: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000930: 00 47 11 5A 2D 9F 31 2C 31 2C 31 2C 22 4B 4F 4E |.G.Z-.1,1,1,"KON|
00000940: 54 4F 50 4C 41 4E 22 00 60 11 64 2D 81 49 B2 30 |TOPLAN".`.d-.I.0|
00000950: A4 31 30 30 3A 98 31 2C 54 45 24 28 49 29 3A 82 |.100:.1,TE$(I):.|
00000960: 00 6F 11 6E 2D A0 20 31 3A 89 31 31 30 30 30 00 |.o.n-. 1:.11000.|
00000970: 93 11 82 2D 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...-.***********|
00000980: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000990: 2A 2A 2A 00 B2 11 83 2D 8F 20 4C 4F 41 44 20 4B |***....-. LOAD K|
000009A0: 4F 4E 54 4F 50 4C 41 4E 20 46 52 41 20 42 41 41 |ONTOPLAN FRA BAA|
000009B0: 4E 44 00 D6 11 85 2D 8F 2A 2A 2A 2A 2A 2A 2A 2A |ND....-.********|
000009C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000009D0: 2A 2A 2A 2A 2A 2A 00 ED 11 8C 2D 9F 31 2C 31 2C |******....-.1,1,|
000009E0: 30 2C 22 4B 4F 4E 54 4F 50 4C 41 4E 22 00 04 12 |0,"KONTOPLAN"...|
000009F0: 96 2D 81 49 B2 30 A4 31 30 30 3A 84 31 2C 54 45 |.-.I.0.100:.1,TE|
00000A00: 24 28 49 29 00 1E 12 9B 2D 8B 54 45 24 28 49 29 |$(I)....-.TE$(I)|
00000A10: B2 22 22 A7 54 45 24 28 49 29 B2 48 4A 24 00 24 |."".TE$(I).HJ$.$|
00000A20: 12 9C 2D 82 00 3A 12 A0 2D A0 20 31 3A 51 51 24 |..-..:..-. 1:QQ$|
00000A30: B2 22 22 3A 89 31 31 30 30 30 00 5E 12 E0 2E 8F |."":.11000.^....|
00000A40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 7C |**************.||
00000A60: 12 E1 2E 8F 20 4F 50 53 54 49 4C 4C 49 4E 47 20 |.... OPSTILLING |
00000A70: 41 46 20 42 55 44 47 45 54 54 45 52 00 A0 12 E3 |AF BUDGETTER....|
00000A80: 2E 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
00000A90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000AA0: 00 CC 12 EA 2E 58 B2 31 30 3A 59 B2 32 3A 99 22 |.....X.10:Y.2:."|
00000AB0: 93 05 22 3A 8D 32 30 30 30 30 3A 97 35 33 32 38 |..":.20000:.5328|
00000AC0: 31 2C 32 3A 97 35 33 32 38 30 2C 30 00 EA 12 F4 |1,2:.53280,0....|
00000AD0: 2E 99 22 12 4F 50 53 54 49 4C 4C 49 4E 47 20 41 |..".OPSTILLING A|
00000AE0: 46 20 42 55 44 47 45 54 92 22 00 06 13 FE 2E 58 |F BUDGET.".....X|
00000AF0: B2 30 3A 59 B2 32 30 3A 8D 32 30 30 30 30 3A 99 |.0:Y.20:.20000:.|
00000B00: 53 54 52 45 47 24 00 2A 13 44 2F 8F 2A 2A 2A 2A |STREG$.*.D/.****|
00000B10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 49 13 45 2F 8F |**********.I.E/.|
00000B30: 20 56 41 4C 47 20 41 46 20 49 4E 44 54 41 53 54 | VALG AF INDTAST|
00000B40: 4E 49 4E 47 53 46 4F 52 4D 00 6D 13 47 2F 8F 2A |NINGSFORM.m.G/.*|
00000B50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 81 13 |*************...|
00000B70: 4E 2F 58 B2 30 3A 59 B2 32 32 3A 8D 32 30 30 30 |N/X.0:Y.22:.2000|
00000B80: 30 00 B6 13 58 2F 99 22 12 20 92 4B 12 4F 4E 54 |0...X/.". .K.ONT|
00000B90: 4F 2D 20 45 4C 4C 45 52 20 92 4D 12 41 41 4E 45 |O- ELLER .M.AANE|
00000BA0: 44 53 4F 52 44 45 4E 20 2D 20 49 4E 44 54 41 53 |DSORDEN - INDTAS|
00000BB0: 54 20 4B 2F 4D 22 00 D7 13 62 2F A1 51 24 3A 8B |T K/M"...b/.Q$:.|
00000BC0: 51 24 B3 B1 22 4B 22 20 AF 20 51 24 B3 B1 22 4D |Q$.."K" . Q$.."M|
00000BD0: 22 A7 31 32 31 33 30 00 E9 13 6C 2F 8B 51 24 B2 |".12130...l/.Q$.|
00000BE0: 22 4B 22 A7 31 32 32 30 30 00 FB 13 76 2F 8B 51 |"K".12200...v/.Q|
00000BF0: 24 B2 22 4D 22 A7 31 33 30 30 30 00 1F 14 A8 2F |$."M".13000..../|
00000C00: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000C10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000C20: 42 14 A9 2F 8F 20 42 49 4C 4C 45 44 45 20 54 49 |B../. BILLEDE TI|
00000C30: 4C 20 4B 4F 4E 54 4F 49 4E 44 54 41 53 54 4E 49 |L KONTOINDTASTNI|
00000C40: 4E 47 00 66 14 AB 2F 8F 2A 2A 2A 2A 2A 2A 2A 2A |NG.f../.********|
00000C50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000C60: 2A 2A 2A 2A 2A 2A 00 7E 14 B2 2F 58 B2 35 3A 59 |******.~../X.5:Y|
00000C70: B2 31 3A 99 22 93 22 3A 8D 32 30 30 30 30 00 8D |.1:.".":.20000..|
00000C80: 14 BC 2F 99 22 12 4B 4F 4E 54 4F 3A 22 00 AB 14 |../.".KONTO:"...|
00000C90: BE 2F 58 B2 35 3A 59 B2 32 3A 8D 32 30 30 30 30 |./X.5:Y.2:.20000|
00000CA0: 3A 99 22 12 54 45 4B 53 54 3A 22 00 CB 14 C1 2F |:.".TEKST:"..../|
00000CB0: 58 B2 32 31 3A 59 B2 34 3A 8D 32 30 30 30 30 3A |X.21:Y.4:.20000:|
00000CC0: 99 22 12 20 42 45 4C 30 42 20 22 00 E8 14 C6 2F |.". BEL0B "..../|
00000CD0: 81 49 B2 30 A4 31 32 3A 58 B2 35 3A 59 B2 35 AA |.I.0.12:X.5:Y.5.|
00000CE0: 49 3A 8D 32 30 30 30 30 00 FD 14 D0 2F 8B 49 B3 |I:.20000..../.I.|
00000CF0: 31 32 A7 20 99 4D 44 24 28 49 29 3A 82 00 15 15 |12. .MD$(I):....|
00000D00: D5 2F 8B 49 B2 31 32 A7 20 99 22 11 22 4D 44 24 |./.I.12. ."."MD$|
00000D10: 28 49 29 3A 82 00 42 15 D6 2F 81 49 B2 30 A4 31 |(I):..B../.I.0.1|
00000D20: 31 3A 58 B2 32 31 3A 59 B2 35 AA 49 3A 8D 32 30 |1:X.21:Y.5.I:.20|
00000D30: 30 30 30 3A 99 22 12 05 20 20 20 20 20 20 20 22 |000:.".. "|
00000D40: 3A 82 00 5E 15 DA 2F 58 B2 30 3A 59 B2 32 30 3A |:..^../X.0:Y.20:|
00000D50: 8D 32 30 30 30 30 3A 99 53 54 52 45 47 24 00 72 |.20000:.STREG$.r|
00000D60: 15 E4 2F 58 B2 38 3A 59 B2 32 32 3A 8D 32 30 30 |../X.8:Y.22:.200|
00000D70: 30 30 00 8A 15 EE 2F 85 22 12 20 4B 4F 4E 54 4F |00..../.". KONTO|
00000D80: 47 52 55 50 50 45 22 3B 51 24 00 9B 15 F8 2F 8B |GRUPPE";Q$..../.|
00000D90: 51 24 B2 22 22 A7 31 32 32 38 30 00 BB 15 02 30 |Q$."".12280....0|
00000DA0: 4B 4E B2 C5 28 51 24 29 3A 8B 4B 4E B3 30 B0 4B |KN..(Q$):.KN.0.K|
00000DB0: 4E B1 31 30 30 A7 31 32 32 38 30 00 DF 15 0C 30 |N.100.12280....0|
00000DC0: 8B 4B 4E AB B5 28 4B 4E AD 31 30 29 AC 31 30 B2 |.KN..(KN.10).10.|
00000DD0: 30 A7 8D 32 30 34 30 30 3A 89 31 32 32 36 30 00 |0..20400:.12260.|
00000DE0: F8 15 16 30 58 B2 31 31 3A 59 B2 31 3A 8D 32 30 |...0X.11:Y.1:.20|
00000DF0: 30 30 30 3A 99 20 4B 4E 00 29 16 20 30 58 B2 31 |000:. KN.). 0X.1|
00000E00: 32 3A 59 B2 32 3A 8D 32 30 30 30 30 3A 99 C9 28 |2:Y.2:.20000:..(|
00000E10: 54 45 24 28 4B 4E 29 2C 31 36 29 3A 8D 31 32 37 |TE$(KN),16):.127|
00000E20: 30 30 3A 8D 32 30 34 30 30 00 3D 16 2A 30 58 B2 |00:.20400.=.*0X.|
00000E30: 38 3A 59 B2 32 32 3A 8D 32 30 30 30 30 00 5F 16 |8:Y.22:.20000._.|
00000E40: 34 30 85 22 12 20 54 41 53 54 20 4D 44 2E 4E 52 |40.". TAST MD.NR|
00000E50: 2E 2C 42 45 4C 30 42 22 3B 51 24 2C 51 51 24 00 |.,BEL0B";Q$,QQ$.|
00000E60: 78 16 35 30 8B 51 24 B2 22 22 A7 8D 32 30 34 30 |x.50.Q$.""..2040|
00000E70: 30 3A 89 31 32 33 33 30 00 8D 16 36 30 8B 51 24 |0:.12330...60.Q$|
00000E80: B2 22 4D 45 4E 55 22 A7 32 39 30 30 30 00 AF 16 |."MENU".29000...|
00000E90: 37 30 8B 51 24 B2 22 2A 22 AF 51 51 24 B2 22 2A |70.Q$."*".QQ$."*|
00000EA0: 22 A7 8D 32 30 34 30 30 3A 89 31 32 32 30 30 00 |"..20400:.12200.|
00000EB0: D4 16 38 30 8B C5 28 51 24 29 B3 31 B0 C5 28 51 |..80..(Q$).1..(Q|
00000EC0: 51 24 29 B3 31 20 A7 8D 32 30 34 30 30 3A 89 31 |Q$).1 ..20400:.1|
00000ED0: 32 33 33 30 00 F9 16 39 30 4D 4E 25 B2 C5 28 51 |2330...90MN%..(Q|
00000EE0: 24 29 3A 42 45 B2 C5 28 51 51 24 29 3A 51 24 B2 |$):BE..(QQ$):Q$.|
00000EF0: 22 22 3A 51 51 24 B2 22 22 00 1D 17 3E 30 8B 4D |"":QQ$.""...>0.M|
00000F00: 4E 25 B1 31 32 B0 42 45 B1 39 39 39 39 39 39 A7 |N%.12.BE.999999.|
00000F10: 8D 32 30 34 30 30 3A 89 31 32 33 33 30 00 31 17 |.20400:.12330.1.|
00000F20: 43 30 42 55 28 4D 4E 25 AB 31 2C 4B 4E 29 B2 42 |C0BU(MN%.1,KN).B|
00000F30: 45 00 3C 17 48 30 8D 32 30 35 30 30 00 75 17 52 |E.<.H0.20500.u.R|
00000F40: 30 58 B2 32 31 AA 48 4D 3A 59 B2 35 AA 4D 4E 25 |0X.21.HM:Y.5.MN%|
00000F50: AB 31 3A 8D 32 30 30 30 30 3A 99 22 12 05 22 42 |.1:.20000:.".."B|
00000F60: 55 28 4D 4E 25 AB 31 2C 4B 4E 29 22 05 22 3A 8D |U(MN%.1,KN)".":.|
00000F70: 32 30 34 30 30 00 94 17 5C 30 8D 32 35 30 30 30 |20400...\0.25000|
00000F80: 3A 42 45 B2 42 55 28 31 32 2C 4B 4E 29 3A 8D 32 |:BE.BU(12,KN):.2|
00000F90: 30 35 30 30 00 BE 17 66 30 58 B2 32 31 AA 48 4D |0500...f0X.21.HM|
00000FA0: 3A 59 B2 31 38 3A 8D 32 30 30 30 30 3A 99 42 55 |:Y.18:.20000:.BU|
00000FB0: 28 31 32 2C 4B 4E 29 3A 89 31 32 33 33 30 00 E2 |(12,KN):.12330..|
00000FC0: 17 9C 31 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..1.************|
00000FD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000FE0: 2A 2A 00 05 18 9D 31 8F 20 50 52 49 4E 54 20 45 |**....1. PRINT E|
00000FF0: 4B 53 49 53 54 45 52 45 4E 44 45 20 42 55 44 47 |KSISTERENDE BUDG|
00001000: 45 54 54 41 4C 00 29 18 9F 31 8F 2A 2A 2A 2A 2A |ETTAL.)..1.*****|
00001010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 38 18 A6 31 81 20 |*********.8..1. |
00001030: 49 B2 30 20 A4 20 31 31 00 4F 18 B0 31 42 45 B2 |I.0 . 11.O..1BE.|
00001040: 42 55 28 49 2C 4B 4E 29 3A 8D 32 30 35 30 30 00 |BU(I,KN):.20500.|
00001050: 68 18 BA 31 58 B2 32 31 AA 48 4D 3A 59 B2 35 AA |h..1X.21.HM:Y.5.|
00001060: 49 3A 8D 32 30 30 30 30 00 8B 18 C4 31 8B 42 55 |I:.20000....1.BU|
00001070: 28 49 2C 4B 4E 29 B3 B1 30 A7 20 99 22 12 05 22 |(I,KN)..0. .".."|
00001080: 42 55 28 49 2C 4B 4E 29 22 05 22 00 91 18 CE 31 |BU(I,KN)"."....1|
00001090: 82 00 B0 18 D8 31 8D 32 35 30 30 30 3A 42 45 B2 |.....1.25000:BE.|
000010A0: 42 55 28 31 32 2C 4B 4E 29 3A 8D 32 30 35 30 30 |BU(12,KN):.20500|
000010B0: 00 D5 18 E2 31 58 B2 32 31 AA 48 4D 3A 59 B2 31 |....1X.21.HM:Y.1|
000010C0: 38 3A 8D 32 30 30 30 30 3A 99 42 55 28 31 32 2C |8:.20000:.BU(12,|
000010D0: 4B 4E 29 3A 8E 00 F9 18 C8 32 8F 2A 2A 2A 2A 2A |KN):.....2.*****|
000010E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000010F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 1A 19 C9 32 8F 20 |*********....2. |
00001100: 42 49 4C 4C 45 44 45 20 54 49 4C 20 4D 44 2E 49 |BILLEDE TIL MD.I|
00001110: 4E 44 54 41 53 54 4E 49 4E 47 00 3E 19 CB 32 8F |NDTASTNING.>..2.|
00001120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 56 |**************.V|
00001140: 19 D2 32 58 B2 35 3A 59 B2 31 3A 99 22 93 22 3A |..2X.5:Y.1:.".":|
00001150: 8D 32 30 30 30 30 00 6B 19 DC 32 99 22 12 4D 41 |.20000.k..2.".MA|
00001160: 41 4E 45 44 20 20 20 20 20 3A 22 00 8F 19 E6 32 |ANED :"....2|
00001170: 58 B2 35 3A 59 B2 32 3A 8D 32 30 30 30 30 3A 99 |X.5:Y.2:.20000:.|
00001180: 22 12 4B 4F 4E 54 4F 47 52 55 50 50 45 3A 22 00 |".KONTOGRUPPE:".|
00001190: AF 19 F0 32 58 B2 32 36 3A 59 B2 36 3A 8D 32 30 |...2X.26:Y.6:.20|
000011A0: 30 30 30 3A 99 22 12 20 42 45 4C 30 42 20 22 00 |000:.". BEL0B ".|
000011B0: CB 19 FA 32 58 B2 30 3A 59 B2 32 30 3A 8D 32 30 |...2X.0:Y.20:.20|
000011C0: 30 30 30 3A 99 53 54 52 45 47 24 00 F7 19 04 33 |000:.STREG$....3|
000011D0: 81 49 B2 30 A4 38 3A 58 B2 32 36 3A 59 B2 37 AA |.I.0.8:X.26:Y.7.|
000011E0: 49 3A 8D 32 30 30 30 30 3A 99 22 12 05 20 20 20 |I:.20000:.".. |
000011F0: 20 20 20 20 22 3A 82 00 0B 1A 0E 33 58 B2 33 3A | ":.....3X.3:|
00001200: 59 B2 32 32 3A 8D 32 30 30 30 30 00 37 1A 18 33 |Y.22:.20000.7..3|
00001210: 85 22 12 20 49 4E 44 54 41 53 54 20 4D 44 2E 4E |.". INDTAST MD.N|
00001220: 52 2E 2C 20 4B 4F 4E 54 4F 47 52 55 50 50 45 22 |R., KONTOGRUPPE"|
00001230: 3B 51 24 2C 51 51 24 00 5B 1A 22 33 8B C5 28 51 |;Q$,QQ$.[."3..(Q|
00001240: 24 29 B3 31 B0 C5 28 51 51 24 29 B3 31 A7 8D 32 |$).1..(QQ$).1..2|
00001250: 30 34 30 30 3A 89 31 33 30 37 30 00 82 1A 2C 33 |0400:.13070...,3|
00001260: 8B C5 28 51 24 29 B3 31 20 B0 20 C5 28 51 24 29 |..(Q$).1 . .(Q$)|
00001270: B1 31 32 20 A7 8D 32 30 34 30 30 3A 89 31 33 30 |.12 ..20400:.130|
00001280: 37 30 00 A0 1A 36 33 8B C5 28 51 51 24 29 B1 31 |70...63..(QQ$).1|
00001290: 30 30 A7 8D 32 30 34 30 30 3A 89 31 33 30 37 30 |00..20400:.13070|
000012A0: 00 CE 1A 40 33 58 B2 31 38 3A 59 B2 31 3A 8D 32 |...@3X.18:Y.1:.2|
000012B0: 30 30 30 30 3A 99 4D 44 24 28 C5 28 51 24 29 AB |0000:.MD$(.(Q$).|
000012C0: 31 29 3A 4D 44 25 B2 C5 28 51 24 29 AB 31 00 E5 |1):MD%..(Q$).1..|
000012D0: 1A 4A 33 47 52 B2 B5 28 C5 28 51 51 24 29 AD 31 |.J3GR..(.(QQ$).1|
000012E0: 30 29 AC 31 30 00 0B 1B 54 33 58 B2 31 37 3A 59 |0).10...T3X.17:Y|
000012F0: B2 32 3A 8D 32 30 30 30 30 3A 99 47 52 3B C9 28 |.2:.20000:.GR;.(|
00001300: 54 45 24 28 47 52 29 2C 31 36 29 00 3D 1B 5E 33 |TE$(GR),16).=.^3|
00001310: 81 49 B2 31 A4 39 3A 58 B2 35 3A 59 B2 36 AA 49 |.I.1.9:X.5:Y.6.I|
00001320: 3A 8D 32 30 30 30 30 3A 99 47 52 AA 49 3B C9 28 |:.20000:.GR.I;.(|
00001330: 54 45 24 28 47 52 AA 49 29 2C 31 36 29 00 5C 1B |TE$(GR.I),16).\.|
00001340: 68 33 82 3A 58 B2 35 3A 59 B2 31 37 3A 8D 32 30 |h3.:X.5:Y.17:.20|
00001350: 30 30 30 3A 99 22 54 4F 54 41 4C 22 00 80 1B 90 |000:."TOTAL"....|
00001360: 33 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |3.**************|
00001370: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001380: 00 A3 1B 91 33 8F 20 50 52 49 4E 54 20 45 4B 53 |....3. PRINT EKS|
00001390: 49 53 54 45 52 45 4E 44 45 20 42 55 44 47 45 54 |ISTERENDE BUDGET|
000013A0: 54 41 4C 00 C7 1B 93 33 8F 2A 2A 2A 2A 2A 2A 2A |TAL....3.*******|
000013B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000013C0: 2A 2A 2A 2A 2A 2A 2A 00 EA 1B 9A 33 81 20 49 B2 |*******....3. I.|
000013D0: 31 A4 39 3A 42 45 B2 42 55 28 4D 44 25 2C 47 52 |1.9:BE.BU(MD%,GR|
000013E0: AA 49 29 3A 8D 32 30 35 30 30 00 03 1C A4 33 58 |.I):.20500....3X|
000013F0: B2 32 36 AA 48 4D 3A 59 B2 36 AA 49 3A 8D 32 30 |.26.HM:Y.6.I:.20|
00001400: 30 30 30 00 2D 1C AE 33 8B 42 55 28 4D 44 25 2C |000.-..3.BU(MD%,|
00001410: 47 52 AA 49 29 B3 B1 30 A7 99 22 12 05 22 42 55 |GR.I)..0..".."BU|
00001420: 28 4D 44 25 2C 47 52 AA 49 29 22 05 22 00 33 1C |(MD%,GR.I)".".3.|
00001430: B3 33 82 00 53 1C B8 33 8D 32 35 31 30 30 3A 42 |.3..S..3.25100:B|
00001440: 45 B2 42 55 28 4D 44 25 2C 47 52 29 3A 8D 32 30 |E.BU(MD%,GR):.20|
00001450: 35 30 30 00 6F 1C C2 33 58 B2 32 36 AA 48 4D 3A |500.o..3X.26.HM:|
00001460: 59 B2 31 37 3A 8D 32 30 30 30 30 3A 99 42 45 00 |Y.17:.20000:.BE.|
00001470: 93 1C F4 33 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...3.***********|
00001480: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001490: 2A 2A 2A 00 A9 1C F5 33 8F 20 49 4E 50 55 54 20 |***....3. INPUT |
000014A0: 42 55 44 47 45 54 54 41 4C 00 CD 1C F7 33 8F 2A |BUDGETTAL....3.*|
000014B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000014C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E8 1C |*************...|
000014D0: FE 33 8D 32 30 34 30 30 3A 58 B2 36 3A 59 B2 32 |.3.20400:X.6:Y.2|
000014E0: 32 3A 8D 32 30 30 30 30 00 0D 1D 08 34 85 22 12 |2:.20000....4.".|
000014F0: 20 54 41 53 54 20 4B 4F 4E 54 4F 4E 52 2E 2C 20 | TAST KONTONR., |
00001500: 42 45 4C 30 42 22 3B 51 24 2C 51 51 24 00 2A 1D |BEL0B";Q$,QQ$.*.|
00001510: 12 34 8B 51 24 B2 22 4D 45 4E 55 22 AF 51 51 24 |.4.Q$."MENU".QQ$|
00001520: B2 22 2A 22 A7 32 39 30 30 30 00 44 1D 1C 34 8B |."*".29000.D..4.|
00001530: 51 24 B2 22 2A 22 AF 51 51 24 B2 22 2A 22 A7 31 |Q$."*".QQ$."*".1|
00001540: 33 30 30 30 00 68 1D 26 34 4B 4E B2 C5 28 51 24 |3000.h.&4KN..(Q$|
00001550: 29 3A 42 45 B2 C5 28 51 51 24 29 3A 51 24 B2 22 |):BE..(QQ$):Q$."|
00001560: 22 3A 51 51 24 B2 22 22 00 86 1D 2B 34 8B B5 28 |":QQ$.""...+4..(|
00001570: 4B 4E AD 31 30 29 B3 B1 B5 28 47 52 AD 31 30 29 |KN.10)...(GR.10)|
00001580: A7 31 33 33 30 30 00 A8 1D 30 34 8B C5 28 51 24 |.13300...04..(Q$|
00001590: 29 B1 39 39 B0 C5 28 51 51 24 29 B1 39 39 39 39 |).99..(QQ$).9999|
000015A0: 39 39 A7 31 33 33 30 30 00 C1 1D 3A 34 42 55 28 |99.13300...:4BU(|
000015B0: 4D 44 25 2C 4B 4E 29 B2 42 45 3A 8D 32 30 35 30 |MD%,KN).BE:.2050|
000015C0: 30 00 F7 1D 44 34 8D 32 35 31 30 30 3A 58 B2 32 |0...D4.25100:X.2|
000015D0: 36 AA 48 4D 3A 59 B2 36 AA 4B 4E AB 47 52 3A 8D |6.HM:Y.6.KN.GR:.|
000015E0: 32 30 30 30 30 3A 99 22 12 05 22 42 45 22 05 22 |20000:.".."BE"."|
000015F0: 3A 8D 32 30 34 30 30 00 10 1E 4E 34 42 45 B2 42 |:.20400...N4BE.B|
00001600: 55 28 4D 44 25 2C 47 52 29 3A 8D 32 30 35 30 30 |U(MD%,GR):.20500|
00001610: 00 2C 1E 58 34 58 B2 32 36 AA 48 4D 3A 59 B2 31 |.,.X4X.26.HM:Y.1|
00001620: 37 3A 8D 32 30 30 30 30 3A 99 42 45 00 37 1E 62 |7:.20000:.BE.7.b|
00001630: 34 89 31 33 33 30 30 00 5B 1E BC 34 8F 2A 2A 2A |4.13300.[..4.***|
00001640: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001650: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 7D 1E BD 34 |***********.}..4|
00001660: 8F 20 53 41 56 45 20 42 55 44 47 45 54 54 41 4C |. SAVE BUDGETTAL|
00001670: 20 50 41 41 20 44 49 53 4B 45 54 54 45 00 A1 1E | PAA DISKETTE...|
00001680: BE 34 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.4.*************|
00001690: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000016A0: 2A 00 BC 1E C6 34 9F 32 2C 38 2C 33 2C 22 40 30 |*....4.2,8,3,"@0|
000016B0: 3A 42 55 44 47 45 54 2C 53 2C 57 22 00 D2 1E D0 |:BUDGET,S,W"....|
000016C0: 34 81 49 B2 30 A4 31 32 3A 81 49 49 B2 30 A4 31 |4.I.0.12:.II.0.1|
000016D0: 30 30 00 E8 1E DA 34 98 32 2C 42 55 28 49 2C 49 |00....4.2,BU(I,I|
000016E0: 49 29 3A 82 49 49 2C 49 00 F1 1E E4 34 A0 32 3A |I):.II,I....4.2:|
000016F0: 8E 00 15 1F EE 34 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |.....4.*********|
00001700: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001710: 2A 2A 2A 2A 2A 00 37 1F EF 34 8F 20 4C 4F 41 44 |*****.7..4. LOAD|
00001720: 20 42 55 44 47 45 54 54 41 4C 20 46 52 41 20 44 | BUDGETTAL FRA D|
00001730: 49 53 4B 45 54 54 45 00 5B 1F F1 34 8F 2A 2A 2A |ISKETTE.[..4.***|
00001740: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001750: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 75 1F F8 34 |***********.u..4|
00001760: 9F 32 2C 38 2C 33 2C 22 30 3A 42 55 44 47 45 54 |.2,8,3,"0:BUDGET|
00001770: 2C 53 2C 52 22 00 8B 1F 02 35 81 49 B2 30 A4 31 |,S,R"....5.I.0.1|
00001780: 32 3A 81 49 49 B2 30 A4 31 30 30 00 A1 1F 0C 35 |2:.II.0.100....5|
00001790: 84 32 2C 42 55 28 49 2C 49 49 29 3A 82 49 49 2C |.2,BU(I,II):.II,|
000017A0: 49 00 AA 1F 16 35 A0 32 3A 8E 00 CE 1F 20 35 8F |I....5.2:.... 5.|
000017B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000017C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 ED |**************..|
000017D0: 1F 21 35 8F 20 53 41 56 45 20 42 55 44 47 45 54 |.!5. SAVE BUDGET|
000017E0: 54 41 4C 20 50 41 41 20 42 41 41 4E 44 00 11 20 |TAL PAA BAAND.. |
000017F0: 23 35 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |#5.*************|
00001800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001810: 2A 00 2C 20 25 35 8D 32 30 34 30 30 3A 58 B2 30 |*., %5.20400:X.0|
00001820: 3A 59 B2 32 32 3A 8D 32 30 30 30 30 00 40 20 2A |:Y.22:.20000.@ *|
00001830: 35 9F 32 2C 31 2C 31 2C 22 42 55 44 47 45 54 22 |5.2,1,1,"BUDGET"|
00001840: 00 56 20 34 35 81 49 B2 30 A4 31 32 3A 81 49 49 |.V 45.I.0.12:.II|
00001850: B2 30 A4 31 30 30 00 6C 20 3E 35 98 32 2C 42 55 |.0.100.l >5.2,BU|
00001860: 28 49 2C 49 49 29 3A 82 49 49 2C 49 00 75 20 48 |(I,II):.II,I.u H|
00001870: 35 A0 32 3A 8E 00 99 20 52 35 8F 2A 2A 2A 2A 2A |5.2:... R5.*****|
00001880: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001890: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B8 20 53 35 8F 20 |*********.. S5. |
000018A0: 4C 4F 41 44 20 42 55 44 47 45 54 54 41 4C 20 46 |LOAD BUDGETTAL F|
000018B0: 52 41 20 42 41 41 4E 44 00 DC 20 55 35 8F 2A 2A |RA BAAND.. U5.**|
000018C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000018D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 F7 20 57 |************.. W|
000018E0: 35 8D 32 30 34 30 30 3A 58 B2 30 3A 59 B2 32 30 |5.20400:X.0:Y.20|
000018F0: 3A 8D 32 30 30 30 30 00 0B 21 5C 35 9F 32 2C 31 |:.20000..!\5.2,1|
00001900: 2C 30 2C 22 42 55 44 47 45 54 22 00 21 21 66 35 |,0,"BUDGET".!!f5|
00001910: 81 49 B2 30 A4 31 32 3A 81 49 49 B2 30 A4 31 30 |.I.0.12:.II.0.10|
00001920: 30 00 37 21 70 35 84 32 2C 42 55 28 49 2C 49 49 |0.7!p5.2,BU(I,II|
00001930: 29 3A 82 49 49 2C 49 00 40 21 7A 35 A0 32 3A 8E |):.II,I.@!z5.2:.|
00001940: 00 64 21 B0 36 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.d!.6.**********|
00001950: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001960: 2A 2A 2A 2A 00 83 21 B1 36 8F 20 50 52 49 4E 54 |****..!.6. PRINT|
00001970: 20 42 55 44 47 45 54 20 2D 20 55 4E 44 45 52 4D | BUDGET - UNDERM|
00001980: 45 4E 55 00 A7 21 B3 36 8F 2A 2A 2A 2A 2A 2A 2A |ENU..!.6.*******|
00001990: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000019A0: 2A 2A 2A 2A 2A 2A 2A 00 D6 21 BA 36 99 22 93 22 |*******..!.6."."|
000019B0: 3A 58 B2 31 32 3A 59 B2 33 3A 8D 32 30 30 30 30 |:X.12:Y.3:.20000|
000019C0: 3A 99 22 12 20 50 52 49 4E 54 20 42 55 44 47 45 |:.". PRINT BUDGE|
000019D0: 54 54 41 4C 20 22 00 02 22 C4 36 58 B2 38 3A 59 |TTAL "..".6X.8:Y|
000019E0: B2 37 3A 8D 32 30 30 30 30 3A 99 22 31 20 4F 50 |.7:.20000:."1 OP|
000019F0: 53 55 4D 4D 45 52 49 4E 47 20 41 46 20 44 41 54 |SUMMERING AF DAT|
00001A00: 41 22 00 2B 22 CE 36 58 B2 38 3A 59 B2 39 3A 8D |A".+".6X.8:Y.9:.|
00001A10: 32 30 30 30 30 3A 99 22 32 20 50 52 49 4E 54 20 |20000:."2 PRINT |
00001A20: 50 41 41 20 53 4B 41 45 52 4D 22 00 44 22 D8 36 |PAA SKAERM".D".6|
00001A30: 58 B2 38 3A 59 B2 31 31 3A 8D 32 30 30 30 30 3A |X.8:Y.11:.20000:|
00001A40: 99 22 33 22 00 67 22 DD 36 58 B2 38 3A 59 B2 31 |."3".g".6X.8:Y.1|
00001A50: 33 3A 8D 32 30 30 30 30 3A 99 22 34 20 48 4F 56 |3:.20000:."4 HOV|
00001A60: 45 44 4D 45 4E 55 22 00 83 22 E2 36 58 B2 30 3A |EDMENU"..".6X.0:|
00001A70: 59 B2 31 37 3A 8D 32 30 30 30 30 3A 99 53 54 52 |Y.17:.20000:.STR|
00001A80: 45 47 24 00 AB 22 EC 36 58 B2 31 33 3A 59 B2 32 |EG$..".6X.13:Y.2|
00001A90: 32 3A 8D 32 30 30 30 30 3A 99 22 12 20 49 4E 44 |2:.20000:.". IND|
00001AA0: 54 41 53 54 20 31 2D 34 20 92 22 00 D1 22 F6 36 |TAST 1-4 ."..".6|
00001AB0: 58 B2 31 37 3A 59 B2 32 32 3A 8D 32 30 30 30 30 |X.17:Y.22:.20000|
00001AC0: 3A A1 51 24 3A 8B 51 24 B2 22 22 A7 31 34 30 37 |:.Q$:.Q$."".1407|
00001AD0: 30 00 E3 22 00 37 8B 51 24 B2 22 31 22 A7 31 34 |0..".7.Q$."1".14|
00001AE0: 32 30 30 00 F5 22 0A 37 8B 51 24 B2 22 32 22 A7 |200..".7.Q$."2".|
00001AF0: 31 34 34 30 30 00 07 23 14 37 8B 51 24 B2 22 33 |14400..#.7.Q$."3|
00001B00: 22 A7 31 34 36 30 30 00 19 23 1E 37 8B 51 24 B2 |".14600..#.7.Q$.|
00001B10: 22 34 22 A7 32 39 30 30 30 00 24 23 28 37 89 31 |"4".29000.$#(7.1|
00001B20: 34 30 37 30 00 48 23 78 37 8F 2A 2A 2A 2A 2A 2A |4070.H#x7.******|
00001B30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001B40: 2A 2A 2A 2A 2A 2A 2A 2A 00 62 23 79 37 8F 20 4F |********.b#y7. O|
00001B50: 50 53 55 4D 4D 45 52 49 4E 47 20 41 46 20 44 41 |PSUMMERING AF DA|
00001B60: 54 41 00 86 23 7B 37 8F 2A 2A 2A 2A 2A 2A 2A 2A |TA..#{7.********|
00001B70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001B80: 2A 2A 2A 2A 2A 2A 00 AE 23 7D 37 58 B2 31 33 3A |******..#}7X.13:|
00001B90: 59 B2 32 32 3A 8D 32 30 30 30 30 3A 99 22 12 20 |Y.22:.20000:.". |
00001BA0: 56 45 4E 54 20 31 20 4D 49 4E 55 54 20 22 00 D7 |VENT 1 MINUT "..|
00001BB0: 23 82 37 81 59 B2 30 A4 31 31 3A 81 58 B2 31 30 |#.7.Y.0.11:.X.10|
00001BC0: A4 39 30 A9 31 30 3A 42 55 28 59 2C 58 29 B2 30 |.90.10:BU(Y,X).0|
00001BD0: 3A 81 5A B2 31 A4 39 00 F5 23 8C 37 42 55 28 59 |:.Z.1.9..#.7BU(Y|
00001BE0: 2C 58 29 B2 42 55 28 59 2C 58 29 AA 42 55 28 59 |,X).BU(Y,X).BU(Y|
00001BF0: 2C 58 AA 5A 29 00 00 24 96 37 82 5A 2C 58 2C 59 |,X.Z)..$.7.Z,X,Y|
00001C00: 00 20 24 A0 37 81 58 B2 31 30 A4 39 39 3A 42 55 |. $.7.X.10.99:BU|
00001C10: 28 31 32 2C 58 29 B2 30 3A 81 59 B2 30 A4 31 31 |(12,X).0:.Y.0.11|
00001C20: 00 3E 24 AA 37 42 55 28 31 32 2C 58 29 B2 42 55 |.>$.7BU(12,X).BU|
00001C30: 28 31 32 2C 58 29 AA 42 55 28 59 2C 58 29 00 47 |(12,X).BU(Y,X).G|
00001C40: 24 B4 37 82 59 2C 58 00 6B 24 BE 37 81 58 B2 30 |$.7.Y,X.k$.7.X.0|
00001C50: A4 31 32 3A 42 55 28 58 2C 31 30 30 29 B2 30 3A |.12:BU(X,100).0:|
00001C60: 81 59 B2 32 30 A4 39 30 A9 31 30 00 8B 24 C8 37 |.Y.20.90.10..$.7|
00001C70: 42 55 28 58 2C 31 30 30 29 B2 42 55 28 58 2C 31 |BU(X,100).BU(X,1|
00001C80: 30 30 29 AA 42 55 28 58 2C 59 29 00 94 24 D2 37 |00).BU(X,Y)..$.7|
00001C90: 82 59 2C 58 00 BD 24 DC 37 81 59 B2 30 A4 31 32 |.Y,X..$.7.Y.0.12|
00001CA0: 3A 42 55 28 59 2C 31 29 B2 42 55 28 59 2C 31 30 |:BU(Y,1).BU(Y,10|
00001CB0: 29 AB 42 55 28 59 2C 31 30 30 29 3A 82 00 F3 24 |).BU(Y,100):...$|
00001CC0: E6 37 42 55 28 30 2C 32 29 B2 30 3A 8F 20 4F 56 |.7BU(0,2).0:. OV|
00001CD0: 45 52 46 30 52 54 20 46 52 41 20 53 49 44 53 54 |ERF0RT FRA SIDST|
00001CE0: 45 20 41 41 52 20 2D 20 52 45 54 54 45 53 20 45 |E AAR - RETTES E|
00001CF0: 56 54 2E 00 0F 25 F0 37 42 55 28 30 2C 33 29 B2 |VT...%.7BU(0,3).|
00001D00: 42 55 28 30 2C 31 29 AA 42 55 28 30 2C 32 29 00 |BU(0,1).BU(0,2).|
00001D10: 47 25 FA 37 81 58 B2 31 A4 31 31 3A 42 55 28 58 |G%.7.X.1.11:BU(X|
00001D20: 2C 32 29 B2 42 55 28 58 AB 31 2C 33 29 3A 42 55 |,2).BU(X.1,3):BU|
00001D30: 28 58 2C 33 29 B2 42 55 28 58 2C 31 29 AA 42 55 |(X,3).BU(X,1).BU|
00001D40: 28 58 2C 32 29 3A 82 00 52 25 04 38 89 31 34 30 |(X,2):..R%.8.140|
00001D50: 30 30 00 76 25 40 38 8F 2A 2A 2A 2A 2A 2A 2A 2A |00.v%@8.********|
00001D60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001D70: 2A 2A 2A 2A 2A 2A 00 98 25 41 38 8F 20 50 52 49 |******..%A8. PRI|
00001D80: 4E 54 20 42 55 44 47 45 54 4F 56 45 52 53 49 47 |NT BUDGETOVERSIG|
00001D90: 54 20 53 4B 41 45 52 4D 00 BC 25 43 38 8F 2A 2A |T SKAERM..%C8.**|
00001DA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001DB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 C4 25 45 |************..%E|
00001DC0: 38 49 B2 30 00 DB 25 4A 38 99 22 93 22 3A 8B 51 |8I.0..%J8.".":.Q|
00001DD0: 24 B2 22 2B 22 A7 49 B2 49 AA 31 00 ED 25 4B 38 |$."+".I.I.1..%K8|
00001DE0: 8B 51 24 B2 22 2D 22 A7 49 B2 49 AB 31 00 FB 25 |.Q$."-".I.I.1..%|
00001DF0: 4C 38 8B 49 B1 31 31 A7 49 B2 30 00 09 26 4D 38 |L8.I.11.I.0..&M8|
00001E00: 8B 49 B3 30 A7 49 B2 31 31 00 31 26 54 38 58 B2 |.I.0.I.11.1&T8X.|
00001E10: 30 3A 59 B2 31 3A 8D 32 30 30 30 30 3A 99 22 12 |0:Y.1:.20000:.".|
00001E20: 20 42 55 44 47 45 54 4F 56 45 52 53 49 47 54 20 | BUDGETOVERSIGT |
00001E30: 22 00 50 26 5E 38 58 B2 32 32 3A 59 B2 31 3A 8D |".P&^8X.22:Y.1:.|
00001E40: 32 30 30 30 30 3A 99 22 12 22 4D 44 24 28 49 29 |20000:."."MD$(I)|
00001E50: 00 70 26 68 38 58 B2 33 32 3A 59 B2 31 3A 8D 32 |.p&h8X.32:Y.1:.2|
00001E60: 30 30 30 30 3A 99 22 12 20 54 4F 54 41 4C 20 22 |0000:.". TOTAL "|
00001E70: 00 8C 26 72 38 58 B2 30 3A 59 B2 34 3A 8D 32 30 |..&r8X.0:Y.4:.20|
00001E80: 30 30 30 3A 99 54 45 24 28 31 30 29 00 B7 26 77 |000:.TE$(10)..&w|
00001E90: 38 58 B2 32 30 3A 59 B2 35 3A 8D 32 30 30 30 30 |8X.20:Y.5:.20000|
00001EA0: 3A 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |:."=============|
00001EB0: 3D 3D 3D 3D 3D 3D 22 00 C8 26 7C 38 81 49 49 B2 |======"..&|8.II.|
00001EC0: 32 30 A4 39 30 A9 31 30 00 EF 26 86 38 58 B2 30 |20.90.10..&.8X.0|
00001ED0: 3A 59 B2 28 49 49 AB 32 30 29 AD 31 30 AA 38 3A |:Y.(II.20).10.8:|
00001EE0: 8D 32 30 30 30 30 3A 99 54 45 24 28 49 49 29 00 |.20000:.TE$(II).|
00001EF0: F7 26 90 38 82 49 49 00 23 27 9A 38 58 B2 32 30 |.&.8.II.#'.8X.20|
00001F00: 3A 59 B2 31 36 3A 8D 32 30 30 30 30 3A 99 22 2D |:Y.16:.20000:."-|
00001F10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001F20: 2D 2D 22 00 4A 27 A4 38 58 B2 30 3A 3A 59 B2 31 |--".J'.8X.0::Y.1|
00001F30: 37 3A 8D 32 30 30 30 30 3A 99 22 55 44 47 49 46 |7:.20000:."UDGIF|
00001F40: 54 45 52 20 54 4F 54 41 4C 22 00 67 27 AE 38 58 |TER TOTAL".g'.8X|
00001F50: B2 30 3A 59 B2 31 38 3A 8D 32 30 30 30 30 3A 99 |.0:Y.18:.20000:.|
00001F60: 22 49 4E 44 54 2E 22 00 93 27 B8 38 58 B2 32 30 |"INDT."..'.8X.20|
00001F70: 3A 59 B2 31 39 3A 8D 32 30 30 30 30 3A 99 22 2D |:Y.19:.20000:."-|
00001F80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001F90: 2D 2D 22 00 B3 27 C2 38 58 B2 30 3A 59 B2 32 31 |--"..'.8X.0:Y.21|
00001FA0: 3A 8D 32 30 30 30 30 3A 99 22 4F 56 45 52 46 30 |:.20000:."OVERF0|
00001FB0: 52 54 22 00 DF 27 CC 38 58 B2 32 30 3A 59 B2 32 |RT"..'.8X.20:Y.2|
00001FC0: 32 3A 8D 32 30 30 30 30 3A 99 22 2D 2D 2D 2D 2D |2:.20000:."-----|
00001FD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".|
00001FE0: 02 28 D6 38 58 B2 30 3A 59 B2 32 33 3A 8D 32 30 |.(.8X.0:Y.23:.20|
00001FF0: 30 30 30 3A 99 22 41 54 20 4F 56 45 52 46 30 52 |000:."AT OVERF0R|
00002000: 45 22 00 0D 28 FE 38 8D 31 34 37 30 30 00 22 28 |E"..(.8.14700."(|
00002010: 08 39 A1 51 24 3A 8B 51 24 B2 22 22 A7 31 34 36 |.9.Q$:.Q$."".146|
00002020: 30 30 00 3B 28 12 39 8B 51 24 B2 22 2B 22 B0 51 |00.;(.9.Q$."+".Q|
00002030: 24 B2 22 2D 22 A7 31 34 34 31 30 00 4D 28 17 39 |$."-".14410.M(.9|
00002040: 8B 51 24 B2 22 5E 22 A7 31 34 30 30 30 00 58 28 |.Q$."^".14000.X(|
00002050: 1C 39 89 31 34 36 30 30 00 7C 28 6C 39 8F 2A 2A |.9.14600.|(l9.**|
00002060: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002070: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 9D 28 6D |************..(m|
00002080: 39 8F 20 50 52 49 4E 54 20 42 55 44 47 45 54 54 |9. PRINT BUDGETT|
00002090: 41 4C 20 50 41 41 20 53 4B 41 45 52 4D 00 C1 28 |AL PAA SKAERM..(|
000020A0: 6F 39 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |o9.*************|
000020B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000020C0: 2A 00 F5 28 76 39 42 45 B2 42 55 28 49 2C 31 30 |*..(v9BE.BU(I,10|
000020D0: 29 3A 8D 32 30 35 30 30 3A 58 B2 32 32 AA 48 4D |):.20500:X.22.HM|
000020E0: 3A 59 B2 34 3A 8D 32 30 30 30 30 3A 99 42 55 28 |:Y.4:.20000:.BU(|
000020F0: 49 2C 31 30 29 00 2B 29 80 39 42 45 B2 42 55 28 |I,10).+).9BE.BU(|
00002100: 31 32 2C 31 30 29 3A 8D 32 30 35 30 30 3A 58 B2 |12,10):.20500:X.|
00002110: 33 32 AA 48 4D 3A 59 B2 34 3A 8D 32 30 30 30 30 |32.HM:Y.4:.20000|
00002120: 3A 99 42 55 28 31 32 2C 31 30 29 00 3C 29 8A 39 |:.BU(12,10).<).9|
00002130: 81 49 49 B2 32 30 A4 39 30 A9 31 30 00 7B 29 94 |.II.20.90.10.{).|
00002140: 39 42 45 B2 42 55 28 49 2C 49 49 29 3A 8D 32 30 |9BE.BU(I,II):.20|
00002150: 35 30 30 3A 58 B2 32 32 AA 48 4D 3A 59 B2 28 49 |500:X.22.HM:Y.(I|
00002160: 49 AB 32 30 29 AD 31 30 AA 38 3A 8D 32 30 30 30 |I.20).10.8:.2000|
00002170: 30 3A 99 42 55 28 49 2C 49 49 29 00 BC 29 9E 39 |0:.BU(I,II)..).9|
00002180: 42 45 B2 42 55 28 31 32 2C 49 49 29 3A 8D 32 30 |BE.BU(12,II):.20|
00002190: 35 30 30 3A 58 B2 33 32 AA 48 4D 3A 59 B2 28 49 |500:X.32.HM:Y.(I|
000021A0: 49 AB 32 30 29 AD 31 30 AA 38 3A 8D 32 30 30 30 |I.20).10.8:.2000|
000021B0: 30 3A 99 42 55 28 31 32 2C 49 49 29 00 C2 29 A8 |0:.BU(12,II)..).|
000021C0: 39 82 00 F9 29 A9 39 42 45 B2 42 55 28 49 2C 31 |9...).9BE.BU(I,1|
000021D0: 30 30 29 3A 8D 32 30 35 30 30 3A 58 B2 32 32 AA |00):.20500:X.22.|
000021E0: 48 4D 3A 59 B2 31 37 3A 8D 32 30 30 30 30 3A 99 |HM:Y.17:.20000:.|
000021F0: 42 55 28 49 2C 31 30 30 29 00 32 2A AA 39 42 45 |BU(I,100).2*.9BE|
00002200: B2 42 55 28 31 32 2C 31 30 30 29 3A 8D 32 30 35 |.BU(12,100):.205|
00002210: 30 30 3A 58 B2 33 32 AA 48 4D 3A 59 B2 31 37 3A |00:X.32.HM:Y.17:|
00002220: 8D 32 30 30 30 30 3A 99 42 55 28 31 32 2C 31 30 |.20000:.BU(12,10|
00002230: 30 29 00 67 2A AB 39 42 45 B2 42 55 28 49 2C 31 |0).g*.9BE.BU(I,1|
00002240: 30 29 3A 8D 32 30 35 30 30 3A 58 B2 32 32 AA 48 |0):.20500:X.22.H|
00002250: 4D 3A 59 B2 31 38 3A 8D 32 30 30 30 30 3A 99 42 |M:Y.18:.20000:.B|
00002260: 55 28 49 2C 31 30 29 00 9E 2A AC 39 42 45 B2 42 |U(I,10)..*.9BE.B|
00002270: 55 28 31 32 2C 31 30 29 3A 8D 32 30 35 30 30 3A |U(12,10):.20500:|
00002280: 58 B2 33 32 AA 48 4D 3A 59 B2 31 38 3A 8D 32 30 |X.32.HM:Y.18:.20|
00002290: 30 30 30 3A 99 42 55 28 31 32 2C 31 30 29 00 D1 |000:.BU(12,10)..|
000022A0: 2A B2 39 42 45 B2 42 55 28 49 2C 31 29 3A 8D 32 |*.9BE.BU(I,1):.2|
000022B0: 30 35 30 30 3A 58 B2 32 32 AA 48 4D 3A 59 B2 32 |0500:X.22.HM:Y.2|
000022C0: 30 3A 8D 32 30 30 30 30 3A 99 42 55 28 49 2C 31 |0:.20000:.BU(I,1|
000022D0: 29 00 06 2B BC 39 42 45 B2 42 55 28 31 32 2C 31 |)..+.9BE.BU(12,1|
000022E0: 29 3A 8D 32 30 35 30 30 3A 58 B2 33 32 AA 48 4D |):.20500:X.32.HM|
000022F0: 3A 59 B2 32 30 3A 8D 32 30 30 30 30 3A 99 42 55 |:Y.20:.20000:.BU|
00002300: 28 31 32 2C 31 29 00 39 2B C6 39 42 45 B2 42 55 |(12,1).9+.9BE.BU|
00002310: 28 49 2C 32 29 3A 8D 32 30 35 30 30 3A 58 B2 32 |(I,2):.20500:X.2|
00002320: 32 AA 48 4D 3A 59 B2 32 31 3A 8D 32 30 30 30 30 |2.HM:Y.21:.20000|
00002330: 3A 99 42 55 28 49 2C 32 29 00 6C 2B D0 39 42 45 |:.BU(I,2).l+.9BE|
00002340: B2 42 55 28 49 2C 33 29 3A 8D 32 30 35 30 30 3A |.BU(I,3):.20500:|
00002350: 58 B2 32 32 AA 48 4D 3A 59 B2 32 33 3A 8D 32 30 |X.22.HM:Y.23:.20|
00002360: 30 30 30 3A 99 42 55 28 49 2C 33 29 00 72 2B DA |000:.BU(I,3).r+.|
00002370: 39 8E 00 96 2B 20 4E 8F 2A 2A 2A 2A 2A 2A 2A 2A |9...+ N.********|
00002380: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002390: 2A 2A 2A 2A 2A 2A 00 B7 2B 21 4E 8F 20 53 55 42 |******..+!N. SUB|
000023A0: 2E 20 54 49 4C 20 50 52 49 4E 54 20 41 46 20 58 |. TIL PRINT AF X|
000023B0: 2C 59 20 50 4F 53 2E 00 DB 2B 22 4E 8F 2A 2A 2A |,Y POS...+"N.***|
000023C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000023D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E5 2B 2A 4E |***********..+*N|
000023E0: 99 22 13 22 3B 00 FE 2B 34 4E 8B 20 59 B3 B1 30 |.".";..+4N. Y..0|
000023F0: 20 A7 20 97 20 32 31 34 2C 59 AB 31 3A 99 00 0A | . . 214,Y.1:...|
00002400: 2C 3E 4E 97 20 32 31 31 2C 58 00 10 2C 48 4E 8E |,>N. 211,X..,HN.|
00002410: 00 34 2C E8 4E 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.4,.N.**********|
00002420: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002430: 2A 2A 2A 2A 00 57 2C E9 4E 8F 20 53 55 42 2E 20 |****.W,.N. SUB. |
00002440: 54 49 4C 20 50 52 49 4E 54 20 41 46 20 4B 4F 4E |TIL PRINT AF KON|
00002450: 54 4F 54 45 4B 53 54 00 7B 2C EB 4E 8F 2A 2A 2A |TOTEKST.{,.N.***|
00002460: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002470: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A0 2C F2 4E |***********..,.N|
00002480: 58 B2 31 30 3A 59 B2 38 AA 59 59 3A 8D 32 30 30 |X.10:Y.8.YY:.200|
00002490: 30 30 3A 8B 4B 4E B3 31 30 A7 53 24 B2 22 20 22 |00:.KN.10.S$." "|
000024A0: 00 BF 2C FC 4E 99 53 24 3B 4B 4E 3B 22 12 22 A6 |..,.N.S$;KN;".".|
000024B0: 31 29 C9 28 54 45 24 28 4B 4E 29 2C 31 36 29 00 |1).(TE$(KN),16).|
000024C0: CB 2C 06 4F 53 24 B2 22 22 3A 8E 00 FD 2C 10 4F |.,.OS$."":...,.O|
000024D0: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
000024E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000024F0: 20 20 20 20 20 20 20 20 20 20 22 3A 8E 00 21 2D | ":..!-|
00002500: B0 4F 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.O.*************|
00002510: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002520: 2A 00 3C 2D B1 4F 8F 20 53 55 42 2E 20 48 45 4C |*.<-.O. SUB. HEL|
00002530: 20 42 4C 41 4E 4B 20 4C 49 4E 49 45 00 60 2D B3 | BLANK LINIE.`-.|
00002540: 4F 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |O.**************|
00002550: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002560: 00 74 2D BA 4F 58 B2 30 3A 59 B2 32 32 3A 8D 32 |.t-.OX.0:Y.22:.2|
00002570: 30 30 30 30 00 A6 2D C4 4F 99 22 20 20 20 20 20 |0000..-.O." |
00002580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000025A0: 20 20 20 22 3A 8E 00 CA 2D 14 50 8F 2A 2A 2A 2A | ":...-.P.****|
000025B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000025C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 EC 2D 15 50 8F |**********..-.P.|
000025D0: 20 53 55 42 2E 20 48 30 4A 52 45 20 4D 41 52 47 | SUB. H0JRE MARG|
000025E0: 49 4E 20 46 4F 52 20 42 45 4C 30 42 00 10 2E 17 |IN FOR BEL0B....|
000025F0: 50 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |P.**************|
00002600: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002610: 00 26 2E 1E 50 8B B6 28 42 45 29 B3 31 30 A7 20 |.&..P..(BE).10. |
00002620: 48 4D B2 35 3A 8E 00 3D 2E 28 50 8B B6 28 42 45 |HM.5:..=.(P..(BE|
00002630: 29 B3 31 30 30 A7 20 48 4D B2 34 3A 8E 00 55 2E |).100. HM.4:..U.|
00002640: 32 50 8B B6 28 42 45 29 B3 31 30 30 30 A7 20 48 |2P..(BE).1000. H|
00002650: 4D B2 33 3A 8E 00 6E 2E 3C 50 8B B6 28 42 45 29 |M.3:..n.<P..(BE)|
00002660: B3 31 30 30 30 30 A7 20 48 4D B2 32 3A 8E 00 88 |.10000. HM.2:...|
00002670: 2E 46 50 8B B6 28 42 45 29 B3 31 30 30 30 30 30 |.FP..(BE).100000|
00002680: A7 20 48 4D B2 31 3A 8E 00 A3 2E 50 50 8B B6 28 |. HM.1:....PP..(|
00002690: 42 45 29 B3 31 30 30 30 30 30 30 A7 20 48 4D B2 |BE).1000000. HM.|
000026A0: 30 3A 8E 00 C7 2E A8 61 8F 2A 2A 2A 2A 2A 2A 2A |0:.....a.*******|
000026B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000026C0: 2A 2A 2A 2A 2A 2A 2A 00 E7 2E A9 61 8F 20 53 55 |*******....a. SU|
000026D0: 42 2E 20 52 41 45 4B 4B 45 53 55 4D 20 46 4F 52 |B. RAEKKESUM FOR|
000026E0: 20 42 55 44 47 45 54 00 0B 2F AA 61 8F 2A 2A 2A | BUDGET../.a.***|
000026F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002700: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 1B 2F B2 61 |***********../.a|
00002710: 42 55 28 31 32 2C 4B 4E 29 B2 30 00 48 2F BC 61 |BU(12,KN).0.H/.a|
00002720: 81 49 B2 30 A4 31 31 3A 42 55 28 31 32 2C 4B 4E |.I.0.11:BU(12,KN|
00002730: 29 B2 42 55 28 31 32 2C 4B 4E 29 AA 42 55 28 49 |).BU(12,KN).BU(I|
00002740: 2C 4B 4E 29 3A 82 3A 8E 00 6C 2F 0C 62 8F 2A 2A |,KN):.:..l/.b.**|
00002750: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002760: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 88 2F 0D |************../.|
00002770: 62 8F 20 53 55 42 2E 4B 4F 4C 4F 4E 4E 45 53 55 |b. SUB.KOLONNESU|
00002780: 4D 20 42 55 44 47 45 54 00 AC 2F 0F 62 8F 2A 2A |M BUDGET../.b.**|
00002790: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000027A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 BD 2F 16 |************../.|
000027B0: 62 42 55 28 4D 44 25 2C 47 52 29 B2 30 00 F0 2F |bBU(MD%,GR).0../|
000027C0: 20 62 81 20 49 B2 31 A4 39 3A 42 55 28 4D 44 25 | b. I.1.9:BU(MD%|
000027D0: 2C 47 52 29 B2 42 55 28 4D 44 25 2C 47 52 29 AA |,GR).BU(MD%,GR).|
000027E0: 42 55 28 4D 44 25 2C 47 52 AA 49 29 3A 82 3A 8E |BU(MD%,GR.I):.:.|
000027F0: 00 14 30 48 71 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..0Hq.**********|
00002800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002810: 2A 2A 2A 2A 00 24 30 49 71 8F 20 48 4F 56 45 44 |****.$0Iq. HOVED|
00002820: 4D 45 4E 55 00 48 30 4B 71 8F 2A 2A 2A 2A 2A 2A |MENU.H0Kq.******|
00002830: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002840: 2A 2A 2A 2A 2A 2A 2A 2A 00 64 30 52 71 99 22 93 |********.d0Rq.".|
00002850: 05 22 3A 97 35 33 32 38 30 2C 30 3A 97 35 33 32 |.":.53280,0:.532|
00002860: 38 31 2C 32 00 94 30 5C 71 58 B2 37 3A 59 B2 31 |81,2..0\qX.7:Y.1|
00002870: 3A 8D 32 30 30 30 30 3A 99 22 52 20 55 20 4E 20 |:.20000:."R U N |
00002880: 2D 20 43 4F 4D 4D 4F 44 4F 52 45 20 4D 41 47 41 |- COMMODORE MAGA|
00002890: 53 49 4E 22 00 BB 30 66 71 58 B2 31 32 3A 59 B2 |SIN"..0fqX.12:Y.|
000028A0: 33 3A 8D 32 30 30 30 30 3A 99 22 50 52 49 56 41 |3:.20000:."PRIVA|
000028B0: 54 52 45 47 4E 53 4B 41 42 2E 22 00 E5 30 70 71 |TREGNSKAB."..0pq|
000028C0: 58 B2 31 31 3A 59 B2 35 3A 8D 32 30 30 30 30 3A |X.11:Y.5:.20000:|
000028D0: 99 22 12 48 20 4F 20 56 20 45 20 44 20 4D 20 45 |.".H O V E D M E|
000028E0: 20 4E 20 55 22 00 01 31 7A 71 58 B2 30 3A 59 B2 | N U"..1zqX.0:Y.|
000028F0: 32 30 3A 8D 32 30 30 30 30 3A 99 53 54 52 45 47 |20:.20000:.STREG|
00002900: 24 00 38 31 84 71 58 B2 32 3A 59 B2 37 3A 8D 32 |$.81.qX.2:Y.7:.2|
00002910: 30 30 30 30 3A 99 22 20 31 29 20 4B 4F 4E 54 4F |0000:." 1) KONTO|
00002920: 50 4C 41 4E 20 4F 50 53 54 49 4C 4C 49 4E 47 2F |PLAN OPSTILLING/|
00002930: 52 45 54 54 45 4C 53 45 00 6C 31 8E 71 58 B2 32 |RETTELSE.l1.qX.2|
00002940: 3A 59 B2 38 3A 8D 32 30 30 30 30 3A 99 22 20 32 |:Y.8:.20000:." 2|
00002950: 29 20 42 55 44 47 45 54 20 4F 50 53 54 49 4C 4C |) BUDGET OPSTILL|
00002960: 49 4E 47 2F 52 45 54 54 45 4C 53 45 00 98 31 98 |ING/RETTELSE..1.|
00002970: 71 58 B2 32 3A 59 B2 39 3A 8D 32 30 30 30 30 3A |qX.2:Y.9:.20000:|
00002980: 99 22 20 33 29 20 50 52 49 4E 54 20 41 46 20 42 |." 3) PRINT AF B|
00002990: 55 44 47 45 54 54 41 4C 00 B2 31 A2 71 58 B2 32 |UDGETTAL..1.qX.2|
000029A0: 3A 59 B2 31 30 3A 8D 32 30 30 30 30 3A 99 22 20 |:Y.10:.20000:." |
000029B0: 34 29 00 CC 31 AC 71 58 B2 32 3A 59 B2 31 31 3A |4)..1.qX.2:Y.11:|
000029C0: 8D 32 30 30 30 30 3A 99 22 20 35 29 00 E6 31 B6 |.20000:." 5)..1.|
000029D0: 71 58 B2 32 3A 59 B2 31 32 3A 8D 32 30 30 30 30 |qX.2:Y.12:.20000|
000029E0: 3A 99 22 20 36 29 00 00 32 C0 71 58 B2 32 3A 59 |:." 6)..2.qX.2:Y|
000029F0: B2 31 33 3A 8D 32 30 30 30 30 3A 99 22 20 37 29 |.13:.20000:." 7)|
00002A00: 00 1A 32 CA 71 58 B2 32 3A 59 B2 31 34 3A 8D 32 |..2.qX.2:Y.14:.2|
00002A10: 30 30 30 30 3A 99 22 20 38 29 00 34 32 D4 71 58 |0000:." 8).42.qX|
00002A20: B2 32 3A 59 B2 31 35 3A 8D 32 30 30 30 30 3A 99 |.2:Y.15:.20000:.|
00002A30: 22 20 39 29 00 61 32 DE 71 58 B2 32 3A 59 B2 31 |" 9).a2.qX.2:Y.1|
00002A40: 36 3A 8D 32 30 30 30 30 3A 99 22 31 30 29 20 4C |6:.20000:."10) L|
00002A50: 4F 41 44 20 44 49 56 45 52 53 45 20 46 49 4C 45 |OAD DIVERSE FILE|
00002A60: 52 00 8E 32 E8 71 58 B2 32 3A 59 B2 31 37 3A 8D |R..2.qX.2:Y.17:.|
00002A70: 32 30 30 30 30 3A 99 22 31 31 29 20 53 41 56 45 |20000:."11) SAVE|
00002A80: 20 44 49 56 45 52 53 45 20 46 49 4C 45 52 00 B7 | DIVERSE FILER..|
00002A90: 32 F2 71 58 B2 32 3A 59 B2 31 38 3A 8D 32 30 30 |2.qX.2:Y.18:.200|
00002AA0: 30 30 3A 99 22 31 32 29 20 41 46 53 4C 55 54 20 |00:."12) AFSLUT |
00002AB0: 50 52 4F 47 52 41 4D 00 CB 32 FC 71 58 B2 38 3A |PROGRAM..2.qX.8:|
00002AC0: 59 B2 32 32 3A 8D 32 30 30 30 30 00 ED 32 06 72 |Y.22:.20000..2.r|
00002AD0: 85 22 12 20 49 4E 44 54 41 53 54 20 56 41 4C 47 |.". INDTAST VALG|
00002AE0: 20 28 31 2D 31 32 29 20 92 22 3B 51 25 00 04 33 | (1-12) .";Q%..3|
00002AF0: 10 72 8B 20 51 25 B3 31 B0 51 25 B1 31 32 A7 32 |.r. Q%.1.Q%.12.2|
00002B00: 39 31 38 30 00 36 33 1A 72 91 51 25 89 31 31 30 |9180.63.r.Q%.110|
00002B10: 30 30 2C 31 32 30 30 30 2C 31 34 30 30 30 2C 2C |00,12000,14000,,|
00002B20: 2C 2C 2C 2C 2C 32 39 33 30 30 2C 32 39 33 30 30 |,,,,,29300,29300|
00002B30: 2C 32 39 39 39 39 00 5A 33 74 72 8F 2A 2A 2A 2A |,29999.Z3tr.****|
00002B40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002B50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 78 33 75 72 8F |**********.x3ur.|
00002B60: 20 42 49 4C 4C 45 44 45 20 53 41 56 45 20 44 49 | BILLEDE SAVE DI|
00002B70: 56 2E 20 46 49 4C 45 52 00 9C 33 77 72 8F 2A 2A |V. FILER..3wr.**|
00002B80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002B90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B5 33 7E |************..3~|
00002BA0: 72 99 22 93 22 3A 58 B2 31 30 3A 59 B2 33 3A 8D |r.".":X.10:Y.3:.|
00002BB0: 32 30 30 30 30 00 DB 33 88 72 8B 51 25 B2 31 30 |20000..3.r.Q%.10|
00002BC0: 20 A7 20 99 22 12 20 4C 4F 41 44 20 44 49 56 45 | . .". LOAD DIVE|
00002BD0: 52 53 45 20 46 49 4C 45 52 20 22 00 01 34 92 72 |RSE FILER "..4.r|
00002BE0: 8B 51 25 B2 31 31 20 A7 20 99 22 12 20 53 41 56 |.Q%.11 . .". SAV|
00002BF0: 45 20 44 49 56 45 52 53 45 20 46 49 4C 45 52 20 |E DIVERSE FILER |
00002C00: 22 00 25 34 97 72 58 B2 33 3A 59 B2 38 3A 8D 32 |".%4.rX.3:Y.8:.2|
00002C10: 30 30 30 30 3A 99 22 31 29 20 42 55 44 47 45 54 |0000:."1) BUDGET|
00002C20: 46 49 4C 45 22 00 41 34 9C 72 58 B2 30 3A 59 B2 |FILE".A4.rX.0:Y.|
00002C30: 32 30 3A 8D 32 30 30 30 30 3A 99 53 54 52 45 47 |20:.20000:.STREG|
00002C40: 24 00 55 34 A6 72 58 B2 32 3A 59 B2 32 32 3A 8D |$.U4.rX.2:Y.22:.|
00002C50: 32 30 30 30 30 00 85 34 B0 72 99 22 12 20 92 54 |20000..4.r.". .T|
00002C60: 12 41 50 45 20 45 4C 4C 45 52 20 92 44 12 49 53 |.APE ELLER .D.IS|
00002C70: 4B 45 54 54 45 20 2D 20 49 4E 44 54 41 53 54 20 |KETTE - INDTAST |
00002C80: 54 2F 44 20 22 00 A4 34 BA 72 A1 51 24 3A 8B 51 |T/D "..4.r.Q$:.Q|
00002C90: 24 B3 B1 22 54 22 AF 51 24 B3 B1 22 44 22 A7 32 |$.."T".Q$.."D".2|
00002CA0: 39 33 37 30 00 C7 34 C4 72 58 B2 33 3A 59 B2 38 |9370..4.rX.3:Y.8|
00002CB0: 3A 8D 32 30 30 30 30 3A 99 22 31 29 20 42 55 44 |:.20000:."1) BUD|
00002CC0: 47 45 54 46 49 4C 45 00 E0 34 D8 72 8B 51 24 B2 |GETFILE..4.r.Q$.|
00002CD0: 22 54 22 AF 51 25 B2 31 30 A7 8D 31 33 36 35 30 |"T".Q%.10..13650|
00002CE0: 00 F9 34 E2 72 8B 51 24 B2 22 54 22 AF 51 25 B2 |..4.r.Q$."T".Q%.|
00002CF0: 31 31 A7 8D 31 33 36 30 30 00 12 35 EC 72 8B 51 |11..13600..5.r.Q|
00002D00: 24 B2 22 44 22 AF 51 25 B2 31 30 A7 8D 31 33 35 |$."D".Q%.10..135|
00002D10: 35 30 00 2B 35 F6 72 8B 51 24 B2 22 44 22 AF 51 |50.+5.r.Q$."D".Q|
00002D20: 25 B2 31 31 A7 8D 31 33 35 30 30 00 36 35 00 73 |%.11..13500.65.s|
00002D30: 89 32 39 30 30 30 00 41 35 2F 75 99 22 93 22 3A |.29000.A5/u.".":|
00002D40: 80 00 00 00 |.... |
..%..'.******************************.7.
.'. INITIALISER.[..'.*******************
***********.~..'.TE$(100):.MD$(12):.BU(1
2,100)...$'HJ$." "...
.'. I.0.100:TE$(I).HJ$:..A.8'G2.0...B'ST
REG$."CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
CCCCCC"...C'MD$(0)."JANUAR":MD$(1)."FEBR
UAR".>.D'MD$(2)."MARTS":MD$(3)."APRIL".]
.E'MD$(4)."MAJ":MD$(5)."JUNI"..F'MD$(6)
."JULI":MD$(7)."AUGUST"...G'MD$(8)."SEPT
EMBER":MD$(9)."OKTOBER".Q.H'MD$(10)."NOV
EMBER":MD$(11)."DECEMBER"...I'MD$(12)."T
OTAL"....*.29000....*.******************
************.6..*. BILLEDE TIL TEKSTREDI
GERING.Z..*.****************************
**....+X.10:Y.2:."..":.53281,2:.53280,0:
.20000....+.".REDIGERING AF TEKSTER."...
.+X.10:Y.6:. 20000.R. +."KONTO TEKS
T"...*+.I.0.9:X.15:Y.8.I...4+. 20000...>
+.". .":..,.C+X.0:Y.20:.2
0000:.STREG$.P..+.**********************
********.H.A+. INPUT NYE TEKSTER...B+.**
****************************...J+.20400:
X.2:Y.22:. 20000.V.T+. ".TAST KONTO,TEKS
T";Q$,QQ$:.Q$."".11210...U+.Q$."SAVE".Q$
."LOAD". QQ$.Q$:.11400...W+.Q$."MENU".29
000.0.X+.C(QQ$).16.QQ$.H(QQ$,16).J.Y+.C(
Q$).21.Q$.I(Q$,21).N.Z+Q$.Q$." ".QQ$.H(
HJ$,16.C(QQ$))....+.E(Q$).0.QQ$."*".1130
0....+. E(Q$).1 . E(Q$).100 . . 20400:.1
1210.X..+KN.E(Q$):G1.KN.(KN..(KN.10).10)
....+.G1..G2 . G2..0 . . 20400: .11210.;
..,TE$(KN).Q$:G2.G1:Q$."":YY.E(TE$(KN)).
.(E(TE$(KN)).10).10.R..,.20200:YY.0:.112
10.V.$,.******************************..
.%,. PRINT AF GAMLE KONTOTEKSTER...',.**
****************************....,KN.E(Q$
):KN.KN.1.(KN..(KN.10).10)...8,.YY.0 . 9
:KN.KN.1:.20200:....B,G2.0:. 11210.7..,
.******************************.W..,. LO
AD ELLER SAVE KONTOPLAN.{..,.***********
*******************....,X. 2:Y.22:.20000
.A..,.". .T.APE ELLER .D.ISKETTE - INDT
AST T/D "....,.Q$:.Q$.."T" . Q$.."D".114
30....,.QQ$."LOAD". 11460....,.Q$."D". 1
1500....,.Q$."T". 11600.2.D,.Q$."D". 115
50.E.N,.Q$."T". 11650.I..,.*************
*****************....,. SAVE KONTOPLAN P
AA DISKETTE....,.***********************
*******.M..,.1,8,2,"@0:KONTOPLAN,S,W"...
.-.I.0.100:.1,TE$(I):.....- 1:.11000...
.-.******************************.;..-.
LOAD KONTOPLAN FRA DISKETTE._.!-.*******
***********************.|.(-.1,8,2,"0:KO
NTOPLAN,S,R"...2-.I.0.100:.1,TE$(I)...7-
.TE$(I)."".TE$(I).HJ$...8-..I.<- 1:QQ$.
"":.11000...P-.*************************
*****...Q-. SAVE KONTOPLAN PAA BAAND.0.S
-.******************************.G.Z-.1,
1,1,"KONTOPLAN".`.D-.I.0.100:.1,TE$(I):.
.O.N- 1:.11000....-.*******************
***********....-. LOAD KONTOPLAN FRA BAA
ND.V..-.******************************..
..-.1,1,0,"KONTOPLAN"....-.I.0.100:.1,TE
$(I)....-.TE$(I)."".TE$(I).HJ$.$..-..:.
- 1:QQ$."":.11000.^....****************
**************.|.... OPSTILLING AF BUDGE
TTER. ....******************************
.L...X.10:Y.2:."..":.20000:.53281,2:.532
80,0......".OPSTILLING AF BUDGET.".....X
.0:Y.20:.20000:.STREG$.*.D/.************
******************.I.E/. VALG AF INDTAST
NINGSFORM.M.G/.*************************
*****...N/X.0:Y.22:.20000...X/.". .K.ONT
O- ELLER .M.AANEDSORDEN - INDTAST K/M".W
.B/.Q$:.Q$.."K" . Q$.."M".12130...L/.Q$.
"K".12200...V/.Q$."M".13000..../.*******
***********************.B../. BILLEDE TI
L KONTOINDTASTNING.F../.****************
**************.~../X.5:Y.1:.".":.20000..
../.".KONTO:"..../X.5:Y.2:.20000:.".TEKS
T:".K.A/X.21:Y.4:.20000:.". BEL0B "...F/
.I.0.12:X.5:Y.5.I:.20000...P/.I.12. .MD$
(I):....U/.I.12. ."."MD$(I):..B.V/.I.0.1
1:X.21:Y.5.I:.20000:.".. ":..^.Z/X
.0:Y.20:.20000:.STREG$.R../X.8:Y.22:.200
00..../.". KONTOGRUPPE";Q$..../.Q$."".12
280....0KN.E(Q$):.KN.0.KN.100.12280....0
.KN..(KN.10).10.0..20400:.12260....0X.11
:Y.1:.20000:. KN.). 0X.12:Y.2:.20000:.I(
TE$(KN),16):.12700:.20400.=.*0X.8:Y.22:.
20000._.40.". TAST MD.NR.,BEL0B";Q$,QQ$.
X.50.Q$.""..20400:.12330...60.Q$."MENU".
29000...70.Q$."*".QQ$."*"..20400:.12200.
T.80.E(Q$).1.E(QQ$).1 ..20400:.12330...9
0MN%.E(Q$):BE.E(QQ$):Q$."":QQ$.""...>0.M
N%.12.BE.999999..20400:.12330.1.C0BU(MN%
.1,KN).BE.<.H0.20500.U.R0X.21.HM:Y.5.MN%
.1:.20000:.".."BU(MN%.1,KN)".":.20400...
\0.25000:BE.BU(12,KN):.20500...F0X.21.HM
:Y.18:.20000:.BU(12,KN):.12330....1.****
**************************....1. PRINT E
KSISTERENDE BUDGETTAL.)..1.*************
*****************.8..1. I.0 . 11.O..1BE.
BU(I,KN):.20500.H..1X.21.HM:Y.5.I:.20000
...D1.BU(I,KN)..0. .".."BU(I,KN)"."...N1
....X1.25000:BE.BU(12,KN):.20500.U..1X.2
1.HM:Y.18:.20000:.BU(12,KN):....H2.*****
*************************...I2. BILLEDE
TIL MD.INDTASTNING.>.K2.****************
**************.V.R2X.5:Y.1:.".":.20000.K
..2.".MAANED :"....2X.5:Y.2:.20000:.
".KONTOGRUPPE:"....2X.26:Y.6:.20000:.".
BEL0B ".K..2X.0:Y.20:.20000:.STREG$....3
.I.0.8:X.26:Y.7.I:.20000:.".. ":..
...3X.3:Y.22:.20000.7..3.". INDTAST MD.N
R., KONTOGRUPPE";Q$,QQ$.[."3.E(Q$).1.E(Q
Q$).1..20400:.13070...,3.E(Q$).1 . E(Q$)
.12 ..20400:.13070. .63.E(QQ$).100..2040
0:.13070.N.@3X.18:Y.1:.20000:.MD$(E(Q$).
1):MD%.E(Q$).1...J3GR..(E(QQ$).10).10...
T3X.17:Y.2:.20000:.GR;I(TE$(GR),16).=.^3
.I.1.9:X.5:Y.6.I:.20000:.GR.I;I(TE$(GR.I
),16).\.H3.:X.5:Y.17:.20000:."TOTAL"....
3.******************************....3. P
RINT EKSISTERENDE BUDGETTAL.G..3.*******
***********************....3. I.1.9:BE.B
U(MD%,GR.I):.20500....3X.26.HM:Y.6.I:.20
000.-..3.BU(MD%,GR.I)..0..".."BU(MD%,GR.
I)".".3..3..S..3.25100:BE.BU(MD%,GR):.20
500.O.B3X.26.HM:Y.17:.20000:.BE....3.***
***************************....3. INPUT
BUDGETTAL.M..3.*************************
*****....3.20400:X.6:Y.22:.20000....4.".
TAST KONTONR., BEL0B";Q$,QQ$.*..4.Q$."M
ENU".QQ$."*".29000.D..4.Q$."*".QQ$."*".1
3000.H.&4KN.E(Q$):BE.E(QQ$):Q$."":QQ$.""
...+4..(KN.10)...(GR.10).13300...04.E(Q$
).99.E(QQ$).999999.13300.A.:4BU(MD%,KN).
BE:.20500...D4.25100:X.26.HM:Y.6.KN.GR:.
20000:.".."BE".":.20400...N4BE.BU(MD%,GR
):.20500.,.X4X.26.HM:Y.17:.20000:.BE.7.B
4.13300.[..4.***************************
***.}..4. SAVE BUDGETTAL PAA DISKETTE...
.4.******************************...F4.2
,8,3,"@0:BUDGET,S,W".R.P4.I.0.12:.II.0.1
00...Z4.2,BU(I,II):.II,I....4 2:.....4.*
*****************************.7..4. LOAD
BUDGETTAL FRA DISKETTE.[..4.***********
*******************.U..4.2,8,3,"0:BUDGET
,S,R"....5.I.0.12:.II.0.100....5.2,BU(I,
II):.II,I....5 2:..N. 5.****************
**************...!5. SAVE BUDGETTAL PAA
BAAND.. #5.*****************************
*., %5.20400:X.0:Y.22:.20000.@ *5.2,1,1,
"BUDGET".V 45.I.0.12:.II.0.100.L >5.2,BU
(I,II):.II,I.U H5 2:... R5.*************
*****************.. S5. LOAD BUDGETTAL F
RA BAAND.. U5.**************************
****.. W5.20400:X.0:Y.20:.20000..!\5.2,1
,0,"BUDGET".!!F5.I.0.12:.II.0.100.7!P5.2
,BU(I,II):.II,I.@!Z5 2:..D!.6.**********
********************..!.6. PRINT BUDGET
- UNDERMENU..!.6.***********************
*******.V!.6.".":X.12:Y.3:.20000:.". PRI
NT BUDGETTAL ".."D6X.8:Y.7:.20000:."1 OP
SUMMERING AF DATA".+"N6X.8:Y.9:.20000:."
2 PRINT PAA SKAERM".D"X6X.8:Y.11:.20000:
."3".G".6X.8:Y.13:.20000:."4 HOVEDMENU".
.".6X.0:Y.17:.20000:.STREG$..".6X.13:Y.2
2:.20000:.". INDTAST 1-4 .".Q".6X.17:Y.2
2:.20000:.Q$:.Q$."".14070..".7.Q$."1".14
200..".7.Q$."2".14400..#.7.Q$."3".14600.
.#.7.Q$."4".29000.$#(7.14070.H#X7.******
************************.B#Y7. OPSUMMERI
NG AF DATA..#{7.************************
******..#}7X.13:Y.22:.20000:.". VENT 1 M
INUT ".W#.7.Y.0.11:.X.10.90.10:BU(Y,X).0
:.Z.1.9..#.7BU(Y,X).BU(Y,X).BU(Y,X.Z)..$
.7.Z,X,Y. $ 7.X.10.99:BU(12,X).0:.Y.0.11
.>$.7BU(12,X).BU(12,X).BU(Y,X).G$.7.Y,X.
K$.7.X.0.12:BU(X,100).0:.Y.20.90.10..$H7
BU(X,100).BU(X,100).BU(X,Y)..$R7.Y,X..$.
7.Y.0.12:BU(Y,1).BU(Y,10).BU(Y,100):...$
.7BU(0,2).0:. OVERF0RT FRA SIDSTE AAR -
RETTES EVT...%.7BU(0,3).BU(0,1).BU(0,2).
G%.7.X.1.11:BU(X,2).BU(X.1,3):BU(X,3).BU
(X,1).BU(X,2):..R%.8.14000.V%@8.********
**********************..%A8. PRINT BUDGE
TOVERSIGT SKAERM..%C8.******************
************.D%E8I.0..%J8.".":.Q$."+".I.
I.1..%K8.Q$."-".I.I.1..%L8.I.11.I.0..&M8
.I.0.I.11.1&T8X.0:Y.1:.20000:.". BUDGETO
VERSIGT ".P&^8X.22:Y.1:.20000:."."MD$(I)
.P&H8X.32:Y.1:.20000:.". TOTAL "..&R8X.0
:Y.4:.20000:.TE$(10)..&W8X.20:Y.5:.20000
:."===================".H&|8.II.20.90.10
..&.8X.0:Y.(II.20).10.8:.20000:.TE$(II).
.&.8.II.#'.8X.20:Y.16:.20000:."---------
----------".J'.8X.0::Y.17:.20000:."UDGIF
TER TOTAL".G'.8X.0:Y.18:.20000:."INDT.".
.'.8X.20:Y.19:.20000:."-----------------
--"..'B8X.0:Y.21:.20000:."OVERF0RT"..'L8
X.20:Y.22:.20000:."-------------------".
.(V8X.0:Y.23:.20000:."AT OVERF0RE"..(.8.
14700."(.9.Q$:.Q$."".14600.;(.9.Q$."+".Q
$."-".14410.M(.9.Q$."^".14000.X(.9.14600
.|(L9.******************************..(M
9. PRINT BUDGETTAL PAA SKAERM.A(O9.*****
*************************..(V9BE.BU(I,10
):.20500:X.22.HM:Y.4:.20000:.BU(I,10).+)
.9BE.BU(12,10):.20500:X.32.HM:Y.4:.20000
:.BU(12,10).<).9.II.20.90.10.{).9BE.BU(I
,II):.20500:X.22.HM:Y.(II.20).10.8:.2000
0:.BU(I,II)..).9BE.BU(12,II):.20500:X.32
.HM:Y.(II.20).10.8:.20000:.BU(12,II).B).
9...).9BE.BU(I,100):.20500:X.22.HM:Y.17:
.20000:.BU(I,100).2*.9BE.BU(12,100):.205
00:X.32.HM:Y.17:.20000:.BU(12,100).G*.9B
E.BU(I,10):.20500:X.22.HM:Y.18:.20000:.B
U(I,10)..*.9BE.BU(12,10):.20500:X.32.HM:
Y.18:.20000:.BU(12,10).Q*.9BE.BU(I,1):.2
0500:X.22.HM:Y.20:.20000:.BU(I,1)..+.9BE
.BU(12,1):.20500:X.32.HM:Y.20:.20000:.BU
(12,1).9+F9BE.BU(I,2):.20500:X.22.HM:Y.2
1:.20000:.BU(I,2).L+P9BE.BU(I,3):.20500:
X.22.HM:Y.23:.20000:.BU(I,3).R+Z9...+ N.
******************************..+!N. SUB
. TIL PRINT AF X,Y POS...+"N.***********
*******************..+*N.".";..+4N. Y..0
. . 214,Y.1:...,>N. 211,X..,HN..4,.N.**
****************************.W,.N. SUB.
TIL PRINT AF KONTOTEKST.{,.N.***********
*******************. ,.NX.10:Y.8.YY:.200
00:.KN.10.S$." "..,.N.S$;KN;".".1)I(TE$(
KN),16).K,.OS$."":...,.O."
":..!-.O.*****
*************************.<-.O. SUB. HEL
BLANK LINIE.`-.O.**********************
********.T-.OX.0:Y.22:.20000..-DO."
":..J
-.P.******************************..-.P.
SUB. H0JRE MARGIN FOR BEL0B....P.******
************************.&..P..(BE).10.
HM.5:..=.(P..(BE).100. HM.4:..U.2P..(BE)
.1000. HM.3:..N.<P..(BE).10000. HM.2:...
.FP..(BE).100000. HM.1:....PP..(BE).1000
000. HM.0:..G..A.***********************
*******....A. SUB. RAEKKESUM FOR BUDGET.
./.A.******************************../.A
BU(12,KN).0.H/.A.I.0.11:BU(12,KN).BU(12,
KN).BU(I,KN):.:..L/.B.******************
************../.B. SUB.KOLONNESUM BUDGET
../.B.******************************../.
BBU(MD%,GR).0../ B. I.1.9:BU(MD%,GR).BU(
MD%,GR).BU(MD%,GR.I):.:...0HQ.**********
********************.$0IQ. HOVEDMENU.H0K
Q.******************************.D0RQ.".
.":.53280,0:.53281,2..0\QX.7:Y.1:.20000:
."R U N - COMMODORE MAGASIN"..0FQX.12:Y.
3:.20000:."PRIVATREGNSKAB."..0PQX.11:Y.5
:.20000:.".H O V E D M E N U"..1ZQX.0:Y.
20:.20000:.STREG$.81.QX.2:Y.7:.20000:."
1) KONTOPLAN OPSTILLING/RETTELSE.L1.QX.2
:Y.8:.20000:." 2) BUDGET OPSTILLING/RETT
ELSE..1.QX.2:Y.9:.20000:." 3) PRINT AF B
UDGETTAL..1.QX.2:Y.10:.20000:." 4).L1.QX
.2:Y.11:.20000:." 5)..1.QX.2:Y.12:.20000
:." 6)..2.QX.2:Y.13:.20000:." 7)..2JQX.2
:Y.14:.20000:." 8).42TQX.2:Y.15:.20000:.
" 9).A2.QX.2:Y.16:.20000:."10) LOAD DIVE
RSE FILER..2.QX.2:Y.17:.20000:."11) SAVE
DIVERSE FILER..2.QX.2:Y.18:.20000:."12)
AFSLUT PROGRAM.K2.QX.8:Y.22:.20000..2.R
.". INDTAST VALG (1-12) .";Q%..3.R. Q%.1
.Q%.12.29180.63.R.Q%.11000,12000,14000,,
,,,,,29300,29300,29999.Z3TR.************
******************.X3UR. BILLEDE SAVE DI
V. FILER..3WR.**************************
****..3~R.".":X.10:Y.3:.20000..3.R.Q%.10
. .". LOAD DIVERSE FILER "..4.R.Q%.11 .
.". SAVE DIVERSE FILER ".%4.RX.3:Y.8:.2
0000:."1) BUDGETFILE".A4.RX.0:Y.20:.2000
0:.STREG$.U4.RX.2:Y.22:.20000..4.R.". .T
.APE ELLER .D.ISKETTE - INDTAST T/D "..4
.R.Q$:.Q$.."T".Q$.."D".29370.G4DRX.3:Y.8
:.20000:."1) BUDGETFILE..4XR.Q$."T".Q%.1
0..13650..4.R.Q$."T".Q%.11..13600..5.R.Q
$."D".Q%.10..13550.+5.R.Q$."D".Q%.11..13
500.65.S.29000.A5/U.".":....
> CLICK IMAGE PREVIEW FOR FULL MODAL