FILE INFORMATION
FILENAME(S): PRINT
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-11-30 19:44:04
APPEARS ON: 1 disk(s)
FILE HASH
c58655cba96bb98107b342a652edaf416f4f857e2d38ccf6141a0e0ffa06edb8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISK 6 SERIE 13 | PRG | Curtcool, CRL | 3 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0D 08 02 00 9F 20 34 2C 34 2C 30 00 26 08 |....... 4,4,0.&.| 00000010: 0F 00 86 20 53 24 28 37 30 30 29 2C 52 4B 25 28 |... S$(700),RK%(| 00000020: 31 33 2C 31 30 29 00 2F 08 14 00 99 22 93 22 00 |13,10)./....".".| 00000030: 5D 08 17 00 99 20 A3 30 34 29 3B 22 2E 2E 2E 2E |].... .04);"....| 00000040: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................| 00000050: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 22 00 8E 08 |............"...| 00000060: 19 00 99 20 A3 30 34 29 3B 22 D1 20 12 54 49 50 |... .04);". .TIP| 00000070: 53 4B 55 50 4F 4E 20 50 52 49 4E 54 20 53 59 53 |SKUPON PRINT SYS| 00000080: 54 45 4D 20 43 42 4D 36 34 92 20 D1 2E 22 00 BB |TEM CBM64. .."..| 00000090: 08 1E 00 99 20 A3 30 34 29 3B 22 D1 20 4C 41 56 |.... .04);". LAV| 000000A0: 45 54 20 41 46 20 46 52 41 4E 4B 20 45 43 4B 48 |ET AF FRANK ECKH| 000000B0: 41 55 53 45 4E 28 43 29 20 D1 22 00 E8 08 23 00 |AUSEN(C) ."...#.| 000000C0: 99 20 A3 30 34 29 3B 22 D1 20 50 41 41 20 47 52 |. .04);". PAA GR| 000000D0: 55 4E 44 4C 41 47 20 41 46 20 4F 50 4C 59 53 4E |UNDLAG AF OPLYSN| 000000E0: 49 4E 47 45 52 20 D1 22 00 15 09 28 00 99 20 A3 |INGER ."...(.. .| 000000F0: 30 34 29 3B 22 D1 20 20 20 46 52 41 20 43 4F 4D |04);". FRA COM| 00000100: 4D 4F 44 4F 52 45 20 43 4F 4D 50 55 54 45 52 20 |MODORE COMPUTER | 00000110: 20 20 20 D1 22 00 43 09 2D 00 99 20 A3 30 34 29 | .".C.-.. .04)| 00000120: 3B 22 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |;"..............| 00000130: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................| 00000140: 2E 2E 22 00 5D 09 32 00 85 22 11 11 11 1D 1D 1D |..".].2.."......| 00000150: 1D 4B 41 4D 50 20 55 47 45 3A 22 3B 55 00 73 09 |.KAMP UGE:";U.s.| 00000160: 37 00 8B 20 55 B3 31 20 B0 20 55 B1 35 32 20 A7 |7.. U.1 . U.52 .| 00000170: 20 35 30 00 8F 09 3C 00 85 20 22 11 11 1D 1D 1D | 50...<.. ".....| 00000180: 1D 4E 41 56 4E 20 20 20 20 3A 22 3B 4E 41 24 00 |.NAVN :";NA$.| 00000190: AC 09 41 00 85 20 22 1D 1D 1D 1D 41 44 52 45 53 |..A.. "....ADRES| 000001A0: 53 45 20 20 20 20 20 22 3B 41 44 24 00 C9 09 46 |SE ";AD$...F| 000001B0: 00 85 20 22 1D 1D 1D 1D 50 4F 53 54 4E 52 20 20 |.. "....POSTNR | 000001C0: 20 20 20 3A 22 3B 50 4E 24 00 E6 09 4B 00 85 20 | :";PN$...K.. | 000001D0: 22 1D 1D 1D 1D 42 59 4E 41 56 4E 20 20 20 20 20 |"....BYNAVN | 000001E0: 3A 22 3B 42 59 24 00 16 0A 50 00 99 20 A3 30 34 |:";BY$...P.. .04| 000001F0: 29 3B 22 28 11 11 2C 12 2C 20 29 54 45 53 54 2F |);"(..,., )TEST/| 00000200: 4A 55 53 54 45 52 20 50 52 49 4E 54 45 52 20 4A |JUSTER PRINTER J| 00000210: 2F 4E 28 92 29 22 00 2E 0A 55 00 A1 20 53 56 24 |/N(.)"...U.. SV$| 00000220: 3A 8B 20 53 56 24 B2 22 22 20 A7 20 38 35 00 4F |:. SV$."" . 85.O| 00000230: 0A 5A 00 8B 20 53 56 24 B2 22 4A 22 20 A7 8D 20 |.Z.. SV$."J" .. | 00000240: 31 31 35 35 3A 53 56 B2 31 3A 89 20 31 31 30 00 |1155:SV.1:. 110.| 00000250: 71 0A 5F 00 8B 20 53 56 24 B2 22 4E 22 20 A7 20 |q._.. SV$."N" . | 00000260: 8D 20 31 34 30 3A 20 53 56 B2 32 3A 89 20 31 31 |. 140: SV.2:. 11| 00000270: 30 00 94 0A 64 00 99 20 A3 30 34 29 3B 22 49 4E |0...d.. .04);"IN| 00000280: 44 54 41 53 54 20 4A 20 45 4C 4C 45 52 20 4E 22 |DTAST J ELLER N"| 00000290: 3A 89 38 35 00 A6 0A 6E 00 8B 20 53 56 B2 31 20 |:.85...n.. SV.1 | 000002A0: A7 20 89 20 38 30 00 CB 0A 6F 00 8B 20 C5 28 46 |. . 80...o.. .(F| 000002B0: 24 29 B1 30 20 A7 20 81 20 20 49 B2 31 20 A4 20 |$).0 . . I.1 . | 000002C0: 31 30 30 30 3A 82 3A 89 20 32 30 00 FD 0A 73 00 |1000:.:. 20...s.| 000002D0: 99 20 A3 30 34 29 3B 22 11 44 45 54 20 56 41 52 |. .04);".DET VAR| 000002E0: 20 44 45 54 20 21 20 54 41 4B 20 46 4F 52 20 44 | DET ! TAK FOR D| 000002F0: 45 4E 4E 45 20 47 41 4E 47 2C 22 3A 80 00 15 0B |ENNE GANG,":....| 00000300: 8C 00 8F 20 53 45 4C 56 45 20 53 30 47 4E 49 4E |... SELVE S0GNIN| 00000310: 47 45 4E 20 22 00 23 0B B4 00 9F 20 31 35 2C 38 |GEN ".#.... 15,8| 00000320: 2C 31 35 00 41 0B C8 00 9F 20 35 2C 38 2C 35 2C |,15.A.... 5,8,5,| 00000330: 22 30 3A 4B 22 AA C4 28 55 29 AA 22 2C 53 2C 52 |"0:K"..(U).",S,R| 00000340: 22 00 55 0B DC 00 84 31 35 2C 46 24 2C 47 24 2C |".U....15,F$,G$,| 00000350: 48 24 2C 49 24 00 8F 0B F0 00 8B 20 C5 28 46 24 |H$,I$...... .(F$| 00000360: 29 B1 30 20 A7 99 20 A3 30 34 29 3B 22 11 11 54 |).0 .. .04);"..T| 00000370: 49 50 53 46 49 4C 20 49 4B 4B 45 20 46 55 4E 44 |IPSFIL IKKE FUND| 00000380: 45 54 21 22 3A A0 31 35 3A A0 35 3A 52 45 54 00 |ET!":.15:.5:RET.| 00000390: 97 0B 04 01 4B B2 31 00 A4 0B 18 01 84 35 2C 53 |....K.1......5,S| 000003A0: 24 28 4B 29 00 BC 0B 2C 01 8B 20 53 54 B2 30 20 |$(K)...,.. ST.0 | 000003B0: A7 20 4B B2 4B AA 31 3A 89 32 38 30 00 C9 0B 40 |. K.K.1:.280...@| 000003C0: 01 A0 20 31 35 3A A0 20 35 00 E2 0B 90 01 8F 20 |.. 15:. 5...... | 000003D0: 2A 2A 20 48 4F 56 45 44 20 52 55 54 49 4E 45 20 |** HOVED RUTINE | 000003E0: 2A 2A 00 F3 0B 95 01 54 49 24 B2 22 30 30 30 30 |**.....TI$."0000| 000003F0: 30 30 22 00 06 0C 9A 01 81 20 41 B2 31 20 A4 20 |00"...... A.1 . | 00000400: 4B 20 A9 20 31 30 00 17 0C A4 01 3A 20 81 20 42 |K . 10.....: . B| 00000410: B2 31 20 A4 20 31 33 00 28 0C AE 01 3A 20 81 20 |.1 . 13.(...: . | 00000420: 43 B2 31 20 A4 20 31 30 00 41 0C B8 01 3A 20 45 |C.1 . 10.A...: E| 00000430: 44 24 B2 CA 28 53 24 28 41 AA 43 29 2C 42 2C 31 |D$..(S$(A.C),B,1| 00000440: 29 00 5F 0C C2 01 3A 20 8B 20 45 44 24 B2 22 22 |)._...: . ED$.""| 00000450: 20 A7 20 41 52 B2 43 AB 31 3A 89 20 35 33 30 00 | . AR.C.1:. 530.| 00000460: 82 0C CC 01 3A 20 8B 20 45 44 24 B2 22 31 22 20 |....: . ED$."1" | 00000470: A7 20 52 4B 25 28 42 2C 43 29 B2 31 3A 89 20 35 |. RK%(B,C).1:. 5| 00000480: 30 30 00 A5 0C D6 01 3A 20 8B 20 45 44 24 B2 22 |00.....: . ED$."| 00000490: 58 22 20 A7 20 52 4B 25 28 42 2C 43 29 B2 32 3A |X" . RK%(B,C).2:| 000004A0: 89 20 35 30 30 00 C8 0C E0 01 3A 20 8B 20 45 44 |. 500.....: . ED| 000004B0: 24 B2 22 32 22 20 A7 20 52 4B 25 28 42 2C 43 29 |$."2" . RK%(B,C)| 000004C0: B2 33 3A 89 20 35 30 30 00 FE 0C EA 01 3A 20 99 |.3:. 500.....: .| 000004D0: 22 21 21 46 45 4A 4C 20 49 20 54 49 50 53 46 49 |"!!FEJL I TIPSFI| 000004E0: 4C 2D 54 45 47 4E 3A 22 3B 45 44 24 3B 22 49 4B |L-TEGN:";ED$;"IK| 000004F0: 4B 45 20 54 49 4C 4C 41 44 54 2E 22 3A 90 00 0A |KE TILLADT.":...| 00000500: 0D F4 01 3A 20 41 52 B2 31 30 00 14 0D FE 01 3A |...: AR.10.....:| 00000510: 20 82 20 43 00 1E 0D 08 02 3A 20 82 20 42 00 3C | . C.....: . B.<| 00000520: 0D 12 02 3A 20 8D 20 31 33 34 30 3A 20 8F 20 54 |...: . 1340: . T| 00000530: 45 53 54 20 4F 47 20 50 52 49 4E 54 00 44 0D 1C |EST OG PRINT.D..| 00000540: 02 82 20 41 00 4C 0D 26 02 A0 20 34 00 66 0D 30 |.. A.L.&.. 4.f.0| 00000550: 02 99 20 A3 30 34 29 3B 22 11 11 29 54 49 44 3A |.. .04);"..)TID:| 00000560: 20 22 3B 54 49 24 00 6C 0D 3A 02 8E 00 A4 0D 83 | ";TI$.l.:......| 00000570: 04 8F 20 2A 2A 2A 2A 2A 2A 20 52 41 4E 44 4F 4D |.. ****** RANDOM| 00000580: 20 54 45 53 54 44 41 54 41 20 46 4F 52 20 31 30 | TESTDATA FOR 10| 00000590: 20 45 4E 4B 45 4C 54 52 41 4B 4B 45 52 20 2A 2A | ENKELTRAKKER **| 000005A0: 2A 2A 2A 2A 00 B3 0D 88 04 81 20 49 B2 31 20 A4 |****...... I.1 .| 000005B0: 20 31 33 00 C2 0D 92 04 81 20 4A B2 31 20 A4 20 | 13...... J.1 . | 000005C0: 31 30 00 DB 0D 9C 04 52 4B 25 28 49 2C 4A 29 B2 |10.....RK%(I,J).| 000005D0: 31 AA B5 28 BB 28 31 29 AC 33 29 00 E1 0D A6 04 |1..(.(1).3).....| 000005E0: 82 00 E7 0D B0 04 82 00 F2 0D EC 04 8D 20 31 33 |............. 13| 000005F0: 34 30 00 FA 0D 1E 05 A0 20 34 00 00 0E 28 05 8E |40...... 4...(..| 00000600: 00 44 0E 32 05 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.D.2..**********| 00000610: 2A 2A 2A 2A 2A 2A 2A 2A 2A 48 45 52 20 53 54 41 |*********HER STA| 00000620: 52 54 45 52 20 50 52 49 4E 54 45 52 44 52 49 56 |RTER PRINTERDRIV| 00000630: 45 52 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |ER**************| 00000640: 2A 2A 2A 2A 00 4F 0E 3C 05 8D 20 31 34 33 30 00 |****.O.<.. 1430.| 00000650: 63 0E 50 05 8B 20 41 52 B1 30 20 A7 20 8D 20 32 |c.P.. AR.0 . . 2| 00000660: 30 38 30 00 6E 0E 5A 05 8D 20 32 32 34 30 00 74 |080.n.Z.. 2240.t| 00000670: 0E 64 05 8E 00 97 0E 78 05 8F 20 2B 2D 2D 2D 2D |.d.....x.. +----| 00000680: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000690: 2D 2D 2D 2D 2D 2D 2B 00 BA 0E 82 05 8F 20 21 20 |------+...... ! | 000006A0: 41 46 4B 4F 52 54 20 46 4F 52 20 4C 41 4E 47 45 |AFKORT FOR LANGE| 000006B0: 20 54 45 4B 53 54 45 52 20 21 00 DD 0E 8C 05 8F | TEKSTER !......| 000006C0: 20 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | +--------------| 000006D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 00 FD 0E |------------+...| 000006E0: 96 05 8B 20 C3 28 4E 41 24 29 B1 33 30 20 A7 20 |... .(NA$).30 . | 000006F0: 4E 41 24 B2 C8 28 4E 41 24 2C 33 30 29 00 1C 0F |NA$..(NA$,30)...| 00000700: A0 05 8B 20 C3 28 41 44 24 29 B1 33 30 A7 20 41 |... .(AD$).30. A| 00000710: 44 24 B2 C8 28 41 44 24 2C 33 30 29 00 3A 0F AA |D$..(AD$,30).:..| 00000720: 05 8B 20 C3 28 50 4E 24 29 B1 34 20 A7 20 50 4E |.. .(PN$).4 . PN| 00000730: 24 B2 C8 28 50 4E 24 2C 34 29 00 5A 0F B4 05 8B |$..(PN$,4).Z....| 00000740: 20 C3 28 42 59 24 29 B1 32 30 20 A7 20 42 59 24 | .(BY$).20 . BY$| 00000750: B2 C8 28 42 59 24 2C 32 30 29 00 60 0F BE 05 8E |..(BY$,20).`....| 00000760: 00 84 0F 02 08 8F 20 2B 2D 2D 2D 2D 2D 2D 2D 2D |...... +--------| 00000770: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000780: 2D 2D 2D 2B 00 A8 0F 0C 08 8F 20 21 20 43 48 45 |---+...... ! CHE| 00000790: 4B 20 45 4E 4B 45 4C 54 52 41 4B 4B 45 52 20 20 |K ENKELTRAKKER | 000007A0: 20 20 20 20 20 20 20 21 00 CC 0F 16 08 8F 20 2B | !...... +| 000007B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000007C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 00 E6 0F 20 |-----------+... | 000007D0: 08 8B 20 41 52 B3 31 31 20 AF 20 41 52 B1 30 20 |.. AR.11 . AR.0 | 000007E0: A7 20 32 31 34 30 00 09 10 2A 08 99 22 B9 B9 B9 |. 2140...*.."...| 000007F0: 46 45 4A 4C 20 49 20 45 4E 4B 45 4C 54 52 41 45 |FEJL I ENKELTRAE| 00000800: 4B 4B 45 20 B9 B9 B9 B9 22 00 31 10 34 08 99 20 |KKE ....".1.4.. | 00000810: 22 12 B5 92 20 20 20 20 20 20 20 20 20 20 20 20 |"... | 00000820: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000830: 22 00 62 10 3E 08 99 20 22 12 A1 92 55 4C 4F 56 |".b.>.. "...ULOV| 00000840: 4C 49 47 54 20 41 4E 54 41 4C 20 52 41 45 4B 4B |LIGT ANTAL RAEKK| 00000850: 45 52 3A 3B 41 52 3B 54 41 42 28 32 37 29 3B 22 |ER:;AR;TAB(27);"| 00000860: 20 22 00 7C 10 48 08 99 20 22 20 12 A2 A2 A2 A2 | ".|.H.. " .....| 00000870: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 92 22 00 82 10 52 |..........."...R| 00000880: 08 90 00 91 10 5C 08 81 20 4A B2 31 20 A4 20 41 |.....\.. J.1 . A| 00000890: 52 00 A0 10 66 08 81 20 49 B2 31 20 A4 20 31 33 |R...f.. I.1 . 13| 000008A0: 00 C5 10 70 08 8B 20 52 4B 25 28 49 2C 4A 29 B1 |...p.. RK%(I,J).| 000008B0: 30 20 AF 20 52 4B 25 28 49 2C 4A 29 B3 34 20 A7 |0 . RK%(I,J).4 .| 000008C0: 20 32 32 31 30 00 E8 10 7A 08 99 20 22 20 20 20 | 2210...z.. " | 000008D0: 20 46 45 4A 4C 20 49 20 45 4E 4B 45 4C 54 52 41 | FEJL I ENKELTRA| 000008E0: 45 4B 4B 45 20 20 20 22 00 0F 11 84 08 99 20 22 |EKKE "...... "| 000008F0: 12 20 92 20 20 20 20 20 20 20 20 20 20 20 20 20 |. . | 00000900: 20 20 20 20 20 20 20 20 20 20 20 20 A1 20 22 00 | . ".| 00000910: 3C 11 8E 08 99 20 22 12 20 92 4D 41 4E 47 4C 45 |<.... ". .MANGLE| 00000920: 52 20 54 45 47 4E 20 49 20 52 41 45 4B 4B 45 3A |R TEGN I RAEKKE:| 00000930: 22 3B 4A 3B A3 32 37 29 3B 22 20 22 00 5B 11 98 |";J;.27);" ".[..| 00000940: 08 99 20 22 20 28 12 29 20 20 20 20 20 20 20 20 |.. " (.) | 00000950: 20 20 20 20 20 20 28 92 29 20 22 00 63 11 A2 08 | (.) ".c...| 00000960: 82 20 49 00 6B 11 AC 08 82 20 4A 00 71 11 B6 08 |. I.k.... J.q...| 00000970: 8E 00 96 11 C0 08 8F 20 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 2A 2A 2A 00 BB 11 CA 08 8F 20 2A 2A 20 |******...... ** | 000009A0: 48 45 52 45 46 54 45 52 20 50 52 49 4E 54 45 52 |HEREFTER PRINTER| 000009B0: 20 53 50 45 43 49 46 49 4B 20 2A 00 E0 11 D4 08 | SPECIFIK *.....| 000009C0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************| 000009D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000009E0: 00 05 12 C4 09 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...... *********| 000009F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000A00: 2A 2A 2A 2A 2A 00 2A 12 CE 09 8F 20 2A 2A 2A 2A |*****.*.... ****| 00000A10: 2A 20 50 52 49 4E 54 45 52 20 53 50 45 43 49 46 |* PRINTER SPECIF| 00000A20: 49 4B 20 2A 2A 2A 2A 2A 2A 2A 00 4F 12 D8 09 8F |IK *******.O....| 00000A30: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************| 00000A40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.| 00000A50: 55 12 E2 09 8F 00 6A 12 EC 09 8F 20 2A 2A 2A 2A |U.....j.... ****| 00000A60: 20 2A 2A 2A 2A 20 2A 2A 2A 2A 00 7F 12 F6 09 8F | **** ****......| 00000A70: 20 2A 20 20 2A 20 2A 20 20 2A 20 20 20 20 2A 00 | * * * * *.| 00000A80: 94 12 00 0A 8F 20 2A 2A 2A 2A 20 2A 20 20 2A 20 |..... **** * * | 00000A90: 2A 2A 2A 2A 00 A6 12 0A 0A 8F 20 2A 20 20 2A 20 |****...... * * | 00000AA0: 2A 20 20 2A 20 2A 00 BB 12 14 0A 8F 20 2A 2A 2A |* * *...... ***| 00000AB0: 2A 20 2A 2A 2A 2A 20 2A 2A 2A 2A 00 C1 12 1E 0A |* **** ****.....| 00000AC0: 8F 00 D5 12 28 0A 9F 20 35 2C 34 2C 35 3A 9F 20 |....(.. 5,4,5:. | 00000AD0: 36 2C 34 2C 36 00 F5 12 32 0A 4E 24 B2 C7 28 30 |6,4,6...2.N$..(0| 00000AE0: 29 AA C7 28 30 29 3A 4E 24 B2 4E 24 AA 4E 24 AA |)..(0):N$.N$.N$.| 00000AF0: 4E 24 AA 4E 24 00 05 13 3C 0A 98 36 2C C7 28 34 |N$.N$...<..6,.(4| 00000B00: 36 29 3A 98 34 00 10 13 50 0A 8D 20 32 38 39 30 |6):.4...P.. 2890| 00000B10: 00 20 13 5A 0A 98 36 2C C7 28 38 35 29 3A 98 34 |. .Z..6,.(85):.4| 00000B20: 00 39 13 64 0A 98 36 2C C7 28 37 30 29 3A 98 34 |.9.d..6,.(70):.4| 00000B30: 2C A6 33 34 29 3B 4E 41 24 00 5A 13 6E 0A 98 34 |,.34);NA$.Z.n..4| 00000B40: 2C A6 33 34 29 41 44 24 3A 98 34 2C A6 33 34 29 |,.34)AD$:.4,.34)| 00000B50: 50 4E 24 22 20 20 22 42 59 24 00 6B 13 78 0A 98 |PN$" "BY$.k.x..| 00000B60: 36 2C C7 28 31 30 35 29 3A 98 34 00 7F 13 82 0A |6,.(105):.4.....| 00000B70: 98 34 3A 98 36 2C C7 28 31 31 38 29 3A 98 34 00 |.4:.6,.(118):.4.| 00000B80: 8A 13 96 0A 8D 20 32 38 39 30 00 9A 13 A0 0A 98 |..... 2890......| 00000B90: 36 2C C7 28 33 33 29 3A 98 34 00 A8 13 AA 0A A0 |6,.(33):.4......| 00000BA0: 20 35 3A A0 20 36 3A 8E 00 BC 13 B4 0A 58 B2 B5 | 5:. 6:......X..| 00000BB0: 28 52 AC 31 33 2E 34 38 AA 35 32 29 00 C9 13 4A |(R.13.48.52)...J| 00000BC0: 0B 98 36 2C C7 28 33 34 29 00 D9 13 54 0B 81 20 |..6,.(34)...T.. | 00000BD0: 58 58 B2 31 20 A4 20 31 33 00 E8 13 5E 0B 81 20 |XX.1 . 13...^.. | 00000BE0: 49 B2 31 20 A4 20 41 52 00 07 14 68 0B 52 B2 52 |I.1 . AR...h.R.R| 00000BF0: 4B 25 28 58 58 2C 49 29 AA 33 AC 28 49 AB 31 29 |K%(XX,I).3.(I.1)| 00000C00: 3A 8D 20 33 30 30 30 00 0D 14 72 0B 82 00 14 14 |:. 3000...r.....| 00000C10: 7C 0B 98 34 00 1A 14 86 0B 82 00 2B 14 90 0B 98 ||..4.......+....| 00000C20: 36 2C C7 28 31 32 35 29 3A 98 34 00 31 14 9A 0B |6,.(125):.4.1...| 00000C30: 8E 00 45 14 B8 0B 58 B2 B5 28 52 AC 31 33 2E 34 |..E...X..(R.13.4| 00000C40: 38 AA 35 32 29 00 85 14 C2 0B 58 B2 58 AA 35 3A |8.52).....X.X.5:| 00000C50: 58 25 B2 58 AD 38 3A 58 31 B2 58 AB 58 25 AC 38 |X%.X.8:X1.X.X%.8| 00000C60: 3A 4B 24 B2 C8 28 4E 24 2C 58 31 29 AA 22 81 42 |:K$..(N$,X1).".B| 00000C70: 24 20 20 20 42 81 22 AA 4E 24 3A 98 35 2C C8 28 |$ B.".N$:.5,.(| 00000C80: 4B 24 2C 42 29 00 AD 14 CC 0B 98 34 2C A6 58 25 |K$,B)......4,.X%| 00000C90: 29 3B C7 28 32 35 34 29 3B C7 28 31 34 31 29 3B |);.(254);.(141);| 00000CA0: 3A 98 35 2C CA 28 4B 24 2C 39 2C 38 29 00 CC 14 |:.5,.(K$,9,8)...| 00000CB0: D6 0B 98 34 2C A6 58 25 AA 31 29 3B C7 28 32 35 |...4,.X%.1);.(25| 00000CC0: 34 29 3B C7 28 31 34 31 29 3B 3A 8E 00 00 00 |4);.(141);:.... |
....... 4,4,0.&.... S$(700),RK%(13,10)./
....".".].... .04);"....................
............"...... .04);"Q .TIPSKUPON P
RINT SYSTEM CBM64. Q."...... .04);"Q LAV
ET AF FRANK ECKHAUSEN(C) Q"...#.. .04);"
Q PAA GRUNDLAG AF OPLYSNINGER Q"...(.. .
04);"Q FRA COMMODORE COMPUTER Q".C.
-.. .04);"..............................
..".].2..".......KAMP UGE:";U.S.7.. U.1
. U.52 . 50...<.. "......NAVN :";NA$.
..A.. "....ADRESSE ";AD$.I.F.. "....
POSTNR :";PN$...K.. "....BYNAVN
:";BY$...P.. .04);"(..,., )TEST/JUSTER P
RINTER J/N(.)"...U.. SV$:. SV$."" . 85.O
.Z.. SV$."J" .. 1155:SV.1:. 110.Q._.. SV
$."N" . . 140: SV.2:. 110...D.. .04);"IN
DTAST J ELLER N":.85...N.. SV.1 . . 80.K
.O.. E(F$).0 . . I.1 . 1000:.:. 20...S.
. .04);".DET VAR DET ! TAK FOR DENNE GAN
G,":....... SELVE S0GNINGEN ".#.... 15,8
,15.A.H.. 5,8,5,"0:K".D(U).",S,R".U....1
5,F$,G$,H$,I$...... E(F$).0 .. .04);"..T
IPSFIL IKKE FUNDET!": 15: 5:RET.....K.1.
.....5,S$(K)...,.. ST.0 . K.K.1:.280.I.@
. 15: 5...... ** HOVED RUTINE **.....T
I$."000000"...... A.1 . K . 10.....: . B
.1 . 13.(...: . C.1 . 10.A...: ED$.J(S$(
A.C),B,1)._.B.: . ED$."" . AR.C.1:. 530.
..L.: . ED$."1" . RK%(B,C).1:. 500...V.:
. ED$."X" . RK%(B,C).2:. 500.H...: . ED
$."2" . RK%(B,C).3:. 500.....: ."!!FEJL
I TIPSFIL-TEGN:";ED$;"IKKE TILLADT.":...
...: AR.10.....: . C.....: . B.<...: . 1
340: . TEST OG PRINT.D.... A.L.&. 4.F.0
.. .04);"..)TID: ";TI$.L.:........ *****
* RANDOM TESTDATA FOR 10 ENKELTRAKKER **
****...... I.1 . 13.B.... J.1 . 10.....R
K%(I,J).1..(.(1).3).................. 13
40..... 4...(...D.2..******************
*HER STARTER PRINTERDRIVER**************
****.O.<.. 1430.C.P.. AR.0 . . 2080.N.Z.
. 2240.T.D.....X.. +--------------------
------+...... ! AFKORT FOR LANGE TEKSTER
!...... +--------------------------+...
... C(NA$).30 . NA$.H(NA$,30)... .. C(AD
$).30. AD$.H(AD$,30).:.... C(PN$).4 . PN
$.H(PN$,4).Z.... C(BY$).20 . BY$.H(BY$,2
0).`.......... +------------------------
---+...... ! CHEK ENKELTRAKKER !
.L.... +---------------------------+...
.. AR.11 . AR.0 . 2140...*.."...FEJL I E
NKELTRAEKKE ....".1.4.. "...
".B.>.. "...ULOVLIGT ANT
AL RAEKKER:;AR;TAB(27);" ".|.H.. " .....
..........."...R.....\.. J.1 . AR. .F..
I.1 . 13.E.P.. RK%(I,J).0 . RK%(I,J).4 .
2210...Z.. " FEJL I ENKELTRAEKKE "
...... ". . . ".
<.... ". .MANGLER TEGN I RAEKKE:";J;.27)
;" ".[.... " (.) (.) ".C...
. I.K.... J.Q.......... ****************
**************...J.. ** HEREFTER PRINTER
SPECIFIK *...T.. **********************
********...D.. *************************
*****.*.N.. ***** PRINTER SPECIFIK *****
**.O.X.. ******************************.
U.....J.... **** **** ****..... * * *
* *...... **** * * ****...... * *
* * *...... **** **** ****.A.....U.(..
5,4,5:. 6,4,6...2.N$.G(0).G(0):N$.N$.N$.
N$.N$...<..6,G(46):.4...P.. 2890. .Z..6,
G(85):.4.9.D..6,G(70):.4,.34);NA$.Z.N..4
,.34)AD$:.4,.34)PN$" "BY$.K.X..6,G(105)
:.4.....4:.6,G(118):.4...... 2890... ..
6,G(33):.4..... 5: 6:......X..(R.13.48
.52).I.J..6,G(34).Y.T.. XX.1 . 13...^..
I.1 . AR...H.R.RK%(XX,I).3.(I.1):. 3000.
..R.....|..4.......+....6,G(125):.4.1...
..E...X..(R.13.48.52)...B.X.X.5:X%.X.8:X
1.X.X%.8:K$.H(N$,X1).".B$ B.".N$:.5,H(
K$,B)...L..4,.X%);G(254);G(141);:.5,J(K$
,9,8).L.V..4,.X%.1);G(254);G(141);:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL