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

LISTING 10.8 (S)

FILE INFORMATION

FILENAME(S): LISTING 10.8 (S)

FILE TYPE(S): PRG

FILE SIZE: 696b

FIRST SEEN: 2025-10-20 14:31:28

APPEARS ON: 1 disk(s)

FILE HASH

4f57c9263b6c47e4115a8dcc8107fe88fde83282da8a3c41c2b7b2bc3daf407d

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
MT90499 SEITE 2 LISTING 10.8 (S) PRG Treasure Chest - Klaus Der Suhler 22 10 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: D8 1F F9 1F 64 00 2E 42  41 20 24 43 30 30 30 20  |....d..BA $C000 |
00000010: 3B 20 53 54 41 52 54 3A  20 53 59 53 20 34 39 31  |; START: SYS 491|
00000020: 35 32 00 FF 1F 6E 00 3B  00 24 20 78 00 3B 20 52  |52...n.;.$ x.; R|
00000030: 45 43 48 4E 55 4E 47 20  4D 49 54 20 46 4C 49 45  |ECHNUNG MIT FLIE|
00000040: 53 53 4B 4F 4D 4D 41 57  45 52 54 45 4E 00 2A 20  |SSKOMMAWERTEN.* |
00000050: 82 00 3B 00 41 20 8C 00  2E 47 4C 20 4D 45 4D 46  |..;.A ...GL MEMF|
00000060: 41 43 20 3D 20 24 42 42  41 32 00 58 20 96 00 2E  |AC = $BBA2.X ...|
00000070: 47 4C 20 46 41 43 4F 55  54 20 3D 20 24 41 41 42  |GL FACOUT = $AAB|
00000080: 43 00 6F 20 A0 00 2E 47  4C 20 53 51 52 46 41 43  |C.o ...GL SQRFAC|
00000090: 20 3D 20 24 42 46 37 31  00 86 20 AA 00 2E 47 4C  | = $BF71.. ...GL|
000000A0: 20 4C 4F 47 4E 41 54 20  3D 20 24 42 39 45 41 00  | LOGNAT = $B9EA.|
000000B0: 8C 20 B4 00 3B 00 B0 20  2C 01 2E 4D 41 20 48 4F  |. ..;.. ,..MA HO|
000000C0: 4C 45 20 28 41 44 52 45  53 53 45 29 20 3B 20 4D  |LE (ADRESSE) ; M|
000000D0: 41 4B 52 4F 2D 44 45 46  2E 00 D5 20 36 01 20 4C  |AKRO-DEF... 6. L|
000000E0: 44 41 23 3C 28 41 44 52  45 53 53 45 29 3B 20 48  |DA#<(ADRESSE); H|
000000F0: 4F 4C 54 20 4D 46 4C 50  54 2D 5A 41 48 4C 00 F9  |OLT MFLPT-ZAHL..|
00000100: 20 40 01 20 4C 44 59 23  3E 28 41 44 52 45 53 53  | @. LDY#>(ADRESS|
00000110: 45 29 3B 20 56 4F 4E 20  41 44 52 45 53 53 45 20  |E); VON ADRESSE |
00000120: 49 4E 00 11 21 4A 01 20  4A 53 52 4D 45 4D 46 41  |IN..!J. JSRMEMFA|
00000130: 43 3B 20 44 45 4E 20 46  41 43 00 19 21 54 01 2E  |C; DEN FAC..!T..|
00000140: 52 54 00 1F 21 5E 01 3B  00 25 21 F4 01 3B 00 3B  |RT..!^.;.%!..;.;|
00000150: 21 FE 01 2E 2E 2E 48 4F  4C 45 20 28 42 53 50 5A  |!.....HOLE (BSPZ|
00000160: 41 48 4C 29 00 41 21 08  02 3B 00 5C 21 12 02 20  |AHL).A!..;.\!.. |
00000170: 4A 53 52 46 41 43 4F 55  54 3B 20 41 55 53 44 52  |JSRFACOUT; AUSDR|
00000180: 55 43 4B 45 4E 00 62 21  58 02 3B 00 78 21 62 02  |UCKEN.b!X.;.x!b.|
00000190: 2E 2E 2E 48 4F 4C 45 20  28 42 53 50 5A 41 48 4C  |...HOLE (BSPZAHL|
000001A0: 29 00 7E 21 6C 02 3B 00  9C 21 76 02 20 4A 53 52  |).~!l.;..!v. JSR|
000001B0: 53 51 52 46 41 43 3B 20  51 55 41 44 52 41 54 57  |SQRFAC; QUADRATW|
000001C0: 55 52 5A 45 4C 00 A2 21  80 02 3B 00 BD 21 8A 02  |URZEL..!..;..!..|
000001D0: 20 4A 53 52 46 41 43 4F  55 54 3B 20 41 55 53 44  | JSRFACOUT; AUSD|
000001E0: 52 55 43 4B 45 4E 00 C3  21 BC 02 3B 00 D9 21 C6  |RUCKEN..!..;..!.|
000001F0: 02 2E 2E 2E 48 4F 4C 45  20 28 42 53 50 5A 41 48  |....HOLE (BSPZAH|
00000200: 4C 29 00 DF 21 D0 02 3B  00 05 22 DA 02 20 4A 53  |L)..!..;..".. JS|
00000210: 52 4C 4F 47 4E 41 54 3B  20 4C 4F 47 41 52 49 54  |RLOGNAT; LOGARIT|
00000220: 48 4D 55 53 20 4E 41 54  55 52 41 4C 49 53 00 0B  |HMUS NATURALIS..|
00000230: 22 E4 02 3B 00 26 22 EE  02 20 4A 4D 50 46 41 43  |"..;.&".. JMPFAC|
00000240: 4F 55 54 3B 20 41 55 53  44 52 55 43 4B 45 4E 00  |OUT; AUSDRUCKEN.|
00000250: 2C 22 E8 03 3B 00 47 22  F2 03 3B 20 42 45 49 53  |,"..;.G"..; BEIS|
00000260: 50 49 45 4C 5A 41 48 4C  20 31 2E 32 33 34 35 36  |PIELZAHL 1.23456|
00000270: 00 5D 22 FC 03 3B 20 49  4D 20 4D 46 4C 50 54 2D  |.]"..; IM MFLPT-|
00000280: 46 4F 52 4D 41 54 00 63  22 06 04 3B 00 86 22 10  |FORMAT.c"..;..".|
00000290: 04 42 53 50 5A 41 48 4C  20 2E 42 59 24 38 31 2C  |.BSPZAHL .BY$81,|
000002A0: 24 31 45 2C 24 30 36 2C  24 30 46 2C 24 45 35 00  |$1E,$06,$0F,$E5.|
000002B0: 8C 22 1A 04 3B 00 00 00                           |."..;...        |

X...D..BA $C000 ; START: SYS 49152...N.;
.$ X.; RECHNUNG MIT FLIESSKOMMAWERTEN.* 
..;.A ...GL MEMFAC = $BBA2.X ...GL FACOU
T = $AABC.O  ..GL SQRFAC = $BF71.. ...GL
 LOGNAT = $B9EA.. ..;.. ,..MA HOLE (ADRE
SSE) ; MAKRO-DEF..U 6. LDA#<(ADRESSE); H
OLT MFLPT-ZAHL.. @. LDY#>(ADRESSE); VON 
ADRESSE IN..!J. JSRMEMFAC; DEN FAC..!T..
RT..!^.;.%!..;.;!.....HOLE (BSPZAHL).A!.
.;.\!.. JSRFACOUT; AUSDRUCKEN.B!X.;.X!B.
...HOLE (BSPZAHL).~!L.;..!V. JSRSQRFAC; 
QUADRATWURZEL..!..;..!.. JSRFACOUT; AUSD
RUCKEN.C!..;.Y!F....HOLE (BSPZAHL)..!P.;
.."Z. JSRLOGNAT; LOGARITHMUS NATURALIS..
"..;.&".. JMPFACOUT; AUSDRUCKEN.,"..;.G"
..; BEISPIELZAHL 1.23456.]"..; IM MFLPT-
FORMAT.C"..;.."..BSPZAHL .BY$81,$1E,$06,
$0F,$E5.."..;...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL