00000000: 01 10 23 10 0A 00 8F 20 44 49 52 2D 50 52 49 4E |..#.... DIR-PRIN|
00000010: 54 45 52 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |TER=============|
00000020: 43 31 36 00 41 10 14 00 8F 20 28 50 29 20 43 4F |C16.A.... (P) CO|
00000030: 4D 4D 4F 44 4F 52 45 20 57 45 4C 54 20 54 45 41 |MMODORE WELT TEA|
00000040: 4D 00 63 10 1E 00 8F 20 3D 3D 3D 3D 3D 3D 3D 3D |M.c.... ========|
00000050: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000060: 3D 3D 3D 00 7D 10 28 00 8F 20 28 43 29 20 42 59 |===.}.(.. (C) BY|
00000070: 20 44 45 54 4C 45 46 20 4C 4F 4B 41 59 00 83 10 | DETLEF LOKAY...|
00000080: 32 00 8F 00 89 10 3C 00 8F 00 9A 10 46 00 8F 20 |2.....<.....F.. |
00000090: 42 41 53 49 43 20 56 33 2E 35 00 AE 10 50 00 8F |BASIC V3.5...P..|
000000A0: 20 43 31 36 2F 31 31 36 2F 50 4C 55 53 34 00 D0 | C16/116/PLUS4..|
000000B0: 10 5A 00 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.Z.. ===========|
000000C0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000000D0: 00 DA 10 64 00 8D 20 35 35 30 00 EB 10 6E 00 99 |...d.. 550...n..|
000000E0: 43 4C 24 C8 28 51 44 24 2C 35 29 00 0B 11 78 00 |CL$.(QD$,5)...x.|
000000F0: 99 C8 28 51 52 24 2C 31 30 29 22 2A 2A 2A 2A 2A |..(QR$,10)"*****|
00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 2B 11 82 00 |**********".+...|
00000110: 99 C8 28 51 52 24 2C 31 30 29 22 2A 20 20 20 20 |..(QR$,10)"* |
00000120: 20 20 20 20 20 20 20 20 20 2A 22 00 4B 11 8C 00 | *".K...|
00000130: 99 C8 28 51 52 24 2C 31 30 29 22 2A 20 44 49 52 |..(QR$,10)"* DIR|
00000140: 2D 50 52 49 4E 54 45 52 20 2A 22 00 6B 11 96 00 |-PRINTER *".k...|
00000150: 99 C8 28 51 52 24 2C 31 30 29 22 2A 20 20 43 4F |..(QR$,10)"* CO|
00000160: 50 59 52 49 47 48 54 20 20 2A 22 00 8B 11 A0 00 |PYRIGHT *".....|
00000170: 99 C8 28 51 52 24 2C 31 30 29 22 2A 20 20 20 44 |..(QR$,10)"* D|
00000180: 2E 4C 4F 4B 41 59 20 20 20 2A 22 00 AB 11 AA 00 |.LOKAY *".....|
00000190: 99 C8 28 51 52 24 2C 31 30 29 22 2A 20 20 20 20 |..(QR$,10)"* |
000001A0: 20 20 20 20 20 20 20 20 20 2A 22 00 CB 11 B4 00 | *".....|
000001B0: 99 C8 28 51 52 24 2C 31 30 29 22 2A 2A 2A 2A 2A |..(QR$,10)"*****|
000001C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 E0 11 BE 00 |**********".....|
000001D0: 81 58 B2 31 A4 31 30 30 30 3A 82 3A 99 43 4C 24 |.X.1.1000:.:.CL$|
000001E0: 00 11 12 C8 00 99 43 34 24 43 34 24 43 34 24 43 |......C4$C4$C4$C|
000001F0: 33 24 43 33 24 22 44 45 52 20 44 49 52 2D 50 52 |3$C3$"DER DIR-PR|
00000200: 49 4E 54 45 52 20 44 52 55 43 4B 54 20 44 49 45 |INTER DRUCKT DIE|
00000210: 22 00 33 12 D2 00 99 22 20 20 44 49 52 45 43 54 |".3...." DIRECT|
00000220: 4F 52 59 20 33 2D 53 50 41 4C 54 49 47 20 41 55 |ORY 3-SPALTIG AU|
00000230: 53 2E 22 00 5F 12 DC 00 99 43 34 24 43 34 24 43 |S."._....C4$C4$C|
00000240: 34 24 22 20 20 42 49 54 54 45 20 45 4E 54 53 50 |4$" BITTE ENTSP|
00000250: 52 45 43 48 45 4E 44 45 20 44 49 53 4B 20 22 00 |RECHENDE DISK ".|
00000260: 8A 12 E6 00 99 22 20 20 45 49 4E 4C 45 47 45 4E |....." EINLEGEN|
00000270: 20 55 4E 44 20 44 52 55 43 4B 45 52 20 45 49 4E | UND DRUCKER EIN|
00000280: 53 43 48 41 4C 54 45 4E 2E 22 00 B7 12 F0 00 99 |SCHALTEN."......|
00000290: 43 34 24 43 34 24 43 34 24 22 20 20 5A 55 4D 20 |C4$C4$C4$" ZUM |
000002A0: 53 54 41 52 54 20 42 45 4C 49 45 42 49 47 45 20 |START BELIEBIGE |
000002B0: 54 41 53 54 45 2E 22 00 CA 12 FA 00 A1 41 24 3A |TASTE."......A$:|
000002C0: 8B 41 24 B2 22 22 A7 32 35 30 00 D3 12 04 01 99 |.A$."".250......|
000002D0: 43 4C 24 00 FC 12 0E 01 99 C8 28 51 44 24 2C 31 |CL$.......(QD$,1|
000002E0: 31 29 C8 28 51 52 24 2C 37 29 22 41 55 53 44 52 |1).(QR$,7)"AUSDR|
000002F0: 55 43 4B 20 4C 41 55 45 46 54 2E 22 00 06 13 18 |UCK LAUEFT."....|
00000300: 01 9F 32 2C 34 3A 00 16 13 22 01 9F 31 2C 38 2C |..2,4:..."..1,8,|
00000310: 30 2C 22 24 30 22 00 24 13 2C 01 A1 23 31 2C 41 |0,"$0".$.,..#1,A|
00000320: 24 2C 42 24 00 33 13 36 01 8D 34 37 30 3A 42 B2 |$,B$.3.6..470:B.|
00000330: 42 AA 31 00 4C 13 40 01 A1 23 31 2C 42 24 3A 8B |B.1.L.@..#1,B$:.|
00000340: 20 53 54 B3 B1 30 20 A7 20 33 36 30 00 62 13 4A | ST..0 . 360.b.J|
00000350: 01 8B 20 42 24 B3 B1 C7 28 33 34 29 20 A7 20 33 |.. B$...(34) . 3|
00000360: 32 30 00 86 13 54 01 A1 23 31 2C 42 24 3A 8B 20 |20...T..#1,B$:. |
00000370: 42 24 B3 B1 C7 28 33 34 29 A7 20 98 32 2C 42 24 |B$...(34). .2,B$|
00000380: 3B 3A 89 33 34 30 00 97 13 5E 01 8B 20 53 54 B2 |;:.340...^.. ST.|
00000390: 30 20 A7 20 33 30 30 00 AA 13 68 01 98 32 2C C7 |0 . 300...h..2,.|
000003A0: 28 31 33 29 3B C7 28 31 33 29 00 B7 13 72 01 98 |(13);.(13)...r..|
000003B0: 32 3A A0 31 3A A0 32 00 DB 13 7C 01 99 43 4C 24 |2:.1:.2...|..CL$|
000003C0: 3A 99 C8 28 51 44 24 2C 35 29 C8 28 51 52 24 2C |:..(QD$,5).(QR$,|
000003D0: 36 29 22 46 45 52 54 49 47 2E 22 00 0D 14 86 01 |6)"FERTIG.".....|
000003E0: 99 43 34 24 43 34 24 43 33 24 43 33 24 43 33 24 |.C4$C4$C3$C3$C3$|
000003F0: 22 57 45 49 54 45 52 45 20 41 55 53 44 52 55 43 |"WEITERE AUSDRUC|
00000400: 4B 45 20 4A 2F 4E 20 3F 22 3A 99 3A 99 00 20 14 |KE J/N ?":.:.. .|
00000410: 90 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 34 30 30 |...A$:.A$."".400|
00000420: 00 2F 14 9A 01 8B 41 24 B3 B1 22 4A 22 A7 80 00 |./....A$.."J"...|
00000430: 50 14 A4 01 8B 41 24 B2 22 4A 22 A7 99 22 20 20 |P....A$."J".." |
00000440: 20 44 49 53 4B 20 57 45 43 48 53 45 4C 4E 2E 22 | DISK WECHSELN."|
00000450: 00 69 14 AE 01 99 22 20 20 20 3D 3D 3D 3D 3D 3D |.i...." ======|
00000460: 3D 3D 3D 3D 3D 3D 3D 3D 22 00 8E 14 B8 01 99 43 |========"......C|
00000470: 34 24 22 20 20 20 57 45 49 54 45 52 20 4D 49 54 |4$" WEITER MIT|
00000480: 20 54 41 53 54 45 4E 44 52 55 43 4B 2E 22 00 A1 | TASTENDRUCK."..|
00000490: 14 C2 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 34 35 |....A$:.A$."".45|
000004A0: 30 00 AB 14 CC 01 8A 20 32 38 30 00 B6 14 D6 01 |0...... 280.....|
000004B0: 8B 42 B3 31 A7 8E 00 DB 14 E0 01 8B 42 B2 31 A7 |.B.1........B.1.|
000004C0: 98 32 2C C7 28 31 33 29 22 3D 3D 3D 3D 3D 3D 3D |.2,.(13)"=======|
000004D0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 3B 00 E5 14 EA 01 |=========";.....|
000004E0: 41 B2 41 AA 31 00 02 15 F4 01 8B 41 B2 31 A7 98 |A.A.1......A.1..|
000004F0: 32 2C C7 28 31 36 29 3B 22 31 37 22 3B 22 2A 20 |2,.(16);"17";"* |
00000500: 22 3B 00 1F 15 FE 01 8B 41 B2 32 A7 98 32 2C C7 |";......A.2..2,.|
00000510: 28 31 36 29 3B 22 33 35 22 3B 22 2A 20 22 3B 00 |(16);"35";"* ";.|
00000520: 2B 15 08 02 8B 41 B2 33 A7 98 32 00 38 15 12 02 |+....A.3..2.8...|
00000530: 8B 41 B2 33 A7 41 B2 30 00 3E 15 1C 02 8E 00 5F |.A.3.A.0.>....._|
00000540: 15 26 02 8F 20 4E 41 43 48 53 50 41 4E 4E 20 3D |.&.. NACHSPANN =|
00000550: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 |===============.|
00000560: 80 15 30 02 8F 20 2A 20 46 41 52 42 43 4F 44 45 |..0.. * FARBCODE|
00000570: 53 2F 53 54 45 55 45 52 43 4F 44 45 53 20 20 2A |S/STEUERCODES *|
00000580: 00 9A 15 3A 02 43 34 24 B2 C7 28 30 31 37 29 3A |...:.C4$..(017):|
00000590: 43 33 24 B2 C7 28 30 32 39 29 00 A9 15 44 02 43 |C3$..(029)...D.C|
000005A0: 4C 24 B2 C7 28 31 34 37 29 00 CA 15 4E 02 8F 20 |L$..(147)...N.. |
000005B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 5A 45 49 43 48 45 |********* ZEICHE|
000005C0: 4E 46 4F 4C 47 45 4E 20 20 2A 00 D9 15 58 02 81 |NFOLGEN *...X..|
000005D0: 20 51 B2 31 20 A4 20 34 30 00 F5 15 62 02 51 44 | Q.1 . 40...b.QD|
000005E0: 24 B2 51 44 24 AA 43 34 24 3A 51 52 24 B2 51 52 |$.QD$.C4$:QR$.QR|
000005F0: 24 AA 43 33 24 00 FD 15 6C 02 82 20 51 00 03 16 |$.C3$...l.. Q...|
00000600: 76 02 8E 00 24 16 80 02 8F 20 3D 3D 3D 3D 3D 3D |v...$.... ======|
00000610: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000620: 3D 3D 3D 3D 00 3D 16 8A 02 8F 20 31 32 32 37 37 |====.=.... 12277|
00000630: 20 42 59 54 45 53 20 4D 45 4D 4F 52 59 00 57 16 | BYTES MEMORY.W.|
00000640: 94 02 8F 20 30 31 37 38 37 20 42 59 54 45 53 20 |... 01787 BYTES |
00000650: 50 52 4F 47 52 41 4D 00 73 16 9E 02 8F 20 30 30 |PROGRAM.s.... 00|
00000660: 30 35 36 20 42 59 54 45 53 20 56 41 52 49 41 42 |056 BYTES VARIAB|
00000670: 4C 45 53 00 8C 16 A8 02 8F 20 30 30 30 30 30 20 |LES...... 00000 |
00000680: 42 59 54 45 53 20 41 52 52 41 59 53 00 A6 16 B2 |BYTES ARRAYS....|
00000690: 02 8F 20 30 30 34 30 38 20 42 59 54 45 53 20 53 |.. 00408 BYTES S|
000006A0: 54 52 49 4E 47 53 00 C1 16 BC 02 8F 20 31 30 30 |TRINGS...... 100|
000006B0: 32 36 20 42 59 54 45 53 20 46 52 45 45 20 28 30 |26 BYTES FREE (0|
000006C0: 29 00 E2 16 C6 02 8F 20 3D 3D 3D 3D 3D 3D 3D 3D |)...... ========|
000006D0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000006E0: 3D 3D 00 00 00 |==... |
..#.... DIR-PRINTER=============C16.A...
. (P) COMMODORE WELT TEAM.C.... ========
===================.}.(.. (C) BY DETLEF
LOKAY...2.....<.....F.. BASIC V3.5...P..
C16/116/PLUS4.P.Z.. ===================
========.Z.D.. 550...N..CL$H(QD$,5)...X.
.H(QR$,10)"***************".+....H(QR$,1
0)"* *".K....H(QR$,10)"* DIR
-PRINTER *".K....H(QR$,10)"* COPYRIGHT
*"... ..H(QR$,10)"* D.LOKAY *".....
.H(QR$,10)"* *".K....H(QR$,1
0)"***************"......X.1.1000:.:.CL$
...H..C4$C4$C4$C3$C3$"DER DIR-PRINTER DR
UCKT DIE".3.R.." DIRECTORY 3-SPALTIG AU
S."._....C4$C4$C4$" BITTE ENTSPRECHENDE
DISK "......" EINLEGEN UND DRUCKER EIN
SCHALTEN."......C4$C4$C4$" ZUM START BE
LIEBIGE TASTE.".J....A$:.A$."".250.S....
CL$......H(QD$,11)H(QR$,7)"AUSDRUCK LAUE
FT."......2,4:..."..1,8,0,"$0".$.,..#1,A
$,B$.3.6..470:B.B.1.L.@..#1,B$:. ST..0 .
360.B.J.. B$..G(34) . 320...T..#1,B$:.
B$..G(34). .2,B$;:.340...^.. ST.0 . 300.
..H..2,G(13);G(13)...R..2: 1: 2...|..CL$
:.H(QD$,5)H(QR$,6)"FERTIG."......C4$C4$C
3$C3$C3$"WEITERE AUSDRUCKE J/N ?":.:.. .
...A$:.A$."".400./....A$.."J"...P....A$.
"J".." DISK WECHSELN.".I...." ======
========"......C4$" WEITER MIT TASTEND
RUCK."...B..A$:.A$."".450...L.. 280...V.
.B.1........B.1..2,G(13)"===============
=";.....A.A.1......A.1..2,G(16);"17";"*
";......A.2..2,G(16);"35";"* ";.+....A.3
..2.8....A.3.A.0.>....._.&.. NACHSPANN =
===============...0.. * FARBCODES/STEUER
CODES *...:.C4$.G(017):C3$.G(029)...D.C
L$.G(147).J.N.. ********* ZEICHENFOLGEN
*.Y.X.. Q.1 . 40...B.QD$.QD$.C4$:QR$.QR
$.C3$...L.. Q...V...$.... ==============
============.=.... 12277 BYTES MEMORY.W.
... 01787 BYTES PROGRAM.S.... 00056 BYTE
S VARIABLES...... 00000 BYTES ARRAYS....
.. 00408 BYTES STRINGS.A.... 10026 BYTES
FREE (0)...F.. ========================
==...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL