File #4dbfd6a7
FILE INFORMATION
FILENAME(S): File #4dbfd6a7
FILE TYPE(S): SEQ
FILE SIZE: 4.7K
FIRST SEEN: 2025-11-30 21:12:56
APPEARS ON: 1 disk(s)
FILE HASH
4dbfd6a7d367eeaebc51942fd2e3c5f65f2c4c73d3fcf379cbd373e7b59abaf7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 15722 SEITE A | ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓ | SEQ | DuncanTwain | 1 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 20 5A 55 4D 20 4E 41 45 43 48 53 54 45 4E 20 56 | ZUM NAECHSTEN V|
00000010: 45 52 47 4C 45 49 43 48 00 49 7A 2C 0B 20 94 59 |ERGLEICH.Iz,. .Y|
00000020: 41 44 52 2B 31 00 56 7A 36 0B 20 B5 56 45 52 47 |ADR+1.Vz6. .VERG|
00000030: 4C 59 00 5C 7A 40 0B 3B 00 76 7A 4A 0B 3B 2D 20 |LY.\z@.;.vzJ.;- |
00000040: 53 50 52 55 4E 47 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |SPRUNG ---------|
00000050: 2D 2D 00 8B 7A 54 0B 42 52 55 45 43 4B 45 32 20 |--..zT.BRUECKE2 |
00000060: B6 56 45 52 47 4C 58 00 A2 7A 5E 0B 42 52 55 45 |.VERGLX..z^.BRUE|
00000070: 43 4B 45 33 20 B5 42 52 55 45 43 4B 45 31 00 B9 |CKE3 .BRUECKE1..|
00000080: 7A 68 0B 42 52 55 45 43 4B 45 36 20 B7 42 52 55 |zh.BRUECKE6 .BRU|
00000090: 45 43 4B 45 35 00 BF 7A 72 0B 3B 00 F0 7A 7C 0B |ECKE5..zr.;..z|.|
000000A0: 3B 2D 2D 2D 20 54 45 49 4C 20 36 3A 20 53 54 52 |;--- TEIL 6: STR|
000000B0: 49 4E 47 53 20 56 45 52 54 41 55 53 43 48 45 4E |INGS VERTAUSCHEN|
000000C0: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 F6 7A 86 | -----------..z.|
000000D0: 0B 3B 00 10 7B 90 0B 3B 2D 50 52 55 45 46 45 4E |.;..{..;-PRUEFEN|
000000E0: 20 4F 42 20 58 20 3E 3D 20 59 20 2D 00 16 7B 9A | OB X >= Y -..{.|
000000F0: 0B 3B 00 39 7B A4 0B 54 41 55 53 43 48 20 81 59 |.;.9{..TAUSCH .Y|
00000100: 41 44 52 2B 31 3B 4D 53 42 20 56 45 52 47 4C 45 |ADR+1;MSB VERGLE|
00000110: 49 43 48 45 4E 00 46 7B AE 0B 20 85 58 41 44 52 |ICHEN.F{.. .XADR|
00000120: 2B 31 00 6A 7B B8 0B 20 B5 42 52 55 45 43 4B 45 |+1.j{.. .BRUECKE|
00000130: 38 3B 57 45 4E 4E 20 58 3E 59 20 44 41 4E 4E 20 |8;WENN X>Y DANN |
00000140: 53 50 52 55 4E 47 00 8F 7B C2 0B 20 B7 53 57 41 |SPRUNG..{.. .SWA|
00000150: 50 3B 57 45 4E 4E 20 58 3C 59 20 44 41 4E 4E 20 |P;WENN X<Y DANN |
00000160: 56 45 52 54 41 55 53 43 48 45 4E 00 AA 7B CC 0B |VERTAUSCHEN..{..|
00000170: 20 81 58 41 44 52 3B 4C 53 42 20 56 45 52 47 4C | .XADR;LSB VERGL|
00000180: 45 49 43 48 45 4E 00 B5 7B D6 0B 20 85 59 41 44 |EICHEN..{.. .YAD|
00000190: 52 00 DC 7B E0 0B 20 B6 42 52 55 45 43 4B 45 39 |R..{.. .BRUECKE9|
000001A0: 3B 57 45 4E 4E 20 58 20 3E 3D 20 59 20 44 41 4E |;WENN X >= Y DAN|
000001B0: 4E 20 53 50 52 55 4E 47 00 E2 7B EA 0B 3B 00 18 |N SPRUNG..{..;..|
000001C0: 7C F4 0B 3B 2D 20 56 45 52 54 41 55 53 43 48 45 ||..;- VERTAUSCHE|
000001D0: 4E 20 44 45 52 20 53 54 52 49 4E 47 2D 20 55 4E |N DER STRING- UN|
000001E0: 44 20 43 4F 44 45 44 45 53 43 52 49 50 54 4F 52 |D CODEDESCRIPTOR|
000001F0: 45 4E 20 2D 00 35 7C FE 0B 3B 2D 20 53 54 52 49 |EN -.5|..;- STRI|
00000200: 4E 47 44 45 53 43 52 49 50 54 4F 52 45 4E 3A 20 |NGDESCRIPTOREN: |
00000210: 2D 00 44 7C 08 0C 53 57 41 50 20 83 23 24 30 32 |-.D|..SWAP .#$02|
00000220: 00 4F 7C 12 0C 20 84 23 24 30 32 00 6E 7C 1C 0C |.O|.. .#$02.n|..|
00000230: 53 57 41 50 31 20 81 58 44 45 53 2C 58 3B 58 2D |SWAP1 .XDES,X;X-|
00000240: 44 45 53 43 52 49 50 54 4F 52 00 88 7C 26 0C 20 |DESCRIPTOR..|&. |
00000250: 82 28 59 41 44 52 29 2C 59 3B 4E 41 43 48 20 C1 |.(YADR),Y;NACH .|
00000260: 24 28 D9 29 00 A2 7C 30 0C 20 81 59 44 45 53 2C |$(.)..|0. .YDES,|
00000270: 58 3B 59 2D 44 45 53 43 52 49 50 54 4F 52 00 BC |X;Y-DESCRIPTOR..|
00000280: 7C 3A 0C 20 82 28 58 41 44 52 29 2C 59 3B 4E 41 ||:. .(XADR),Y;NA|
00000290: 43 48 20 C1 24 28 D8 29 00 C3 7C 44 0C 20 AF 00 |CH .$(.)..|D. ..|
000002A0: CA 7C 4E 0C 20 A3 00 D6 7C 58 0C 20 B1 53 57 41 |.|N. ...|X. .SWA|
000002B0: 50 31 00 DC 7C 62 0C 3B 00 F7 7C 6C 0C 3B 2D 20 |P1..|b.;..|l.;- |
000002C0: 43 4F 44 45 44 45 53 43 52 49 50 54 4F 52 45 4E |CODEDESCRIPTOREN|
000002D0: 3A 20 2D 00 FD 7C 76 0C 3B 00 2C 7D 80 0C 20 A6 |: -..|v.;.,}.. .|
000002E0: 3B 42 45 52 45 43 48 4E 45 4E 20 44 45 52 20 4F |;BERECHNEN DER O|
000002F0: 52 54 45 20 44 45 52 20 43 4F 44 45 44 45 53 43 |RTE DER CODEDESC|
00000300: 52 49 50 54 4F 52 45 4E 00 46 7D 8A 0C 20 81 58 |RIPTOREN.F}.. .X|
00000310: 44 45 53 2B 31 3B 4C 53 42 20 58 2D 53 54 52 49 |DES+1;LSB X-STRI|
00000320: 4E 47 00 63 7D 94 0C 20 86 58 44 45 53 3B 50 4C |NG.c}.. .XDES;PL|
00000330: 55 53 20 53 54 52 49 4E 47 4C 41 45 4E 47 45 00 |US STRINGLAENGE.|
00000340: 95 7D 9E 0C 20 82 5A 57 53 50 31 3B 45 52 47 49 |.}.. .ZWSP1;ERGI|
00000350: 42 54 20 4C 53 42 20 44 45 53 20 4F 52 54 45 53 |BT LSB DES ORTES|
00000360: 20 43 4F 44 45 44 45 53 43 52 49 50 54 4F 52 20 | CODEDESCRIPTOR |
00000370: 58 00 AF 7D A8 0C 20 81 58 44 45 53 2B 32 3B 4D |X..}.. .XDES+2;M|
00000380: 53 42 20 58 2D 53 54 52 49 4E 47 00 D3 7D B2 0C |SB X-STRING..}..|
00000390: 20 86 23 24 30 30 3B 45 56 45 4E 54 55 45 4C 4C | .#$00;EVENTUELL|
000003A0: 20 43 41 52 52 59 20 41 44 44 49 45 52 45 4E 00 | CARRY ADDIEREN.|
000003B0: FA 7D BC 0C 20 82 5A 57 53 50 31 2B 31 3B 4D 53 |.}.. .ZWSP1+1;MS|
000003C0: 42 20 4F 52 54 20 43 4F 44 45 44 45 53 43 52 49 |B ORT CODEDESCRI|
000003D0: 50 54 4F 52 20 58 00 00 7E C6 0C 3B 00 22 7E D0 |PTOR X..~..;."~.|
000003E0: 0C 20 A6 3B 44 41 53 53 45 4C 42 45 20 46 55 45 |. .;DASSELBE FUE|
000003F0: 52 20 44 45 4E 20 59 2D 53 54 52 49 4E 47 00 33 |R DEN Y-STRING.3|
00000400: 7E DA 0C 20 81 59 44 45 53 2B 31 3B 4C 53 42 00 |~.. .YDES+1;LSB.|
00000410: 4D 7E E4 0C 20 86 59 44 45 53 3B 2B 20 53 54 52 |M~.. .YDES;+ STR|
00000420: 49 4E 47 4C 41 45 4E 47 45 00 79 7E EE 0C 20 82 |INGLAENGE.y~.. .|
00000430: 5A 57 53 50 32 3B 4C 53 42 20 5A 45 49 47 45 52 |ZWSP2;LSB ZEIGER|
00000440: 20 41 55 46 20 43 4F 44 45 44 45 53 43 52 49 50 | AUF CODEDESCRIP|
00000450: 54 4F 52 20 59 00 8A 7E F8 0C 20 81 59 44 45 53 |TOR Y..~.. .YDES|
00000460: 2B 32 3B 4D 53 42 00 95 7E 02 0D 20 86 23 24 30 |+2;MSB..~.. .#$0|
00000470: 30 00 B3 7E 0C 0D 20 82 5A 57 53 50 32 2B 31 3B |0..~.. .ZWSP2+1;|
00000480: 4D 53 42 20 44 45 53 20 5A 45 49 47 45 52 53 00 |MSB DES ZEIGERS.|
00000490: B9 7E 16 0D 3B 00 DB 7E 20 0D 20 84 23 24 30 31 |.~..;..~ . .#$01|
000004A0: 3B 5A 41 45 48 4C 45 52 20 49 4E 49 54 49 41 4C |;ZAEHLER INITIAL|
000004B0: 49 53 49 45 52 45 4E 00 07 7F 2A 0D 53 57 41 50 |ISIEREN...*.SWAP|
000004C0: 32 20 81 28 5A 57 53 50 31 29 2C 59 3B 43 4F 44 |2 .(ZWSP1),Y;COD|
000004D0: 45 44 45 53 43 52 49 50 54 4F 52 20 58 20 4C 41 |EDESCRIPTOR X LA|
000004E0: 44 45 4E 00 25 7F 34 0D 20 82 5A 57 53 50 3B 55 |DEN.%.4. .ZWSP;U|
000004F0: 4E 44 20 42 45 49 53 45 49 54 45 20 4C 45 47 45 |ND BEISEITE LEGE|
00000500: 4E 00 4C 7F 3E 0D 20 81 28 5A 57 53 50 32 29 2C |N.L.>. .(ZWSP2),|
00000510: 59 3B 43 4F 44 45 44 45 53 43 52 49 50 54 4F 52 |Y;CODEDESCRIPTOR|
00000520: 20 59 20 4C 41 44 45 4E 00 70 7F 48 0D 20 82 28 | Y LADEN.p.H. .(|
00000530: 5A 57 53 50 31 29 2C 59 3B 55 4E 44 20 4E 41 43 |ZWSP1),Y;UND NAC|
00000540: 48 20 58 20 53 43 48 49 45 42 45 4E 00 90 7F 52 |H X SCHIEBEN...R|
00000550: 0D 20 81 5A 57 53 50 3B 58 20 57 49 45 44 45 52 |. .ZWSP;X WIEDER|
00000560: 20 48 45 52 56 4F 52 48 4F 4C 45 4E 00 B4 7F 5C | HERVORHOLEN...\|
00000570: 0D 20 82 28 5A 57 53 50 32 29 2C 59 3B 55 4E 44 |. .(ZWSP2),Y;UND|
00000580: 20 4E 41 43 48 20 59 20 53 43 48 49 45 42 45 4E | NACH Y SCHIEBEN|
00000590: 00 CB 7F 66 0D 20 A3 3B 48 45 52 55 4E 54 45 52 |...f. .;HERUNTER|
000005A0: 5A 41 45 48 4C 45 4E 00 F2 7F 70 0D 20 B8 53 57 |ZAEHLEN...p. .SW|
000005B0: 41 50 32 3B 42 49 53 20 55 4E 54 45 52 4C 41 55 |AP2;BIS UNTERLAU|
000005C0: 46 20 44 45 53 20 5A 41 45 48 4C 45 52 53 00 F8 |F DES ZAEHLERS..|
000005D0: 7F 7A 0D 3B 00 20 80 84 0D 3B 2D 20 4E 41 45 43 |.z.;. ...;- NAEC|
000005E0: 48 53 54 45 20 44 45 53 43 52 49 50 54 4F 52 41 |HSTE DESCRIPTORA|
000005F0: 44 52 45 53 53 45 20 58 3D 58 2B 31 00 26 80 8E |DRESSE X=X+1.&..|
00000600: 0D 3B 00 43 80 98 0D 20 A6 3B 5A 55 52 20 41 4B |.;.C... .;ZUR AK|
00000610: 54 55 45 4C 4C 45 4E 20 41 44 52 45 53 53 45 00 |TUELLEN ADRESSE.|
00000620: 5B 80 A2 0D 20 81 58 41 44 52 3B 44 45 53 20 58 |[... .XADR;DES X|
00000630: 2D 53 54 52 49 4E 47 00 7B 80 AC 0D 20 86 23 24 |-STRING.{... .#$|
00000640: 30 33 3B 33 20 42 59 54 45 20 41 44 44 49 45 52 |03;3 BYTE ADDIER|
00000650: 45 4E 20 46 55 45 52 00 9F 80 B6 0D 20 82 58 41 |EN FUER..... .XA|
00000660: 44 52 3B 4E 45 55 45 20 44 45 53 43 52 49 50 54 |DR;NEUE DESCRIPT|
00000670: 4F 52 41 44 52 45 53 53 45 20 58 00 AA 80 C0 0D |ORADRESSE X.....|
00000680: 20 B5 53 50 52 34 00 B7 80 CA 0D 20 8A 58 41 44 | .SPR4..... .XAD|
00000690: 52 2B 31 00 BD 80 D4 0D 3B 00 E4 80 DE 0D 3B 2D |R+1.....;.....;-|
000006A0: 4E 41 45 43 48 53 54 45 20 44 45 53 43 52 49 50 |NAECHSTE DESCRIP|
000006B0: 54 4F 52 41 44 52 45 53 53 45 20 59 3D 59 2D 31 |TORADRESSE Y=Y-1|
000006C0: 00 EA 80 E8 0D 3B 00 0F 81 F2 0D 53 50 52 34 20 |.....;.....SPR4 |
000006D0: A7 3B 56 4F 4E 20 44 45 52 20 41 4B 54 55 45 4C |.;VON DER AKTUEL|
000006E0: 4C 45 4E 20 41 44 52 45 53 53 45 00 27 81 FC 0D |LEN ADRESSE.'...|
000006F0: 20 81 59 41 44 52 3B 44 45 53 20 59 2D 53 54 52 | .YADR;DES Y-STR|
00000700: 49 4E 47 00 4B 81 06 0E 20 92 23 24 30 33 3B 33 |ING.K... .#$03;3|
00000710: 20 42 59 54 45 20 53 55 42 54 52 41 48 49 45 52 | BYTE SUBTRAHIER|
00000720: 45 4E 20 46 55 45 52 00 6F 81 10 0E 20 82 59 41 |EN FUER.o... .YA|
00000730: 44 52 3B 4E 45 55 45 20 44 45 53 43 52 49 50 54 |DR;NEUE DESCRIPT|
00000740: 4F 52 41 44 52 45 53 53 45 20 59 00 7A 81 1A 0E |ORADRESSE Y.z...|
00000750: 20 B6 53 50 52 35 00 87 81 24 0E 20 94 59 41 44 | .SPR5...$. .YAD|
00000760: 52 2B 31 00 8D 81 2E 0E 3B 00 A2 81 38 0E 3B 2D |R+1.....;...8.;-|
00000770: 46 41 4C 4C 53 20 58 20 3C 3D 20 59 20 2D 00 A8 |FALLS X <= Y -..|
00000780: 81 42 0E 3B 00 DD 81 4C 0E 53 50 52 35 20 81 59 |.B.;...L.SPR5 .Y|
00000790: 41 44 52 2B 31 3B 4D 53 42 20 59 2D 44 45 53 43 |ADR+1;MSB Y-DESC|
000007A0: 52 49 50 54 4F 52 41 44 52 45 53 53 45 20 56 45 |RIPTORADRESSE VE|
000007B0: 52 47 4C 45 49 43 48 45 4E 00 06 82 56 0E 20 85 |RGLEICHEN...V. .|
000007C0: 58 41 44 52 2B 31 3B 4D 49 54 20 4D 53 42 20 58 |XADR+1;MIT MSB X|
000007D0: 2D 44 45 53 43 52 49 50 54 4F 52 41 44 52 45 53 |-DESCRIPTORADRES|
000007E0: 53 45 00 2B 82 60 0E 20 B5 5A 53 54 55 46 45 4E |SE.+.`. .ZSTUFEN|
000007F0: 3B 57 45 4E 4E 20 58 20 3E 20 59 20 44 41 4E 4E |;WENN X > Y DANN|
00000800: 20 53 50 52 55 4E 47 00 51 82 6A 0E 20 B7 42 52 | SPRUNG.Q.j. .BR|
00000810: 55 45 43 4B 45 32 3B 57 45 4E 4E 20 58 20 3C 20 |UECKE2;WENN X < |
00000820: 59 20 44 41 4E 4E 20 53 50 52 55 4E 47 00 80 82 |Y DANN SPRUNG...|
00000830: 74 0E 20 81 59 41 44 52 3B 4C 53 42 20 59 2D 44 |t. .YADR;LSB Y-D|
00000840: 45 53 43 52 49 50 54 4F 52 41 44 52 45 53 53 45 |ESCRIPTORADRESSE|
00000850: 20 56 45 52 47 4C 45 49 43 48 45 4E 00 A7 82 7E | VERGLEICHEN...~|
00000860: 0E 20 85 58 41 44 52 3B 4D 49 54 20 4C 53 42 20 |. .XADR;MIT LSB |
00000870: 58 2D 44 45 53 43 52 49 50 54 4F 52 41 44 52 45 |X-DESCRIPTORADRE|
00000880: 53 53 45 00 CD 82 88 0E 20 B6 42 52 55 45 43 4B |SSE..... .BRUECK|
00000890: 45 32 3B 57 45 4E 4E 20 58 20 3C 20 59 20 44 41 |E2;WENN X < Y DA|
000008A0: 4E 4E 20 53 50 52 55 4E 47 00 ED 82 92 0E 20 B5 |NN SPRUNG..... .|
000008B0: 5A 53 54 55 46 45 4E 3B 48 49 45 52 20 49 4D 4D |ZSTUFEN;HIER IMM|
000008C0: 45 52 20 53 50 52 55 4E 47 00 F3 82 9C 0E 3B 00 |ER SPRUNG.....;.|
000008D0: 0E 83 A6 0E 3B 2D 20 53 50 52 55 4E 47 20 2D 2D |....;- SPRUNG --|
000008E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 26 83 B0 0E 42 |----------.&...B|
000008F0: 52 55 45 43 4B 45 31 30 20 B5 42 52 55 45 43 4B |RUECKE10 .BRUECK|
00000900: 45 33 00 3D 83 BA 0E 42 52 55 45 43 4B 45 37 20 |E3.=...BRUECKE7 |
00000910: B7 42 52 55 45 43 4B 45 36 00 53 83 C4 0E 42 52 |.BRUECKE6.S...BR|
00000920: 55 45 43 4B 45 38 20 B5 5A 53 54 55 46 45 4E 00 |UECKE8 .ZSTUFEN.|
00000930: 69 83 CE 0E 42 52 55 45 43 4B 45 39 20 B6 5A 53 |i...BRUECKE9 .ZS|
00000940: 54 55 46 45 4E 00 6F 83 D8 0E 3B 00 AD 83 E2 0E |TUFEN.o...;.....|
00000950: 3B 2D 2D 2D 20 54 45 49 4C 20 37 3A 20 4E 41 45 |;--- TEIL 7: NAE|
00000960: 43 48 53 54 45 20 53 43 48 41 43 48 54 45 4C 55 |CHSTE SCHACHTELU|
00000970: 4E 47 53 54 49 45 46 45 20 45 52 4D 49 54 54 45 |NGSTIEFE ERMITTE|
00000980: 4C 4E 20 2D 2D 2D 2D 2D 2D 00 B3 83 EC 0E 3B 00 |LN ------.....;.|
00000990: C7 83 F6 0E 3B 2D 20 5A 3D 5A 2B 31 2C 52 47 3D |....;- Z=Z+1,RG=|
000009A0: 59 20 2D 00 EB 83 00 0F 5A 50 4C 55 53 20 81 52 |Y -.....ZPLUS .R|
000009B0: 47 3B 52 45 43 48 54 45 20 47 52 45 4E 5A 45 20 |G;RECHTE GRENZE |
000009C0: 41 55 46 20 44 45 4E 00 03 84 0A 0F 20 A0 3B 53 |AUF DEN..... .;S|
000009D0: 54 41 50 45 4C 20 53 43 48 49 45 42 45 4E 3A 00 |TAPEL SCHIEBEN:.|
000009E0: 1D 84 14 0F 20 81 52 47 2B 31 3B 42 45 44 45 55 |.... .RG+1;BEDEU|
000009F0: 54 45 54 20 5A 3D 5A 2B 31 00 24 84 1E 0F 20 A0 |TET Z=Z+1.$... .|
00000A00: 00 42 84 28 0F 20 81 59 41 44 52 3B 4E 45 55 45 |.B.(. .YADR;NEUE|
00000A10: 20 52 45 43 48 54 45 20 47 52 45 4E 5A 45 00 67 | RECHTE GRENZE.g|
00000A20: 84 32 0F 20 82 52 47 3B 49 53 54 20 44 45 53 43 |.2. .RG;IST DESC|
00000A30: 52 49 50 54 4F 52 41 44 52 45 53 53 45 20 56 4F |RIPTORADRESSE VO|
00000A40: 4E 20 59 00 74 84 3C 0F 20 81 59 41 44 52 2B 31 |N Y.t.<. .YADR+1|
00000A50: 00 7F 84 46 0F 20 82 52 47 2B 31 00 A0 84 50 0F |...F. .RG+1...P.|
00000A60: 20 A6 3B 48 49 45 52 20 45 52 46 4F 4C 47 54 20 | .;HIER ERFOLGT |
00000A70: 49 4D 4D 45 52 20 53 50 52 55 4E 47 00 D6 84 5A |IMMER SPRUNG...Z|
00000A80: 0F 20 B5 42 52 55 45 43 4B 45 31 30 3B 4E 41 43 |. .BRUECKE10;NAC|
00000A90: 48 20 56 53 54 52 49 4E 47 20 28 4E 45 55 45 52 |H VSTRING (NEUER|
00000AA0: 20 56 45 52 47 4C 45 49 43 48 53 53 54 52 49 4E | VERGLEICHSSTRIN|
00000AB0: 47 29 00 DC 84 64 0F 3B 00 EF 84 6E 0F 3B 2D 20 |G)...d.;...n.;- |
00000AC0: 4C 47 20 3D 20 4C 47 2B 31 20 2D 00 17 85 78 0F |LG = LG+1 -...x.|
00000AD0: 5A 47 4C 45 49 43 48 20 A6 3B 5A 55 52 20 4C 49 |ZGLEICH .;ZUR LI|
00000AE0: 4E 4B 45 4E 20 47 52 45 4E 5A 45 20 33 20 42 59 |NKEN GRENZE 3 BY|
00000AF0: 54 45 53 00 32 85 82 0F 20 81 4C 47 3B 41 44 44 |TES.2... .LG;ADD|
00000B00: 49 45 52 45 4E 20 46 55 45 52 20 44 45 4E 00 52 |IEREN FUER DEN.R|
00000B10: 85 8C 0F 20 86 23 24 30 33 3B 4E 41 45 43 48 53 |... .#$03;NAECHS|
00000B20: 54 45 4E 20 44 45 53 43 52 49 50 54 4F 52 00 5B |TEN DESCRIPTOR.[|
00000B30: 85 96 0F 20 82 4C 47 00 66 85 A0 0F 20 B5 53 50 |... .LG.f... .SP|
00000B40: 52 36 00 6D 85 AA 0F 20 9E 00 7C 85 B4 0F 53 50 |R6.m... ..|...SP|
00000B50: 52 36 20 89 4C 47 2B 31 00 A9 85 BE 0F 20 93 52 |R6 .LG+1..... .R|
00000B60: 47 2B 31 3B 4D 53 42 20 44 45 52 20 47 52 45 4E |G+1;MSB DER GREN|
00000B70: 5A 41 44 52 45 53 53 45 4E 20 56 45 52 47 4C 45 |ZADRESSEN VERGLE|
00000B80: 49 43 48 45 4E 00 DA 85 C8 0F 20 B5 42 52 55 45 |ICHEN..... .BRUE|
00000B90: 43 4B 45 31 30 3B 57 45 4E 4E 20 52 47 20 3E 20 |CKE10;WENN RG > |
00000BA0: 4C 47 20 53 50 52 55 4E 47 20 4E 41 43 48 20 56 |LG SPRUNG NACH V|
00000BB0: 53 54 52 49 4E 47 00 07 86 D2 0F 20 B7 5A 4D 49 |STRING..... .ZMI|
00000BC0: 4E 55 53 3B 57 45 4E 4E 20 52 47 20 3C 20 4C 47 |NUS;WENN RG < LG|
00000BD0: 20 53 50 52 55 4E 47 20 4E 41 43 48 20 5A 4D 49 | SPRUNG NACH ZMI|
00000BE0: 4E 55 53 00 2E 86 DC 0F 20 85 52 47 3B 4C 53 42 |NUS..... .RG;LSB|
00000BF0: 20 47 52 45 4E 5A 41 44 52 45 53 53 45 4E 20 56 | GRENZADRESSEN V|
00000C00: 45 52 47 4C 45 49 43 48 45 4E 00 5F 86 E6 0F 20 |ERGLEICHEN._... |
00000C10: B5 42 52 55 45 43 4B 45 31 30 3B 57 45 4E 4E 20 |.BRUECKE10;WENN |
00000C20: 52 47 20 3E 20 4C 47 20 53 50 52 55 4E 47 20 4E |RG > LG SPRUNG N|
00000C30: 41 43 48 20 56 53 54 52 49 4E 47 00 85 86 F0 0F |ACH VSTRING.....|
00000C40: 20 B6 5A 4D 49 4E 55 53 3B 53 4F 4E 53 54 20 53 | .ZMINUS;SONST S|
00000C50: 50 52 55 4E 47 20 4E 41 43 48 20 5A 4D 49 4E 55 |PRUNG NACH ZMINU|
00000C60: 53 00 8B 86 FA 0F 3B 00 B6 86 04 10 5A 53 54 55 |S.....;.....ZSTU|
00000C70: 46 45 4E 20 81 4C 47 3B 56 45 52 47 4C 45 49 43 |FEN .LG;VERGLEIC|
00000C80: 48 20 4C 49 4E 4B 45 20 47 52 45 4E 5A 45 20 4D |H LINKE GRENZE M|
00000C90: 49 54 00 D5 86 0E 10 20 84 4C 47 2B 31 3B 59 2D |IT..... .LG+1;Y-|
00000CA0: 44 45 53 43 52 49 50 54 4F 52 41 44 52 45 53 53 |DESCRIPTORADRESS|
00000CB0: 45 00 F0 86 18 10 20 93 59 41 44 52 2B 31 3B 4D |E..... .YADR+1;M|
00000CC0: 53 42 2D 56 45 52 47 4C 45 49 43 48 00 17 87 22 |SB-VERGLEICH..."|
00000CD0: 10 20 B5 53 54 41 43 4B 3B 57 45 4E 4E 20 59 41 |. .STACK;WENN YA|
00000CE0: 44 52 20 3E 20 4C 47 20 44 41 4E 4E 20 53 50 52 |DR > LG DANN SPR|
00000CF0: 55 4E 47 00 40 87 2C 10 20 B7 5A 47 4C 45 49 43 |UNG.@.,. .ZGLEIC|
00000D00: 48 3B 57 45 4E 4E 20 59 41 44 52 20 3C 20 4C 47 |H;WENN YADR < LG|
00000D10: 20 44 41 4E 4E 20 53 50 52 55 4E 47 00 5F 87 36 | DANN SPRUNG._.6|
00000D20: 10 20 85 59 41 44 52 3B 53 4F 4E 53 54 20 4C 53 |. .YADR;SONST LS|
00000D30: 42 2D 56 45 52 47 4C 45 49 43 48 00 86 87 40 10 |B-VERGLEICH...@.|
00000D40: 20 B5 53 54 41 43 4B 3B 57 45 4E 4E 20 59 41 44 | .STACK;WENN YAD|
00000D50: 52 20 3E 20 4C 47 20 44 41 4E 4E 20 53 50 52 55 |R > LG DANN SPRU|
00000D60: 4E 47 00 AE 87 4A 10 20 B6 5A 47 4C 45 49 43 48 |NG...J. .ZGLEICH|
00000D70: 3B 53 4F 4E 53 54 20 53 50 52 55 4E 47 20 4E 41 |;SONST SPRUNG NA|
00000D80: 43 48 20 5A 47 4C 45 49 43 48 00 B4 87 54 10 3B |CH ZGLEICH...T.;|
00000D90: 00 CC 87 5E 10 3B 2D 20 53 54 41 50 45 4C 20 50 |...^.;- STAPEL P|
00000DA0: 52 55 45 46 45 4E 20 2D 00 FB 87 68 10 53 54 41 |RUEFEN -...h.STA|
00000DB0: 43 4B 20 9C 3B 41 4B 54 55 45 4C 4C 45 4E 20 53 |CK .;AKTUELLEN S|
00000DC0: 54 41 50 45 4C 5A 45 49 47 45 52 20 56 45 52 47 |TAPELZEIGER VERG|
00000DD0: 4C 45 49 43 48 45 4E 00 18 88 72 10 20 8B 53 54 |LEICHEN...r. .ST|
00000DE0: 4D 49 3B 4D 49 54 20 53 54 41 50 45 4C 4D 49 4E |MI;MIT STAPELMIN|
00000DF0: 49 4D 55 4D 00 45 88 7C 10 20 B6 5A 50 4C 55 53 |IMUM.E.|. .ZPLUS|
00000E00: 3B 57 45 4E 4E 20 53 54 4D 49 20 3C 3D 20 53 54 |;WENN STMI <= ST|
00000E10: 41 50 45 4C 5A 45 49 47 45 52 20 53 50 52 55 4E |APELZEIGER SPRUN|
00000E20: 47 00 64 88 86 10 20 88 53 54 4D 49 3B 4E 45 55 |G.d... .STMI;NEU|
00000E30: 45 53 20 53 54 41 50 45 4C 4D 49 4E 49 4D 55 4D |ES STAPELMINIMUM|
00000E40: 00 8F 88 90 10 20 8B 53 54 55 47 3B 56 45 52 47 |..... .STUG;VERG|
00000E50: 4C 45 49 43 48 20 4D 49 54 20 53 54 41 50 45 4C |LEICH MIT STAPEL|
00000E60: 55 4E 54 45 52 47 52 45 4E 5A 45 00 C1 88 9A 10 |UNTERGRENZE.....|
00000E70: 20 B6 5A 50 4C 55 53 3B 57 45 4E 4E 20 53 54 55 | .ZPLUS;WENN STU|
00000E80: 47 20 3C 3D 20 53 54 41 50 45 4C 5A 45 49 47 45 |G <= STAPELZEIGE|
00000E90: 52 20 44 41 4E 4E 20 53 50 52 55 4E 47 00 DE 88 |R DANN SPRUNG...|
00000EA0: A4 10 20 83 53 54 49 4E 3B 53 4F 4E 53 54 20 52 |.. .STIN;SONST R|
00000EB0: 55 45 43 4B 53 50 52 55 4E 47 00 E5 88 AE 10 20 |UECKSPRUNG..... |
00000EC0: 9D 00 06 89 B8 10 20 B7 42 52 55 45 43 4B 45 37 |...... .BRUECKE7|
00000ED0: 3B 5A 55 4D 20 41 4E 46 41 4E 47 20 28 53 4F 52 |;ZUM ANFANG (SOR|
00000EE0: 54 29 00 0C 89 C2 10 3B 00 1D 89 CC 10 3B 2D 20 |T).....;.....;- |
00000EF0: 5A 20 3D 20 5A 2D 31 20 2D 00 3F 89 D6 10 5A 4D |Z = Z-1 -.?...ZM|
00000F00: 49 4E 55 53 20 A1 3B 4C 45 54 5A 54 45 20 52 45 |INUS .;LETZTE RE|
00000F10: 43 48 54 45 20 47 52 45 4E 5A 45 00 5C 89 E0 10 |CHTE GRENZE.\...|
00000F20: 20 82 52 47 2B 31 3B 56 4F 4D 20 53 54 41 50 45 | .RG+1;VOM STAPE|
00000F30: 4C 20 48 4F 4C 45 4E 3A 00 6C 89 EA 10 20 A1 3B |L HOLEN:.l... .;|
00000F40: 42 45 44 45 55 54 45 54 00 7B 89 F4 10 20 82 52 |BEDEUTET.{... .R|
00000F50: 47 3B 5A 3D 5A 2D 31 00 92 89 FE 10 20 83 52 47 |G;Z=Z-1..... .RG|
00000F60: 2B 31 3B 50 52 55 45 46 45 4E 2C 20 4F 42 00 AF |+1;PRUEFEN, OB..|
00000F70: 89 08 11 20 8B 23 24 30 30 3B 4D 53 42 20 52 45 |... .#$00;MSB RE|
00000F80: 43 48 54 45 20 47 52 45 4E 5A 45 00 D7 89 12 11 |CHTE GRENZE.....|
00000F90: 20 B7 5A 47 4C 45 49 43 48 3B 55 4E 47 4C 45 49 | .ZGLEICH;UNGLEI|
00000FA0: 43 48 20 4E 55 4C 4C 2C 44 41 4E 4E 20 53 50 52 |CH NULL,DANN SPR|
00000FB0: 55 4E 47 00 DD 89 1C 11 3B 00 12 8A 26 11 3B 2D |UNG.....;...&.;-|
00000FC0: 2D 2D 20 54 45 49 4C 20 38 3A 20 52 55 45 43 4B |-- TEIL 8: RUECK|
00000FD0: 4B 45 48 52 20 49 4E 53 20 42 41 53 49 43 20 2D |KEHR INS BASIC -|
00000FE0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 18 |--------------..|
00000FF0: 8A 30 11 3B 00 2E 8A 3A 11 3B 2D 20 53 54 41 50 |.0.;...:.;- STAP|
00001000: 45 4C 5A 45 49 47 45 52 20 2D 00 3C 8A 44 11 41 |ELZEIGER -.<.D.A|
00001010: 55 53 20 83 53 54 49 4E 00 43 8A 4E 11 20 9D 00 |US .STIN.C.N. ..|
00001020: 49 8A 58 11 3B 00 68 8A 62 11 3B 2D 20 5A 45 52 |I.X.;.h.b.;- ZER|
00001030: 4F 50 41 47 45 20 5A 55 52 55 45 43 4B 48 4F 4C |OPAGE ZURUECKHOL|
00001040: 45 4E 20 2D 00 8A 8A 6C 11 20 83 23 24 30 30 3B |EN -...l. .#$00;|
00001050: 5A 41 45 48 4C 45 52 20 49 4E 49 54 49 41 4C 49 |ZAEHLER INITIALI|
00001060: 53 49 45 52 45 4E 00 AE 8A 76 11 5A 50 52 55 45 |SIEREN...v.ZPRUE|
00001070: 43 4B 20 A1 3B 57 45 52 54 20 56 4F 4E 20 53 54 |CK .;WERT VON ST|
00001080: 41 50 45 4C 20 48 4F 4C 45 4E 00 DE 8A 80 11 20 |APEL HOLEN..... |
00001090: 82 24 30 41 2C 58 3B 55 4E 44 20 49 4E 20 44 49 |.$0A,X;UND IN DI|
000010A0: 45 20 5A 45 52 4F 50 41 47 45 53 54 45 4C 4C 45 |E ZEROPAGESTELLE|
000010B0: 20 53 43 48 52 45 49 42 45 4E 00 F4 8A 8A 11 20 | SCHREIBEN..... |
000010C0: A2 3B 4E 41 45 43 48 53 54 45 52 20 57 45 52 54 |.;NAECHSTER WERT|
000010D0: 00 FF 8A 94 11 20 8B 23 24 31 41 00 0D 8B 9E 11 |..... .#$1A.....|
000010E0: 20 B5 5A 50 52 55 45 43 4B 00 13 8B A8 11 3B 00 | .ZPRUECK.....;.|
000010F0: 59 8B B2 11 3B 2D 2D 2D 20 53 50 45 49 43 48 45 |Y...;--- SPEICHE|
00001100: 52 4B 4F 4E 46 49 47 55 52 41 54 49 4F 4E 20 55 |RKONFIGURATION U|
00001110: 4D 53 43 48 41 4C 54 45 4E 20 41 55 46 20 4E 4F |MSCHALTEN AUF NO|
00001120: 52 4D 41 4C 4B 4F 4E 46 49 47 55 52 41 54 49 4F |RMALKONFIGURATIO|
00001130: 4E 20 2D 2D 2D 00 5F 8B BC 11 3B 00 94 8B C6 11 |N ---._...;.....|
00001140: 45 4E 44 45 20 81 23 24 30 30 3B 4B 4F 4E 46 49 |ENDE .#$00;KONFI|
00001150: 47 55 52 41 54 49 4F 4E 53 42 59 54 45 20 46 55 |GURATIONSBYTE FU|
00001160: 45 52 20 4E 4F 52 4D 41 4C 5A 55 53 54 41 4E 44 |ER NORMALZUSTAND|
00001170: 00 AE 8B D0 11 20 82 43 52 3B 49 4E 53 20 43 52 |..... .CR;INS CR|
00001180: 20 53 43 48 52 45 49 42 45 4E 00 B4 8B DA 11 3B | SCHREIBEN.....;|
00001190: 00 F8 8B E4 11 3B 2D 2D 2D 20 56 45 52 4C 41 53 |.....;--- VERLAS|
000011A0: 53 45 4E 20 55 4E 44 20 5A 55 52 55 45 43 4B 4C |SEN UND ZURUECKL|
000011B0: 41 44 45 4E 20 44 45 53 20 50 52 4F 47 52 41 4D |ADEN DES PROGRAM|
000011C0: 4D 45 53 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |MES ------------|
000011D0: 2D 2D 2D 2D 00 FE 8B EE 11 3B 00 32 8C F8 11 20 |----.....;.2... |
000011E0: 81 23 3C 28 4C 45 41 56 45 29 3B 49 4E 44 49 52 |.#<(LEAVE);INDIR|
000011F0: 45 4B 54 45 4E 20 53 50 52 55 4E 47 56 45 4B 54 |EKTEN SPRUNGVEKT|
00001200: 4F 52 20 4C 41 44 45 4E 20 28 4C 53 42 29 00 3E |OR LADEN (LSB).>|
00001210: 8C 02 12 20 82 5A 57 53 50 31 00 52 8C 0C 12 20 |... .ZWSP1.R... |
00001220: 81 23 3E 28 4C 45 41 56 45 29 3B 4D 53 42 00 60 |.#>(LEAVE);MSB.`|
00001230: 8C 16 12 20 82 5A 57 53 50 31 2B 31 00 93 8C 20 |... .ZWSP1+1... |
00001240: 12 20 96 28 5A 57 53 50 31 29 3B 49 4E 44 49 52 |. .(ZWSP1);INDIR|
00001250: 45 4B 54 45 52 20 53 50 52 55 4E 47 20 49 4E 53 |EKTER SPRUNG INS|
00001260: 20 53 54 45 55 45 52 50 52 4F 47 52 41 4D 4D 00 | STEUERPROGRAMM.|
00001270: 99 8C 2A 12 3B 00 DD 8C 34 12 3B 2D 2D 2D 20 45 |..*.;...4.;--- E|
00001280: 4E 44 45 20 44 45 53 20 5A 55 20 56 45 52 53 43 |NDE DES ZU VERSC|
00001290: 48 49 45 42 45 4E 44 45 4E 20 50 52 4F 47 52 41 |HIEBENDEN PROGRA|
000012A0: 4D 4D 54 45 49 4C 45 53 20 2D 2D 2D 2D 2D 2D 2D |MMTEILES -------|
000012B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 E3 8C 3E 12 3B 00 |---------...>.;.|
000012C0: 00 00 |.. |
ZUM NAECHSTEN VERGLEICH.IZ,. .YADR+1.VZ
6. .VERGLY.\Z@.;.VZJ.;- SPRUNG ---------
--..ZT.BRUECKE2 .VERGLX..Z^.BRUECKE3 .BR
UECKE1..ZH.BRUECKE6 .BRUECKE5..ZR.;..Z|.
;--- TEIL 6: STRINGS VERTAUSCHEN -------
----..Z..;..{..;-PRUEFEN OB X >= Y -..{.
.;.9{..TAUSCH .YADR+1;MSB VERGLEICHEN.F{
.. .XADR+1.J{.. .BRUECKE8;WENN X>Y DANN
SPRUNG..{B. .SWAP;WENN X<Y DANN VERTAUSC
HEN..{L. .XADR;LSB VERGLEICHEN..{V. .YAD
R..{.. .BRUECKE9;WENN X >= Y DANN SPRUNG
..{..;..|..;- VERTAUSCHEN DER STRING- UN
D CODEDESCRIPTOREN -.5|..;- STRINGDESCRI
PTOREN: -.D|..SWAP .#$02.O|.. .#$02.N|..
SWAP1 .XDES,X;X-DESCRIPTOR..|&. .(YADR),
Y;NACH A$(Y)..|0. .YDES,X;Y-DESCRIPTOR..
|:. .(XADR),Y;NACH A$(X).C|D. ..J|N. ..V
|X. .SWAP1..|B.;..|L.;- CODEDESCRIPTOREN
: -..|V.;.,}.. .;BERECHNEN DER ORTE DER
CODEDESCRIPTOREN.F}.. .XDES+1;LSB X-STRI
NG.C}.. .XDES;PLUS STRINGLAENGE..}.. .ZW
SP1;ERGIBT LSB DES ORTES CODEDESCRIPTOR
X..}.. .XDES+2;MSB X-STRING.S}.. .#$00;E
VENTUELL CARRY ADDIEREN..}.. .ZWSP1+1;MS
B ORT CODEDESCRIPTOR X..~F.;."~P. .;DASS
ELBE FUER DEN Y-STRING.3~Z. .YDES+1;LSB.
M~.. .YDES;+ STRINGLAENGE.Y~.. .ZWSP2;LS
B ZEIGER AUF CODEDESCRIPTOR Y..~.. .YDES
+2;MSB..~.. .#$00..~.. .ZWSP2+1;MSB DES
ZEIGERS..~..;..~ . .#$01;ZAEHLER INITIAL
ISIEREN..*.SWAP2 .(ZWSP1),Y;CODEDESCRIP
TOR X LADEN.%4. .ZWSP;UND BEISEITE LEGE
N.L>. .(ZWSP2),Y;CODEDESCRIPTOR Y LADEN
.PH. .(ZWSP1),Y;UND NACH X SCHIEBEN..R
. .ZWSP;X WIEDER HERVORHOLEN..\. .(ZWSP
2),Y;UND NACH Y SCHIEBEN.KF. .;HERUNTER
ZAEHLEN..P. .SWAP2;BIS UNTERLAUF DES ZA
EHLERS..Z.;. ...;- NAECHSTE DESCRIPTORA
DRESSE X=X+1.&...;.C... .;ZUR AKTUELLEN
ADRESSE.[... .XADR;DES X-STRING.{... .#$
03;3 BYTE ADDIEREN FUER..... .XADR;NEUE
DESCRIPTORADRESSE X..... .SPR4...J. .XAD
R+1...T.;.....;-NAECHSTE DESCRIPTORADRES
SE Y=Y-1.....;.....SPR4 .;VON DER AKTUEL
LEN ADRESSE.'... .YADR;DES Y-STRING.K...
.#$03;3 BYTE SUBTRAHIEREN FUER.O... .YA
DR;NEUE DESCRIPTORADRESSE Y.Z... .SPR5..
.$. .YADR+1.....;...8.;-FALLS X <= Y -..
.B.;...L.SPR5 .YADR+1;MSB Y-DESCRIPTORAD
RESSE VERGLEICHEN...V. .XADR+1;MIT MSB X
-DESCRIPTORADRESSE.+.`. .ZSTUFEN;WENN X
> Y DANN SPRUNG.Q.J. .BRUECKE2;WENN X <
Y DANN SPRUNG...T. .YADR;LSB Y-DESCRIPTO
RADRESSE VERGLEICHEN...~. .XADR;MIT LSB
X-DESCRIPTORADRESSE.M... .BRUECKE2;WENN
X < Y DANN SPRUNG..... .ZSTUFEN;HIER IMM
ER SPRUNG.....;.....;- SPRUNG ----------
--.&...BRUECKE10 .BRUECKE3.=...BRUECKE7
.BRUECKE6.S.D.BRUECKE8 .ZSTUFEN.I.N.BRUE
CKE9 .ZSTUFEN.O.X.;.....;--- TEIL 7: NAE
CHSTE SCHACHTELUNGSTIEFE ERMITTELN -----
-.....;.G...;- Z=Z+1,RG=Y -.....ZPLUS .R
G;RECHTE GRENZE AUF DEN..... ;STAPEL SC
HIEBEN:..... .RG+1;BEDEUTET Z=Z+1.$...
.B.(. .YADR;NEUE RECHTE GRENZE.G.2. .RG;
IST DESCRIPTORADRESSE VON Y.T.<. .YADR+1
..F. .RG+1. .P. .;HIER ERFOLGT IMMER SP
RUNG.V.Z. .BRUECKE10;NACH VSTRING (NEUER
VERGLEICHSSTRING)...D.;...N.;- LG = LG+
1 -...X.ZGLEICH .;ZUR LINKEN GRENZE 3 BY
TES.2... .LG;ADDIEREN FUER DEN.R... .#$0
3;NAECHSTEN DESCRIPTOR.[... .LG.F. . .SP
R6.M... ..|...SPR6 .LG+1..... .RG+1;MSB
DER GRENZADRESSEN VERGLEICHEN.Z.H. .BRUE
CKE10;WENN RG > LG SPRUNG NACH VSTRING..
.R. .ZMINUS;WENN RG < LG SPRUNG NACH ZMI
NUS..... .RG;LSB GRENZADRESSEN VERGLEICH
EN._... .BRUECKE10;WENN RG > LG SPRUNG N
ACH VSTRING..... .ZMINUS;SONST SPRUNG NA
CH ZMINUS.....;.....ZSTUFEN .LG;VERGLEIC
H LINKE GRENZE MIT.U... .LG+1;Y-DESCRIPT
ORADRESSE..... .YADR+1;MSB-VERGLEICH..."
. .STACK;WENN YADR > LG DANN SPRUNG.@.,.
.ZGLEICH;WENN YADR < LG DANN SPRUNG._.6
. .YADR;SONST LSB-VERGLEICH...@. .STACK;
WENN YADR > LG DANN SPRUNG...J. .ZGLEICH
;SONST SPRUNG NACH ZGLEICH...T.;.L.^.;-
STAPEL PRUEFEN -...H.STACK .;AKTUELLEN S
TAPELZEIGER VERGLEICHEN...R. .STMI;MIT S
TAPELMINIMUM.E.|. .ZPLUS;WENN STMI <= ST
APELZEIGER SPRUNG.D... .STMI;NEUES STAPE
LMINIMUM..... .STUG;VERGLEICH MIT STAPEL
UNTERGRENZE.A... .ZPLUS;WENN STUG <= STA
PELZEIGER DANN SPRUNG..... .STIN;SONST R
UECKSPRUNG..... ...... .BRUECKE7;ZUM ANF
ANG (SORT)...B.;...L.;- Z = Z-1 -.?.V.ZM
INUS .;LETZTE RECHTE GRENZE.\... .RG+1;V
OM STAPEL HOLEN:.L... .;BEDEUTET.{... .R
G;Z=Z-1..... .RG+1;PRUEFEN, OB..... .#$0
0;MSB RECHTE GRENZE.W... .ZGLEICH;UNGLEI
CH NULL,DANN SPRUNG.....;...&.;--- TEIL
8: RUECKKEHR INS BASIC ---------------..
.0.;...:.;- STAPELZEIGER -.<.D.AUS .STIN
.C.N. ..I.X.;.H.B.;- ZEROPAGE ZURUECKHOL
EN -...L. .#$00;ZAEHLER INITIALISIEREN..
.V.ZPRUECK .;WERT VON STAPEL HOLEN.....
.$0A,X;UND IN DIE ZEROPAGESTELLE SCHREIB
EN..... .;NAECHSTER WERT..... .#$1A.....
.ZPRUECK.....;.Y...;--- SPEICHERKONFIGU
RATION UMSCHALTEN AUF NORMALKONFIGURATIO
N ---._...;...F.ENDE .#$00;KONFIGURATION
SBYTE FUER NORMALZUSTAND...P. .CR;INS CR
SCHREIBEN...Z.;.....;--- VERLASSEN UND
ZURUECKLADEN DES PROGRAMMES ------------
----.....;.2... .#<(LEAVE);INDIREKTEN SP
RUNGVEKTOR LADEN (LSB).>... .ZWSP1.R...
.#>(LEAVE);MSB.`... .ZWSP1+1... . .(ZWSP
1);INDIREKTER SPRUNG INS STEUERPROGRAMM.
..*.;...4.;--- ENDE DES ZU VERSCHIEBENDE
N PROGRAMMTEILES ----------------...>.;.
..
> CLICK IMAGE PREVIEW FOR FULL MODAL