GET PRINTER

00000000: 01 08 0B 08 64 00 89 20  31 39 30 00 11 08 6E 00  |....d.. 190...n.|
00000010: 3A 00 26 08 78 00 4E 24  B2 22 47 45 54 20 50 52  |:.&.x.N$."GET PR|
00000020: 49 4E 54 45 52 22 00 47  08 82 00 9F 20 31 2C 38  |INTER".G.... 1,8|
00000030: 2C 31 35 2C 22 53 3A 22  AA 4E 24 AA 22 2E 42 41  |,15,"S:".N$.".BA|
00000040: 4B 22 3A 20 A0 20 31 00  73 08 8C 00 9F 20 31 2C  |K": . 1.s.... 1,|
00000050: 38 2C 31 35 2C 22 52 3A  22 AA 4E 24 AA 22 2E 42  |8,15,"R:".N$.".B|
00000060: 41 4B 3D 22 AA 4E 24 AA  22 2E 42 41 53 22 3A 20  |AK=".N$.".BAS": |
00000070: A0 20 31 00 85 08 96 00  94 20 4E 24 AA 22 2E 42  |. 1...... N$.".B|
00000080: 41 53 22 2C 38 00 97 08  A0 00 95 20 4E 24 AA 22  |AS",8...... N$."|
00000090: 2E 42 41 53 22 2C 38 00  9D 08 AA 00 80 00 A3 08  |.BAS",8.........|
000000A0: B4 00 3A 00 B1 08 BE 00  87 20 44 31 25 2C 44 32  |..:...... D1%,D2|
000000B0: 25 00 BC 08 C8 00 49 4E  24 B2 22 22 00 E1 08 D2  |%.....IN$.""....|
000000C0: 00 87 20 41 3A 20 8B 20  41 B1 30 20 A7 20 49 4E  |.. A: . A.0 . IN|
000000D0: 24 B2 49 4E 24 AA C7 28  41 29 3A 20 89 20 32 31  |$.IN$..(A): . 21|
000000E0: 30 00 FF 08 DC 00 87 20  44 58 25 2C 44 59 25 2C  |0...... DX%,DY%,|
000000F0: 44 4C 25 2C 44 52 25 2C  44 4F 25 2C 44 55 25 00  |DL%,DR%,DO%,DU%.|
00000100: 0C 09 E6 00 43 54 B2 35  32 32 32 34 00 2B 09 F0  |....CT.52224.+..|
00000110: 00 81 20 49 B2 30 20 A4  20 32 35 35 3A 20 97 20  |.. I.0 . 255: . |
00000120: 43 54 AA 49 2C 49 3A 20  82 20 49 00 53 09 FA 00  |CT.I,I: . I.S...|
00000130: 87 20 41 24 2C 41 3A 20  8B 20 41 B1 30 20 A7 20  |. A$,A: . A.0 . |
00000140: 97 20 43 54 AA C6 28 41  24 29 2C 41 3A 20 89 20  |. CT..(A$),A: . |
00000150: 32 35 30 00 59 09 04 01  3A 00 85 09 0E 01 99 22  |250.Y...:......"|
00000160: 93 0E C4 52 55 43 4B 45  52 54 52 45 49 42 45 52  |...RUCKERTREIBER|
00000170: 20 27 D0 D2 C9 CE D4 C5  D2 C3 CF C4 C5 D3 27 20  | '............' |
00000180: 57 49 52 44 22 00 AD 09  18 01 99 22 47 45 53 50  |WIRD"......"GESP|
00000190: 45 49 43 48 45 52 54 2E  2E 2E 22 3A 4E 24 B2 22  |EICHERT...":N$."|
000001A0: 50 52 49 4E 54 45 52 43  4F 44 45 53 22 00 C9 09  |PRINTERCODES"...|
000001B0: 22 01 9F 20 32 2C 38 2C  31 35 2C 28 22 53 3A 22  |".. 2,8,15,("S:"|
000001C0: AA 4E 24 29 3A 20 A0 20  32 00 E1 09 2C 01 9F 20  |.N$): . 2...,.. |
000001D0: 32 2C 38 2C 32 2C 28 4E  24 AA 22 2C 50 2C 57 22  |2,8,2,(N$.",P,W"|
000001E0: 29 00 F7 09 36 01 98 32  2C C7 28 44 31 25 29 3B  |)...6..2,.(D1%);|
000001F0: C7 28 44 32 25 29 3B 00  11 0A 40 01 98 32 2C C7  |.(D2%);...@..2,.|
00000200: 28 C3 28 49 4E 24 29 29  3B 3A 20 20 20 49 25 B2  |(.(IN$));:   I%.|
00000210: 30 00 27 0A 4A 01 8B 20  49 25 B2 C3 28 49 4E 24  |0.'.J.. I%..(IN$|
00000220: 29 20 A7 20 33 35 30 00  4B 0A 54 01 49 25 B2 49  |) . 350.K.T.I%.I|
00000230: 25 AA 31 3A 20 98 32 2C  CA 28 49 4E 24 2C 49 25  |%.1: .2,.(IN$,I%|
00000240: 2C 31 29 3B 3A 20 89 20  33 33 30 00 7D 0A 5E 01  |,1);: . 330.}.^.|
00000250: 98 32 2C C7 28 44 58 25  29 3B C7 28 44 59 25 29  |.2,.(DX%);.(DY%)|
00000260: 3B C7 28 44 4C 25 29 3B  C7 28 44 52 25 29 3B C7  |;.(DL%);.(DR%);.|
00000270: 28 44 4F 25 29 3B C7 28  44 55 25 29 3B 00 8D 0A  |(DO%);.(DU%);...|
00000280: 68 01 81 20 49 B2 30 20  A4 20 32 35 35 00 A2 0A  |h.. I.0 . 255...|
00000290: 72 01 3A 20 98 32 2C C7  28 C2 28 43 54 AA 49 29  |r.: .2,.(.(CT.I)|
000002A0: 29 3B 00 AA 0A 7C 01 82  20 49 00 B5 0A 86 01 A0  |);...|.. I......|
000002B0: 20 32 3A 20 80 00 BB 0A  90 01 3A 00 DE 0A 9A 01  | 2: ......:.....|
000002C0: 83 20 34 2C 37 3A 20 8F  20 47 45 52 41 45 54 2C  |. 4,7: . GERAET,|
000002D0: 20 53 45 4B 55 4E 44 41  45 52 41 44 52 2E 00 FE  | SEKUNDAERADR...|
000002E0: 0A A4 01 83 20 31 33 2C  31 33 2C 31 33 2C 2D 31  |.... 13,13,13,-1|
000002F0: 3A 20 8F 20 53 43 48 52  49 46 54 41 52 54 00 13  |: . SCHRIFTART..|
00000300: 0B AE 01 83 20 20 38 30  3A 20 8F 20 53 50 41 4C  |....  80: . SPAL|
00000310: 54 45 4E 00 32 0B B8 01  83 20 20 37 32 3A 20 8F  |TEN.2....  72: .|
00000320: 20 5A 45 49 4C 45 4E 20  28 30 3D 45 4E 44 4C 4F  | ZEILEN (0=ENDLO|
00000330: 53 29 00 38 0B C2 01 3A  00 51 0B CC 01 83 20 20  |S).8...:.Q....  |
00000340: 31 30 3A 20 8F 20 4C 49  4E 4B 45 52 20 52 41 4E  |10: . LINKER RAN|
00000350: 44 00 6A 0B D6 01 83 20  20 31 30 3A 20 8F 20 52  |D.j....  10: . R|
00000360: 45 43 48 45 52 20 52 41  4E 44 00 83 0B E0 01 83  |ECHER RAND......|
00000370: 20 20 20 30 3A 20 8F 20  4F 42 45 52 45 52 20 52  |   0: . OBERER R|
00000380: 41 4E 44 00 9D 0B EA 01  83 20 20 20 30 3A 20 8F  |AND......   0: .|
00000390: 20 55 4E 54 45 52 45 52  20 52 41 4E 44 00 A3 0B  | UNTERER RAND...|
000003A0: F4 01 3A 00 B1 0B FE 01  83 20 22 41 22 2C 20 36  |..:...... "A", 6|
000003B0: 35 00 BF 0B 08 02 83 20  22 42 22 2C 20 36 36 00  |5...... "B", 66.|
000003C0: CD 0B 12 02 83 20 22 43  22 2C 20 36 37 00 DB 0B  |..... "C", 67...|
000003D0: 1C 02 83 20 22 44 22 2C  20 36 38 00 E9 0B 26 02  |... "D", 68...&.|
000003E0: 83 20 22 45 22 2C 20 36  39 00 F7 0B 30 02 83 20  |. "E", 69...0.. |
000003F0: 22 46 22 2C 20 37 30 00  05 0C 3A 02 83 20 22 47  |"F", 70...:.. "G|
00000400: 22 2C 20 37 31 00 13 0C  44 02 83 20 22 48 22 2C  |", 71...D.. "H",|
00000410: 20 37 32 00 21 0C 4E 02  83 20 22 49 22 2C 20 37  | 72.!.N.. "I", 7|
00000420: 33 00 2F 0C 58 02 83 20  22 4A 22 2C 20 37 34 00  |3./.X.. "J", 74.|
00000430: 3D 0C 62 02 83 20 22 4B  22 2C 20 37 35 00 4B 0C  |=.b.. "K", 75.K.|
00000440: 6C 02 83 20 22 4C 22 2C  20 37 36 00 59 0C 76 02  |l.. "L", 76.Y.v.|
00000450: 83 20 22 4D 22 2C 20 37  37 00 67 0C 80 02 83 20  |. "M", 77.g.... |
00000460: 22 4E 22 2C 20 37 38 00  75 0C 8A 02 83 20 22 4F  |"N", 78.u.... "O|
00000470: 22 2C 20 37 39 00 83 0C  94 02 83 20 22 50 22 2C  |", 79...... "P",|
00000480: 20 38 30 00 91 0C 9E 02  83 20 22 51 22 2C 20 38  | 80...... "Q", 8|
00000490: 31 00 9F 0C A8 02 83 20  22 52 22 2C 20 38 32 00  |1...... "R", 82.|
000004A0: AD 0C B2 02 83 20 22 53  22 2C 20 38 33 00 BB 0C  |..... "S", 83...|
000004B0: BC 02 83 20 22 54 22 2C  20 38 34 00 C9 0C C6 02  |... "T", 84.....|
000004C0: 83 20 22 55 22 2C 20 38  35 00 D7 0C D0 02 83 20  |. "U", 85...... |
000004D0: 22 56 22 2C 20 38 36 00  E5 0C DA 02 83 20 22 57  |"V", 86...... "W|
000004E0: 22 2C 20 38 37 00 F3 0C  E4 02 83 20 22 58 22 2C  |", 87...... "X",|
000004F0: 20 38 38 00 01 0D EE 02  83 20 22 59 22 2C 20 38  | 88...... "Y", 8|
00000500: 39 00 0F 0D F8 02 83 20  22 5A 22 2C 20 39 30 00  |9...... "Z", 90.|
00000510: 15 0D 02 03 3A 00 23 0D  0C 03 83 20 22 C1 22 2C  |....:.#.... ".",|
00000520: 31 39 33 00 31 0D 16 03  83 20 22 C2 22 2C 31 39  |193.1.... ".",19|
00000530: 34 00 3F 0D 20 03 83 20  22 C3 22 2C 31 39 35 00  |4.?. .. ".",195.|
00000540: 4D 0D 2A 03 83 20 22 C4  22 2C 31 39 36 00 5B 0D  |M.*.. ".",196.[.|
00000550: 34 03 83 20 22 C5 22 2C  31 39 37 00 69 0D 3E 03  |4.. ".",197.i.>.|
00000560: 83 20 22 C6 22 2C 31 39  38 00 77 0D 48 03 83 20  |. ".",198.w.H.. |
00000570: 22 C7 22 2C 31 39 39 00  85 0D 52 03 83 20 22 C8  |".",199...R.. ".|
00000580: 22 2C 32 30 30 00 93 0D  5C 03 83 20 22 C9 22 2C  |",200...\.. ".",|
00000590: 32 30 31 00 A1 0D 66 03  83 20 22 CA 22 2C 32 30  |201...f.. ".",20|
000005A0: 32 00 AF 0D 70 03 83 20  22 CB 22 2C 32 30 33 00  |2...p.. ".",203.|
000005B0: BD 0D 7A 03 83 20 22 CC  22 2C 32 30 34 00 CB 0D  |..z.. ".",204...|
000005C0: 84 03 83 20 22 CD 22 2C  32 30 35 00 D9 0D 8E 03  |... ".",205.....|
000005D0: 83 20 22 CE 22 2C 32 30  36 00 E7 0D 98 03 83 20  |. ".",206...... |
000005E0: 22 CF 22 2C 32 30 37 00  F5 0D A2 03 83 20 22 D0  |".",207...... ".|
000005F0: 22 2C 32 30 38 00 03 0E  AC 03 83 20 22 D1 22 2C  |",208...... ".",|
00000600: 32 30 39 00 11 0E B6 03  83 20 22 D2 22 2C 32 31  |209...... ".",21|
00000610: 30 00 1F 0E C0 03 83 20  22 D3 22 2C 32 31 31 00  |0...... ".",211.|
00000620: 2D 0E CA 03 83 20 22 D4  22 2C 32 31 32 00 3B 0E  |-.... ".",212.;.|
00000630: D4 03 83 20 22 D5 22 2C  32 31 33 00 49 0E DE 03  |... ".",213.I...|
00000640: 83 20 22 D6 22 2C 32 31  34 00 57 0E E8 03 83 20  |. ".",214.W.... |
00000650: 22 D7 22 2C 32 31 35 00  65 0E F2 03 83 20 22 D8  |".",215.e.... ".|
00000660: 22 2C 32 31 36 00 73 0E  FC 03 83 20 22 D9 22 2C  |",216.s.... ".",|
00000670: 32 31 37 00 81 0E 06 04  83 20 22 DA 22 2C 32 31  |217...... ".",21|
00000680: 38 00 87 0E 10 04 3A 00  95 0E 1A 04 83 20 22 30  |8.....:...... "0|
00000690: 22 2C 20 34 38 00 A3 0E  24 04 83 20 22 31 22 2C  |", 48...$.. "1",|
000006A0: 20 34 39 00 B1 0E 2E 04  83 20 22 32 22 2C 20 35  | 49...... "2", 5|
000006B0: 30 00 BF 0E 38 04 83 20  22 33 22 2C 20 35 31 00  |0...8.. "3", 51.|
000006C0: CD 0E 42 04 83 20 22 34  22 2C 20 35 32 00 DB 0E  |..B.. "4", 52...|
000006D0: 4C 04 83 20 22 35 22 2C  20 35 33 00 E9 0E 56 04  |L.. "5", 53...V.|
000006E0: 83 20 22 36 22 2C 20 35  34 00 F7 0E 60 04 83 20  |. "6", 54...`.. |
000006F0: 22 37 22 2C 20 35 35 00  05 0F 6A 04 83 20 22 38  |"7", 55...j.. "8|
00000700: 22 2C 20 35 36 00 13 0F  74 04 83 20 22 39 22 2C  |", 56...t.. "9",|
00000710: 20 35 37 00 19 0F 7E 04  3A 00 27 0F 88 04 83 20  | 57...~.:.'.... |
00000720: 22 20 22 2C 20 33 32 00  35 0F 92 04 83 20 22 23  |" ", 32.5.... "#|
00000730: 22 2C 20 33 35 00 43 0F  9C 04 83 20 22 28 22 2C  |", 35.C.... "(",|
00000740: 20 34 30 00 51 0F A6 04  83 20 22 29 22 2C 20 34  | 40.Q.... ")", 4|
00000750: 31 00 5F 0F B0 04 83 20  22 2B 22 2C 20 34 33 00  |1._.... "+", 43.|
00000760: 6D 0F BA 04 83 20 22 2C  22 2C 20 34 34 00 7B 0F  |m.... ",", 44.{.|
00000770: C4 04 83 20 22 2D 22 2C  20 34 35 00 89 0F CE 04  |... "-", 45.....|
00000780: 83 20 22 2E 22 2C 20 34  36 00 97 0F D8 04 83 20  |. ".", 46...... |
00000790: 22 3A 22 2C 20 35 38 00  A5 0F E2 04 83 20 22 3C  |":", 58...... "<|
000007A0: 22 2C 20 36 30 00 B3 0F  EC 04 83 20 22 3D 22 2C  |", 60...... "=",|
000007B0: 20 36 31 00 C1 0F F6 04  83 20 22 3E 22 2C 20 36  | 61...... ">", 6|
000007C0: 32 00 CF 0F 00 05 83 20  22 3F 22 2C 20 36 33 00  |2...... "?", 63.|
000007D0: D5 0F 0A 05 3A 00 E3 0F  14 05 83 20 22 C0 22 2C  |....:...... ".",|
000007E0: 31 39 32 00 F1 0F 1E 05  83 20 22 DD 22 2C 32 32  |192...... ".",22|
000007F0: 31 00 FF 0F 28 05 83 20  22 B0 22 2C 31 37 36 00  |1...(.. ".",176.|
00000800: 0D 10 32 05 83 20 22 AE  22 2C 31 37 34 00 1B 10  |..2.. ".",174...|
00000810: 3C 05 83 20 22 BD 22 2C  31 38 39 00 29 10 46 05  |<.. ".",189.).F.|
00000820: 83 20 22 AD 22 2C 31 37  33 00 37 10 50 05 83 20  |. ".",173.7.P.. |
00000830: 22 B2 22 2C 31 37 38 00  45 10 5A 05 83 20 22 B3  |".",178.E.Z.. ".|
00000840: 22 2C 31 37 39 00 53 10  64 05 83 20 22 B1 22 2C  |",179.S.d.. ".",|
00000850: 31 37 37 00 61 10 6E 05  83 20 22 AB 22 2C 31 37  |177.a.n.. ".",17|
00000860: 31 00 67 10 78 05 3A 00  77 10 82 05 83 20 22 45  |1.g.x.:.w.... "E|
00000870: 4E 44 45 22 2C 2D 31 00  00 00                    |NDE",-1...      |

....D.. 190...N.:.&.X.N$."GET PRINTER".G
.... 1,8,15,"S:".N$.".BAK":   1.S.... 1,
8,15,"R:".N$.".BAK=".N$.".BAS":   1.....
. N$.".BAS",8... .. N$.".BAS",8.........
..:...... D1%,D2%...H.IN$.""...R.. A: . 
A.0 . IN$.IN$.G(A): . 210...... DX%,DY%,
DL%,DR%,DO%,DU%.....CT.52224.+.... I.0 .
 255: . CT.I,I: . I.S.... A$,A: . A.0 . 
. CT.F(A$),A: . 250.Y...:......"..DRUCKE
RTREIBER 'PRINTERCODES' WIRD"......"GESP
EICHERT...":N$."PRINTERCODES".I.".. 2,8,
15,("S:".N$):   2...,.. 2,8,2,(N$.",P,W"
)...6..2,G(D1%);G(D2%);...@..2,G(C(IN$))
;:   I%.0.'.J.. I%.C(IN$) . 350.K.T.I%.I
%.1: .2,J(IN$,I%,1);: . 330.}.^..2,G(DX%
);G(DY%);G(DL%);G(DR%);G(DO%);G(DU%);...
H.. I.0 . 255...R.: .2,G(B(CT.I));...|..
 I.....  2: ......:...... 4,7: . GERAET,
 SEKUNDAERADR....... 13,13,13,-1: . SCHR
IFTART......  80: . SPALTEN.2....  72: .
 ZEILEN (0=ENDLOS).8.B.:.Q.L..  10: . LI
NKER RAND.J.V..  10: . RECHER RAND......
   0: . OBERER RAND......   0: . UNTERER
 RAND.....:...... "A", 65...... "B", 66.
M.... "C", 67...... "D", 68...&.. "E", 6
9...0.. "F", 70...:.. "G", 71...D.. "H",
 72.!.N.. "I", 73./.X.. "J", 74.=.B.. "K
", 75.K.L.. "L", 76.Y.V.. "M", 77.G.... 
"N", 78.U.... "O", 79...... "P", 80.....
. "Q", 81...... "R", 82...... "S", 83...
... "T", 84.I.F.. "U", 85.W.P.. "V", 86.
..Z.. "W", 87...... "X", 88...... "Y", 8
9...... "Z", 90.....:.#.... "A",193.1...
. "B",194.?. .. "C",195.M.*.. "D",196.[.
4.. "E",197.I.>.. "F",198.W.H.. "G",199.
..R.. "H",200...\.. "I",201...F.. "J",20
2...P.. "K",203...Z.. "L",204.K.... "M",
205.Y.... "N",206...... "O",207...... "P
",208...... "Q",209...... "R",210...... 
"S",211.-.J.. "T",212.;.T.. "U",213.I...
. "V",214.W.... "W",215.E.... "X",216.S.
... "Y",217...... "Z",218.....:...... "0
", 48...$.. "1", 49...... "2", 50...8.. 
"3", 51.M.B.. "4", 52...L.. "5", 53...V.
. "6", 54...`.. "7", 55...J.. "8", 56...
T.. "9", 57...~.:.'.... " ", 32.5.... "#
", 35.C.... "(", 40.Q.... ")", 41._.... 
"+", 43.M.... ",", 44.{.D.. "-", 45...N.
. ".", 46...X.. ":", 58...... "<", 60...
... "=", 61.A.... ">", 62.O.... "?", 63.
U...:...... ".",192...... ".",221...(.. 
".",176...2.. ".",174...<.. ".",189.).F.
. ".",173.7.P.. ".",178.E.Z.. ".",179.S.
D.. ".",177.A.N.. ".",171.G.X.:.W.... "E
NDE",-1...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL