_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

BASIC DRUCK

FILE INFORMATION

FILENAME(S): BASIC DRUCK

FILE TYPE(S): PRG

FILE SIZE: 1.2K

FIRST SEEN: 2025-11-30 01:12:55

APPEARS ON: 1 disk(s)

FILE HASH

db246fac19ca023724ef844d18466de97f4472e3267ce7e008cbb7a246c9f37d

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
SONDERHEFT 4 BASIC DRUCK PRG C64er 30 4 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 26 08 64 00 8F 20  20 42 41 53 49 43 56 45  |..&.d..  BASICVE|
00000010: 52 53 49 4F 4E 20 44 45  52 20 44 52 55 43 4B 52  |RSION DER DRUCKR|
00000020: 4F 55 54 49 4E 45 00 6D  08 6E 00 8F 20 20 4B 41  |OUTINE.m.n..  KA|
00000030: 4E 4E 20 41 55 43 48 20  41 4C 53 20 55 4E 54 45  |NN AUCH ALS UNTE|
00000040: 52 52 4F 55 54 49 4E 45  20 49 4E 20 45 49 47 45  |RROUTINE IN EIGE|
00000050: 4E 45 20 50 52 4F 47 52  41 4D 4D 45 20 45 49 4E  |NE PROGRAMME EIN|
00000060: 47 45 42 41 55 54 20 57  45 52 44 45 4E 00 A8 08  |GEBAUT WERDEN...|
00000070: 78 00 8F 20 20 41 4E 50  41 53 53 55 4E 47 20 41  |x..  ANPASSUNG A|
00000080: 4E 20 41 4E 44 45 52 45  20 37 2D 4E 41 44 45 4C  |N ANDERE 7-NADEL|
00000090: 2D 44 52 55 43 4B 45 52  20 53 49 43 48 45 52 20  |-DRUCKER SICHER |
000000A0: 4D 4F 45 47 4C 49 43 48  00 CB 08 82 00 9F 34 2C  |MOEGLICH......4,|
000000B0: 34 3A 9F 36 2C 34 2C 36  3A 98 36 2C C7 28 31 36  |4:.6,4,6:.6,.(16|
000000C0: 29 3A A0 36 3A 97 35 36  2C 33 30 00 0D 09 8C 00  |):.6:.56,30.....|
000000D0: 8F 20 20 4F 46 46 4E 45  54 20 44 52 55 43 4B 4B  |.  OFFNET DRUCKK|
000000E0: 41 4E 41 4C 20 55 4E 44  20 53 54 45 4C 4C 54 20  |ANAL UND STELLT |
000000F0: 5A 45 49 4C 45 4E 41 42  53 54 41 4E 54 20 46 55  |ZEILENABSTANT FU|
00000100: 45 52 20 47 52 41 46 49  4B 20 45 49 4E 00 22 09  |ER GRAFIK EIN.".|
00000110: 96 00 81 20 49 B2 33 31  39 20 A4 AB 33 20 A9 20  |... I.319 ..3 . |
00000120: AB 37 00 40 09 A0 00 55  24 B2 22 22 3A 55 32 24  |.7.@...U$."":U2$|
00000130: B2 22 22 3A 4F 24 B2 22  22 3A 4F 32 24 B2 22 22  |."":O$."":O2$.""|
00000140: 00 5B 09 AA 00 81 20 59  B2 30 20 A4 31 39 39 3A  |.[.... Y.0 .199:|
00000150: 43 B2 31 32 38 3A 47 B2  31 32 38 00 70 09 B4 00  |C.128:G.128.p...|
00000160: 81 20 58 B2 49 20 A4 20  49 AB 32 20 A9 20 AB 31  |. X.I . I.2 . .1|
00000170: 00 7E 09 BE 00 41 B2 30  3A 8D 31 30 30 30 00 8D  |.~...A.0:.1000..|
00000180: 09 C8 00 42 49 B2 32 AC  28 49 AB 58 29 00 A9 09  |...BI.2.(I.X)...|
00000190: D2 00 8B 41 B2 31 A7 20  43 B2 43 AA 32 AE 42 49  |...A.1. C.C.2.BI|
000001A0: AA 32 AE 28 42 49 AA 31  29 00 B0 09 DC 00 82 58  |.2.(BI.1)......X|
000001B0: 00 C4 09 E6 00 41 B2 30  3A 58 B2 49 AB 33 3A 8D  |.....A.0:X.I.3:.|
000001C0: 31 30 30 30 00 DD 09 F0  00 8B 20 41 B2 31 A7 20  |1000...... A.1. |
000001D0: 43 B2 43 AA 36 34 20 3A  47 B2 47 AA 31 00 F4 09  |C.C.64 :G.G.1...|
000001E0: FA 00 81 20 58 B2 49 AB  34 20 A4 20 49 AB 36 20  |... X.I.4 . I.6 |
000001F0: A9 20 AB 31 00 02 0A 04  01 41 B2 30 3A 8D 31 30  |. .1.....A.0:.10|
00000200: 30 30 00 14 0A 0E 01 42  49 20 B2 32 AC 28 49 AB  |00.....BI .2.(I.|
00000210: 58 AB 34 29 00 36 0A 18  01 8B 20 41 B2 31 20 A7  |X.4).6.... A.1 .|
00000220: 20 47 B2 47 AA 32 AE 28  42 49 AA 31 29 AA 32 AE  | G.G.2.(BI.1).2.|
00000230: 28 42 49 AA 32 29 00 3D  0A 22 01 82 58 00 59 0A  |(BI.2).=."..X.Y.|
00000240: 2C 01 8B 20 59 B3 31 30  30 A7 4F 24 B2 4F 24 AA  |,.. Y.100.O$.O$.|
00000250: C7 28 43 29 AA C7 28 43  29 00 76 0A 36 01 8B 20  |.(C)..(C).v.6.. |
00000260: 59 B1 39 39 A7 4F 32 24  B2 4F 32 24 AA C7 28 43  |Y.99.O2$.O2$..(C|
00000270: 29 AA C7 28 43 29 00 92  0A 40 01 8B 20 59 B3 31  |)..(C)...@.. Y.1|
00000280: 30 30 A7 55 24 B2 55 24  AA C7 28 47 29 AA C7 28  |00.U$.U$..(G)..(|
00000290: 47 29 00 AF 0A 4A 01 8B  20 59 B1 39 39 A7 55 32  |G)...J.. Y.99.U2|
000002A0: 24 B2 55 32 24 AA C7 28  47 29 AA C7 28 47 29 00  |$.U2$..(G)..(G).|
000002B0: B6 0A 54 01 82 59 00 D6  0A 5E 01 98 34 2C C7 28  |..T..Y...^..4,.(|
000002C0: 38 29 C7 28 32 37 29 C7  28 31 36 29 C7 28 30 29  |8).(27).(16).(0)|
000002D0: C7 28 34 30 29 3B 00 E7  0A 68 01 98 34 2C 4F 24  |.(40);...h..4,O$|
000002E0: 4F 32 24 C7 28 39 29 00  12 0B 72 01 8F 20 20 43  |O2$.(9)...r..  C|
000002F0: 48 52 24 28 38 29 20 53  54 45 4C 4C 54 20 42 49  |HR$(8) STELLT BI|
00000300: 54 2D 4D 55 53 54 45 52  2D 4D 4F 44 55 53 20 45  |T-MUSTER-MODUS E|
00000310: 49 4E 00 5B 0B 7C 01 8F  20 20 43 48 52 24 28 32  |IN.[.|..  CHR$(2|
00000320: 37 29 43 48 52 24 28 31  36 29 43 48 52 24 28 30  |7)CHR$(16)CHR$(0|
00000330: 29 43 48 52 24 28 34 30  29 20 53 54 45 4C 4C 54  |)CHR$(40) STELLT|
00000340: 20 44 49 45 20 44 52 55  43 4B 53 54 41 52 54 41  | DIE DRUCKSTARTA|
00000350: 44 52 53 53 45 20 4A 45  44 45 52 00 86 0B 86 01  |DRSSE JEDER.....|
00000360: 8F 20 20 5A 45 49 4C 45  20 41 55 46 20 34 30 20  |.  ZEILE AUF 40 |
00000370: 50 55 4E 4B 54 45 20 4E  41 43 48 20 52 45 43 48  |PUNKTE NACH RECH|
00000380: 54 53 20 45 49 4E 00 BB  0B 90 01 8F 20 43 48 52  |TS EIN...... CHR|
00000390: 24 28 39 29 20 53 54 45  4C 4C 54 20 44 45 4E 20  |$(9) STELLT DEN |
000003A0: 42 49 54 2D 4D 55 53 54  45 52 2D 4D 4F 44 55 53  |BIT-MUSTER-MODUS|
000003B0: 20 57 49 45 44 45 52 20  41 55 53 00 DB 0B 9A 01  | WIEDER AUS.....|
000003C0: 98 34 2C C7 28 38 29 C7  28 32 37 29 C7 28 31 36  |.4,.(8).(27).(16|
000003D0: 29 C7 28 30 29 C7 28 34  30 29 3B 00 EC 0B A4 01  |).(0).(40);.....|
000003E0: 98 34 2C 55 24 55 32 24  C7 28 39 29 00 F3 0B AE  |.4,U$U2$.(9)....|
000003F0: 01 82 49 00 FC 0B B8 01  A0 34 3A 80 00 43 0C C2  |..I......4:..C..|
00000400: 01 8F 20 20 50 52 55 45  46 52 4F 55 54 49 4E 45  |..  PRUEFROUTINE|
00000410: 20 4F 42 20 44 45 52 20  47 52 41 46 49 4B 50 55  | OB DER GRAFIKPU|
00000420: 4E 4B 54 20 47 45 53 45  54 5A 54 20 4F 44 45 52  |NKT GESETZT ODER|
00000430: 20 4E 49 43 48 54 20 47  45 53 45 54 5A 54 20 49  | NICHT GESETZT I|
00000440: 53 54 3A 00 52 0C E8 03  8B 58 B3 30 A7 41 B2 30  |ST:.R....X.0.A.0|
00000450: 3A 8E 00 72 0C F2 03 42  59 B2 28 58 AF 35 30 34  |:..r...BY.(X.504|
00000460: 29 AA 34 30 AC 28 59 AF  32 34 38 29 AA 28 59 AF  |).40.(Y.248).(Y.|
00000470: 37 29 00 85 0C FC 03 42  49 B2 32 AE 28 37 AB 28  |7).....BI.2.(7.(|
00000480: 58 AF 37 29 29 00 96 0C  06 04 53 B2 C2 28 38 31  |X.7)).....S..(81|
00000490: 39 32 AA 42 59 29 00 A8  0C 10 04 8B 28 53 B0 42  |92.BY)......(S.B|
000004A0: 49 29 B2 53 A7 41 B2 31  00 AE 0C 1A 04 8E 00 00  |I).S.A.1........|
000004B0: 00 FF                                             |..              |
..&.D..  BASICVERSION DER DRUCKROUTINE.M
.N..  KANN AUCH ALS UNTERROUTINE IN EIGE
NE PROGRAMME EINGEBAUT WERDEN...X..  ANP
ASSUNG AN ANDERE 7-NADEL-DRUCKER SICHER 
MOEGLICH.K....4,4:.6,4,6:.6,G(16): 6:.56
,30......  OFFNET DRUCKKANAL UND STELLT 
ZEILENABSTANT FUER GRAFIK EIN.".... I.31
9 ..3 . .7.@. .U$."":U2$."":O$."":O2$.""
.[.... Y.0 .199:C.128:G.128.P.... X.I . 
I.2 . .1.~...A.0:.1000...H.BI.2.(I.X)...
R..A.1. C.C.2.BI.2.(BI.1)......X.D...A.0
:X.I.3:.1000...... A.1. C.C.64 :G.G.1...
... X.I.4 . I.6 . .1.....A.0:.1000.....B
I .2.(I.X.4).6.... A.1 . G.G.2.(BI.1).2.
(BI.2).=."..X.Y.,.. Y.100.O$.O$.G(C).G(C
).V.6.. Y.99.O2$.O2$.G(C).G(C)...@.. Y.1
00.U$.U$.G(G).G(G)...J.. Y.99.U2$.U2$.G(
G).G(G)...T..Y.V.^..4,G(8)G(27)G(16)G(0)
G(40);...H..4,O$O2$G(9)...R..  CHR$(8) S
TELLT BIT-MUSTER-MODUS EIN.[.|..  CHR$(2
7)CHR$(16)CHR$(0)CHR$(40) STELLT DIE DRU
CKSTARTADRSSE JEDER......  ZEILE AUF 40 
PUNKTE NACH RECHTS EIN...... CHR$(9) STE
LLT DEN BIT-MUSTER-MODUS WIEDER AUS.....
.4,G(8)G(27)G(16)G(0)G(40);......4,U$U2$
G(9)......I..... 4:..C.B..  PRUEFROUTINE
 OB DER GRAFIKPUNKT GESETZT ODER NICHT G
ESETZT IST:.R....X.0.A.0:..R...BY.(X.504
).40.(Y.248).(Y.7).....BI.2.(7.(X.7))...
..S.B(8192.BY)......(S.BI).S.A.1........
..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL