Z'SATZCOPY.SRC

FILE INFORMATION

FILENAME(S): Z'SATZCOPY.SRC

FILE TYPE(S): PRG

FILE SIZE: 982b

FIRST SEEN: 2025-11-30 01:13:08

APPEARS ON: 2 disk(s)

FILE HASH

b5339087e0af69a8eaf7d100fcd9bb3ea723b5713e82679e497542c5da6dea6a

FOUND ON DISKS (2 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
15836 SEITE B	Z'SATZCOPY.SRC	PRG	C64er	23	0	DOWNLOAD FILE
15836 SEITE B	Z'SATZCOPY.SRC	PRG	BrainSkull, Markus Geier	23	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 0F 62 15 62 64 00 3B 00  4D 62 6E 00 3B 20 2A 2A  |.b.bd.;.Mbn.; **|
00000010: 2A 2A 2A 20 55 45 42 45  52 47 49 42 54 20 5A 45  |*** UEBERGIBT ZE|
00000020: 49 43 48 45 4E 53 41 54  5A 20 41 42 20 5A 42 41  |ICHENSATZ AB ZBA|
00000030: 53 45 20 41 4E 20 56 44  43 20 2A 2A 2A 2A 2A 00  |SE AN VDC *****.|
00000040: 53 62 78 00 3B 00 5F 62  82 00 2E 90 24 30 42 30  |Sbx.;._b....$0B0|
00000050: 30 00 65 62 8C 00 3B 00  74 62 96 00 2E 8F 50 4E  |0.eb..;.tb....PN|
00000060: 54 52 3D 24 44 41 00 7A  62 A0 00 3B 00 8C 62 AA  |TR=$DA.zb..;..b.|
00000070: 00 2E 8F 5A 42 41 53 45  3D 24 32 30 30 30 00 A1  |...ZBASE=$2000..|
00000080: 62 B4 00 2E 8F 5A 53 41  54 5A 45 4E 44 3D 24 32  |b....ZSATZEND=$2|
00000090: 38 30 30 00 B3 62 BE 00  2E 8F 5A 53 41 54 5A 3D  |800..b....ZSATZ=|
000000A0: 24 33 30 30 30 00 B9 62  C8 00 3B 00 D7 62 D2 00  |$3000..b..;..b..|
000000B0: 20 81 23 25 30 30 31 31  27 31 31 31 30 3B 20 41  | .#%0011'1110; A|
000000C0: 4C 4C 45 53 20 52 41 4D  2C 00 EC 62 DC 00 20 82  |LLES RAM,..b.. .|
000000D0: 24 46 46 30 30 3B 20 49  2F 4F 20 45 49 4E 00 F2  |$FF00; I/O EIN..|
000000E0: 62 E6 00 3B 00 06 63 F0  00 4D 41 49 4E 20 81 23  |b..;..c..MAIN .#|
000000F0: 3C 28 5A 42 41 53 45 29  00 16 63 FA 00 20 83 23  |<(ZBASE)..c.. .#|
00000100: 3E 28 5A 42 41 53 45 29  00 21 63 04 01 20 82 50  |>(ZBASE).!c.. .P|
00000110: 4E 54 52 00 2E 63 0E 01  20 88 50 4E 54 52 2B 31  |NTR..c.. .PNTR+1|
00000120: 00 34 63 18 01 3B 00 4D  63 22 01 20 83 23 31 38  |.4c..;.Mc". .#18|
00000130: 3B 20 55 50 44 41 54 45  20 41 44 52 20 48 49 00  |; UPDATE ADR HI.|
00000140: 5D 63 2C 01 20 81 23 3E  28 5A 53 41 54 5A 29 00  |]c,. .#>(ZSATZ).|
00000150: 6C 63 36 01 20 97 57 52  49 54 45 52 45 47 00 82  |lc6. .WRITEREG..|
00000160: 63 40 01 20 A2 3B 20 2E  2E 2E 20 20 20 20 20 20  |c@. .; ...      |
00000170: 20 20 4C 4F 00 92 63 4A  01 20 81 23 3C 28 5A 53  |  LO..cJ. .#<(ZS|
00000180: 41 54 5A 29 00 A1 63 54  01 20 97 57 52 49 54 45  |ATZ)..cT. .WRITE|
00000190: 52 45 47 00 A7 63 5E 01  3B 00 C0 63 68 01 20 84  |REG..c^.;..ch. .|
000001A0: 23 30 3B 20 5A 45 49 43  48 45 4E 20 41 55 53 20  |#0; ZEICHEN AUS |
000001B0: 5A 53 00 DC 63 72 01 4C  4F 4F 50 31 20 81 28 50  |ZS..cr.LOOP1 .(P|
000001C0: 4E 54 52 29 2C 59 3B 20  20 48 4F 4C 45 4E 00 FE  |NTR),Y;  HOLEN..|
000001D0: 63 7C 01 20 97 57 52 49  54 45 44 41 54 41 3B 20  |c|. .WRITEDATA; |
000001E0: 28 41 29 2D 2D 3E 56 44  43 2D 5A 53 2D 52 41 4D  |(A)-->VDC-ZS-RAM|
000001F0: 00 05 64 86 01 20 9E 00  0E 64 90 01 20 93 23 38  |..d.. ...d.. .#8|
00000200: 00 1A 64 9A 01 20 B5 4C  4F 4F 50 31 00 20 64 A4  |..d.. .LOOP1. d.|
00000210: 01 3B 00 36 64 AE 01 20  81 23 30 3B 20 38 20 4E  |.;.6d.. .#0; 8 N|
00000220: 55 4C 4C 42 59 54 45 53  00 57 64 B8 01 4C 4F 4F  |ULLBYTES.Wd..LOO|
00000230: 50 32 20 97 57 52 49 54  45 44 41 54 41 3B 20 20  |P2 .WRITEDATA;  |
00000240: 53 43 48 52 45 49 42 45  4E 00 5E 64 C2 01 20 A3  |SCHREIBEN.^d.. .|
00000250: 00 6A 64 CC 01 20 B7 4C  4F 4F 50 32 00 70 64 D6  |.jd.. .LOOP2.pd.|
00000260: 01 3B 00 77 64 E0 01 20  A6 00 8E 64 EA 01 20 81  |.;.wd.. ...d.. .|
00000270: 50 4E 54 52 3B 20 50 4F  49 4E 54 45 52 20 49 4E  |PNTR; POINTER IN|
00000280: 00 A5 64 F4 01 20 86 23  38 3B 20 20 5A 45 49 43  |..d.. .#8;  ZEIC|
00000290: 48 45 4E 53 41 54 5A 00  BF 64 FE 01 20 82 50 4E  |HENSATZ..d.. .PN|
000002A0: 54 52 3B 20 20 41 55 46  20 4E 41 45 43 48 54 45  |TR;  AUF NAECHTE|
000002B0: 53 00 D5 64 08 02 20 B5  4C 4F 4F 50 31 3B 20 20  |S..d.. .LOOP1;  |
000002C0: 5A 45 49 43 48 45 4E 00  E2 64 12 02 20 8A 50 4E  |ZEICHEN..d.. .PN|
000002D0: 54 52 2B 31 00 F9 64 1C  02 20 81 50 4E 54 52 2B  |TR+1..d.. .PNTR+|
000002E0: 31 3B 20 45 4E 44 45 20  44 45 53 00 21 65 26 02  |1; ENDE DES.!e&.|
000002F0: 20 85 23 3E 28 5A 53 41  54 5A 45 4E 44 29 3B 20  | .#>(ZSATZEND); |
00000300: 5A 27 53 41 54 5A 45 53  20 45 52 52 45 49 43 48  |Z'SATZES ERREICH|
00000310: 54 20 3F 00 42 65 30 02  20 B5 4C 4F 4F 50 31 3B  |T ?.Be0. .LOOP1;|
00000320: 20 20 4E 45 49 4E 3A 20  57 45 49 54 45 52 4D 41  |  NEIN: WEITERMA|
00000330: 43 48 45 4E 00 48 65 3A  02 3B 00 4F 65 44 02 20  |CHEN.He:.;.OeD. |
00000340: A4 00 55 65 4E 02 3B 00  76 65 58 02 57 52 49 54  |..UeN.;.veX.WRIT|
00000350: 45 44 41 54 41 20 83 23  33 31 3B 20 56 44 43 20  |EDATA .#31; VDC |
00000360: 44 41 54 41 20 52 45 47  00 8A 65 62 02 57 52 49  |DATA REG..eb.WRI|
00000370: 54 45 52 45 47 20 88 24  44 36 30 30 00 AF 65 6C  |TEREG .$D600..el|
00000380: 02 57 52 49 54 45 4C 4F  4F 50 20 8D 24 44 36 30  |.WRITELOOP .$D60|
00000390: 30 3B 20 41 55 46 20 56  44 43 2D 53 54 41 54 55  |0; AUF VDC-STATU|
000003A0: 53 00 C7 65 76 02 20 B1  57 52 49 54 45 4C 4F 4F  |S..ev. .WRITELOO|
000003B0: 50 3B 20 57 41 52 54 45  4E 00 D3 65 80 02 20 82  |P; WARTEN..e.. .|
000003C0: 24 44 36 30 31 00 DA 65  8A 02 20 A4 00 E0 65 94  |$D601..e.. ...e.|
000003D0: 02 3B 00 00 00 44                                 |.;...D          |

.B.BD.;.MBN.; ***** UEBERGIBT ZEICHENSAT
Z AB ZBASE AN VDC *****.SBX.;._B....$0B0
0.EB..;.TB....PNTR=$DA.ZB .;..B....ZBASE
=$2000..B....ZSATZEND=$2800..B....ZSATZ=
$3000..BH.;.WBR. .#%0011'1110; ALLES RAM
,..B.. .$FF00; I/O EIN..B..;..C..MAIN .#
<(ZBASE)..C.. .#>(ZBASE).!C.. .PNTR..C..
 .PNTR+1.4C..;.MC". .#18; UPDATE ADR HI.
]C,. .#>(ZSATZ).LC6. .WRITEREG..C@. .; .
..        LO..CJ. .#<(ZSATZ)..CT. .WRITE
REG..C^.;..CH. .#0; ZEICHEN AUS ZS..CR.L
OOP1 .(PNTR),Y;  HOLEN..C|. .WRITEDATA; 
(A)-->VDC-ZS-RAM..D.. ...D.. .#8..D.. .L
OOP1. D..;.6D.. .#0; 8 NULLBYTES.WD..LOO
P2 .WRITEDATA;  SCHREIBEN.^DB. ..JDL. .L
OOP2.PDV.;.WD.. ...D.. .PNTR; POINTER IN
..D.. .#8;  ZEICHENSATZ..D.. .PNTR;  AUF
 NAECHTES.UD.. .LOOP1;  ZEICHEN..D.. .PN
TR+1..D.. .PNTR+1; ENDE DES.!E&. .#>(ZSA
TZEND); Z'SATZES ERREICHT ?.BE0. .LOOP1;
  NEIN: WEITERMACHEN.HE:.;.OED. ..UEN.;.
VEX.WRITEDATA .#31; VDC DATA REG..EB.WRI
TEREG .$D600..EL.WRITELOOP .$D600; AUF V
DC-STATUS.GEV. .WRITELOOP; WARTEN.SE.. .
$D601.ZE.. ...E..;...D

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL