KONTO PROG

00000000: 01 08 19 08 13 00 9C 3A  97 35 33 32 38 30 2C 30  |.......:.53280,0|
00000010: 3A 97 35 33 32 38 31 2C  30 00 61 08 14 00 86 41  |:.53281,0.a....A|
00000020: 28 32 35 35 29 2C 4B 24  28 32 35 35 29 2C 54 24  |(255),K$(255),T$|
00000030: 28 32 35 35 29 2C 41 31  28 39 30 30 29 2C 41 31  |(255),A1(900),A1|
00000040: 25 28 39 30 30 29 2C 42  31 25 28 39 30 30 29 2C  |%(900),B1%(900),|
00000050: 44 31 25 28 39 30 30 29  2C 45 31 25 28 39 30 30  |D1%(900),E1%(900|
00000060: 29 00 85 08 15 00 81 53  B2 31 A4 32 35 35 3A 4B  |)......S.1.255:K|
00000070: 24 28 53 29 B2 22 20 22  3A 54 24 28 53 29 B2 22  |$(S)." ":T$(S)."|
00000080: 20 22 3A 82 53 00 8F 08  1E 00 89 39 30 30 30 00  | ":.S......9000.|
00000090: A0 08 C8 00 41 31 25 28  4D 29 B2 C6 28 41 24 29  |....A1%(M)..(A$)|
000000A0: 00 B1 08 C9 00 42 31 25  28 4D 29 B2 C6 28 42 24  |.....B1%(M)..(B$|
000000B0: 29 00 C2 08 CA 00 44 31  25 28 4D 29 B2 C6 28 44  |).....D1%(M)..(D|
000000C0: 24 29 00 D3 08 CB 00 45  31 25 28 4D 29 B2 C6 28  |$).....E1%(M)..(|
000000D0: 45 24 29 00 D9 08 DC 00  8E 00 EB 08 90 01 8F 4F  |E$)............O|
000000E0: 50 42 59 47 4E 20 41 46  20 53 4B 00 1D 09 95 01  |PBYGN AF SK.....|
000000F0: 4C 24 B2 22 C0 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |L$."............|
00000100: C3 C3 C3 C3 C3 C3 C3 C3  C3 C0 C0 C0 C0 C0 C0 C0  |................|
00000110: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 22 00 25 09  |............".%.|
00000120: 96 01 99 4C 24 00 2F 09  9A 01 4C 24 B2 22 22 00  |...L$./...L$."".|
00000130: 35 09 9F 01 8E 00 47 09  A4 01 4C 31 24 B2 C4 28  |5.....G...L1$..(|
00000140: 44 31 25 28 4D 29 29 00  59 09 AE 01 4C 32 24 B2  |D1%(M)).Y...L2$.|
00000150: C4 28 45 31 25 28 4D 29  29 00 77 09 B8 01 4C 33  |.(E1%(M)).w...L3|
00000160: 24 B2 C4 28 B5 28 28 41  31 28 4D 29 29 AC 31 30  |$..(.((A1(M)).10|
00000170: 30 29 AD 31 30 30 29 00  8B 09 C2 01 8F 4C 34 24  |0).100)......L4$|
00000180: 45 52 54 45 4B 53 54 4D  41 58 37 00 AA 09 CC 01  |ERTEKSTMAX7.....|
00000190: 8B C3 28 4C 31 24 29 B3  33 A7 4C 31 24 B2 22 20  |..(L1$).3.L1$." |
000001A0: 22 AA 4C 31 24 3A 89 34  36 30 00 BF 09 D6 01 4C  |".L1$:.460.....L|
000001B0: 24 B2 4C 24 AA 28 C9 28  4C 31 24 2C 32 29 29 00  |$.L$.(.(L1$,2)).|
000001C0: DE 09 E0 01 8B C3 28 4C  32 24 29 B3 33 A7 4C 32  |......(L2$).3.L2|
000001D0: 24 B2 22 20 22 AA 4C 32  24 3A 89 34 38 30 00 EC  |$." ".L2$:.480..|
000001E0: 09 E5 01 4C 24 B2 4C 24  AA 22 C2 22 00 01 0A EA  |...L$.L$."."....|
000001F0: 01 4C 24 B2 4C 24 AA 28  C9 28 4C 32 24 2C 32 29  |.L$.L$.(.(L2$,2)|
00000200: 29 00 0F 0A EF 01 4C 24  B2 4C 24 AA 22 C2 22 00  |).....L$.L$.".".|
00000210: 24 0A F4 01 4C 24 B2 4C  24 AA CA 28 4C 34 24 2C  |$...L$.L$..(L4$,|
00000220: 31 2C 37 29 00 37 0A F9  01 8B C3 28 4C 24 29 B1  |1,7).7.....(L$).|
00000230: B2 31 33 A7 35 32 30 00  4A 0A FE 01 4C 24 B2 4C  |.13.520.J...L$.L|
00000240: 24 AA 22 20 22 3A 89 35  30 35 00 58 0A 08 02 4C  |$." ":.505.X...L|
00000250: 24 B2 4C 24 AA 22 C2 22  00 65 0A 0D 02 51 B2 C3  |$.L$.".".e...Q..|
00000260: 28 4C 33 24 29 00 73 0A  12 02 81 4C B2 51 A4 31  |(L3$).s....L.Q.1|
00000270: A9 AB 31 00 A3 0A 1C 02  8B CA 28 4C 33 24 2C 4C  |..1.......(L3$,L|
00000280: 2C 31 29 B3 B1 22 2E 22  A7 82 3A 4C 33 24 B2 4C  |,1).."."..:L3$.L|
00000290: 33 24 AA 22 2E 30 30 22  3A 51 B2 51 AA 33 3A 89  |3$.".00":Q.Q.3:.|
000002A0: 35 38 30 00 C0 0A 21 02  8B 4C B2 51 AB 31 A7 4C  |580...!..L.Q.1.L|
000002B0: 33 24 B2 4C 33 24 AA 22  30 22 3A 51 B2 51 AA 31  |3$.L3$."0":Q.Q.1|
000002C0: 00 CD 0A 44 02 51 31 B2  C3 28 4C 24 29 00 D9 0A  |...D.Q1..(L$)...|
000002D0: 4E 02 51 32 B2 32 32 AB  51 00 E9 0A 53 02 8B 51  |N.Q2.22.Q...S..Q|
000002E0: 31 B1 B2 51 32 A7 36 33  30 00 F7 0A 58 02 81 4C  |1..Q2.630...X..L|
000002F0: 31 B2 51 31 A4 51 32 00  09 0B 62 02 4C 24 B2 4C  |1.Q1.Q2...b.L$.L|
00000300: 24 AA 22 20 22 3A 82 4C  31 00 1D 0B 76 02 4C 24  |$." ":.L1...v.L$|
00000310: B2 C8 28 4C 24 2C 51 32  29 AA 4C 33 24 00 25 0B  |..(L$,Q2).L3$.%.|
00000320: 80 02 99 4C 24 00 2F 0B  85 02 4C 24 B2 22 22 00  |...L$./...L$."".|
00000330: 35 0B 8A 02 8E 00 5B 0B  D0 07 99 22 93 11 11 11  |5.....[...."....|
00000340: 52 45 47 49 53 54 45 52  4E 52 3F 22 3A 85 49 31  |REGISTERNR?":.I1|
00000350: 25 3A 41 24 B2 C7 28 49  31 25 29 00 76 0B DA 07  |%:A$..(I1%).v...|
00000360: 99 22 44 41 54 4F 22 3A  85 49 32 25 3A 44 24 B2  |."DATO":.I2%:D$.|
00000370: C7 28 49 32 25 29 00 93  0B E4 07 99 22 4D 41 41  |.(I2%)......"MAA|
00000380: 4E 45 44 22 3A 85 49 33  25 3A 45 24 B2 C7 28 49  |NED":.I3%:E$..(I|
00000390: 33 25 29 00 C0 0B EE 07  52 31 24 B2 C4 28 C6 28  |3%).....R1$..(.(|
000003A0: 41 24 29 29 AA C9 28 C4  28 C6 28 44 24 29 29 2C  |A$))..(.(.(D$)),|
000003B0: 32 29 AA C9 28 C4 28 C6  28 45 24 29 29 2C 32 29  |2)..(.(.(E$)),2)|
000003C0: 00 C6 0B F8 07 8E 00 DB  0B A0 0F 8F 53 30 4E 49  |............S0NI|
000003D0: 4E 47 20 50 41 41 20 4B  54 4E 52 00 F2 0B AA 0F  |NG PAA KTNR.....|
000003E0: 99 22 93 11 11 11 4B 4F  4E 54 4F 4E 52 3F 22 3A  |."....KONTONR?":|
000003F0: 85 53 00 02 0C B4 0F 53  32 24 B2 C7 28 B5 28 53  |.S.....S2$..(.(S|
00000400: 29 29 00 10 0C B5 0F 53  32 B2 C6 28 53 32 24 29  |)).....S2..(S2$)|
00000410: 00 37 0C B9 0F 99 22 93  20 20 20 20 20 20 20 20  |.7....".        |
00000420: 20 20 20 4F 50 47 30 52  45 4C 53 45 20 41 46 22  |   OPG0RELSE AF"|
00000430: 3B 4B 24 28 53 32 29 00  45 0C C3 0F 41 33 B2 30  |;K$(S2).E...A3.0|
00000440: 3A 41 32 B2 30 00 4E 0C  C8 0F 8D 34 30 30 00 5D  |:A2.0.N....400.]|
00000450: 0C DC 0F 81 4D B2 31 A4  41 31 28 30 29 00 77 0C  |....M.1.A1(0).w.|
00000460: E2 0F 8B 28 41 31 25 28  4D 29 29 B3 B1 B5 28 53  |...(A1%(M))...(S|
00000470: 32 29 A7 34 30 38 30 00  8F 0C E4 0F 53 33 B2 42  |2).4080.....S3.B|
00000480: 31 25 28 4D 29 3A 41 32  B2 28 41 32 AA 31 29 00  |1%(M):A2.(A2.1).|
00000490: A6 0C E5 0F 91 58 25 89  34 30 37 30 2C 34 30 37  |.....X%.4070,407|
000004A0: 32 2C 34 30 37 30 00 BA  0C E6 0F 4C 34 24 B2 4B  |2,4070.....L4$.K|
000004B0: 24 28 53 33 29 3A 8D 34  32 30 00 C4 0C E7 0F 89  |$(S3):.420......|
000004C0: 34 30 37 33 00 D8 0C E8  0F 4C 34 24 B2 54 24 28  |4073.....L4$.T$(|
000004D0: 53 33 29 3A 8D 34 32 30  00 F8 0C E9 0F 41 33 B2  |S3):.420.....A3.|
000004E0: 28 41 33 AA 41 31 28 4D  29 29 3A 8B 28 41 32 B3  |(A3.A1(M)):.(A2.|
000004F0: 31 30 29 A7 34 30 38 30  00 13 0D EA 0F 41 32 B2  |10).4080.....A2.|
00000500: 30 3A A1 41 32 24 3A 8B  41 32 24 B2 22 22 A7 34  |0:.A2$:.A2$."".4|
00000510: 30 37 34 00 21 0D EB 0F  99 22 93 22 3A 8D 34 30  |074.!....".":.40|
00000520: 30 00 28 0D F0 0F 82 4D  00 45 0D F5 0F 99 22 54  |0.(....M.E...."T|
00000530: 4F 54 41 4C 22 3B 28 B5  28 41 33 AC 31 30 30 29  |OTAL";(.(A3.100)|
00000540: 29 AD 31 30 30 00 4B 0D  FA 0F 8E 00 65 0D 04 10  |).100.K.....e...|
00000550: 8F 53 30 4E 49 4E 47 20  50 41 41 20 54 45 4B 53  |.S0NING PAA TEKS|
00000560: 54 4B 4F 44 45 00 8D 0D  0E 10 99 22 93 11 11 11  |TKODE......"....|
00000570: 54 45 4B 53 54 4B 4F 44  45 20 3F 22 3A 85 53 32  |TEKSTKODE ?":.S2|
00000580: 3A 8B 53 32 B1 32 35 34  A7 34 31 31 30 00 B3 0D  |:.S2.254.4110...|
00000590: 18 10 99 22 4C 41 56 45  53 54 45 20 4B 54 4E 52  |..."LAVESTE KTNR|
000005A0: 3F 22 3A 85 53 33 3A 8B  53 33 B1 32 35 34 A7 34  |?":.S3:.S3.254.4|
000005B0: 31 32 30 00 D9 0D 19 10  99 22 48 30 4A 45 53 54  |120......"H0JEST|
000005C0: 45 20 4B 54 4E 52 3F 22  3A 85 53 34 3A 8B 53 34  |E KTNR?":.S4:.S4|
000005D0: B1 32 35 34 A7 34 31 32  31 00 FE 0D 1D 10 99 22  |.254.4121......"|
000005E0: 93 20 20 20 20 20 20 20  20 20 4F 50 47 30 52 45  |.         OPG0RE|
000005F0: 4C 53 45 20 41 46 22 3B  54 24 28 53 32 29 00 07  |LSE AF";T$(S2)..|
00000600: 0E 22 10 8D 34 30 30 00  15 0E 27 10 41 33 B2 30  |."..400...'.A3.0|
00000610: 3A 41 32 B2 30 00 24 0E  2C 10 81 4D B2 31 A4 41  |:A2.0.$.,..M.1.A|
00000620: 31 28 30 29 00 3D 0E 31  10 8B 28 41 31 25 28 4D  |1(0).=.1..(A1%(M|
00000630: 29 29 B3 B5 28 53 33 29  A7 34 31 38 30 00 56 0E  |))..(S3).4180.V.|
00000640: 36 10 8B 28 41 31 25 28  4D 29 29 B1 B5 28 53 34  |6..(A1%(M))..(S4|
00000650: 29 A7 34 31 38 30 00 70  0E 46 10 8B 28 42 31 25  |).4180.p.F..(B1%|
00000660: 28 4D 29 29 B3 B1 B5 28  53 32 29 A7 34 31 38 30  |(M))...(S2).4180|
00000670: 00 88 0E 48 10 53 33 B2  41 31 25 28 4D 29 3A 41  |...H.S3.A1%(M):A|
00000680: 32 B2 28 41 32 AA 31 29  00 9C 0E 4B 10 4C 34 24  |2.(A2.1)...K.L4$|
00000690: B2 4B 24 28 53 33 29 3A  8D 34 32 30 00 BC 0E 4D  |.K$(S3):.420...M|
000006A0: 10 41 33 B2 28 41 33 AA  41 31 28 4D 29 29 3A 8B  |.A3.(A3.A1(M)):.|
000006B0: 28 41 32 B3 31 30 29 A7  34 31 38 30 00 D7 0E 4E  |(A2.10).4180...N|
000006C0: 10 41 32 B2 30 3A A1 41  32 24 3A 8B 41 32 24 B2  |.A2.0:.A2$:.A2$.|
000006D0: 22 22 A7 34 31 37 34 00  E0 0E 4F 10 99 22 93 22  |"".4174...O.."."|
000006E0: 00 E7 0E 54 10 82 4D 00  04 0F 59 10 99 22 54 4F  |...T..M...Y.."TO|
000006F0: 54 41 4C 22 3B 28 B5 28  41 33 AC 31 30 30 29 29  |TAL";(.(A3.100))|
00000700: AD 31 30 30 00 0A 0F 5E  10 8E 00 1D 0F 70 17 8F  |.100...^.....p..|
00000710: 4B 4F 4E 54 49 4E 41 56  4E 45 49 4E 44 00 4F 0F  |KONTINAVNEIND.O.|
00000720: 7A 17 99 22 93 12 2A 2A  20 49 4E 44 4C 41 45 53  |z.."..** INDLAES|
00000730: 4E 49 4E 47 20 41 46 20  4B 4F 4E 54 49 4E 41 56  |NING AF KONTINAV|
00000740: 4E 45 20 46 52 41 20 44  49 53 4B 20 2A 2A 22 00  |NE FRA DISK **".|
00000750: 6B 0F 8E 17 9F 33 2C 38  2C 33 2C 22 4B 4F 4E 54  |k....3,8,3,"KONT|
00000760: 49 4E 41 56 4E 45 2C 53  2C 52 22 00 78 0F 98 17  |INAVNE,S,R".x...|
00000770: 81 4D B2 31 A4 32 35 35  00 82 0F A2 17 84 33 2C  |.M.1.255......3,|
00000780: 41 24 00 9A 0F AC 17 4B  24 28 4D 29 B2 C8 28 41  |A$.....K$(M)..(A|
00000790: 24 2C 37 29 3A 41 24 B2  22 22 00 AB 0F B6 17 8B  |$,7):A$.""......|
000007A0: 20 53 54 B3 B1 30 89 36  30 39 30 00 B5 0F C0 17  | ST..0.6090.....|
000007B0: 82 4D 3A A0 33 00 BC 0F  CA 17 A0 33 00 CC 0F 64  |.M:.3......3...d|
000007C0: 19 8F 54 45 4B 53 54 45  52 49 4E 44 00 E8 0F 82  |..TEKSTERIND....|
000007D0: 19 9F 32 2C 38 2C 32 2C  22 54 45 4B 53 54 54 41  |..2,8,2,"TEKSTTA|
000007E0: 42 45 4C 2C 53 2C 52 22  00 F5 0F 8C 19 81 4D B2  |BEL,S,R"......M.|
000007F0: 31 A4 32 35 35 00 FF 0F  96 19 84 32 2C 41 24 00  |1.255......2,A$.|
00000800: 17 10 A0 19 54 24 28 4D  29 B2 C8 28 41 24 2C 37  |....T$(M)..(A$,7|
00000810: 29 3A 41 24 B2 22 22 00  28 10 AA 19 8B 20 53 54  |):A$."".(.... ST|
00000820: B3 B1 30 89 36 35 39 30  00 2F 10 B4 19 82 4D 00  |..0.6590./....M.|
00000830: 38 10 BE 19 A0 32 3A 8E  00 4D 10 76 1B 9F 31 2C  |8....2:..M.v..1,|
00000840: 38 2C 31 2C 52 31 24 AA  22 53 2C 52 22 00 82 10  |8,1,R1$."S,R"...|
00000850: 7B 1B 84 31 2C 41 31 28  30 29 3A A1 23 31 2C 41  |{..1,A1(0):.#1,A|
00000860: 24 3A A1 23 31 2C 42 24  3A A1 23 31 2C 44 24 3A  |$:.#1,B$:.#1,D$:|
00000870: A1 23 31 2C 45 24 3A 42  24 B2 22 20 22 3A 8D 32  |.#1,E$:B$." ":.2|
00000880: 30 30 00 91 10 94 1B 81  4D B2 31 A4 41 31 28 30  |00......M.1.A1(0|
00000890: 29 00 BF 10 99 1B 84 31  2C 41 31 28 4D 29 3A A1  |)......1,A1(M):.|
000008A0: 23 31 2C 41 24 3A A1 23  31 2C 42 24 3A A1 23 31  |#1,A$:.#1,B$:.#1|
000008B0: 2C 44 24 3A A1 23 31 2C  45 24 3A 8D 32 30 30 00  |,D$:.#1,E$:.200.|
000008C0: CF 10 9A 1B 8B 53 54 B3  B1 30 89 37 30 38 30 00  |.....ST..0.7080.|
000008D0: DC 10 9B 1B 53 25 B2 C6  28 41 24 29 00 F2 10 9E  |....S%..(A$)....|
000008E0: 1B 54 32 B2 41 28 53 25  29 3A 54 31 B2 41 31 28  |.T2.A(S%):T1.A1(|
000008F0: 4D 29 00 FF 10 9F 1B 54  32 B2 54 32 AA 54 31 00  |M).....T2.T2.T1.|
00000900: 19 11 A0 1B 41 28 53 25  29 B2 28 B5 28 54 32 AC  |....A(S%).(.(T2.|
00000910: 31 30 30 29 29 AD 31 30  30 00 20 11 A3 1B 82 4D  |100)).100. ....M|
00000920: 00 27 11 A8 1B A0 31 00  2D 11 B2 1B 8E 00 33 11  |.'....1.-.....3.|
00000930: 40 1F 8F 00 3D 11 45 1F  8D 32 30 30 30 00 54 11  |@...=.E..2000.T.|
00000940: 54 1F 81 53 B2 30 A4 32  35 35 3A 41 28 53 29 B2  |T..S.0.255:A(S).|
00000950: 30 3A 82 53 00 5E 11 55  1F 8D 37 30 33 30 00 7E  |0:.S.^.U..7030.~|
00000960: 11 5E 1F 99 22 4F 4B 2C  20 44 45 52 20 45 52 20  |.^.."OK, DER ER |
00000970: 4C 41 45 53 54 22 3B 4D  3B 22 52 45 43 22 00 84  |LAEST";M;"REC"..|
00000980: 11 5F 1F 8E 00 8D 11 63  1F 41 33 B2 30 00 B4 11  |._.....c.A3.0...|
00000990: 64 1F 99 22 93 20 20 20  20 20 20 20 20 20 20 20  |d..".           |
000009A0: 20 4B 54 20 2A 2A 20 53  41 4C 44 4F 20 4F 50 47  | KT ** SALDO OPG|
000009B0: 20 2A 2A 22 00 BD 11 65  1F 8D 34 30 30 00 CA 11  | **"...e..400...|
000009C0: 68 1F 81 53 B2 31 A4 32  35 35 00 DB 11 69 1F 8B  |h..S.1.255...i..|
000009D0: 41 28 53 29 B2 30 A7 38  30 38 30 00 12 12 6A 1F  |A(S).0.8080...j.|
000009E0: 4C 32 24 B2 C4 28 53 29  3A 4C 31 24 B2 22 20 20  |L2$..(S):L1$."  |
000009F0: 22 3A 4C 34 24 B2 4B 24  28 53 29 3A 4C 33 24 B2  |":L4$.K$(S):L3$.|
00000A00: C4 28 B5 28 41 28 53 29  AC 31 30 30 29 AD 31 30  |.(.(A(S).100).10|
00000A10: 30 29 00 2F 12 6B 1F 8B  C3 28 4C 32 24 29 B1 33  |0)./.k...(L2$).3|
00000A20: A7 4C 31 24 B2 CA 28 4C  32 24 2C 31 2C 32 29 00  |.L1$..(L2$,1,2).|
00000A30: 38 12 75 1F 8D 34 36 30  00 4B 12 7F 1F 41 33 B2  |8.u..460.K...A3.|
00000A40: 28 41 33 AA 28 41 28 53  29 29 29 00 59 12 84 1F  |(A3.(A(S))).Y...|
00000A50: 41 32 B2 28 41 32 AA 31  29 00 6B 12 89 1F 8B 28  |A2.(A2.1).k....(|
00000A60: 41 32 B3 31 30 29 A7 38  30 38 30 00 86 12 8A 1F  |A2.10).8080.....|
00000A70: 41 32 B2 30 3A A1 41 32  24 3A 8B 41 32 24 B2 22  |A2.0:.A2$:.A2$."|
00000A80: 22 A7 38 30 37 34 00 AB  12 8B 1F 99 22 93 20 20  |".8074......".  |
00000A90: 20 20 20 20 20 20 20 20  4B 54 20 2A 2A 20 53 41  |        KT ** SA|
00000AA0: 4C 44 4F 20 4F 50 47 20  2A 2A 22 00 B4 12 8C 1F  |LDO OPG **".....|
00000AB0: 8D 34 30 30 00 BB 12 90  1F 82 53 00 F8 12 95 1F  |.400......S.....|
00000AC0: 4C 31 24 B2 22 20 20 20  22 3A 4C 32 24 B2 22 20  |L1$."   ":L2$." |
00000AD0: 20 22 3A 4C 34 24 B2 22  54 4F 54 41 4C 22 3A 4C  | ":L4$."TOTAL":L|
00000AE0: 33 24 B2 C4 28 B5 28 41  33 AC 31 30 30 29 AD 31  |3$..(.(A3.100).1|
00000AF0: 30 30 29 3A 8D 34 36 30  00 FE 12 9A 1F 8E 00 0C  |00):.460........|
00000B00: 13 28 23 8F 48 4F 56 45  44 44 45 4C 00 16 13 8C  |.(#.HOVEDDEL....|
00000B10: 23 8D 36 30 30 30 00 32  13 86 24 99 22 93 11 20  |#.6000.2..$.".. |
00000B20: 20 20 2A 2A 2A 48 4F 56  45 44 4D 45 4E 55 2A 2A  |  ***HOVEDMENU**|
00000B30: 2A 22 00 5C 13 B8 24 99  22 11 46 31 29 53 41 4C  |*".\..$.".F1)SAL|
00000B40: 44 4F 4F 50 47 22 3A 99  22 11 46 33 29 4B 54 4F  |DOOPG":.".F3)KTO|
00000B50: 50 47 20 2F 54 45 4B 53  54 45 52 22 00 88 13 B9  |PG /TEKSTER"....|
00000B60: 24 99 22 11 46 35 29 4B  54 4F 50 47 2F 4D 4F 44  |$.".F5)KTOPG/MOD|
00000B70: 50 4F 53 54 45 52 22 3A  99 22 11 46 37 29 54 45  |POSTER":.".F7)TE|
00000B80: 4B 53 54 53 30 47 4E 22  00 9D 13 BC 24 99 22 11  |KSTS0GN"....$.".|
00000B90: 46 32 29 49 4E 44 4C 20  44 41 54 41 22 00 A7 13  |F2)INDL DATA"...|
00000BA0: BD 24 58 24 B2 22 22 00  BB 13 C2 24 A1 58 24 3A  |.$X$.""....$.X$:|
00000BB0: 8B 58 24 B2 22 22 A7 39  34 31 30 00 E9 13 CC 24  |.X$."".9410....$|
00000BC0: 58 25 B2 C6 28 58 24 29  AB 31 33 32 3A 91 58 25  |X%..(X$).132:.X%|
00000BD0: 8D 38 30 33 35 2C 34 30  30 30 2C 34 30 30 30 2C  |.8035,4000,4000,|
00000BE0: 34 31 30 30 2C 38 30 30  30 00 FB 13 D1 24 58 24  |4100,8000....$X$|
00000BF0: B2 22 22 3A 99 22 54 41  53 54 22 00 0F 14 D2 24  |."":."TAST"....$|
00000C00: A1 58 24 3A 8B 58 24 B2  22 22 A7 39 34 32 36 00  |.X$:.X$."".9426.|
00000C10: 19 14 D6 24 89 39 33 35  30 00 1F 14 AC 26 80 00  |...$.9350....&..|
00000C20: 00 35                                             |.5              |

.......:.53280,0:.53281,0.A....A(255),K$
(255),T$(255),A1(900),A1%(900),B1%(900),
D1%(900),E1%(900)......S.1.255:K$(S)." "
:T$(S)." ":.S......9000. .H.A1%(M).F(A$)
...I.B1%(M).F(B$).B.J.D1%(M).F(D$).S.K.E
1%(M).F(E$).Y..........OPBYGN AF SK.....
L$.".CCCCCCCCCCCCCCCCCCCC...............
....".%....L$./...L$."".5.....G...L1$.D(
D1%(M)).Y...L2$.D(E1%(M)).W...L3$.D(.((A
1(M)).100).100)...B..L4$ERTEKSTMAX7...L.
.C(L1$).3.L1$." ".L1$:.460...V.L$.L$.(I(
L1$,2))......C(L2$).3.L2$." ".L2$:.480..
...L$.L$."B".....L$.L$.(I(L2$,2)).....L$
.L$."B".$...L$.L$.J(L4$,1,7).7....C(L$).
.13.520.J...L$.L$." ":.505.X...L$.L$."B"
.E...Q.C(L3$).S....L.Q.1..1......J(L3$,L
,1).."."..:L3$.L3$.".00":Q.Q.3:.580...!.
.L.Q.1.L3$.L3$."0":Q.Q.1.M.D.Q1.C(L$).Y.
N.Q2.22.Q...S..Q1..Q2.630...X..L1.Q1.Q2.
..B.L$.L$." ":.L1...V.L$.H(L$,Q2).L3$.%.
...L$./...L$."".5.....[.P.."....REGISTER
NR?":.I1%:A$.G(I1%).V.Z.."DATO":.I2%:D$.
G(I2%)......"MAANED":.I3%:E$.G(I3%).....
R1$.D(F(A$)).I(D(F(D$)),2).I(D(F(E$)),2)
.F....... ..S0NING PAA KTNR......"....KO
NTONR?":.S.....S2$.G(.(S)).....S2.F(S2$)
.7....".           OPG0RELSE AF";K$(S2).
E.C.A3.0:A2.0.N.H..400.]....M.1.A1(0).W.
...(A1%(M))...(S2).4080.....S3.B1%(M):A2
.(A2.1)......X%.4070,4072,4070.....L4$.K
$(S3):.420.D....4073.X...L4$.T$(S3):.420
.....A3.(A3.A1(M)):.(A2.10).4080.....A2.
0:.A2$:.A2$."".4074.!....".":.400.(....M
.E...."TOTAL";(.(A3.100)).100.K.....E...
.S0NING PAA TEKSTKODE......"....TEKSTKOD
E ?":.S2:.S2.254.4110......"LAVESTE KTNR
?":.S3:.S3.254.4120.Y...."H0JESTE KTNR?"
:.S4:.S4.254.4121......".         OPG0RE
LSE AF";T$(S2)..."..400...'.A3.0:A2.0.$.
,..M.1.A1(0).=.1..(A1%(M))..(S3).4180.V.
6..(A1%(M))..(S4).4180.P.F..(B1%(M))...(
S2).4180...H.S3.A1%(M):A2.(A2.1)...K.L4$
.K$(S3):.420...M.A3.(A3.A1(M)):.(A2.10).
4180.W.N.A2.0:.A2$:.A2$."".4174...O.."."
...T..M...Y.."TOTAL";(.(A3.100)).100...^
.....P..KONTINAVNEIND.O.Z.."..** INDLAES
NING AF KONTINAVNE FRA DISK **".K....3,8
,3,"KONTINAVNE,S,R".X....M.1.255......3,
A$.....K$(M).H(A$,7):A$.""...... ST..0.6
090......M: 3...J. 3.L.D..TEKSTERIND....
..2,8,2,"TEKSTTABEL,S,R"......M.1.255...
...2,A$... .T$(M).H(A$,7):A$."".(.... ST
..0.6590./....M.8... 2:..M.V..1,8,1,R1$.
"S,R"...{..1,A1(0):.#1,A$:.#1,B$:.#1,D$:
.#1,E$:B$." ":.200......M.1.A1(0)......1
,A1(M):.#1,A$:.#1,B$:.#1,D$:.#1,E$:.200.
O....ST..0.7080.....S%.F(A$).....T2.A(S%
):T1.A1(M).....T2.T2.T1... .A(S%).(.(T2.
100)).100. ....M.'... 1.-.....3.@...=.E.
.2000.T.T..S.0.255:A(S).0:.S.^.U..7030.~
.^.."OK, DER ER LAEST";M;"REC"..._.....C
.A3.0...D..".            KT ** SALDO OPG
 **"...E..400.J.H..S.1.255...I..A(S).0.8
080...J.L2$.D(S):L1$."  ":L4$.K$(S):L3$.
D(.(A(S).100).100)./.K..C(L2$).3.L1$.J(L
2$,1,2).8.U..460.K..A3.(A3.(A(S))).Y...
A2.(A2.1).K....(A2.10).8080.....A2.0:.A2
$:.A2$."".8074......".          KT ** SA
LDO OPG **"......400......S.....L1$."   
":L2$."  ":L4$."TOTAL":L3$.D(.(A3.100).1
00):.460.........(#.HOVEDDEL....#.6000.2
..$."..   ***HOVEDMENU***".\..$.".F1)SAL
DOOPG":.".F3)KTOPG /TEKSTER"....$.".F5)K
TOPG/MODPOSTER":.".F7)TEKSTS0GN"....$.".
F2)INDL DATA"....$X$.""...B$.X$:.X$."".9
410...L$X%.F(X$).132:.X%.8035,4000,4000,
4100,8000...Q$X$."":."TAST"...R$.X$:.X$.
"".9426...V$.9350....&...5

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL