PRINTER
FILE INFORMATION
FILENAME(S): PRINTER
FILE TYPE(S): PRG
FILE SIZE: 4.5K
FIRST SEEN: 2025-11-30 19:47:10
APPEARS ON: 1 disk(s)
FILE HASH
d8a4c275c462e3e286b616fb62745bb4dd923070685030ec6b8aa22498fcd239
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HJ LPEDISK A2 2 | PRINTER | PRG | Curtcool, Frank | 26 | 15 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 01 00 9C 3A 97 35 33 32 38 30 2C 30 |.......:.53280,0| 00000010: 3A 97 35 33 32 38 31 2C 30 3A 9F 38 2C 34 00 41 |:.53281,0:.8,4.A| 00000020: 08 02 00 51 24 B2 C7 28 31 36 29 3A 51 51 24 B2 |...Q$..(16):QQ$.| 00000030: 22 30 22 3A 86 53 28 32 35 35 29 3A 51 47 B2 31 |"0":.S(255):QG.1| 00000040: 35 00 4F 08 03 00 86 4B 54 24 28 32 35 35 29 00 |5.O....KT$(255).| 00000050: 63 08 04 00 86 54 54 24 28 32 35 35 29 3A 89 39 |c....TT$(255):.9| 00000060: 30 30 30 00 90 08 64 00 99 22 11 11 49 4E 44 53 |000...d.."..INDS| 00000070: 41 45 54 20 44 49 53 4B 20 4D 45 44 20 4B 4F 4E |AET DISK MED KON| 00000080: 54 4F 54 45 4B 53 54 45 52 22 3A 8D 31 30 30 30 |TOTEKSTER":.1000| 00000090: 00 AC 08 6E 00 9F 32 2C 38 2C 32 2C 22 4B 4F 4E |...n..2,8,2,"KON| 000000A0: 54 49 4E 41 56 4E 45 2C 53 2C 52 22 00 CD 08 82 |TINAVNE,S,R"....| 000000B0: 00 81 20 4E B2 31 A4 32 35 35 3A 8B 53 54 B2 30 |.. N.1.255:.ST.0| 000000C0: A7 84 32 2C 4B 54 24 28 4E 29 3A 82 4E 00 ED 08 |..2,KT$(N):.N...| 000000D0: 8C 00 A0 32 3A 99 22 4F 4B 20 22 3B 4E 3B 22 20 |...2:."OK ";N;" | 000000E0: 52 45 43 20 4C 41 45 53 54 22 3A 20 8E 00 03 09 |REC LAEST": ....| 000000F0: D2 00 9F 32 2C 38 2C 32 2C 22 4D 4F 4D 53 2C 53 |...2,8,2,"MOMS,S| 00000100: 2C 52 22 00 31 09 E6 00 81 20 4E B2 31 A4 32 35 |,R".1.... N.1.25| 00000110: 35 3A 8B 53 54 B2 30 A7 A1 23 32 2C 41 24 3A 4D |5:.ST.0..#2,A$:M| 00000120: 54 24 B2 4D 54 24 AA 41 24 3A 41 24 B2 22 22 3A |T$.MT$.A$:A$."":| 00000130: 82 00 51 09 F0 00 A0 32 3A 99 22 4F 4B 20 22 3B |..Q....2:."OK ";| 00000140: 4E 3B 22 20 52 45 43 20 4C 41 45 53 54 22 3A 20 |N;" REC LAEST": | 00000150: 8E 00 68 09 36 01 9F 32 2C 38 2C 32 2C 22 44 52 |..h.6..2,8,2,"DR| 00000160: 2F 53 54 2C 53 2C 52 22 00 90 09 4A 01 81 20 4E |/ST,S,R"...J.. N| 00000170: B2 31 A4 32 35 35 3A 8B 53 54 B2 30 A7 A1 23 32 |.1.255:.ST.0..#2| 00000180: 2C 41 24 3A 44 54 24 B2 44 54 24 AA 41 24 3A 82 |,A$:DT$.DT$.A$:.| 00000190: 00 B0 09 54 01 A0 32 3A 99 22 4F 4B 20 22 3B 4E |...T..2:."OK ";N| 000001A0: 3B 22 20 52 45 43 20 4C 41 45 53 54 22 3A 20 8E |;" REC LAEST": .| 000001B0: 00 C6 09 9A 01 9F 32 2C 38 2C 32 2C 22 42 55 44 |......2,8,2,"BUD| 000001C0: 47 2C 53 2C 52 22 00 EE 09 AE 01 81 20 4E B2 31 |G,S,R"...... N.1| 000001D0: A4 32 35 35 3A 8B 53 54 B2 30 A7 A1 23 32 2C 41 |.255:.ST.0..#2,A| 000001E0: 24 3A 42 54 24 B2 42 54 24 AA 41 24 3A 82 00 0E |$:BT$.BT$.A$:...| 000001F0: 0A B8 01 A0 32 3A 99 22 4F 4B 20 22 3B 4E 3B 22 |....2:."OK ";N;"| 00000200: 20 52 45 43 20 4C 41 45 53 54 22 3A 20 8E 00 24 | REC LAEST": ..$| 00000210: 0A FE 01 9F 32 2C 38 2C 32 2C 22 4C 49 4B 56 2C |....2,8,2,"LIKV,| 00000220: 53 2C 52 22 00 4C 0A 12 02 81 20 4E B2 31 A4 32 |S,R".L.... N.1.2| 00000230: 35 35 3A 8B 53 54 B2 30 A7 A1 23 32 2C 41 24 3A |55:.ST.0..#2,A$:| 00000240: 4C 54 24 B2 4C 54 24 AA 41 24 3A 82 00 6C 0A 1C |LT$.LT$.A$:..l..| 00000250: 02 A0 32 3A 99 22 4F 4B 20 22 3B 4E 3B 22 20 52 |..2:."OK ";N;" R| 00000260: 45 43 20 4C 41 45 53 54 22 3A 20 8E 00 88 0A 62 |EC LAEST": ....b| 00000270: 02 9F 32 2C 38 2C 32 2C 22 54 45 4B 53 54 54 41 |..2,8,2,"TEKSTTA| 00000280: 42 45 4C 2C 53 2C 52 22 00 A8 0A 76 02 81 20 4E |BEL,S,R"...v.. N| 00000290: B2 31 A4 32 35 35 3A 8B 53 54 B2 30 A7 84 32 2C |.1.255:.ST.0..2,| 000002A0: 54 54 24 28 4E 29 3A 82 00 B1 0A 80 02 A0 32 3A |TT$(N):.......2:| 000002B0: 8E 00 BA 0A BC 02 8D 31 30 30 00 C3 0A C6 02 8D |.......100......| 000002C0: 32 31 30 00 CC 0A D0 02 8D 33 31 30 00 D5 0A DA |210......310....| 000002D0: 02 8D 34 31 30 00 DE 0A E4 02 8D 35 31 30 00 E7 |..410......510..| 000002E0: 0A EE 02 8D 36 31 30 00 ED 0A 16 03 8E 00 02 0B |....610.........| 000002F0: 20 03 8B 53 54 B2 30 A7 84 32 2C 41 3A 53 52 B2 | ..ST.0..2,A:SR.| 00000300: 53 54 00 19 0B 21 03 8B 53 54 B2 30 A7 A1 23 32 |ST...!..ST.0..#2| 00000310: 2C 41 24 3A 53 52 B2 53 54 00 30 0B 22 03 8B 53 |,A$:SR.ST.0."..S| 00000320: 54 B2 30 A7 A1 23 32 2C 42 24 3A 53 52 B2 53 54 |T.0..#2,B$:SR.ST| 00000330: 00 47 0B 25 03 8B 53 54 B2 30 A7 A1 23 32 2C 44 |.G.%..ST.0..#2,D| 00000340: 24 3A 53 52 B2 53 54 00 60 0B 26 03 8B 53 54 B2 |$:SR.ST.`.&..ST.| 00000350: 30 A7 A1 23 32 2C 45 24 3A 53 52 B2 53 54 3A 8E |0..#2,E$:SR.ST:.| 00000360: 00 69 0B 2A 03 A0 32 3A 8E 00 7D 0B 84 03 8F 53 |.i.*..2:..}....S| 00000370: 41 4C 44 49 4F 50 42 59 47 4E 49 4E 47 00 9F 0B |ALDIOPBYGNING...| 00000380: 98 03 51 53 25 B2 C6 28 41 24 29 3A 53 28 51 53 |..QS%..(A$):S(QS| 00000390: 25 29 B2 28 53 28 51 53 25 29 AA 41 29 3A 8E 00 |%).(S(QS%).A):..| 000003A0: AD 0B B6 03 8F 42 45 4C 30 42 4F 50 47 00 BD 0B |.....BEL0BOPG...| 000003B0: B7 03 8B 41 B1 30 2E 30 31 A7 39 36 35 00 CE 0B |...A.0.01.965...| 000003C0: B8 03 8B 41 B3 AB 30 2E 30 31 A7 39 36 35 00 D6 |...A..0.01.965..| 000003D0: 0B B9 03 41 B2 30 00 EC 0B C5 03 41 4E 24 B2 C4 |...A.0.....AN$..| 000003E0: 28 41 29 3A 51 B2 C3 28 41 4E 24 29 00 FA 0B CA |(A):Q..(AN$)....| 000003F0: 03 81 4C B2 51 A4 31 A9 AB 31 00 25 0C CF 03 8B |..L.Q.1..1.%....| 00000400: CA 28 41 4E 24 2C 4C 2C 31 29 B3 B1 22 2E 22 A7 |.(AN$,L,1)..".".| 00000410: 82 3A 41 4E 24 B2 41 4E 24 AA 22 2E 30 30 22 3A |.:AN$.AN$.".00":| 00000420: 89 20 39 38 35 00 3C 0C D4 03 8B 4C B2 51 AB 31 |. 985.<....L.Q.1| 00000430: A7 41 4E 24 B2 41 4E 24 AA 22 30 22 00 5D 0C D9 |.AN$.AN$."0".]..| 00000440: 03 8B C3 28 41 4E 24 29 B3 32 30 A7 41 4E 24 B2 |...(AN$).20.AN$.| 00000450: 22 20 22 AA 41 4E 24 3A 89 20 39 38 35 00 63 0C |" ".AN$:. 985.c.| 00000460: DE 03 8E 00 76 0C E8 03 99 22 54 41 53 54 20 2E |....v...."TAST .| 00000470: 2E 22 3A 58 B2 30 00 94 0C F2 03 58 B2 30 3A 58 |.":X.0.....X.0:X| 00000480: 24 B2 22 22 3A A1 58 24 3A 8B 58 24 B2 22 22 A7 |$."":.X$:.X$."".| 00000490: 31 30 31 30 00 A4 0C FC 03 58 B2 C6 28 58 24 29 |1010.....X..(X$)| 000004A0: AB 31 33 32 00 AA 0C 06 04 8E 00 BE 0C 1A 04 98 |.132............| 000004B0: 38 2C 50 4C 24 3A 50 4C 24 B2 22 22 3A 8E 00 E0 |8,PL$:PL$."":...| 000004C0: 0C 24 04 98 38 2C C7 28 31 34 29 50 4C 24 3A 98 |.$..8,.(14)PL$:.| 000004D0: 38 2C C7 28 31 35 29 3A 50 4C 24 B2 22 22 3A 8E |8,.(15):PL$."":.| 000004E0: 00 FC 0C D0 07 8F 55 44 53 4B 52 49 46 54 20 41 |......UDSKRIFT A| 000004F0: 46 20 54 45 4B 53 54 54 41 42 45 4C 00 06 0D D5 |F TEKSTTABEL....| 00000500: 07 8D 31 30 35 30 00 28 0D DA 07 50 4C 24 B2 22 |..1050.(...PL$."| 00000510: 2A 2A 2A 20 54 45 4B 53 54 45 52 20 20 20 2A 2A |*** TEKSTER **| 00000520: 2A 22 3A 8D 31 30 36 30 00 32 0D DF 07 8D 31 30 |*":.1060.2....10| 00000530: 35 30 00 52 0D E4 07 50 4C 24 B2 22 20 20 4E 52 |50.R...PL$." NR| 00000540: 20 20 20 20 20 20 54 45 4B 53 54 22 3A 8D 31 30 | TEKST":.10| 00000550: 35 30 00 5C 0D E9 07 8D 31 30 35 30 00 96 0D EE |50.\....1050....| 00000560: 07 81 4E B2 31 A4 32 35 35 3A 8B C3 28 54 54 24 |..N.1.255:..(TT$| 00000570: 28 4E 29 29 B1 31 A7 50 4C 24 B2 22 20 22 3A 50 |(N)).1.PL$." ":P| 00000580: 4C 24 B2 50 4C 24 AA C9 28 C4 28 4E 29 2C 33 29 |L$.PL$..(.(N),3)| 00000590: 3A 89 32 30 34 35 00 A6 0D F8 07 89 32 30 36 30 |:.2045......2060| 000005A0: 3A 8F 4C 45 3E 32 00 C7 0D FD 07 8B C3 28 50 4C |:.LE>2.......(PL| 000005B0: 24 29 B3 31 32 A7 50 4C 24 B2 50 4C 24 AA 22 20 |$).12.PL$.PL$." | 000005C0: 22 3A 89 32 30 34 35 00 E0 0D 02 08 50 4C 24 B2 |":.2045.....PL$.| 000005D0: 50 4C 24 AA 54 54 24 28 4E 29 3A 8D 31 30 35 30 |PL$.TT$(N):.1050| 000005E0: 00 E7 0D 0C 08 82 4E 00 ED 0D 33 08 8E 00 0B 0E |......N...3.....| 000005F0: B8 0B 8F 55 44 53 4B 52 49 46 54 20 41 46 20 4B |...UDSKRIFT AF K| 00000600: 4F 4E 54 4F 54 45 4B 53 54 45 52 00 34 0E C2 0B |ONTOTEKSTER.4...| 00000610: 50 4C 24 B2 22 20 20 20 20 20 2A 2A 2A 20 4B 4F |PL$." *** KO| 00000620: 4E 54 4F 4E 41 56 4E 45 20 20 2A 2A 2A 22 3A 8D |NTONAVNE ***":.| 00000630: 31 30 36 30 00 3E 0E C7 0B 8D 31 30 35 30 00 82 |1060.>....1050..| 00000640: 0E CC 0B 50 4C 24 B2 C7 28 31 36 29 AA 22 30 33 |...PL$..(16)."03| 00000650: 4E 52 22 AA C7 28 31 36 29 AA 22 30 38 54 45 4B |NR"..(16)."08TEK| 00000660: 53 54 22 AA C7 28 31 36 29 AA 22 32 38 44 52 2F |ST"..(16)."28DR/| 00000670: 53 54 22 AA C7 28 31 36 29 AA 22 34 30 4D 4F 4D |ST"..(16)."40MOM| 00000680: 53 22 00 9F 0E CD 0B 50 4C 24 B2 50 4C 24 AA C7 |S".....PL$.PL$..| 00000690: 28 31 36 29 AA 22 35 30 42 55 44 47 45 54 22 00 |(16)."50BUDGET".| 000006A0: A9 0E D1 0B 8D 31 30 36 30 00 DF 0E D6 0B 81 4E |.....1060......N| 000006B0: B2 31 A4 32 35 35 3A 8B C3 28 4B 54 24 28 4E 29 |.1.255:..(KT$(N)| 000006C0: 29 B1 31 A7 50 4C 24 B2 51 24 AA 22 30 33 22 AA |).1.PL$.Q$."03".| 000006D0: C9 28 C4 28 4E 29 2C 33 29 3A 89 33 30 35 30 00 |.(.(N),3):.3050.| 000006E0: EF 0E E0 0B 89 33 30 36 30 3A 8F 4C 45 3E 32 00 |.....3060:.LE>2.| 000006F0: 25 0F EA 0B 50 4C 24 B2 50 4C 24 AA 51 24 AA 22 |%...PL$.PL$.Q$."| 00000700: 30 38 22 AA 4B 54 24 28 4E 29 AA 51 24 AA 22 33 |08".KT$(N).Q$."3| 00000710: 32 22 AA CA 28 44 54 24 2C 4E 2C 31 29 AA 51 24 |2"..(DT$,N,1).Q$| 00000720: AA 22 34 33 22 00 55 0F EB 0B 50 4C 24 B2 50 4C |."43".U...PL$.PL| 00000730: 24 AA CA 28 4D 54 24 2C 4E 2C 31 29 AA 51 24 AA |$..(MT$,N,1).Q$.| 00000740: 22 35 32 22 AA C4 28 C6 28 CA 28 42 54 24 2C 4E |"52"..(.(.(BT$,N| 00000750: 2C 31 29 29 29 00 5F 0F EF 0B 8D 31 30 35 30 00 |,1)))._....1050.| 00000760: 66 0F F4 0B 82 4E 00 6C 0F 1B 0C 8E 00 86 0F 88 |f....N.l........| 00000770: 13 8F 55 44 53 4B 52 20 41 46 20 45 4E 4B 45 4C |..UDSKR AF ENKEL| 00000780: 54 4B 4F 4E 54 4F 00 B6 0F 89 13 99 22 52 45 47 |TKONTO......"REG| 00000790: 49 53 54 45 52 4E 52 3F 22 3A 85 49 31 25 3A 41 |ISTERNR?":.I1%:A| 000007A0: 24 B2 C7 28 49 31 25 29 3A 8B 49 31 25 B2 30 A7 |$..(I1%):.I1%.0.| 000007B0: 41 24 B2 22 30 22 00 D1 0F 8A 13 99 22 44 41 54 |A$."0"......"DAT| 000007C0: 4F 22 3A 85 49 32 25 3A 44 24 B2 C7 28 49 32 25 |O":.I2%:D$..(I2%| 000007D0: 29 00 EE 0F 8B 13 99 22 4D 41 41 4E 45 44 22 3A |)......"MAANED":| 000007E0: 85 49 33 25 3A 45 24 B2 C7 28 49 33 25 29 00 1B |.I3%:E$..(I3%)..| 000007F0: 10 8C 13 52 31 24 B2 C4 28 C6 28 41 24 29 29 AA |...R1$..(.(A$)).| 00000800: C9 28 C4 28 C6 28 44 24 29 29 2C 32 29 AA C9 28 |.(.(.(D$)),2)..(| 00000810: C4 28 C6 28 45 24 29 29 2C 32 29 00 52 10 92 13 |.(.(E$)),2).R...| 00000820: 99 22 11 49 4E 44 53 41 45 54 20 44 49 53 4B 20 |.".INDSAET DISK | 00000830: 4D 45 44 20 44 45 54 20 52 45 47 49 53 54 45 52 |MED DET REGISTER| 00000840: 20 44 45 52 20 53 4B 41 4C 20 53 30 47 45 53 20 | DER SKAL S0GES | 00000850: 49 22 00 5C 10 9C 13 8D 31 30 30 30 00 74 10 A6 |I".\....1000.t..| 00000860: 13 A0 32 3A 9F 32 2C 38 2C 32 2C 52 31 24 AA 22 |..2:.2,8,2,R1$."| 00000870: 53 2C 52 22 00 7D 10 B0 13 8D 38 30 30 00 C0 10 |S,R".}....800...| 00000880: BA 13 99 22 52 45 47 49 53 54 52 45 54 20 22 2C |..."REGISTRET ",| 00000890: C6 28 41 24 29 3B 22 20 45 52 20 41 41 42 4E 45 |.(A$);" ER AABNE| 000008A0: 54 2E 20 44 45 54 20 49 4E 44 45 48 4F 4C 44 45 |T. DET INDEHOLDE| 000008B0: 52 20 22 3B 41 3B 22 20 52 45 43 22 3A 43 B2 41 |R ";A;" REC":C.A| 000008C0: 00 F9 10 C4 13 99 22 53 49 44 53 54 45 20 44 41 |......"SIDSTE DA| 000008D0: 54 4F 20 46 4F 52 20 53 4B 52 49 56 4E 49 4E 47 |TO FOR SKRIVNING| 000008E0: 3A 20 22 3B C6 28 44 24 29 3B 22 2F 22 3B C6 28 |: ";.(D$);"/";.(| 000008F0: 45 24 29 3A 8D 31 30 30 30 00 FF 10 C9 13 8E 00 |E$):.1000.......| 00000900: 33 11 CE 13 99 22 93 2A 2A 20 20 55 44 53 4B 52 |3....".** UDSKR| 00000910: 49 46 54 53 20 4D 45 4E 55 20 2A 2A 22 3A 99 22 |IFTS MENU **":."| 00000920: 11 46 31 3D 4B 4F 4E 54 4F 4F 50 47 2F 54 45 4B |.F1=KONTOOPG/TEK| 00000930: 53 54 22 00 4D 11 D8 13 99 22 11 46 33 3D 4B 4F |ST".M....".F3=KO| 00000940: 4E 54 4F 4F 50 47 2F 4D 4F 44 4B 54 22 00 67 11 |NTOOPG/MODKT".g.| 00000950: E2 13 99 22 11 46 35 3D 54 45 4B 53 54 4F 50 47 |...".F5=TEKSTOPG| 00000960: 30 52 45 4C 53 45 22 00 86 11 E3 13 8B 51 51 24 |0RELSE"......QQ$| 00000970: B3 B1 22 31 22 A7 99 22 11 46 37 3D 44 41 4E 20 |.."1"..".F7=DAN | 00000980: 53 41 4C 44 49 22 00 C0 11 E4 13 8B 51 51 24 B2 |SALDI"......QQ$.| 00000990: 22 31 22 A7 99 22 11 46 32 3D 53 41 4C 44 4F 4F |"1"..".F2=SALDOO| 000009A0: 50 47 30 52 45 4C 53 45 22 3A 99 22 11 46 34 3D |PG0RELSE":.".F4=| 000009B0: 47 52 55 50 50 45 52 45 54 20 53 41 4C 44 4F 22 |GRUPPERET SALDO"| 000009C0: 00 D1 11 E5 13 99 22 11 46 36 3D 52 45 54 55 52 |......".F6=RETUR| 000009D0: 22 00 DB 11 EC 13 8D 31 30 31 30 00 E4 11 F1 13 |"......1010.....| 000009E0: 58 56 B2 58 00 09 12 F6 13 91 58 8D 35 32 30 30 |XV.X......X.5200| 000009F0: 2C 35 32 30 30 2C 35 33 30 30 2C 35 34 30 30 2C |,5200,5300,5400,| 00000A00: 35 35 30 30 2C 35 36 30 30 00 17 12 00 14 8B 58 |5500,5600......X| 00000A10: B2 37 A7 35 31 39 30 00 21 12 41 14 89 35 30 37 |.7.5190.!.A..507| 00000A20: 30 00 27 12 46 14 8E 00 48 12 50 14 85 22 4B 4F |0.'.F...H.P.."KO| 00000A30: 4E 54 4F 4E 52 22 3B 41 25 3A 42 B2 30 3A 53 41 |NTONR";A%:B.0:SA| 00000A40: B2 30 3A 8D 35 30 30 30 00 73 12 51 14 50 4C 24 |.0:.5000.s.Q.PL$| 00000A50: B2 51 24 AA 22 31 30 4F 50 47 30 52 45 4C 53 45 |.Q$."10OPG0RELSE| 00000A60: 20 41 46 20 22 AA 4B 54 24 28 41 25 29 3A 8D 31 | AF ".KT$(A%):.1| 00000A70: 30 36 30 00 7D 12 52 14 8D 31 30 35 30 00 8B 12 |060.}.R..1050...| 00000A80: 5A 14 8B 42 B3 43 A7 8D 38 30 30 00 9F 12 5B 14 |Z..B.C..800...[.| 00000A90: 42 B2 42 AA 31 3A 8B 42 B1 43 A7 35 32 37 35 00 |B.B.1:.B.C.5275.| 00000AA0: D4 12 5C 14 8B 53 54 B3 B1 30 A7 99 22 46 45 4A |..\..ST..0.."FEJ| 00000AB0: 4C 2E 2E 2E 46 4F 52 20 47 45 4E 53 54 41 52 54 |L...FOR GENSTART| 00000AC0: 20 53 4B 52 49 56 3A 20 47 4F 54 4F 20 39 30 30 | SKRIV: GOTO 900| 00000AD0: 30 22 3A 90 00 E7 12 5D 14 8B 51 51 24 B3 B1 22 |0":....]..QQ$.."| 00000AE0: 31 22 A7 8D 39 30 30 00 FB 12 5F 14 8B C6 28 41 |1"..900..._...(A| 00000AF0: 24 29 B3 B1 41 25 A7 35 32 31 30 00 37 13 64 14 |$)..A%.5210.7.d.| 00000B00: 50 4C 24 B2 50 4C 24 AA C9 28 C4 28 C6 28 44 24 |PL$.PL$..(.(.(D$| 00000B10: 29 29 2C 32 29 3A 50 4C 24 B2 50 4C 24 AA 22 20 |)),2):PL$.PL$." | 00000B20: 2F 20 22 AA C9 28 C4 28 C6 28 45 24 29 29 2C 32 |/ "..(.(.(E$)),2| 00000B30: 29 AA 22 20 20 20 22 00 5E 13 78 14 54 B2 C6 28 |)." ".^.x.T..(| 00000B40: 42 24 29 3A 8B 58 56 B2 31 A7 50 4C 24 B2 50 4C |B$):.XV.1.PL$.PL| 00000B50: 24 AA 54 54 24 28 54 29 3A 89 35 32 34 35 00 7D |$.TT$(T):.5245.}| 00000B60: 13 79 14 8B 58 56 B2 32 A7 50 4C 24 B2 50 4C 24 |.y..XV.2.PL$.PL$| 00000B70: AA 4B 54 24 28 54 29 3A 89 35 32 34 35 00 89 13 |.KT$(T):.5245...| 00000B80: 7D 14 53 41 B2 53 41 AA 41 00 9D 13 82 14 50 4C |}.SA.SA.A.....PL| 00000B90: 24 B2 50 4C 24 AA 51 24 AA 22 35 30 22 00 A6 13 |$.PL$.Q$."50"...| 00000BA0: 84 14 8D 39 35 30 00 B6 13 93 14 50 4C 24 B2 50 |...950.....PL$.P| 00000BB0: 4C 24 AA 41 4E 24 00 C0 13 95 14 8D 31 30 35 30 |L$.AN$......1050| 00000BC0: 00 CA 13 96 14 89 35 32 31 30 00 D3 13 9B 14 8D |......5210......| 00000BD0: 38 31 30 00 FC 13 A0 14 50 4C 24 B2 51 24 AA 22 |810.....PL$.Q$."| 00000BE0: 31 35 2A 2A 2A 2A 53 41 4C 44 4F 2A 2A 2A 2A 22 |15****SALDO****"| 00000BF0: AA C4 28 53 41 29 3A 8D 31 30 36 30 00 08 14 A5 |..(SA):.1060....| 00000C00: 14 51 51 24 B2 22 31 22 00 0E 14 AA 14 8E 00 31 |.QQ$."1".......1| 00000C10: 14 B4 14 85 22 54 45 4B 53 54 4B 4F 44 45 22 3B |...."TEKSTKODE";| 00000C20: 41 25 3A 42 B2 30 3A 53 41 B2 30 3A 8D 35 30 30 |A%:B.0:SA.0:.500| 00000C30: 30 00 5C 14 B5 14 50 4C 24 B2 51 24 AA 22 31 30 |0.\...PL$.Q$."10| 00000C40: 4F 50 47 30 52 45 4C 53 45 20 41 46 20 22 AA 54 |OPG0RELSE AF ".T| 00000C50: 54 24 28 41 25 29 3A 8D 31 30 36 30 00 66 14 B6 |T$(A%):.1060.f..| 00000C60: 14 8D 31 30 35 30 00 74 14 BE 14 8B 42 B3 43 A7 |..1050.t....B.C.| 00000C70: 8D 38 30 30 00 88 14 BF 14 42 B2 42 AA 31 3A 8B |.800.....B.B.1:.| 00000C80: 42 B1 43 A7 35 33 37 35 00 BD 14 C0 14 8B 53 54 |B.C.5375......ST| 00000C90: B3 B1 30 A7 99 22 46 45 4A 4C 2E 2E 2E 46 4F 52 |..0.."FEJL...FOR| 00000CA0: 20 47 45 4E 53 54 41 52 54 20 53 4B 52 49 56 3A | GENSTART SKRIV:| 00000CB0: 20 47 4F 54 4F 20 39 30 30 30 22 3A 90 00 D0 14 | GOTO 9000":....| 00000CC0: C1 14 8B 51 51 24 B3 B1 22 31 22 A7 8D 39 30 30 |...QQ$.."1"..900| 00000CD0: 00 E4 14 C3 14 8B C6 28 42 24 29 B3 B1 41 25 A7 |.......(B$)..A%.| 00000CE0: 35 33 31 30 00 20 15 C8 14 50 4C 24 B2 50 4C 24 |5310. ...PL$.PL$| 00000CF0: AA C9 28 C4 28 C6 28 44 24 29 29 2C 32 29 3A 50 |..(.(.(D$)),2):P| 00000D00: 4C 24 B2 50 4C 24 AA 22 20 2F 20 22 AA C9 28 C4 |L$.PL$." / "..(.| 00000D10: 28 C6 28 45 24 29 29 2C 32 29 AA 22 20 20 20 22 |(.(E$)),2)." "| 00000D20: 00 3B 15 DC 14 54 B2 C6 28 41 24 29 3A 50 4C 24 |.;...T..(A$):PL$| 00000D30: B2 50 4C 24 AA 4B 54 24 28 54 29 00 47 15 E1 14 |.PL$.KT$(T).G...| 00000D40: 53 41 B2 53 41 AA 41 00 5B 15 E6 14 50 4C 24 B2 |SA.SA.A.[...PL$.| 00000D50: 50 4C 24 AA 51 24 AA 22 35 30 22 00 64 15 E8 14 |PL$.Q$."50".d...| 00000D60: 8D 39 35 30 00 74 15 F7 14 50 4C 24 B2 50 4C 24 |.950.t...PL$.PL$| 00000D70: AA 41 4E 24 00 7E 15 F9 14 8D 31 30 35 30 00 88 |.AN$.~....1050..| 00000D80: 15 FA 14 89 35 33 31 30 00 91 15 FF 14 8D 38 31 |....5310......81| 00000D90: 30 00 BA 15 04 15 50 4C 24 B2 51 24 AA 22 31 35 |0.....PL$.Q$."15| 00000DA0: 2A 2A 2A 2A 53 41 4C 44 4F 2A 2A 2A 2A 22 AA C4 |****SALDO****"..| 00000DB0: 28 53 41 29 3A 8D 31 30 36 30 00 C6 15 09 15 51 |(SA):.1060.....Q| 00000DC0: 51 24 B2 22 31 22 00 CC 15 0E 15 8E 00 DF 15 18 |Q$."1"..........| 00000DD0: 15 53 41 B2 30 3A 42 B2 30 3A 8D 35 30 30 30 00 |.SA.0:B.0:.5000.| 00000DE0: ED 15 22 15 8B 42 B3 43 A7 8D 38 30 30 00 01 16 |.."..B.C..800...| 00000DF0: 23 15 42 B2 42 AA 31 3A 8B 42 B1 43 A7 35 34 37 |#.B.B.1:.B.C.547| 00000E00: 35 00 36 16 24 15 8B 53 54 B3 B1 30 A7 99 22 46 |5.6.$..ST..0.."F| 00000E10: 45 4A 4C 2E 2E 2E 46 4F 52 20 47 45 4E 53 54 41 |EJL...FOR GENSTA| 00000E20: 52 54 20 53 4B 52 49 56 3A 20 47 4F 54 4F 20 39 |RT SKRIV: GOTO 9| 00000E30: 30 30 30 22 3A 90 00 49 16 25 15 8B 51 51 24 B3 |000":..I.%..QQ$.| 00000E40: B1 22 31 22 A7 8D 39 30 30 00 53 16 5E 15 89 35 |."1"..900.S.^..5| 00000E50: 34 31 30 00 5C 16 63 15 8D 38 31 30 00 68 16 6D |410.\.c..810.h.m| 00000E60: 15 51 51 24 B2 22 31 22 00 6E 16 72 15 8E 00 82 |.QQ$."1".n.r....| 00000E70: 16 7C 15 53 41 B2 30 3A 8F 53 41 4C 44 49 55 44 |.|.SA.0:.SALDIUD| 00000E80: 53 4B 00 B1 16 86 15 8B 51 51 24 B3 B1 22 31 22 |SK......QQ$.."1"| 00000E90: A7 99 22 53 41 4C 44 49 20 53 4B 41 4C 20 44 41 |.."SALDI SKAL DA| 00000EA0: 4E 4E 45 53 20 46 30 52 53 54 22 3A 89 35 35 39 |NNES F0RST":.559| 00000EB0: 30 00 DA 16 8B 15 50 4C 24 B2 51 24 AA 22 31 35 |0.....PL$.Q$."15| 00000EC0: 2A 2A 2A 53 41 4C 44 4F 55 44 53 4B 52 49 46 54 |***SALDOUDSKRIFT| 00000ED0: 2A 2A 2A 22 3A 8D 31 30 36 30 00 E7 16 90 15 81 |***":.1060......| 00000EE0: 4E B2 31 A4 32 35 35 00 F8 16 95 15 8B 53 28 4E |N.1.255......S(N| 00000EF0: 29 B2 30 A7 35 35 36 30 00 17 17 9A 15 50 4C 24 |).0.5560.....PL$| 00000F00: B2 51 24 AA 22 31 30 22 AA 4B 54 24 28 4E 29 AA |.Q$."10".KT$(N).| 00000F10: 51 24 AA 22 34 35 22 00 27 17 A4 15 41 B2 53 28 |Q$."45".'...A.S(| 00000F20: 4E 29 3A 8D 39 35 30 00 3D 17 A9 15 50 4C 24 B2 |N):.950.=...PL$.| 00000F30: 50 4C 24 AA 41 4E 24 3A 8D 31 30 35 30 00 4B 17 |PL$.AN$:.1050.K.| 00000F40: AE 15 53 41 B2 28 53 41 AA 41 29 00 52 17 B8 15 |..SA.(SA.A).R...| 00000F50: 82 4E 00 60 17 BD 15 41 B2 53 41 3A 8D 39 35 30 |.N.`...A.SA:.950| 00000F60: 00 7C 17 C2 15 50 4C 24 B2 22 2A 2A 53 41 4C 44 |.|...PL$."**SALD| 00000F70: 4F 22 AA 41 4E 24 3A 8D 31 30 36 30 00 86 17 D6 |O".AN$:.1060....| 00000F80: 15 8D 31 30 30 30 00 8C 17 DF 15 8E 00 A3 17 E0 |..1000..........| 00000F90: 15 8F 47 52 55 50 50 45 56 49 53 55 44 53 4B 52 |..GRUPPEVISUDSKR| 00000FA0: 49 46 54 00 AC 17 E5 15 53 41 B2 30 00 DB 17 EA |IFT.....SA.0....| 00000FB0: 15 8B 51 51 24 B3 B1 22 31 22 A7 99 22 53 41 4C |..QQ$.."1".."SAL| 00000FC0: 44 49 20 53 4B 41 4C 20 44 41 4E 4E 45 53 20 46 |DI SKAL DANNES F| 00000FD0: 30 52 53 54 22 3A 89 35 36 39 30 00 09 18 EF 15 |0RST":.5690.....| 00000FE0: 50 4C 24 B2 51 24 AA 22 31 30 2A 2A 2A 47 52 55 |PL$.Q$."10***GRU| 00000FF0: 50 50 45 52 45 54 20 55 44 53 4B 52 49 46 54 2A |PPERET UDSKRIFT*| 00001000: 2A 2A 22 3A 8D 31 30 36 30 00 15 18 F2 15 81 47 |**":.1060......G| 00001010: B2 31 A4 51 47 00 36 18 F3 15 50 4C 24 B2 51 24 |.1.QG.6...PL$.Q$| 00001020: AA 22 31 30 47 52 55 50 50 45 22 AA C4 28 47 29 |."10GRUPPE"..(G)| 00001030: 3A 8D 31 30 36 30 00 43 18 F4 15 81 4E B2 31 A4 |:.1060.C....N.1.| 00001040: 32 35 35 00 60 18 F6 15 8B 47 B3 B1 28 C6 28 CA |255.`....G..(.(.| 00001050: 28 42 54 24 2C 4E 2C 31 29 29 29 A7 35 36 36 30 |(BT$,N,1))).5660| 00001060: 00 71 18 F9 15 8B 53 28 4E 29 B2 30 A7 35 36 36 |.q....S(N).0.566| 00001070: 30 00 90 18 FE 15 50 4C 24 B2 51 24 AA 22 31 30 |0.....PL$.Q$."10| 00001080: 22 AA 4B 54 24 28 4E 29 AA 51 24 AA 22 34 35 22 |".KT$(N).Q$."45"| 00001090: 00 A0 18 08 16 41 B2 53 28 4E 29 3A 8D 39 35 30 |.....A.S(N):.950| 000010A0: 00 B6 18 0D 16 50 4C 24 B2 50 4C 24 AA 41 4E 24 |.....PL$.PL$.AN$| 000010B0: 3A 8D 31 30 35 30 00 C4 18 12 16 53 41 B2 28 53 |:.1050.....SA.(S| 000010C0: 41 AA 41 29 00 CB 18 1C 16 82 4E 00 DA 18 1D 16 |A.A)......N.....| 000010D0: 8B 53 41 B2 30 A7 35 36 37 35 00 ED 18 21 16 41 |.SA.0.5675...!.A| 000010E0: B2 53 41 3A 53 41 B2 30 3A 8D 39 35 30 00 09 19 |.SA:SA.0:.950...| 000010F0: 26 16 50 4C 24 B2 22 2A 2A 53 41 4C 44 4F 22 AA |&.PL$."**SALDO".| 00001100: 41 4E 24 3A 8D 31 30 36 30 00 13 19 27 16 8D 31 |AN$:.1060...'..1| 00001110: 30 35 30 00 1D 19 28 16 8D 31 30 35 30 00 24 19 |050...(..1050.$.| 00001120: 2B 16 82 47 00 2E 19 3A 16 8D 31 30 30 30 00 34 |+..G...:..1000.4| 00001130: 19 43 16 8E 00 52 19 28 23 99 22 93 11 11 1D 1D |.C...R.(#.".....| 00001140: 2A 2A 20 50 52 49 4E 54 45 52 4D 45 4E 55 20 2A |** PRINTERMENU *| 00001150: 2A 22 00 89 19 32 23 99 22 11 46 31 3D 49 4E 44 |*"...2#.".F1=IND| 00001160: 4C 20 41 46 20 54 45 4B 53 54 45 52 22 3A 99 22 |L AF TEKSTER":."| 00001170: 11 46 33 3D 55 44 53 4B 52 49 46 54 20 41 46 20 |.F3=UDSKRIFT AF | 00001180: 54 45 4B 53 54 45 52 20 22 00 A6 19 33 23 99 22 |TEKSTER "...3#."| 00001190: 11 46 35 3D 55 44 53 4B 52 49 46 54 20 41 46 20 |.F5=UDSKRIFT AF | 000011A0: 4B 4F 4E 54 49 22 00 BC 19 35 23 99 22 11 46 37 |KONTI"...5#.".F7| 000011B0: 3D 4F 50 47 30 52 45 4C 53 45 52 22 00 C6 19 3C |=OPG0RELSER"...<| 000011C0: 23 8D 31 30 31 30 00 E0 19 46 23 91 58 8D 37 30 |#.1010...F#.X.70| 000011D0: 30 2C 32 30 30 30 2C 33 30 30 30 2C 35 30 37 30 |0,2000,3000,5070| 000011E0: 00 EA 19 50 23 89 39 30 30 30 00 00 00 C7 |...P#.9000.... |
.......:.53280,0:.53281,0:.8,4.A...Q$.G( 16):QQ$."0":.S(255):QG.15.O....KT$(255). C....TT$(255):.9000...D.."..INDSAET DISK MED KONTOTEKSTER":.1000...N..2,8,2,"KON TINAVNE,S,R".M.... N.1.255:.ST.0..2,KT$( N):.N..... 2:."OK ";N;" REC LAEST": .... R..2,8,2,"MOMS,S,R".1.... N.1.255:.ST.0. .#2,A$:MT$.MT$.A$:A$."":..Q... 2:."OK "; N;" REC LAEST": ..H.6..2,8,2,"DR/ST,S,R" ...J.. N.1.255:.ST.0..#2,A$:DT$.DT$.A$:. ...T. 2:."OK ";N;" REC LAEST": ..F....2, 8,2,"BUDG,S,R"...... N.1.255:.ST.0..#2,A $:BT$.BT$.A$:...... 2:."OK ";N;" REC LAE ST": ..$....2,8,2,"LIKV,S,R".L.... N.1.2 55:.ST.0..#2,A$:LT$.LT$.A$:..L... 2:."OK ";N;" REC LAEST": ....B..2,8,2,"TEKSTTA BEL,S,R"...V.. N.1.255:.ST.0..2,TT$(N):. ..... 2:.......100.C.F..210.L.P..310.U.Z ..410......510......610......... ..ST.0. .2,A:SR.ST...!..ST.0..#2,A$:SR.ST.0."..S T.0..#2,B$:SR.ST.G.%..ST.0..#2,D$:SR.ST. `.&..ST.0..#2,E$:SR.ST:..I.*. 2:..}....S ALDIOPBYGNING.....QS%.F(A$):S(QS%).(S(QS %).A):.......BEL0BOPG......A.0.01.965.N. ...A..0.01.965.V...A.0...E.AN$.D(A):Q.C( AN$)...J..L.Q.1..1.%.O..J(AN$,L,1)..".". .:AN$.AN$.".00":. 985.<.T..L.Q.1.AN$.AN$ ."0".].Y..C(AN$).20.AN$." ".AN$:. 985.C. ....V...."TAST ..":X.0.....X.0:X$."":.X$ :.X$."".1010.....X.F(X$).132............ 8,PL$:PL$."":....$..8,G(14)PL$:.8,G(15): PL$."":....P..UDSKRIFT AF TEKSTTABEL...U ..1050.(.Z.PL$."*** TEKSTER ***":.1060 .2....1050.R...PL$." NR TEKST":.10 50.\....1050......N.1.255:.C(TT$(N)).1.P L$." ":PL$.PL$.I(D(N),3):.2045......2060 :.LE>2.G....C(PL$).12.PL$.PL$." ":.2045. ....PL$.PL$.TT$(N):.1050......N...3..... ...UDSKRIFT AF KONTOTEKSTER.4.B.PL$." *** KONTONAVNE ***":.1060.>.G..1050.. .L.PL$.G(16)."03NR".G(16)."08TEKST".G(16 )."28DR/ST".G(16)."40MOMS"...M.PL$.PL$.G (16)."50BUDGET"...Q..1060...V..N.1.255:. C(KT$(N)).1.PL$.Q$."03".I(D(N),3):.3050. .....3060:.LE>2.%...PL$.PL$.Q$."08".KT$( N).Q$."32".J(DT$,N,1).Q$."43".U...PL$.PL $.J(MT$,N,1).Q$."52".D(F(J(BT$,N,1)))._. ...1050.F....N.L..........UDSKR AF ENKEL TKONTO......"REGISTERNR?":.I1%:A$.G(I1%) :.I1%.0.A$."0".Q...."DATO":.I2%:D$.G(I2% )......"MAANED":.I3%:E$.G(I3%).....R1$.D (F(A$)).I(D(F(D$)),2).I(D(F(E$)),2).R... .".INDSAET DISK MED DET REGISTER DER SKA L S0GES I".\....1000.T... 2:.2,8,2,R1$." S,R".}....800......"REGISTRET ",F(A$);" ER AABNET. DET INDEHOLDER ";A;" REC":C.A ...D.."SIDSTE DATO FOR SKRIVNING: ";F(D$ );"/";F(E$):.1000...I...3.N..".** UDSKR IFTS MENU **":.".F1=KONTOOPG/TEKST".M.X. .".F3=KONTOOPG/MODKT".G....".F5=TEKSTOPG 0RELSE"......QQ$.."1"..".F7=DAN SALDI".. ....QQ$."1"..".F2=SALDOOPG0RELSE":.".F4= GRUPPERET SALDO".Q....".F6=RETUR"......1 010.....XV.X......X.5200,5200,5300,5400, 5500,5600......X.7.5190.!.A..5070.'.F... H.P.."KONTONR";A%:B.0:SA.0:.5000.S.Q.PL$ .Q$."10OPG0RELSE AF ".KT$(A%):.1060.}.R. .1050...Z..B.C..800...[.B.B.1:.B.C.5275. T.\..ST..0.."FEJL...FOR GENSTART SKRIV: GOTO 9000":....]..QQ$.."1"..900..._..F(A $)..A%.5210.7.D.PL$.PL$.I(D(F(D$)),2):PL $.PL$." / ".I(D(F(E$)),2)." ".^.X.T.F( B$):.XV.1.PL$.PL$.TT$(T):.5245.}.Y..XV.2 .PL$.PL$.KT$(T):.5245...}.SA.SA.A.....PL $.PL$.Q$."50"......950.....PL$.PL$.AN$.. ....1050.J....5210.S....810... .PL$.Q$." 15****SALDO****".D(SA):.1060.....QQ$."1" .......1...."TEKSTKODE";A%:B.0:SA.0:.500 0.\...PL$.Q$."10OPG0RELSE AF ".TT$(A%):. 1060.F....1050.T....B.C..800.....B.B.1:. B.C.5375......ST..0.."FEJL...FOR GENSTAR T SKRIV: GOTO 9000":..P.A..QQ$.."1"..900 ...C..F(B$)..A%.5310. .H.PL$.PL$.I(D(F(D $)),2):PL$.PL$." / ".I(D(F(E$)),2)." " .;...T.F(A$):PL$.PL$.KT$(T).G...SA.SA.A. [...PL$.PL$.Q$."50".D....950.T...PL$.PL$ .AN$.~....1050......5310......810.....PL $.Q$."15****SALDO****".D(SA):.1060.F...Q Q$."1".L.........SA.0:B.0:.5000..."..B.C ..800...#.B.B.1:.B.C.5475.6.$..ST..0.."F EJL...FOR GENSTART SKRIV: GOTO 9000":..I .%..QQ$.."1"..900.S.^..5410.\.C..810.H.M .QQ$."1".N.R.....|.SA.0:.SALDIUDSK...... QQ$.."1".."SALDI SKAL DANNES F0RST":.559 0.Z...PL$.Q$."15***SALDOUDSKRIFT***":.10 60......N.1.255......S(N).0.5560.....PL$ .Q$."10".KT$(N).Q$."45".'...A.S(N):.950. =...PL$.PL$.AN$:.1050.K...SA.(SA.A).R... .N.`...A.SA:.950.|.B.PL$."**SALDO".AN$:. 1060...V..1000............GRUPPEVISUDSKR IFT.....SA.0......QQ$.."1".."SALDI SKAL DANNES F0RST":.5690.....PL$.Q$."10***GRU PPERET UDSKRIFT***":.1060......G.1.QG.6. ..PL$.Q$."10GRUPPE".D(G):.1060.C....N.1. 255.`....G..(F(J(BT$,N,1))).5660.Q....S( N).0.5660.....PL$.Q$."10".KT$(N).Q$."45" . ...A.S(N):.950.....PL$.PL$.AN$:.1050.D ...SA.(SA.A).K....N.Z....SA.0.5675...!.A .SA:SA.0:.950...&.PL$."**SALDO".AN$:.106 0...'..1050...(..1050.$.+..G...:..1000.4 .C...R.(#.".....** PRINTERMENU **"...2#. ".F1=INDL AF TEKSTER":.".F3=UDSKRIFT AF TEKSTER "...3#.".F5=UDSKRIFT AF KONTI".. .5#.".F7=OPG0RELSER".F.<#.1010...F#.X.70 0,2000,3000,5070...P#.9000...G
> CLICK IMAGE PREVIEW FOR FULL MODAL