00000000: D8 1F E6 1F 64 00 2E 4C 49 20 31 2C 33 2C 30 00 |....d..LI 1,3,0.|
00000010: 07 20 6E 00 2E 42 41 20 24 43 30 30 30 20 3B 20 |. n..BA $C000 ; |
00000020: 53 54 41 52 54 3A 20 53 59 53 20 34 39 31 35 32 |START: SYS 49152|
00000030: 00 0D 20 78 00 3B 00 32 20 82 00 3B 20 52 45 43 |.. x.;.2 ..; REC|
00000040: 48 4E 55 4E 47 20 4D 49 54 20 46 4C 49 45 53 53 |HNUNG MIT FLIESS|
00000050: 4B 4F 4D 4D 41 57 45 52 54 45 4E 00 38 20 8C 00 |KOMMAWERTEN.8 ..|
00000060: 3B 00 4F 20 96 00 2E 47 4C 20 4D 45 4D 46 41 43 |;.O ...GL MEMFAC|
00000070: 20 3D 20 24 42 42 41 32 00 66 20 A0 00 2E 47 4C | = $BBA2.f ...GL|
00000080: 20 46 41 43 4F 55 54 20 3D 20 24 41 41 42 43 00 | FACOUT = $AABC.|
00000090: 7D 20 AA 00 2E 47 4C 20 53 51 52 46 41 43 20 3D |} ...GL SQRFAC =|
000000A0: 20 24 42 46 37 31 00 94 20 B4 00 2E 47 4C 20 4C | $BF71.. ...GL L|
000000B0: 4F 47 4E 41 54 20 3D 20 24 42 39 45 41 00 9A 20 |OGNAT = $B9EA.. |
000000C0: BE 00 3B 00 BE 20 C8 00 2E 4D 41 20 48 4F 4C 45 |..;.. ...MA HOLE|
000000D0: 20 28 41 44 52 45 53 53 45 29 20 3B 20 4D 41 4B | (ADRESSE) ; MAK|
000000E0: 52 4F 2D 44 45 46 2E 00 E3 20 D2 00 20 4C 44 41 |RO-DEF... .. LDA|
000000F0: 23 3C 28 41 44 52 45 53 53 45 29 3B 20 48 4F 4C |#<(ADRESSE); HOL|
00000100: 54 20 4D 46 4C 50 54 2D 5A 41 48 4C 00 07 21 DC |T MFLPT-ZAHL..!.|
00000110: 00 20 4C 44 59 23 3E 28 41 44 52 45 53 53 45 29 |. LDY#>(ADRESSE)|
00000120: 3B 20 56 4F 4E 20 41 44 52 45 53 53 45 20 49 4E |; VON ADRESSE IN|
00000130: 00 1F 21 E6 00 20 4A 53 52 4D 45 4D 46 41 43 3B |..!.. JSRMEMFAC;|
00000140: 20 44 45 4E 20 46 41 43 00 27 21 F0 00 2E 52 54 | DEN FAC.'!...RT|
00000150: 00 2D 21 FA 00 3B 00 33 21 04 01 3B 00 49 21 0E |.-!..;.3!..;.I!.|
00000160: 01 2E 2E 2E 48 4F 4C 45 20 28 42 53 50 5A 41 48 |....HOLE (BSPZAH|
00000170: 4C 29 00 4F 21 18 01 3B 00 6A 21 22 01 20 4A 53 |L).O!..;.j!". JS|
00000180: 52 46 41 43 4F 55 54 3B 20 41 55 53 44 52 55 43 |RFACOUT; AUSDRUC|
00000190: 4B 45 4E 00 70 21 2C 01 3B 00 86 21 36 01 2E 2E |KEN.p!,.;..!6...|
000001A0: 2E 48 4F 4C 45 20 28 42 53 50 5A 41 48 4C 29 00 |.HOLE (BSPZAHL).|
000001B0: 8C 21 40 01 3B 00 AA 21 4A 01 20 4A 53 52 53 51 |.!@.;..!J. JSRSQ|
000001C0: 52 46 41 43 3B 20 51 55 41 44 52 41 54 57 55 52 |RFAC; QUADRATWUR|
000001D0: 5A 45 4C 00 B0 21 54 01 3B 00 CB 21 5E 01 20 4A |ZEL..!T.;..!^. J|
000001E0: 53 52 46 41 43 4F 55 54 3B 20 41 55 53 44 52 55 |SRFACOUT; AUSDRU|
000001F0: 43 4B 45 4E 00 D1 21 68 01 3B 00 E7 21 72 01 2E |CKEN..!h.;..!r..|
00000200: 2E 2E 48 4F 4C 45 20 28 42 53 50 5A 41 48 4C 29 |..HOLE (BSPZAHL)|
00000210: 00 ED 21 7C 01 3B 00 13 22 86 01 20 4A 53 52 4C |..!|.;..".. JSRL|
00000220: 4F 47 4E 41 54 3B 20 4C 4F 47 41 52 49 54 48 4D |OGNAT; LOGARITHM|
00000230: 55 53 20 4E 41 54 55 52 41 4C 49 53 00 19 22 90 |US NATURALIS..".|
00000240: 01 3B 00 34 22 9A 01 20 4A 4D 50 46 41 43 4F 55 |.;.4".. JMPFACOU|
00000250: 54 3B 20 41 55 53 44 52 55 43 4B 45 4E 00 3A 22 |T; AUSDRUCKEN.:"|
00000260: F4 01 3B 00 55 22 FE 01 3B 20 42 45 49 53 50 49 |..;.U"..; BEISPI|
00000270: 45 4C 5A 41 48 4C 20 31 2E 32 33 34 35 36 00 6B |ELZAHL 1.23456.k|
00000280: 22 08 02 3B 20 49 4D 20 4D 46 4C 50 54 2D 46 4F |"..; IM MFLPT-FO|
00000290: 52 4D 41 54 00 71 22 12 02 3B 00 94 22 1C 02 42 |RMAT.q"..;.."..B|
000002A0: 53 50 5A 41 48 4C 20 2E 42 59 24 38 31 2C 24 31 |SPZAHL .BY$81,$1|
000002B0: 45 2C 24 30 36 2C 24 30 46 2C 24 45 35 00 9A 22 |E,$06,$0F,$E5.."|
000002C0: 26 02 3B 00 00 00 |&.;... |
X...D..LI 1,3,0.. N..BA $C000 ; START: S
YS 49152.. X.;.2 ..; RECHNUNG MIT FLIESS
KOMMAWERTEN.8 ..;.O ...GL MEMFAC = $BBA2
.F ..GL FACOUT = $AABC.} ...GL SQRFAC =
$BF71.. ...GL LOGNAT = $B9EA.. ..;.. H.
.MA HOLE (ADRESSE) ; MAKRO-DEF... R. LDA
#<(ADRESSE); HOLT MFLPT-ZAHL..!.. LDY#>(
ADRESSE); VON ADRESSE IN..!.. JSRMEMFAC;
DEN FAC.'!...RT.-!..;.3!..;.I!.....HOLE
(BSPZAHL).O!..;.J!". JSRFACOUT; AUSDRUC
KEN.P!,.;..!6....HOLE (BSPZAHL)..!@.;..!
J. JSRSQRFAC; QUADRATWURZEL..!T.;.K!^. J
SRFACOUT; AUSDRUCKEN.Q!H.;..!R....HOLE (
BSPZAHL)..!|.;..".. JSRLOGNAT; LOGARITHM
US NATURALIS.."..;.4".. JMPFACOUT; AUSDR
UCKEN.:"..;.U"..; BEISPIELZAHL 1.23456.K
"..; IM MFLPT-FORMAT.Q"..;.."..BSPZAHL .
BY$81,$1E,$06,$0F,$E5.."&.;...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL