00000000: 09 85 8B 05 0A 00 52 00 52 00 3C 00 00 00 09 FF |......R.R.<.....|
00000010: 00 00 52 00 85 8B 00 03 00 7D EC FF 00 FF 00 00 |..R......}......|
00000020: 00 00 00 FF 00 FF 00 FF D3 7F D3 7F D3 7F D3 7F |................|
00000030: D3 7F D3 7F D3 7F D3 7F D3 7F D3 7F D3 7F D3 7F |................|
00000040: 44 45 5A 20 4C 20 20 FF 00 FF 00 FF 00 FF 00 FF |DEZ L .........|
00000050: 00 FF 00 FF 00 FF 00 FF 00 FF 06 2E 57 4F 52 44 |............WORD|
00000060: 20 20 20 20 20 20 20 20 20 20 03 5F 33 53 20 20 | ._3S |
00000070: 20 20 20 20 20 20 20 20 20 20 06 2E 42 59 54 45 | ..BYTE|
00000080: 20 20 20 20 20 20 20 20 20 20 02 5F 14 20 20 20 | ._. |
00000090: 20 20 20 20 20 20 20 20 20 20 00 FF 00 FF 00 FF | ......|
000000A0: 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF |................|
000000B0: 00 FF 00 FF 00 FF 00 FF 20 20 20 20 20 20 20 20 |........ |
000000C0: 20 52 4F 4C 20 44 4C 31 20 20 20 20 3B 4E 41 45 | ROL DL1 ;NAE|
000000D0: 43 48 53 54 45 53 20 42 49 54 20 20 20 20 20 20 |CHSTES BIT |
000000E0: 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF |................|
000000F0: 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 40 00 |..............@.|
00000100: 30 02 03 2A 00 30 01 03 2A 00 03 2A 00 2A 00 2A |0..*.0..*..*.*.*|
00000110: 00 2A 00 2A 01 99 32 5E 30 03 2A 00 2A 00 2A 00 |.*.*..2^0.*.*.*.|
00000120: 2A 00 2A 02 99 32 5E 31 03 2A 00 2A 00 2A 00 2A |*.*..2^1.*.*.*.*|
00000130: 00 2A 04 99 32 5E 32 03 2A 00 2A 00 2A 00 2A 00 |.*..2^2.*.*.*.*.|
00000140: 2A 08 99 03 2A 00 2A 00 2A 00 2A 01 2A 06 99 2E |*...*.*.*.*.*...|
00000150: 03 2A 00 2A 00 2A 00 2A 03 2A 02 99 2E 03 2A 00 |.*.*.*.*.*....*.|
00000160: 2A 00 2A 00 2A 06 2A 04 99 2E 03 2A 00 2A 00 2A |*.*.*.*....*.*.*|
00000170: 01 2A 02 2A 08 03 2A 00 2A 00 2A 02 2A 05 2A 06 |.*.*..*.*.*.*.*.|
00000180: 99 32 5E 38 03 2A 00 2A 00 2A 05 2A 01 2A 02 03 |.2^8.*.*.*.*.*..|
00000190: 2A 00 2A 01 2A 00 2A 02 2A 04 99 2E 03 2A 00 2A |*.*.*.*.*....*.*|
000001A0: 02 2A 00 2A 04 2A 08 99 2E 03 2A 00 2A 04 2A 00 |.*.*.*....*.*.*.|
000001B0: 2A 09 2A 06 99 2E 03 2A 00 2A 08 2A 01 2A 09 2A |*.*....*.*.*.*.*|
000001C0: 02 99 03 2A 01 2A 06 2A 03 2A 08 2A 04 99 32 5E |...*.*.*.*.*..2^|
000001D0: 31 34 30 04 03 2A 03 2A 02 2A 07 2A 06 2A 08 99 |140..*.*.*.*.*..|
000001E0: 32 5E 31 35 60 94 52 55 45 43 4B 53 50 52 55 4E |2^15`.RUECKSPRUN|
000001F0: 47 94 2E 2E 20 57 45 4E 4E 20 4E 49 43 48 54 3A |G... WENN NICHT:|
00000200: 94 49 4D 20 57 4F 52 44 20 47 45 53 45 54 5A 54 |.IM WORD GESETZT|
00000210: 20 49 53 54 94 48 41 55 50 54 20 4E 4F 43 48 20 | IST.HAUPT NOCH |
00000220: 45 49 4E 20 42 49 54 94 50 52 55 45 46 54 20 4F |EIN BIT.PRUEFT O|
00000230: 42 20 55 45 42 45 52 2D D0 38 05 94 4B 4E 55 45 |B UEBER-.8..KNUE|
00000240: 50 46 55 4E 47 20 57 49 52 44 20 47 45 2D 0D 38 |PFUNG WIRD GE-.8|
00000250: 01 94 44 55 52 43 48 20 44 49 45 53 45 20 56 45 |..DURCH DIESE VE|
00000260: 52 2D 94 47 45 53 48 49 46 54 45 54 2E 2E 38 02 |R-.GESHIFTET..8.|
00000270: 94 45 49 4E 20 42 49 54 20 4E 41 43 48 20 4C 49 |.EIN BIT NACH LI|
00000280: 4E 4B 53 30 09 0E 38 01 94 44 41 53 20 57 4F 52 |NKS0..8..DAS WOR|
00000290: 44 20 57 49 52 44 20 55 4D EE 28 FF 90 38 09 8D |D WIRD UM.(..8..|
000002A0: 28 FE 69 2A 05 18 94 48 4F 43 48 53 45 54 5A 45 |(.i*...HOCHSETZE|
000002B0: 4E 30 06 AD 28 FE 94 54 41 42 45 4C 4C 45 4E 2D |N0..(..TABELLEN-|
000002C0: 50 4F 49 4E 54 45 52 10 38 07 88 30 08 91 28 FC |POINTER.8..0..(.|
000002D0: E9 2A 0A 90 38 08 C9 28 3A 71 28 FE 30 07 B1 28 |.*..8..(:q(.0..(|
000002E0: FC 18 95 57 45 52 54 20 41 55 53 20 54 41 42 45 |...WERT AUS TABE|
000002F0: 4C 4C 45 A0 2A 04 95 57 45 4E 4E 20 4A 41 2C 20 |LLE.*..WENN JA, |
00000300: 41 44 44 49 45 52 45 10 38 06 95 53 45 54 5A 54 |ADDIERE.8..SETZT|
00000310: 20 3F 30 05 AE 38 02 95 4F 42 45 52 53 54 45 53 | ?0..8..OBERSTES|
00000320: 20 42 49 54 20 47 45 2D 8D 28 FF A9 44 38 04 8D | BIT GE-.(..D8..|
00000330: 28 FE 95 54 41 42 45 4C 4C 45 20 49 4E 20 28 24 |(..TABELLE IN ($|
00000340: 46 45 29 A9 45 38 04 95 50 4F 49 4E 54 45 52 20 |FE).E8..POINTER |
00000350: 41 55 46 10 38 03 88 30 03 91 28 FC A9 28 30 95 |AUF.8..0..(..(0.|
00000360: 22 30 30 30 30 30 22 20 4C 4F 45 53 43 48 45 4E |"00000" LOESCHEN|
00000370: A0 2A 04 95 42 45 52 45 49 43 48 20 4D 49 54 8C |.*..BEREICH MIT.|
00000380: 38 02 30 00 8E 38 01 95 57 4F 52 44 20 50 55 46 |8.0..8..WORD PUF|
00000390: 46 45 52 4E 80 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |FERN.-----------|
000003A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000003B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 80 20 20 20 |------------. |
000003C0: 20 20 20 20 20 20 20 20 20 20 20 20 28 57 29 20 | (W) |
000003D0: 31 39 39 32 20 C2 45 4E 4A 41 4D 49 4E 20 C2 4F |1992 .ENJAMIN .O|
000003E0: 4D 4D 45 52 80 47 45 52 55 46 45 4E 2E 80 C4 49 |MMER.GERUFEN...I|
000003F0: 45 20 C6 55 4E 4B 54 49 4F 4E 20 57 49 52 44 20 |E .UNKTION WIRD |
00000400: 4D 49 54 20 22 4A 53 52 20 44 45 5A 22 20 41 55 |MIT "JSR DEZ" AU|
00000410: 46 2D 80 24 46 44 3D 48 49 2D 42 59 54 45 29 2E |F-.$FD=HI-BYTE).|
00000420: 80 50 4F 49 4E 54 45 52 20 28 24 46 43 2F 24 46 |.POINTER ($FC/$F|
00000430: 44 29 20 57 45 49 53 53 54 20 28 24 46 43 3D 4C |D) WEISST ($FC=L|
00000440: 4F 2D 42 59 54 45 2C 80 C1 44 52 45 53 53 45 20 |O-BYTE,..DRESSE |
00000450: 41 4E 47 45 4C 45 47 54 20 57 49 52 44 2C 20 41 |ANGELEGT WIRD, A|
00000460: 55 46 20 44 49 45 20 44 45 52 80 45 49 4E 45 4E |UF DIE DER.EINEN|
00000470: 20 C4 45 5A 49 4D 41 4C 53 54 52 49 4E 47 2C 20 | .EZIMALSTRING, |
00000480: 44 45 52 20 41 4E 20 44 45 52 80 57 49 52 44 20 |DER AN DER.WIRD |
00000490: 28 58 3D CC 4F 57 2D C2 59 54 45 2C 20 59 3D C8 |(X=.OW-.YTE, Y=.|
000004A0: 49 47 48 2D C2 59 54 45 29 20 49 4E 80 44 41 53 |IGH-.YTE) IN.DAS|
000004B0: 20 49 4D 20 58 2D 20 55 4E 44 20 59 2D D2 45 47 | IM X- UND Y-.EG|
000004C0: 49 53 54 45 52 20 55 45 42 45 52 47 45 42 45 4E |ISTER UEBERGEBEN|
000004D0: 80 31 36 2D C2 49 54 2D DA 41 48 4C 20 49 4D 20 |.16-.IT-.AHL IM |
000004E0: C2 45 52 45 49 43 48 20 56 4F 4E 20 30 20 42 49 |.EREICH VON 0 BI|
000004F0: 53 20 36 35 35 33 35 29 80 27 31 36 2D 42 49 54 |S 65535).'16-BIT|
00000500: 20 55 4E 53 49 47 4E 45 44 20 57 4F 52 44 27 20 | UNSIGNED WORD' |
00000510: 28 56 4F 52 5A 45 49 43 48 45 4E 4C 4F 53 45 80 |(VORZEICHENLOSE.|
00000520: C4 49 45 53 45 20 C6 55 4E 4B 54 49 4F 4E 20 57 |.IESE .UNKTION W|
00000530: 41 4E 44 45 4C 54 20 45 49 4E 80 2D 2D 2D 2D 2D |ANDELT EIN.-----|
00000540: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000550: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000560: 2D 2D 06 29 00 10 FF 54 55 52 42 4F 04 28 1B 27 |--.)...TURBO.(.'|
00000570: 28 24 22 20 23 27 0E 25 09 00 28 28 D2 83 00 8F |($" #'.%..((....|
00000580: 94 C5 81 83 00 90 94 84 83 00 D6 8B 00 94 92 C5 |................|
00000590: 83 83 83 83 C5 81 83 00 D6 8C 83 83 83 83 00 D6 |................|
000005A0: 96 0B 00 94 96 11 13 14 0F 00 8D 00 12 10 0C 0D |................|
000005B0: 0D 0D 0B 0F 0B 0D 0D 0D 0C 0F 0F 0F 00 05 05 60 |...............`|
000005C0: DF 56 E1 5C DE 5B FF 00 FF 00 FF 00 FF 00 FF 00 |.V.\.[..........|
000005D0: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 |................|
000005E0: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF EC |................|
000005F0: EC ED ED EE EE EF FF 00 FF 00 FF 00 FF 00 FF 00 |................|
00000600: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 |................|
00000610: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 44 |...............D|
00000620: 45 DA 44 4C B1 44 48 B1 44 45 4C D0 44 54 41 C2 |E.DL.DH.DEL.DTA.|
00000630: 44 4E B0 44 4E B1 44 52 B0 44 52 B1 44 4E B4 43 |DN.DN.DR.DR.DN.C|
00000640: B1 4F 43 B3 44 43 B1 4D 41 58 4C 49 4E C5 46 49 |.OC.DC.MAXLIN.FI|
00000650: 42 D5 50 4C B8 44 49 52 CC 44 49 D2 53 4B 49 D0 |B.PL.DIR.DI.SKI.|
00000660: 50 4C B6 47 45 54 45 52 D2 50 4C B7 4E 4F 44 49 |PL.GETER.PL.NODI|
00000670: 53 C3 50 4C B9 50 4C B2 41 53 43 32 53 43 D2 50 |S.PL.PL.ASC2SC.P|
00000680: 4C B4 50 4C B0 48 45 D8 50 4C CC 45 4E C4 50 4C |L.PL.HE.PL.EN.PL|
00000690: B5 50 4C B3 4F 55 D4 4E B1 4B 49 45 42 D5 50 4C |.PL.OU.N.KIEB.PL|
000006A0: 31 B0 4E 4F 46 49 4C C5 4C 49 4E C5 41 52 C7 57 |1.NOFIL.LIN.AR.W|
000006B0: 49 4E 44 4F D7 4E 4E B0 4E 4E B1 4E 4E B4 4E 4E |INDO.NN.NN.NN.NN|
000006C0: B6 4E 4F B1 52 55 4E 54 45 D2 4E 4F 43 C8 4E 4F |.NO.RUNTE.NOC.NO|
000006D0: B2 52 41 55 C6 45 4E 44 44 49 D2 43 41 4C 43 50 |.RAU.ENDDI.CALCP|
000006E0: CF 4E B6 4E B5 4E 4F 43 CF 57 49 B1 4E 4F 57 C9 |.N.N.NOC.WI.NOW.|
000006F0: 4D 55 45 4C CC 57 49 B3 57 49 B2 57 49 B4 57 49 |MUEL.WI.WI.WI.WI|
00000700: B5 47 45 B0 47 45 C5 4C 45 CE 44 45 DA 44 54 41 |.GE.GE.LE.DE.DTA|
00000710: C2 44 53 54 D2 44 4E B1 44 4E B2 44 4E B3 D3 44 |.DST.DN.DN.DN..D|
00000720: 4E B4 44 4E B0 44 48 B1 44 58 B1 44 52 B1 44 52 |N.DN.DH.DX.DR.DR|
00000730: B2 58 D8 42 4C C1 41 C1 D8 44 45 CC 44 45 4C D0 |.X.BL.A..DE.DEL.|
00000740: 44 52 B0 44 4C B1 41 44 47 45 D4 4E 4F 43 48 D2 |DR.DL.ADGE.NOCH.|
00000750: 47 53 B1 47 53 B0 47 53 B2 4E 4F 43 48 52 B2 56 |GS.GS.GS.NOCHR.V|
00000760: 50 4F 53 B2 43 41 4C 43 47 45 C4 57 45 48 C3 57 |POS.CALCGE.WEH.W|
00000770: 45 43 C8 47 53 B3 4E 45 D7 4E 45 57 44 53 C3 4E |EC.GS.NE.NEWDS.N|
00000780: 4E B1 45 52 52 43 48 4E CC 45 52 52 B1 43 52 52 |N.ERRCHN.ERR.CRR|
00000790: B1 55 4E 54 41 4C CB 45 52 52 B2 5A 41 48 4C B2 |.UNTAL.ERR.ZAHL.|
000007A0: 41 41 B1 5A 41 48 4C B1 5A 41 48 4C 54 41 C2 41 |AA.ZAHL.ZAHLTA.A|
000007B0: 41 B2 41 41 B3 41 42 B2 41 42 B3 41 42 B4 41 41 |A.AA.AB.AB.AB.AA|
000007C0: B4 41 43 B1 41 43 B3 41 43 B2 5A 4D 55 45 4C CC |.AC.AC.AC.ZMUEL.|
000007D0: 41 44 B1 5A 41 48 4C B3 41 41 B0 44 49 56 C9 53 |AD.ZAHL.AA.DIV.S|
000007E0: 54 D3 53 54 41 D3 4E 4E B2 43 4F 55 4E 35 B6 45 |T.STA.NN.COUN5.E|
000007F0: 52 C7 44 49 D6 46 52 41 4D C5 53 43 52 50 4F D3 |R.DI.FRAM.SCRPO.|
00000800: 4F 43 B2 4F 43 B1 52 4F 4D 4F 55 D4 52 4F 4D 49 |OC.OC.ROMOU.ROMI|
00000810: CE 4E 4E B3 4E 4E B4 41 52 47 B2 4E 4E B0 41 52 |.NN.NN.ARG.NN.AR|
......R.R.<.......R......}..............
SSSSSSSSSSSSDEZ L .........
............WORD ._3S
..BYTE ._. ......
........................ ROL DL1
;NAECHSTES BIT ................
..............@.0..*.0..*..*.*.*.*.*..2^
0.*.*.*.*.*..2^1.*.*.*.*.*..2^2.*.*.*.*.
*...*.*.*.*.*....*.*.*.*.*....*.*.*.*.*.
...*.*.*.*.*..*.*.*.*.*..2^8.*.*.*.*.*..
*.*.*.*.*....*.*.*.*.*....*.*.*.*.*....*
.*.*.*.*...*.*.*.*.*..2^140..*.*.*.*.*..
2^15`.RUECKSPRUNG... WENN NICHT:.IM WORD
GESETZT IST.HAUPT NOCH EIN BIT.PRUEFT O
B UEBER-P8..KNUEPFUNG WIRD GE-.8..DURCH
DIESE VER-.GESHIFTET..8..EIN BIT NACH LI
NKS0..8..DAS WORD WIRD UM.(..8..(.I*...H
OCHSETZEN0..(..TABELLEN-POINTER.8..0..(.
.*..8.I(:Q(.0..(...WERT AUS TABELLE *..W
ENN JA, ADDIERE.8..SETZT ?0..8..OBERSTES
BIT GE-.(..D8..(..TABELLE IN ($FE).E8..
POINTER AUF.8..0..(..(0."00000" LOESCHEN
*..BEREICH MIT.8.0..8..WORD PUFFERN.---
------------------------------------.
(W) 1992 BENJAMIN BOMMER.GER
UFEN..DIE FUNKTION WIRD MIT "JSR DEZ" AU
F-.$FD=HI-BYTE)..POINTER ($FC/$FD) WEISS
T ($FC=LO-BYTE,.ADRESSE ANGELEGT WIRD, A
UF DIE DER.EINEN DEZIMALSTRING, DER AN D
ER.WIRD (X=LOW-BYTE, Y=HIGH-BYTE) IN.DAS
IM X- UND Y-REGISTER UEBERGEBEN.16-BIT-
ZAHL IM BEREICH VON 0 BIS 65535).'16-BIT
UNSIGNED WORD' (VORZEICHENLOSE.DIESE FU
NKTION WANDELT EIN.---------------------
------------------.)...TURBO.(.'($" #'.%
..((R....E........V....E....E...V......V
...............................`.V.\.[..
........................................
........................................
.......DEZDL.DH.DELPDTABDN.DN.DR.DR.DN.C
.OC.DC.MAXLINEFIBUPL.DIRLDIRSKIPPL.GETER
RPL.NODISCPL.PL.ASC2SCRPL.PL.HEXPLLENDPL
.PL.OUTN.KIEBUPL1.NOFILELINEARGWINDOWNN.
NN.NN.NN.NO.RUNTERNOCHNO.RAUFENDDIRCALCP
ON.N.NOCOWI.NOWIMUELLWI.WI.WI.WI.GE.GEEL
ENDEZDTABDSTRDN.DN.DN.SDN.DN.DH.DX.DR.DR
.XXBLAAAXDELDELPDR.DL.ADGETNOCHRGS.GS.GS
.NOCHR.VPOS.CALCGEDWEHCWECHGS.NEWNEWDSCN
N.ERRCHNLERR.CRR.UNTALKERR.ZAHL.AA.ZAHL.
ZAHLTABAA.AA.AB.AB.AB.AA.AC.AC.AC.ZMUELL
AD.ZAHL.AA.DIVISTSSTASNN.COUN5.ERGDIVFRA
MESCRPOSOC.OC.ROMOUTROMINNN.NN.ARG.NN.AR
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL