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

LISTING 3

FILE INFORMATION

FILENAME(S): LISTING 3

FILE TYPE(S): PRG

FILE SIZE: 544b

FIRST SEEN: 2025-11-02 22:11:34

APPEARS ON: 3 disk(s)

FILE HASH

b36bdcf19e59601184c9a576383c646dfedcd3c4913dda20dc565ec929f0e8d0

FOUND ON DISKS (3 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
SONDERHEFT ASS LISTING 3 PRG Treasure Chest - ToGuMi 16 5 DOWNLOAD FILE
SONDERHEFT ASS LISTING 3 PRG C64er 16 5 DOWNLOAD FILE
15835 SEITE A LISTING 3 PRG C64er 16 3 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: D8 1F E6 1F 64 00 2E 4C  49 20 31 2C 33 2C 30 00  |....d..LI 1,3,0.|
00000010: EC 1F 6E 00 3B 00 0D 20  78 00 3B 20 54 45 58 54  |..n.;.. x.; TEXT|
00000020: 41 55 53 47 41 42 45 20  28 55 45 42 45 52 20 53  |AUSGABE (UEBER S|
00000030: 54 52 4F 55 54 29 00 13  20 82 00 3B 00 34 20 8C  |TROUT).. ..;.4 .|
00000040: 00 2E 42 41 20 24 43 30  30 30 20 3B 20 53 54 41  |..BA $C000 ; STA|
00000050: 52 54 3A 20 53 59 53 20  34 39 31 35 32 00 3A 20  |RT: SYS 49152.: |
00000060: 96 00 3B 00 51 20 A0 00  2E 47 4C 20 53 54 52 4F  |..;.Q ...GL STRO|
00000070: 55 54 20 3D 20 24 41 42  31 45 00 68 20 AA 00 2E  |UT = $AB1E.h ...|
00000080: 47 4C 20 43 55 52 53 4F  52 20 3D 20 24 45 35 30  |GL CURSOR = $E50|
00000090: 43 00 95 20 B4 00 2E 47  4C 20 43 4C 52 53 43 52  |C.. ...GL CLRSCR|
000000A0: 20 3D 20 24 45 35 34 34  20 3B 20 42 49 4C 44 53  | = $E544 ; BILDS|
000000B0: 43 48 49 52 4D 20 4C 4F  45 53 43 48 45 4E 00 9B  |CHIRM LOESCHEN..|
000000C0: 20 BE 00 3B 00 AF 20 C8  00 2E 47 4C 20 5A 45 49  | ..;.. ...GL ZEI|
000000D0: 4C 45 20 20 3D 20 31 32  00 C3 20 D2 00 2E 47 4C  |LE  = 12.. ...GL|
000000E0: 20 53 50 41 4C 54 45 20  3D 20 31 30 00 C9 20 DC  | SPALTE = 10.. .|
000000F0: 00 3B 00 EB 20 E6 00 20  4A 53 52 43 4C 52 53 43  |.;.. .. JSRCLRSC|
00000100: 52 3B 20 3D 20 50 52 49  4E 54 20 43 48 52 24 28  |R; = PRINT CHR$(|
00000110: 31 34 37 29 00 06 21 F0  00 20 4C 44 58 23 5A 45  |147)..!.. LDX#ZE|
00000120: 49 4C 45 3B 20 5A 45 49  4C 45 20 49 4E 20 58 00  |ILE; ZEILE IN X.|
00000130: 23 21 FA 00 20 4C 44 59  23 53 50 41 4C 54 45 3B  |#!.. LDY#SPALTE;|
00000140: 20 53 50 41 4C 54 45 20  49 4E 20 59 00 41 21 04  | SPALTE IN Y.A!.|
00000150: 01 20 4A 53 52 43 55 52  53 4F 52 3B 20 43 55 52  |. JSRCURSOR; CUR|
00000160: 53 4F 52 20 53 45 54 5A  45 4E 00 64 21 0E 01 20  |SOR SETZEN.d!.. |
00000170: 4C 44 41 23 3C 28 54 45  58 54 29 3B 20 4C 4F 57  |LDA#<(TEXT); LOW|
00000180: 2D 42 59 54 45 20 49 4E  20 41 4B 4B 55 00 85 21  |-BYTE IN AKKU..!|
00000190: 18 01 20 4C 44 59 23 3E  28 54 45 58 54 29 3B 20  |.. LDY#>(TEXT); |
000001A0: 48 49 47 48 2D 42 59 54  45 20 49 4E 20 59 00 A8  |HIGH-BYTE IN Y..|
000001B0: 21 22 01 20 4A 4D 50 53  54 52 4F 55 54 3B 20 54  |!". JMPSTROUT; T|
000001C0: 45 58 54 41 55 53 47 41  42 45 20 26 20 45 4E 44  |EXTAUSGABE & END|
000001D0: 45 00 AE 21 2C 01 3B 00  CE 21 36 01 54 45 58 54  |E..!,.;..!6.TEXT|
000001E0: 20 2E 54 58 22 44 41 53  20 49 53 54 20 44 45 52  | .TX"DAS IST DER|
000001F0: 20 54 45 58 54 21 22 00  F4 21 40 01 2E 42 59 20  | TEXT!"..!@..BY |
00000200: 30 20 3B 20 45 4E 44 4D  41 52 4B 49 45 52 55 4E  |0 ; ENDMARKIERUN|
00000210: 47 20 46 55 45 52 20 53  54 52 4F 55 54 00 00 00  |G FUER STROUT...|
X...D..LI 1,3,0...N.;.. X.; TEXTAUSGABE 
(UEBER STROUT).. ..;.4 ...BA $C000 ; STA
RT: SYS 49152.: ..;.Q  ..GL STROUT = $AB
1E.H ...GL CURSOR = $E50C.. ...GL CLRSCR
 = $E544 ; BILDSCHIRM LOESCHEN.. ..;.. H
..GL ZEILE  = 12.C R..GL SPALTE = 10.I .
.;.. .. JSRCLRSCR; = PRINT CHR$(147)..!.
. LDX#ZEILE; ZEILE IN X.#!.. LDY#SPALTE;
 SPALTE IN Y.A!.. JSRCURSOR; CURSOR SETZ
EN.D!.. LDA#<(TEXT); LOW-BYTE IN AKKU..!
.. LDY#>(TEXT); HIGH-BYTE IN Y..!". JMPS
TROUT; TEXTAUSGABE & ENDE..!,.;.N!6.TEXT
 .TX"DAS IST DER TEXT!"..!@..BY 0 ; ENDM
ARKIERUNG FUER STROUT...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL