TRACE ASSEMBLE
FILE INFORMATION
FILENAME(S): TRACE ASSEMBLE
FILE TYPE(S): PRG
FILE SIZE: 8.8K
FIRST SEEN: 2025-11-30 01:12:48
APPEARS ON: 4 disk(s)
FILE HASH
957856f810d817a5f6382dd9965dd8695fe5bbebd58aa690c1bff0100ddbfb7e
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 12 84 | TRACE ASSEMBLE | PRG | C64er | 15 | 0 | DOWNLOAD FILE |
| 64 ER DEC 84 | TRACE ASSEMBLE | PRG | DuncanTwain | 15 | 0 | DOWNLOAD FILE |
| 64 12 84 | TRACE ASSEMBLE | PRG | DuncanTwain | 15 | 0 | DOWNLOAD FILE |
| 64 ER | TRACE ASSEMBLE | PRG | earthshaker | 17 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 50 00 9F 31 2C 34 00 16 08 5A 00 9E |....P..1,4...Z..|
00000010: 39 AC 34 30 39 36 00 22 08 64 00 AC B2 34 39 31 |9.4096.".d...491|
00000020: 35 32 00 51 08 6E 00 3B 3A 3B 3A 3B 54 52 41 43 |52.Q.n.;:;:;TRAC|
00000030: 45 20 AD 20 BF 47 4C 45 20 A9 20 46 55 45 52 20 |E . .GLE . FUER |
00000040: 43 36 34 20 20 20 20 20 20 20 20 20 20 39 2E 38 |C64 9.8|
00000050: 34 00 71 08 78 00 3B 3A 3B 20 20 20 AA 44 49 53 |4.q.x.;:; .DIS|
00000060: 41 53 53 45 4D 42 4C 45 52 20 AD 20 45 44 49 A4 |ASSEMBLER . EDI.|
00000070: 52 00 C2 08 82 00 3B 3A 3B 20 20 20 20 20 20 20 |R.....;:; |
00000080: 4A 55 45 52 47 45 4E 20 CB 45 42 45 4C 3A 3B 3A |JUERGEN .EBEL:;:|
00000090: 3B 20 20 20 20 20 20 20 38 20 4D 55 45 4E 43 48 |; 8 MUENCH|
000000A0: 45 4E 20 38 32 3A 3B 3A 3B 20 20 20 20 20 20 20 |EN 82:;:; |
000000B0: 47 52 4F 53 43 48 45 4E 57 45 47 20 31 39 3A 3B |GROSCHENWEG 19:;|
000000C0: 3A 3B 00 E5 08 8C 00 3B 3A 3B 20 20 20 20 20 20 |:;.....;:; |
000000D0: 54 45 4C 2E 20 30 38 39 20 AD 20 34 33 32 37 30 |TEL. 089 . 43270|
000000E0: 39 3A 3B 3A 3B 00 F3 08 96 00 2E 4F 50 54 20 4F |9:;:;......OPT O|
000000F0: 4F 2C 50 00 28 09 A0 00 49 52 51 56 45 4B 20 B2 |O,P.(...IRQVEK .|
00000100: 24 33 31 34 3A 53 54 41 43 4B 20 B2 24 31 30 30 |$314:STACK .$100|
00000110: 3A 43 4F 4C 20 B2 35 35 32 39 36 3B 48 B5 45 52 |:COL .55296;H.ER|
00000120: 47 8A 44 46 41 52 42 45 00 45 09 AA 00 53 43 52 |G.DFARBE.E...SCR|
00000130: 45 45 4E 20 B2 31 30 32 34 3A 87 59 20 B2 24 41 |EEN .1024:.Y .$A|
00000140: 34 37 34 AB 31 00 8D 09 B4 00 43 49 41 20 B2 24 |474.1.....CIA .$|
00000150: 44 43 30 30 3A 54 4C 20 B2 43 49 41 AA 36 3B 54 |DC00:TL .CIA.6;T|
00000160: 49 4D 45 52 57 45 52 54 45 3A 54 48 20 B2 43 49 |IMERWERTE:TH .CI|
00000170: 41 AA 37 3A 54 41 53 54 20 B2 24 45 41 38 37 3B |A.7:TAST .$EA87;|
00000180: 54 41 53 54 41 54 55 52 52 4F 55 54 2E 00 9D 09 |TASTATURROUT....|
00000190: BE 00 44 44 52 42 20 B2 24 44 44 30 33 00 D7 09 |..DDRB .$DD03...|
000001A0: C8 00 49 43 52 20 B2 43 49 41 AA 31 33 3B B5 45 |..ICR .CIA.13;.E|
000001B0: 52 52 2E 9A 52 4F 4C 52 45 47 2E 3A 43 52 42 20 |RR..ROLREG.:CRB |
000001C0: B2 43 49 41 AA 31 35 3A 54 53 54 41 52 54 20 B2 |.CIA.15:TSTART .|
000001D0: AC AA 24 30 35 30 30 00 F5 09 D2 00 4E 4F 50 3A |..$0500.....NOP:|
000001E0: 4C 44 41 20 23 30 3A 53 54 41 20 44 49 53 91 3A |LDA #0:STA DIS.:|
000001F0: 42 45 51 20 CB 00 0B 0A DC 00 4C 44 41 20 23 32 |BEQ ......LDA #2|
00000200: 35 35 3A 53 54 41 20 44 49 53 91 00 36 0A E6 00 |55:STA DIS..6...|
00000210: CB 20 53 45 49 3A 4C 44 41 20 23 B3 54 52 41 43 |. SEI:LDA #.TRAC|
00000220: 45 3A 53 54 41 20 49 52 51 56 45 4B 3B 49 52 51 |E:STA IRQVEK;IRQ|
00000230: 20 56 45 4B A4 52 00 5D 0A F0 00 4C 44 41 20 23 | VEK.R.]...LDA #|
00000240: B1 54 52 41 43 45 3A 53 54 41 20 49 52 51 56 45 |.TRACE:STA IRQVE|
00000250: 4B AA 31 3B 41 55 46 20 54 52 41 43 45 00 A6 0A |K.1;AUF TRACE...|
00000260: FA 00 4C 44 41 20 23 31 33 30 3A 53 54 41 20 49 |..LDA #130:STA I|
00000270: 43 52 3B 54 49 4D 45 52 20 42 20 B5 45 52 52 55 |CR;TIMER B .ERRU|
00000280: 50 54 20 45 52 4C 41 55 42 54 3A 4C 44 58 20 23 |PT ERLAUBT:LDX #|
00000290: 32 35 35 3A 54 58 53 3B 53 54 41 43 4B 20 49 4E |255:TXS;STACK IN|
000002A0: 49 54 49 41 4C 2E 00 E0 0A 04 01 4C 44 41 20 23 |ITIAL......LDA #|
000002B0: B1 87 59 3B 53 54 41 43 4B 20 46 55 45 52 20 54 |..Y;STACK FUER T|
000002C0: 52 41 43 45 3A 50 48 41 3B 56 B0 42 45 52 45 49 |RACE:PHA;V.BEREI|
000002D0: 54 45 4E 3A 4C 44 41 20 23 B3 87 59 3A 50 48 41 |TEN:LDA #..Y:PHA|
000002E0: 00 05 0B 0E 01 4C 44 41 20 23 24 43 30 3B 50 43 |.....LDA #$C0;PC|
000002F0: B2 24 43 30 30 30 3A 50 48 41 3A 4C 44 41 20 23 |.$C000:PHA:LDA #|
00000300: 30 3A 50 48 41 00 28 0B 18 01 4C 44 41 20 23 33 |0:PHA.(...LDA #3|
00000310: 32 3A 50 48 41 3A 4C 44 41 20 23 30 3A 50 48 41 |2:PHA:LDA #0:PHA|
00000320: 3A 50 48 41 3A 50 48 41 00 58 0B 22 01 54 52 41 |:PHA:PHA.X.".TRA|
00000330: 43 45 20 43 4C 44 3A 4C 44 59 20 23 30 3A 54 49 |CE CLD:LDY #0:TI|
00000340: 54 45 4C 20 4C 44 41 20 54 45 58 54 2C 59 3B 4B |TEL LDA TEXT,Y;K|
00000350: 4F 50 46 5A 45 49 4C 45 00 82 0B 2C 01 4A 53 52 |OPFZEILE...,.JSR|
00000360: 20 50 52 49 5A 45 49 3B 41 55 53 47 45 42 45 4E | PRIZEI;AUSGEBEN|
00000370: 3A 43 50 59 20 23 34 30 3A 42 4E 45 20 54 49 54 |:CPY #40:BNE TIT|
00000380: 45 4C 00 B9 0B 36 01 54 53 58 3A 4C 44 41 20 53 |EL...6.TSX:LDA S|
00000390: 54 41 43 4B AA 36 2C 58 3B 50 43 20 41 55 53 47 |TACK.6,X;PC AUSG|
000003A0: 45 42 45 4E 3A 53 54 41 20 54 4D 50 AA 33 3A 4A |EBEN:STA TMP.3:J|
000003B0: 53 52 20 50 52 42 59 54 45 00 E0 0B 40 01 4C 44 |SR PRBYTE...@.LD|
000003C0: 41 20 53 54 41 43 4B AA 35 2C 58 3A 53 54 41 20 |A STACK.5,X:STA |
000003D0: 54 4D 50 AA 34 3A 4A 53 52 20 50 52 42 59 54 45 |TMP.4:JSR PRBYTE|
000003E0: 00 F8 0B 4A 01 4C 44 41 20 44 49 53 91 3A 42 4D |...J.LDA DIS.:BM|
000003F0: 49 20 44 49 53 4F 46 46 00 27 0C 54 01 4A 53 52 |I DISOFF.'.T.JSR|
00000400: 20 44 49 53 41 53 3A 44 49 53 4F 46 46 20 4A 53 | DISAS:DISOFF JS|
00000410: 52 20 53 50 41 43 45 3A 54 58 41 3B 53 50 20 41 |R SPACE:TXA;SP A|
00000420: 55 53 47 45 42 45 4E 00 36 0C 5E 01 4A 53 52 20 |USGEBEN.6.^.JSR |
00000430: 50 52 42 59 54 45 00 66 0C 68 01 52 45 47 49 53 |PRBYTE.f.h.REGIS|
00000440: 54 45 52 20 4A 53 52 20 53 50 41 43 45 3A 4C 44 |TER JSR SPACE:LD|
00000450: 41 20 53 54 41 43 4B AA 31 2C 58 3A 4A 53 52 20 |A STACK.1,X:JSR |
00000460: 50 52 42 59 54 45 00 8D 0C 72 01 49 4E 58 3A 43 |PRBYTE...r.INX:C|
00000470: 50 59 20 23 35 36 3A 42 43 43 20 52 45 47 49 53 |PY #56:BCC REGIS|
00000480: 54 45 52 3A 4A 53 52 20 53 50 41 43 45 00 BD 0C |TER:JSR SPACE...|
00000490: 7C 01 4C 44 41 20 53 54 41 43 4B AA 31 2C 58 3B ||.LDA STACK.1,X;|
000004A0: 50 52 4F 5A 45 53 53 B0 53 54 41 54 55 53 AB 46 |PROZESS.STATUS.F|
000004B0: 4C 41 47 53 20 41 4E 5A 45 49 47 45 4E 00 C8 0C |LAGS ANZEIGEN...|
000004C0: 86 01 4C 44 58 20 23 38 00 F0 0C 90 01 9A 31 20 |..LDX #8......1 |
000004D0: 41 53 4C 3A 50 48 41 3A 4C 44 41 20 23 39 34 3B |ASL:PHA:LDA #94;|
000004E0: 50 46 45 49 4C 3A 42 43 53 20 46 4C 53 45 54 5A |PFEIL:BCS FLSETZ|
000004F0: 00 18 0D 9A 01 4C 44 41 20 23 34 35 3B 4D 49 4E |.....LDA #45;MIN|
00000500: 55 53 3A 46 4C 53 45 54 5A 20 4A 53 52 20 50 52 |US:FLSETZ JSR PR|
00000510: 49 5A 45 49 3A 50 4C 41 00 49 0D A4 01 44 45 58 |IZEI:PLA.I...DEX|
00000520: 3A 42 4E 45 20 9A 31 3A 4A 53 52 20 53 50 41 43 |:BNE .1:JSR SPAC|
00000530: 45 3A 4C 44 58 20 23 38 3B 55 53 45 52 50 B0 54 |E:LDX #8;USERP.T|
00000540: 20 41 4E 5A 45 49 47 45 4E 00 58 0D AE 01 4C 44 | ANZEIGEN.X...LD|
00000550: 41 20 44 44 52 42 AB 32 00 7A 0D B8 01 9A 32 20 |A DDRB.2.z....2 |
00000560: 41 53 4C 3A 50 48 41 3A 4C 44 41 20 23 24 33 31 |ASL:PHA:LDA #$31|
00000570: 3A 42 43 53 20 55 53 45 54 5A 00 9C 0D C2 01 4C |:BCS USETZ.....L|
00000580: 44 41 20 23 24 33 30 3A 55 53 45 54 5A 20 4A 53 |DA #$30:USETZ JS|
00000590: 52 20 50 52 49 5A 45 49 3A 50 4C 41 00 D8 0D CC |R PRIZEI:PLA....|
000005A0: 01 44 45 58 3A 42 4E 45 20 9A 32 3A 4C 44 58 20 |.DEX:BNE .2:LDX |
000005B0: 23 38 3B 44 41 54 45 4E 52 49 43 48 54 55 4E 47 |#8;DATENRICHTUNG|
000005C0: 53 52 45 47 49 53 54 45 52 3A 4C 44 41 20 44 44 |SREGISTER:LDA DD|
000005D0: 52 42 3B 4C 41 44 45 4E 00 10 0E D6 01 9A 33 20 |RB;LADEN......3 |
000005E0: 41 53 4C 20 53 43 52 45 45 4E AA 36 35 2C 58 3A |ASL SCREEN.65,X:|
000005F0: 4C 53 52 3B 45 4E 54 53 50 52 45 43 48 80 45 20 |LSR;ENTSPRECH.E |
00000600: 42 49 54 53 20 44 45 52 20 41 4E 5A 45 49 47 45 |BITS DER ANZEIGE|
00000610: 00 40 0E E0 01 52 B0 20 53 43 52 45 45 4E AA 36 |.@...R. SCREEN.6|
00000620: 35 2C 58 3B 57 45 52 44 45 4E 20 49 4E 56 45 52 |5,X;WERDEN INVER|
00000630: 54 49 45 52 54 3A 44 45 58 3A 42 4E 45 20 9A 33 |TIERT:DEX:BNE .3|
00000640: 00 7B 0E EA 01 92 20 4A 53 52 20 A1 3B 57 41 52 |.{.... JSR .;WAR|
00000650: 54 45 54 20 41 55 46 3A 43 4D 50 20 23 32 33 3B |TET AUF:CMP #23;|
00000660: 46 31 2C 46 33 2C 46 35 2C 46 37 20 4F 44 45 52 |F1,F3,F5,F7 ODER|
00000670: 20 58 3A 42 45 51 20 45 58 49 54 00 A8 0E F4 01 | X:BEQ EXIT.....|
00000680: 43 4D 50 20 23 35 3A 42 45 51 20 46 41 53 54 3B |CMP #5:BEQ FAST;|
00000690: 55 4E 44 20 56 45 52 5A 57 45 49 47 54 20 45 4E |UND VERZWEIGT EN|
000006A0: 54 53 50 52 45 43 48 80 00 BC 0E FE 01 43 4D 50 |TSPRECH......CMP|
000006B0: 20 23 36 3A 42 45 51 20 53 4C 4F 57 00 DB 0E 08 | #6:BEQ SLOW....|
000006C0: 02 43 4D 50 20 23 33 3A 42 45 51 20 92 4C 3A 43 |.CMP #3:BEQ .L:C|
000006D0: 4D 50 20 23 34 3A 42 4E 45 20 92 00 E7 0E 12 02 |MP #4:BNE ......|
000006E0: 4A 4D 50 20 53 45 54 00 24 0F 1C 02 92 4C 20 4A |JMP SET.$....L J|
000006F0: 53 52 20 A1 3B 57 41 52 54 45 54 20 42 49 53 20 |SR .;WARTET BIS |
00000700: 46 37 20 57 49 45 44 45 52 20 4C 4F 53 47 45 4C |F7 WIEDER LOSGEL|
00000710: 41 53 53 45 4E 3A 43 4D 50 20 23 36 34 3A 42 4E |ASSEN:CMP #64:BN|
00000720: 45 20 92 4C 00 3D 0F 26 02 46 41 53 54 20 4C 44 |E .L.=.&.FAST LD|
00000730: 41 20 23 24 31 36 3A 53 54 41 20 54 4C 00 88 0F |A #$16:STA TL...|
00000740: 30 02 4C 44 41 20 23 30 3B 54 49 4D 45 52 20 4C |0.LDA #0;TIMER L|
00000750: 41 44 45 4E 3A 53 54 41 20 54 48 3A 4C 44 41 20 |ADEN:STA TH:LDA |
00000760: 23 31 37 3A 53 54 41 20 43 52 42 3B 55 4E 44 20 |#17:STA CRB;UND |
00000770: 53 54 41 52 54 45 4E 3A 4C 44 41 20 24 44 43 30 |STARTEN:LDA $DC0|
00000780: 44 3B 80 45 20 49 52 51 00 9C 0F 3A 02 50 4C 41 |D;.E IRQ...:.PLA|
00000790: 3A 54 41 59 3A 50 4C 41 3A 54 41 58 00 A8 0F 44 |:TAY:PLA:TAX...D|
000007A0: 02 50 4C 41 3A 52 54 49 00 D1 0F 4E 02 53 4C 4F |.PLA:RTI...N.SLO|
000007B0: 57 20 4C 44 58 20 23 30 3A 9A 34 20 44 45 58 3A |W LDX #0:.4 DEX:|
000007C0: 42 4E 45 20 9A 34 3A 44 45 59 3A 42 4E 45 20 9A |BNE .4:DEY:BNE .|
000007D0: 34 00 DE 0F 58 02 42 45 51 20 46 41 53 54 00 26 |4...X.BEQ FAST.&|
000007E0: 10 62 02 45 58 49 54 20 4C 44 41 20 23 32 3B 58 |.b.EXIT LDA #2;X|
000007F0: 20 54 41 53 54 45 3A 53 54 41 20 49 43 52 3A 4C | TASTE:STA ICR:L|
00000800: 44 41 20 23 24 33 31 3A 53 54 41 20 49 52 51 56 |DA #$31:STA IRQV|
00000810: 45 4B 3B 53 45 54 5A 54 20 49 52 51 20 56 45 4B |EK;SETZT IRQ VEK|
00000820: A4 52 20 41 55 46 00 72 10 6C 02 4C 44 41 20 23 |.R AUF.r.l.LDA #|
00000830: 24 45 41 3B 41 4C 54 45 4E 20 57 45 52 54 3A 53 |$EA;ALTEN WERT:S|
00000840: 54 41 20 49 52 51 56 45 4B AA 31 3A 4C 44 41 20 |TA IRQVEK.1:LDA |
00000850: 23 34 3A 53 54 41 20 24 30 32 38 42 3A 4C 44 41 |#4:STA $028B:LDA|
00000860: 20 23 31 36 3B 52 45 50 45 41 54 20 4B B0 52 49 | #16;REPEAT K.RI|
00000870: 47 2E 00 9B 10 76 02 53 54 41 20 24 30 32 38 43 |G....v.STA $028C|
00000880: 3A 43 4C 49 3A 4A 4D 50 20 87 59 AA 31 3B 53 50 |:CLI:JMP .Y.1;SP|
00000890: 8A 47 20 5A 55 20 42 41 53 49 43 00 E0 10 80 02 |.G ZU BASIC.....|
000008A0: 50 52 42 59 54 45 20 50 48 41 3B 31 20 42 59 54 |PRBYTE PHA;1 BYT|
000008B0: 45 20 41 4C 53 20 32 20 48 45 58 5A 2E 20 41 55 |E ALS 2 HEXZ. AU|
000008C0: 46 20 53 43 48 49 52 4D 3A 53 54 58 20 54 4D 50 |F SCHIRM:STX TMP|
000008D0: 3A 4C 53 52 3A 4C 53 52 3A 4C 53 52 3A 4C 53 52 |:LSR:LSR:LSR:LSR|
000008E0: 00 FD 10 8A 02 54 41 58 3A 4C 44 41 20 48 45 58 |.....TAX:LDA HEX|
000008F0: 2C 58 3A 4A 53 52 20 50 52 49 5A 45 49 00 22 11 |,X:JSR PRIZEI.".|
00000900: 94 02 50 4C 41 3A AF 20 23 24 30 46 3A 54 41 58 |..PLA:. #$0F:TAX|
00000910: 3A 4C 44 41 20 48 45 58 2C 58 3A 4C 44 58 20 54 |:LDA HEX,X:LDX T|
00000920: 4D 50 00 31 11 9E 02 4A 4D 50 20 50 52 49 5A 45 |MP.1...JMP PRIZE|
00000930: 49 00 44 11 A8 02 53 50 41 43 45 20 4C 44 41 20 |I.D...SPACE LDA |
00000940: 23 24 32 30 00 6B 11 B2 02 50 52 49 5A 45 49 20 |#$20.k...PRIZEI |
00000950: AF 20 23 24 33 46 3B 57 45 47 45 4E 20 42 49 4C |. #$3F;WEGEN BIL|
00000960: 44 53 43 48 49 52 4D 43 4F 44 45 00 A2 11 BC 02 |DSCHIRMCODE.....|
00000970: 53 54 41 20 53 43 52 45 45 4E 2C 59 3A 4C 44 41 |STA SCREEN,Y:LDA|
00000980: 20 23 31 3B 46 41 52 42 45 20 53 45 54 5A 45 4E | #1;FARBE SETZEN|
00000990: 3A 53 54 41 20 43 4F 4C 2C 59 3A 49 4E 59 3A 52 |:STA COL,Y:INY:R|
000009A0: 54 53 00 CD 11 C6 02 A1 20 4A 53 52 20 54 41 53 |TS...... JSR TAS|
000009B0: 54 3B 48 4F 4C 54 20 54 41 53 54 45 4E 43 4F 44 |T;HOLT TASTENCOD|
000009C0: 45 3A 4C 44 41 20 24 43 42 3A 52 54 53 00 F0 11 |E:LDA $CB:RTS...|
000009D0: D0 02 53 45 54 20 4A 53 52 20 44 49 53 41 53 3A |..SET JSR DISAS:|
000009E0: 4C 44 59 20 23 34 30 3B 46 31 20 54 41 53 54 45 |LDY #40;F1 TASTE|
000009F0: 00 24 12 DA 02 53 54 41 52 54 20 4C 44 41 20 53 |.$...START LDA S|
00000A00: 43 52 45 45 4E 2C 59 3A B0 41 20 23 31 32 38 3A |CREEN,Y:.A #128:|
00000A10: 53 54 41 20 53 43 52 45 45 4E 2C 59 3A 53 54 59 |STA SCREEN,Y:STY|
00000A20: 20 54 4D 50 00 5C 12 E4 02 4A 53 52 20 5A 45 49 | TMP.\...JSR ZEI|
00000A30: 43 48 48 4F 4C 3B 45 49 4E 47 41 42 45 52 4F 55 |CHHOL;EINGABEROU|
00000A40: 54 2E 3A 4C 44 59 20 54 4D 50 3A 43 4D 50 20 23 |T.:LDY TMP:CMP #|
00000A50: 31 33 3A 42 4E 45 20 4C 49 4E 4B 53 00 8D 12 EE |13:BNE LINKS....|
00000A60: 02 43 50 59 20 23 31 30 30 3A 42 50 4C 20 4D 87 |.CPY #100:BPL M.|
00000A70: 3A 4A 4D 50 20 87 3A 4D 87 20 52 54 53 3B 5A 55 |:JMP .:M. RTS;ZU|
00000A80: 52 20 4C 45 53 45 52 4F 55 54 49 4E 45 00 B2 12 |R LESEROUTINE...|
00000A90: F8 02 52 45 56 45 52 53 45 20 4C 44 41 20 53 43 |..REVERSE LDA SC|
00000AA0: 52 45 45 4E 2C 59 3B 49 4E 56 45 52 54 49 45 52 |REEN,Y;INVERTIER|
00000AB0: 45 4E 00 CE 12 02 03 AF 20 23 31 32 37 3A 53 54 |EN...... #127:ST|
00000AC0: 41 20 53 43 52 45 45 4E 2C 59 3A 52 54 53 00 11 |A SCREEN,Y:RTS..|
00000AD0: 13 0C 03 4C 49 4E 4B 53 20 43 4D 50 20 23 31 37 |...LINKS CMP #17|
00000AE0: 3B 43 55 52 53 B0 20 4C 49 4E 4B 53 3A 42 4E 45 |;CURS. LINKS:BNE|
00000AF0: 20 52 45 43 48 54 53 3A 4A 53 52 20 52 45 56 45 | RECHTS:JSR REVE|
00000B00: 52 53 45 3A 44 45 59 3A 42 4E 45 20 53 54 41 52 |RSE:DEY:BNE STAR|
00000B10: 54 00 52 13 16 03 52 45 43 48 54 53 20 43 4D 50 |T.R...RECHTS CMP|
00000B20: 20 23 32 39 3B 43 55 52 53 B0 20 52 45 43 48 54 | #29;CURS. RECHT|
00000B30: 53 3A 42 4E 45 20 9A 36 3A 4A 53 52 20 52 45 56 |S:BNE .6:JSR REV|
00000B40: 45 52 53 45 3A 49 4E 59 3A 42 4E 45 20 53 54 41 |ERSE:INY:BNE STA|
00000B50: 52 54 00 99 13 20 03 9A 36 20 4A 53 52 20 50 52 |RT... ..6 JSR PR|
00000B60: 49 5A 45 49 3B 57 45 52 54 20 41 4E 5A 45 49 47 |IZEI;WERT ANZEIG|
00000B70: 45 4E 3A 42 4E 45 20 53 54 41 52 54 3A 5A 45 49 |EN:BNE START:ZEI|
00000B80: 43 48 48 4F 4C 20 4C 44 41 20 23 30 3B 54 41 53 |CHHOL LDA #0;TAS|
00000B90: 54 2E 41 42 46 52 41 47 45 00 B7 13 2A 03 53 54 |T.ABFRAGE...*.ST|
00000BA0: 41 20 24 43 36 3A 4A 53 52 20 54 41 53 54 3A 4C |A $C6:JSR TAST:L|
00000BB0: 44 41 20 24 32 37 37 00 F3 13 34 03 43 4D 50 20 |DA $277...4.CMP |
00000BC0: 23 30 3A 42 45 51 20 5A 45 49 43 48 48 4F 4C 3A |#0:BEQ ZEICHHOL:|
00000BD0: 4C 44 59 20 23 30 3A 53 54 59 20 24 32 37 37 3B |LDY #0:STY $277;|
00000BE0: 54 41 53 54 41 54 55 52 50 55 46 46 45 52 53 54 |TASTATURPUFFERST|
00000BF0: 41 52 54 00 16 14 3E 03 43 4D 50 20 23 24 38 35 |ART...>.CMP #$85|
00000C00: 3B 46 31 20 54 41 53 54 45 3A 42 45 51 20 5A 45 |;F1 TASTE:BEQ ZE|
00000C10: 49 43 48 48 4F 4C 00 51 14 48 03 4C 44 59 20 23 |ICHHOL.Q.H.LDY #|
00000C20: 36 34 3B 56 45 52 5A 4F 45 47 45 8A 47 20 52 45 |64;VERZOEGE.G RE|
00000C30: 50 45 41 54 5A 41 45 48 4C 45 52 3A 53 54 59 20 |PEATZAEHLER:STY |
00000C40: 24 32 38 42 3A 53 54 59 20 24 32 38 43 3A 52 54 |$28B:STY $28C:RT|
00000C50: 53 00 8E 14 52 03 87 20 4A 53 52 20 52 45 56 45 |S...R.. JSR REVE|
00000C60: 52 53 45 3A 4C 44 59 20 23 34 30 3B 50 43 20 4C |RSE:LDY #40;PC L|
00000C70: 45 53 45 4E 3A 54 53 58 3A 4A 53 52 20 42 59 54 |ESEN:TSX:JSR BYT|
00000C80: 3A 53 54 41 20 53 54 41 43 4B AA 36 2C 58 00 A8 |:STA STACK.6,X..|
00000C90: 14 5C 03 53 54 41 20 54 4D 50 AA 33 3A 49 4E 59 |.\.STA TMP.3:INY|
00000CA0: 3A 4A 53 52 20 42 59 54 00 E2 14 66 03 53 54 41 |:JSR BYT...f.STA|
00000CB0: 20 53 54 41 43 4B AA 35 2C 58 3A 53 54 41 20 54 | STACK.5,X:STA T|
00000CC0: 4D 50 AA 34 3A 49 4E 59 3A 49 4E 59 3B 53 50 20 |MP.4:INY:INY;SP |
00000CD0: 55 45 42 45 52 4C 45 53 45 4E 3A 49 4E 59 3A 49 |UEBERLESEN:INY:I|
00000CE0: 4E 59 00 1C 15 70 03 4C 4F 4F 50 20 49 4E 59 3B |NY...p.LOOP INY;|
00000CF0: 52 45 47 49 53 54 45 52 20 4C 45 53 45 4E 3A 4A |REGISTER LESEN:J|
00000D00: 53 52 20 42 59 54 3A 53 54 41 20 53 54 41 43 4B |SR BYT:STA STACK|
00000D10: AA 31 2C 58 3A 49 4E 59 3A 49 4E 58 00 31 15 7A |.1,X:INY:INX.1.z|
00000D20: 03 43 50 59 20 23 35 36 3A 42 4E 45 20 4C 4F 4F |.CPY #56:BNE LOO|
00000D30: 50 00 74 15 84 03 49 4E 59 3A 4C 44 41 20 23 30 |P.t...INY:LDA #0|
00000D40: 3A 53 54 41 20 54 4D 50 3A 4C 4F 4F 50 31 20 4C |:STA TMP:LOOP1 L|
00000D50: 44 41 20 53 43 52 45 45 4E 2C 59 3B 46 4C 41 47 |DA SCREEN,Y;FLAG|
00000D60: 53 20 4C 45 53 45 4E 3A AF 20 23 25 30 30 30 31 |S LESEN:. #%0001|
00000D70: 31 31 31 31 00 88 15 8E 03 43 4D 50 20 23 33 30 |1111.....CMP #30|
00000D80: 3A 52 4F 4C 20 54 4D 50 00 CB 15 98 03 49 4E 59 |:ROL TMP.....INY|
00000D90: 3A 43 50 59 20 23 36 35 3A 42 4E 45 20 4C 4F 4F |:CPY #65:BNE LOO|
00000DA0: 50 31 3A 54 53 58 3A 4C 44 41 20 54 4D 50 3A AF |P1:TSX:LDA TMP:.|
00000DB0: 20 23 25 31 31 31 31 31 30 31 31 3B 49 20 46 4C | #%11111011;I FL|
00000DC0: 41 47 20 4C 4F 45 53 43 48 45 4E 00 FF 15 A2 03 |AG LOESCHEN.....|
00000DD0: 53 54 41 20 53 54 41 43 4B AA 34 2C 58 3A 4A 53 |STA STACK.4,X:JS|
00000DE0: 52 20 44 49 53 41 53 3A 4A 53 52 20 87 50 43 3A |R DISAS:JSR .PC:|
00000DF0: 4A 53 52 20 44 49 53 41 53 3A 4A 4D 50 20 92 00 |JSR DISAS:JMP ..|
00000E00: 45 16 AC 03 42 59 54 20 4A 53 52 20 4C 42 49 54 |E...BYT JSR LBIT|
00000E10: 3B 38 20 42 49 54 20 5A 41 48 4C 20 56 91 20 53 |;8 BIT ZAHL V. S|
00000E20: 43 52 45 45 4E 20 48 4F C3 3A 41 53 4C 3A 41 53 |CREEN HO.:ASL:AS|
00000E30: 4C 3A 41 53 4C 3A 41 53 4C 3A 49 4E 59 3A 53 54 |L:ASL:ASL:INY:ST|
00000E40: 41 20 54 4D 50 00 62 16 B6 03 4A 53 52 20 4C 42 |A TMP.b...JSR LB|
00000E50: 49 54 3A 43 4C 43 3A 41 44 43 20 54 4D 50 3A 52 |IT:CLC:ADC TMP:R|
00000E60: 54 53 00 A9 16 C0 03 4C 42 49 54 20 4C 44 41 20 |TS.....LBIT LDA |
00000E70: 53 43 52 45 45 4E 2C 59 3B 31 20 42 59 54 45 20 |SCREEN,Y;1 BYTE |
00000E80: 56 91 20 53 43 52 45 45 4E 20 49 4E 20 48 45 58 |V. SCREEN IN HEX|
00000E90: 3A 43 4D 50 20 23 34 38 3A 42 43 53 20 5A 41 48 |:CMP #48:BCS ZAH|
00000EA0: 4C 3A 41 44 43 20 23 35 37 00 C2 16 CA 03 53 45 |L:ADC #57.....SE|
00000EB0: 43 3A 5A 41 48 4C 20 53 42 43 20 23 34 38 3A 52 |C:ZAHL SBC #48:R|
00000EC0: 54 53 00 EA 16 D4 03 3B 42 45 52 45 43 48 4E 45 |TS.....;BERECHNE|
00000ED0: 54 20 B6 2E 20 41 44 52 45 53 53 45 4E 20 42 45 |T .. ADRESSEN BE|
00000EE0: 49 20 42 52 41 4E 43 48 45 53 00 09 17 DE 03 4F |I BRANCHES.....O|
00000EF0: 46 46 53 45 54 20 4C 44 41 20 43 4F 44 32 3A 42 |FFSET LDA COD2:B|
00000F00: 4D 49 20 42 4D 49 4E 55 53 00 3F 17 E8 03 43 4C |MI BMINUS.?...CL|
00000F10: 43 3B 42 52 41 4E 43 48 20 56 B0 3A 41 44 43 20 |C;BRANCH V.:ADC |
00000F20: 23 32 3A 41 44 43 20 54 4D 50 AA 34 3A 53 54 41 |#2:ADC TMP.4:STA|
00000F30: 20 54 4D 50 31 3A 4C 44 41 20 54 4D 50 AA 33 00 | TMP1:LDA TMP.3.|
00000F40: 7B 17 F2 03 41 44 43 20 23 30 3A 4A 53 52 20 50 |{...ADC #0:JSR P|
00000F50: 52 42 59 54 45 3A 4C 44 41 20 54 4D 50 31 3A 4A |RBYTE:LDA TMP1:J|
00000F60: 53 52 20 50 52 42 59 54 45 3A 52 54 53 3A 3B 42 |SR PRBYTE:RTS:;B|
00000F70: 52 41 4E 43 48 20 52 55 45 43 4B 00 A1 17 FC 03 |RANCH RUECK.....|
00000F80: 42 4D 49 4E 55 53 20 45 B0 20 23 32 35 35 3A 53 |BMINUS E. #255:S|
00000F90: 45 43 3A 53 42 43 20 23 31 3A 53 54 41 20 54 4D |EC:SBC #1:STA TM|
00000FA0: 50 00 CA 17 06 04 4C 44 41 20 54 4D 50 AA 34 3A |P.....LDA TMP.4:|
00000FB0: 53 42 43 20 54 4D 50 3A 53 54 41 20 54 4D 50 31 |SBC TMP:STA TMP1|
00000FC0: 3A 4C 44 41 20 54 4D 50 AA 33 00 02 18 10 04 53 |:LDA TMP.3.....S|
00000FD0: 42 43 20 23 30 3A 4A 53 52 20 50 52 42 59 54 45 |BC #0:JSR PRBYTE|
00000FE0: 3A 4C 44 41 20 54 4D 50 31 3A 4A 53 52 20 50 52 |:LDA TMP1:JSR PR|
00000FF0: 42 59 54 45 3A 52 54 53 3B 80 45 20 4F 46 46 53 |BYTE:RTS;.E OFFS|
00001000: 45 54 00 15 18 1A 04 3B 4C 41 45 4E 47 45 20 4F |ET.....;LAENGE O|
00001010: 50 43 4F 44 45 00 44 18 24 04 3B 42 45 52 45 43 |PCODE.D.$.;BEREC|
00001020: 48 4E 45 54 20 42 45 46 45 48 4C 53 4C 41 45 4E |HNET BEFEHLSLAEN|
00001030: 47 45 20 28 31 2C 32 20 4F 44 2E 20 33 20 42 59 |GE (1,2 OD. 3 BY|
00001040: 54 45 53 29 00 63 18 2E 04 3B 4F 50 43 4F 44 45 |TES).c...;OPCODE|
00001050: 20 49 4E 20 41 4B 4B 55 20 55 45 42 45 52 47 45 | IN AKKU UEBERGE|
00001060: 42 45 4E 00 8B 18 38 04 3B 49 4D 20 59 AB 52 45 |BEN...8.;IM Y.RE|
00001070: 47 2E 20 53 54 45 48 54 20 44 41 4E 4E 20 42 45 |G. STEHT DANN BE|
00001080: 46 45 48 4C 53 4C 41 45 4E 47 45 00 9D 18 42 04 |FEHLSLAENGE...B.|
00001090: 4C 41 45 4E 47 45 20 4C 44 59 20 23 31 00 C3 18 |LAENGE LDY #1...|
000010A0: 4C 04 43 4D 50 20 23 24 32 30 3A 42 45 51 20 4C |L.CMP #$20:BEQ L|
000010B0: 4F 4F 31 3A AF 20 23 24 39 46 3A 42 45 51 20 4C |OO1:. #$9F:BEQ L|
000010C0: 4F 4F 33 00 E7 18 56 04 AF 20 23 24 31 46 3A 43 |OO3...V.. #$1F:C|
000010D0: 4D 50 20 23 39 3A 42 45 51 20 4C 4F 4F 32 3A 43 |MP #9:BEQ LOO2:C|
000010E0: 4D 50 20 23 24 31 39 00 0B 19 60 04 42 45 51 20 |MP #$19...`.BEQ |
000010F0: 4C 4F 4F 31 3A AF 20 23 24 30 44 3A 43 4D 50 20 |LOO1:. #$0D:CMP |
00001100: 23 38 3A 42 45 51 20 4C 4F 4F 33 00 1D 19 6A 04 |#8:BEQ LOO3...j.|
00001110: AF 20 23 38 3A 42 45 51 20 4C 4F 4F 32 00 3C 19 |. #8:BEQ LOO2.<.|
00001120: 74 04 4C 4F 4F 31 20 49 4E 59 3A 4C 4F 4F 32 20 |t.LOO1 INY:LOO2 |
00001130: 49 4E 59 3A 4C 4F 4F 33 20 52 54 53 00 68 19 7E |INY:LOO3 RTS.h.~|
00001140: 04 44 49 53 41 53 20 53 54 59 20 4F 4C 44 59 3A |.DISAS STY OLDY:|
00001150: 53 54 58 20 4F 4C 44 58 3B 52 45 47 49 53 54 45 |STX OLDX;REGISTE|
00001160: 52 20 52 45 54 54 45 4E 00 AE 19 88 04 4C 44 58 |R RETTEN.....LDX|
00001170: 20 23 32 30 3A 4C 44 41 20 23 22 20 22 3A 43 4C | #20:LDA #" ":CL|
00001180: 45 31 20 53 54 41 20 53 43 52 45 45 4E AA 31 32 |E1 STA SCREEN.12|
00001190: 30 2C 58 3B 5A 45 49 4C 45 20 46 55 45 52 20 44 |0,X;ZEILE FUER D|
000011A0: 49 53 41 53 2E 20 4C 4F 45 53 43 48 45 4E 00 BF |ISAS. LOESCHEN..|
000011B0: 19 92 04 44 45 58 3A 42 4E 45 20 43 4C 45 31 00 |...DEX:BNE CLE1.|
000011C0: FA 19 9C 04 3B 50 43 20 4C AD 48 20 49 4E 20 54 |....;PC L.H IN T|
000011D0: 4D 50 AA 34 20 AD 20 54 4D 50 AA 33 3A 3B 42 45 |MP.4 . TMP.3:;BE|
000011E0: 4C 45 47 54 20 27 52 41 4D 27 20 50 4F B5 45 52 |LEGT 'RAM' PO.ER|
000011F0: 20 5A 55 4D 20 4C 45 53 45 4E 00 41 1A A6 04 4C | ZUM LESEN.A...L|
00001200: 44 41 20 54 4D 50 AA 34 3A 53 54 41 20 50 50 4F |DA TMP.4:STA PPO|
00001210: 49 4E 31 AA 31 3A 53 54 41 20 54 4D 50 AA 36 20 |IN1.1:STA TMP.6 |
00001220: 3A 4C 44 41 20 54 4D 50 AA 33 3A 53 54 41 20 50 |:LDA TMP.3:STA P|
00001230: 50 4F 49 4E 31 AA 32 3A 53 54 41 20 54 4D 50 AA |POIN1.2:STA TMP.|
00001240: 35 00 6F 1A B0 04 49 4E 43 20 54 4D 50 AA 36 3A |5.o...INC TMP.6:|
00001250: 4C 44 41 20 54 4D 50 AA 36 3A 53 54 41 20 50 50 |LDA TMP.6:STA PP|
00001260: 4F 49 4E 32 AA 31 3A 42 4E 45 20 4C 4F 4F 35 00 |OIN2.1:BNE LOO5.|
00001270: A3 1A BA 04 49 4E 43 20 54 4D 50 AA 35 3A 4C 4F |....INC TMP.5:LO|
00001280: 4F 35 20 4C 44 41 20 54 4D 50 AA 35 3A 53 54 41 |O5 LDA TMP.5:STA|
00001290: 20 50 50 4F 49 4E 32 AA 32 3A 49 4E 43 20 54 4D | PPOIN2.2:INC TM|
000012A0: 50 AA 36 00 C7 1A C4 04 4C 44 41 20 54 4D 50 AA |P.6.....LDA TMP.|
000012B0: 36 3A 53 54 41 20 50 50 4F 49 4E 33 AA 31 3A 42 |6:STA PPOIN3.1:B|
000012C0: 4E 45 20 4C 4F 4F 36 00 F1 1A CE 04 49 4E 43 20 |NE LOO6.....INC |
000012D0: 54 4D 50 AA 35 3A 4C 4F 4F 36 20 4C 44 41 20 54 |TMP.5:LOO6 LDA T|
000012E0: 4D 50 AA 35 3A 53 54 41 20 50 50 4F 49 4E 33 AA |MP.5:STA PPOIN3.|
000012F0: 32 00 1D 1B D8 04 50 50 4F 49 4E 31 20 4C 44 41 |2.....PPOIN1 LDA|
00001300: 20 24 43 30 30 30 3A 53 54 41 20 43 4F 44 31 3B | $C000:STA COD1;|
00001310: 4C 49 45 53 54 20 4F 50 43 4F 44 45 53 00 3B 1B |LIEST OPCODES.;.|
00001320: E2 04 50 50 4F 49 4E 32 20 4C 44 41 20 24 43 30 |..PPOIN2 LDA $C0|
00001330: 30 30 3A 53 54 41 20 43 4F 44 32 00 59 1B EC 04 |00:STA COD2.Y...|
00001340: 50 50 4F 49 4E 33 20 4C 44 41 20 24 43 30 30 30 |PPOIN3 LDA $C000|
00001350: 3A 53 54 41 20 43 4F 44 33 00 A1 1B F6 04 4C 44 |:STA COD3.....LD|
00001360: 41 20 43 4F 44 31 3A 4A 53 52 20 4C 41 45 4E 47 |A COD1:JSR LAENG|
00001370: 45 3A 54 59 41 3A 53 54 41 20 43 4F 44 45 4C 3A |E:TYA:STA CODEL:|
00001380: 54 41 58 3A 4C 44 59 20 23 31 32 30 3B 42 59 54 |TAX:LDY #120;BYT|
00001390: 45 53 20 41 42 20 50 43 20 41 55 53 47 45 42 45 |ES AB PC AUSGEBE|
000013A0: 4E 00 C7 1B 00 05 4C 44 41 20 43 4F 44 31 3A 4A |N.....LDA COD1:J|
000013B0: 53 52 20 50 52 42 59 54 45 3A 4A 53 52 20 53 50 |SR PRBYTE:JSR SP|
000013C0: 41 43 45 3A 44 45 58 00 F2 1B 0A 05 42 45 51 20 |ACE:DEX.....BEQ |
000013D0: 4C 4F 4F 37 3A 4C 44 41 20 43 4F 44 32 3A 4A 53 |LOO7:LDA COD2:JS|
000013E0: 52 20 50 52 42 59 54 45 3A 4A 53 52 20 53 50 41 |R PRBYTE:JSR SPA|
000013F0: 43 45 00 17 1C 14 05 44 45 58 3A 42 45 51 20 4C |CE.....DEX:BEQ L|
00001400: 4F 4F 37 3A 4C 44 41 20 43 4F 44 33 3A 4A 53 52 |OO7:LDA COD3:JSR|
00001410: 20 50 52 42 59 54 45 00 51 1C 1E 05 4C 4F 4F 37 | PRBYTE.Q...LOO7|
00001420: 20 4C 44 59 20 23 31 32 39 3A 4C 44 41 20 43 4F | LDY #129:LDA CO|
00001430: 44 31 3B 47 49 42 54 20 4F 50 43 4F 44 45 20 28 |D1;GIBT OPCODE (|
00001440: 33 20 42 55 43 48 53 54 41 42 45 4E 29 20 41 55 |3 BUCHSTABEN) AU|
00001450: 53 00 89 1C 28 05 43 4C 43 3A 4C 44 41 20 23 B1 |S...(.CLC:LDA #.|
00001460: 54 53 54 41 52 54 3A 53 54 41 20 54 4D 50 3A 4C |TSTART:STA TMP:L|
00001470: 44 41 20 43 4F 44 31 3A 41 44 43 20 43 4F 44 31 |DA COD1:ADC COD1|
00001480: 3A 42 43 43 20 4C 4F 4F 38 00 D5 1C 32 05 49 4E |:BCC LOO8...2.IN|
00001490: 43 20 54 4D 50 3A 4C 4F 4F 38 20 43 4C 43 3A 41 |C TMP:LOO8 CLC:A|
000014A0: 44 43 20 43 4F 44 31 3A 42 43 43 20 4C 4F 4F 39 |DC COD1:BCC LOO9|
000014B0: 3A 49 4E 43 20 54 4D 50 3A 4C 4F 4F 39 20 53 54 |:INC TMP:LOO9 ST|
000014C0: 41 20 4F 50 50 AA 31 3B 50 4F B5 45 52 20 42 45 |A OPP.1;PO.ER BE|
000014D0: 4C 45 47 45 4E 00 11 1D 3C 05 4C 44 41 20 54 4D |LEGEN...<.LDA TM|
000014E0: 50 3A 53 54 41 20 4F 50 50 AA 32 3A 4C 44 58 20 |P:STA OPP.2:LDX |
000014F0: 23 30 3A 4F 50 50 20 4C 44 41 20 24 43 30 30 30 |#0:OPP LDA $C000|
00001500: 2C 58 3A 4A 53 52 20 50 52 49 5A 45 49 3A 49 4E |,X:JSR PRIZEI:IN|
00001510: 58 00 2E 1D 46 05 43 50 58 20 23 33 3A 42 4E 45 |X...F.CPX #3:BNE|
00001520: 20 4F 50 50 3A 4A 53 52 20 53 50 41 43 45 00 55 | OPP:JSR SPACE.U|
00001530: 1D 50 05 4C 44 41 20 43 4F 44 45 4C 3A 43 4D 50 |.P.LDA CODEL:CMP|
00001540: 20 23 32 3A 42 50 4C 20 43 4F 44 45 32 3A 4A 4D | #2:BPL CODE2:JM|
00001550: 50 20 80 41 53 00 89 1D 5A 05 43 4F 44 45 32 20 |P .AS...Z.CODE2 |
00001560: 4C 44 58 20 43 4F 44 31 3A 4C 44 41 20 54 41 44 |LDX COD1:LDA TAD|
00001570: 52 2C 58 3B 41 44 52 45 53 53 2E 20 46 45 53 54 |R,X;ADRESS. FEST|
00001580: 53 54 45 4C C3 3A 54 41 58 00 A9 1D 64 05 3B 20 |STEL.:TAX...d.; |
00001590: 27 23 24 27 2C 27 24 27 20 4F 44 2E 27 28 24 27 |'#$','$' OD.'($'|
000015A0: 20 41 55 53 47 45 42 45 4E 00 D2 1D 6E 05 43 50 | AUSGEBEN...n.CP|
000015B0: 58 20 23 36 3A 42 4D 49 20 4C 4F 4F 31 30 3A 4C |X #6:BMI LOO10:L|
000015C0: 44 41 20 23 22 28 22 3A 4A 53 52 20 50 52 49 5A |DA #"(":JSR PRIZ|
000015D0: 45 49 00 F6 1D 78 05 4C 4F 4F 31 30 20 43 50 58 |EI...x.LOO10 CPX|
000015E0: 20 23 32 3A 42 4E 45 20 4C 4F 4F 31 31 3A 4C 44 | #2:BNE LOO11:LD|
000015F0: 41 20 23 22 23 22 00 1F 1E 82 05 4A 53 52 20 50 |A #"#".....JSR P|
00001600: 52 49 5A 45 49 3A 4C 4F 4F 31 31 20 4C 44 41 20 |RIZEI:LOO11 LDA |
00001610: 23 22 24 22 3A 4A 53 52 20 50 52 49 5A 45 49 00 |#"$":JSR PRIZEI.|
00001620: 47 1E 8C 05 43 50 58 20 23 31 3A 42 50 4C 20 4C |G...CPX #1:BPL L|
00001630: 4F 4F 31 32 3A 4A 53 52 20 4F 46 46 53 45 54 3A |OO12:JSR OFFSET:|
00001640: 4A 4D 50 20 80 41 53 00 7D 1E 96 05 4C 4F 4F 31 |JMP .AS.}...LOO1|
00001650: 32 20 4C 44 41 20 43 4F 44 45 4C 3B 4F 50 45 52 |2 LDA CODEL;OPER|
00001660: AF 45 4E 20 41 55 53 47 45 42 45 4E 3A 43 4D 50 |.EN AUSGEBEN:CMP|
00001670: 20 23 33 3A 42 45 51 20 43 4F 44 4C 33 00 9F 1E | #3:BEQ CODL3...|
00001680: A0 05 4C 44 41 20 43 4F 44 32 3A 4A 53 52 20 50 |..LDA COD2:JSR P|
00001690: 52 42 59 54 45 3A 4A 4D 50 20 4C 4F 4F 31 33 00 |RBYTE:JMP LOO13.|
000016A0: D1 1E AA 05 43 4F 44 4C 33 20 4C 44 41 20 43 4F |....CODL3 LDA CO|
000016B0: 44 33 3A 4A 53 52 20 50 52 42 59 54 45 3A 4C 44 |D3:JSR PRBYTE:LD|
000016C0: 41 20 43 4F 44 32 3A 4A 53 52 20 50 52 42 59 54 |A COD2:JSR PRBYT|
000016D0: 45 00 EA 1E B4 05 4C 4F 4F 31 33 20 43 50 58 20 |E.....LOO13 CPX |
000016E0: 23 34 3A 42 4D 49 20 80 41 53 00 17 1F BE 05 3B |#4:BMI .AS.....;|
000016F0: 20 27 2C 58 27 2C 27 2C 59 27 2C 27 2C 58 29 27 | ',X',',Y',',X)'|
00001700: 2C 27 29 2C 59 27 20 4F 44 2E 20 27 29 27 20 41 |,'),Y' OD. ')' A|
00001710: 55 53 47 45 42 45 4E 00 39 1F C8 05 42 4E 45 20 |USGEBEN.9...BNE |
00001720: 4C 4F 4F 31 34 3A 4C 44 41 20 23 22 2C 22 3A 4A |LOO14:LDA #",":J|
00001730: 53 52 20 50 52 49 5A 45 49 00 59 1F D2 05 4C 44 |SR PRIZEI.Y...LD|
00001740: 41 20 23 22 58 22 3A 4A 53 52 20 50 52 49 5A 45 |A #"X":JSR PRIZE|
00001750: 49 3A 4A 4D 50 20 80 41 53 00 74 1F DC 05 4C 4F |I:JMP .AS.t...LO|
00001760: 4F 31 34 20 43 50 58 20 23 35 3A 42 4E 45 20 4C |O14 CPX #5:BNE L|
00001770: 4F 4F 31 35 00 A8 1F E6 05 4C 44 41 20 23 22 2C |OO15.....LDA #",|
00001780: 22 3A 4A 53 52 20 50 52 49 5A 45 49 3A 4C 44 41 |":JSR PRIZEI:LDA|
00001790: 20 23 22 59 22 3A 4A 53 52 20 50 52 49 5A 45 49 | #"Y":JSR PRIZEI|
000017A0: 3A 4A 4D 50 20 80 41 53 00 D7 1F F0 05 4C 4F 4F |:JMP .AS.....LOO|
000017B0: 31 35 20 43 50 58 20 23 36 3A 42 4E 45 20 4C 4F |15 CPX #6:BNE LO|
000017C0: 4F 31 36 3A 4C 44 41 20 23 22 2C 22 3A 4A 53 52 |O16:LDA #",":JSR|
000017D0: 20 50 52 49 5A 45 49 00 0B 20 FA 05 4C 44 41 20 | PRIZEI.. ..LDA |
000017E0: 23 22 58 22 3A 4A 53 52 20 50 52 49 5A 45 49 3A |#"X":JSR PRIZEI:|
000017F0: 4C 44 41 20 23 22 29 22 3A 4A 53 52 20 50 52 49 |LDA #")":JSR PRI|
00001800: 5A 45 49 3A 4A 4D 50 20 80 41 53 00 29 20 04 06 |ZEI:JMP .AS.) ..|
00001810: 4C 4F 4F 31 36 20 4C 44 41 20 23 22 29 22 3A 4A |LOO16 LDA #")":J|
00001820: 53 52 20 50 52 49 5A 45 49 00 50 20 0E 06 43 50 |SR PRIZEI.P ..CP|
00001830: 58 20 23 38 3A 42 45 51 20 80 41 53 3A 4C 44 41 |X #8:BEQ .AS:LDA|
00001840: 20 23 22 2C 22 3A 4A 53 52 20 50 52 49 5A 45 49 | #",":JSR PRIZEI|
00001850: 00 68 20 18 06 4C 44 41 20 23 22 59 22 3A 4A 53 |.h ..LDA #"Y":JS|
00001860: 52 20 50 52 49 5A 45 49 00 98 20 22 06 80 41 53 |R PRIZEI.. "..AS|
00001870: 20 4C 44 59 20 4F 4C 44 59 3B 52 45 47 2E 20 48 | LDY OLDY;REG. H|
00001880: 4F C3 3A 4C 44 58 20 4F 4C 44 58 3A 52 54 53 3B |O.:LDX OLDX:RTS;|
00001890: 80 45 20 44 49 53 41 53 00 D8 20 2C 06 87 50 43 |.E DISAS.. ,..PC|
000018A0: 20 4C 44 59 20 23 31 32 30 3A 4A 53 52 20 53 54 | LDY #120:JSR ST|
000018B0: 41 52 54 3B 44 49 53 2E 5A 45 49 4C 45 20 45 44 |ART;DIS.ZEILE ED|
000018C0: 49 54 2E 3A 4A 53 52 20 52 45 56 45 52 53 45 3A |IT.:JSR REVERSE:|
000018D0: 4C 44 59 20 23 31 32 30 00 FE 20 36 06 3B 4C 49 |LDY #120.. 6.;LI|
000018E0: 45 53 54 20 42 59 54 45 53 20 55 4E 44 20 53 50 |EST BYTES UND SP|
000018F0: 45 49 43 48 45 52 54 20 49 4E 20 52 41 4D 00 23 |EICHERT IN RAM.#|
00001900: 21 40 06 4A 53 52 20 42 59 54 3A 53 54 41 20 43 |!@.JSR BYT:STA C|
00001910: 4F 44 31 3A 49 4E 59 3A 49 4E 59 3A 4A 53 52 20 |OD1:INY:INY:JSR |
00001920: 42 59 54 00 49 21 4A 06 53 54 41 20 43 4F 44 32 |BYT.I!J.STA COD2|
00001930: 3A 49 4E 59 3A 49 4E 59 3A 4A 53 52 20 42 59 54 |:INY:INY:JSR BYT|
00001940: 3A 53 54 41 20 43 4F 44 33 00 61 21 54 06 4C 44 |:STA COD3.a!T.LD|
00001950: 41 20 54 4D 50 AA 34 3A 53 54 41 20 50 87 31 AA |A TMP.4:STA P.1.|
00001960: 31 00 90 21 5E 06 4C 44 41 20 54 4D 50 AA 33 3A |1..!^.LDA TMP.3:|
00001970: 53 54 41 20 50 87 31 AA 32 3A 4C 44 41 20 43 4F |STA P.1.2:LDA CO|
00001980: 44 31 3A 50 87 31 20 53 54 41 20 24 43 30 30 30 |D1:P.1 STA $C000|
00001990: 00 AC 21 68 06 4C 44 59 20 43 4F 44 45 4C 3A 43 |..!h.LDY CODEL:C|
000019A0: 50 59 20 23 32 3A 42 4D 49 20 45 87 00 CF 21 72 |PY #2:BMI E...!r|
000019B0: 06 4C 44 41 20 54 4D 50 AA 34 3A 43 4C 43 3A 41 |.LDA TMP.4:CLC:A|
000019C0: 44 43 20 23 31 3A 53 54 41 20 50 87 32 AA 31 00 |DC #1:STA P.2.1.|
000019D0: EE 21 7C 06 4C 44 41 20 54 4D 50 AA 33 3A 41 44 |.!|.LDA TMP.3:AD|
000019E0: 43 20 23 30 3A 53 54 41 20 50 87 32 AA 32 00 09 |C #0:STA P.2.2..|
000019F0: 22 86 06 4C 44 41 20 43 4F 44 32 3A 50 87 32 20 |"..LDA COD2:P.2 |
00001A00: 53 54 41 20 24 43 30 30 30 00 1B 22 90 06 43 50 |STA $C000.."..CP|
00001A10: 59 20 23 33 3A 42 4D 49 20 45 87 00 3E 22 9A 06 |Y #3:BMI E..>"..|
00001A20: 4C 44 41 20 54 4D 50 AA 34 3A 43 4C 43 3A 41 44 |LDA TMP.4:CLC:AD|
00001A30: 43 20 23 32 3A 53 54 41 20 50 87 33 AA 31 00 5D |C #2:STA P.3.1.]|
00001A40: 22 A4 06 4C 44 41 20 54 4D 50 AA 33 3A 41 44 43 |"..LDA TMP.3:ADC|
00001A50: 20 23 30 3A 53 54 41 20 50 87 33 AA 32 00 78 22 | #0:STA P.3.2.x"|
00001A60: AE 06 4C 44 41 20 43 4F 44 33 3A 50 87 33 20 53 |..LDA COD3:P.3 S|
00001A70: 54 41 20 24 43 30 30 30 00 9E 22 B8 06 45 87 20 |TA $C000.."..E. |
00001A80: 52 54 53 3B 41 4C 4C 45 20 42 59 54 45 53 20 47 |RTS;ALLE BYTES G|
00001A90: 45 4C 45 53 45 4E 2E 20 80 45 20 87 50 43 00 D5 |ELESEN. .E .PC..|
00001AA0: 22 C2 06 54 45 58 54 20 2E C6 20 22 20 50 43 20 |"..TEXT .. " PC |
00001AB0: 20 53 50 20 59 52 20 58 52 20 41 43 20 4E 56 2D | SP YR XR AC NV-|
00001AC0: 42 44 49 5A 43 20 37 36 35 34 33 32 31 30 20 20 |BDIZC 76543210 |
00001AD0: 20 20 20 20 22 00 F3 22 CC 06 48 45 58 20 2E C6 | ".."..HEX ..|
00001AE0: 20 22 30 31 32 33 34 35 36 37 38 39 41 42 43 44 | "0123456789ABCD|
00001AF0: 45 46 22 00 1D 23 D6 06 54 4D 50 20 2E 42 59 54 |EF"..#..TMP .BYT|
00001B00: 20 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 3B 41 | 0,0,0,0,0,0,0;A|
00001B10: 52 42 45 49 54 53 56 41 52 49 41 42 C3 00 2D 23 |RBEITSVARIAB..-#|
00001B20: E0 06 54 4D 50 31 20 2E 42 59 54 20 30 00 3D 23 |..TMP1 .BYT 0.=#|
00001B30: EA 06 4F 4C 44 59 20 2E 42 59 54 20 30 00 4D 23 |..OLDY .BYT 0.M#|
00001B40: F4 06 4F 4C 44 58 20 2E 42 59 54 20 30 00 75 23 |..OLDX .BYT 0.u#|
00001B50: FE 06 43 4F 44 31 20 2E 42 59 54 20 30 3A 43 4F |..COD1 .BYT 0:CO|
00001B60: 44 32 20 2E 42 59 54 20 30 3A 43 4F 44 33 20 2E |D2 .BYT 0:COD3 .|
00001B70: 42 59 54 20 30 00 92 23 08 07 43 4F 44 45 4C 20 |BYT 0..#..CODEL |
00001B80: 2E 42 59 54 20 30 3A 44 49 53 91 20 2E 42 59 54 |.BYT 0:DIS. .BYT|
00001B90: 20 30 00 C9 23 12 07 AC B2 54 53 54 41 52 54 3A | 0..#....TSTART:|
00001BA0: 3B 54 41 42 2E 20 4F 50 43 4F 44 45 53 20 28 4C |;TAB. OPCODES (L|
00001BB0: AB 42 59 54 45 20 54 53 54 41 52 54 20 4D 55 53 |.BYTE TSTART MUS|
00001BC0: 53 20 30 20 53 45 49 4E 29 00 F4 23 1C 07 2E C6 |S 0 SEIN)..#....|
00001BD0: 20 22 42 52 4B 4F 52 41 3F 3F 3F 3F 3F 3F 3F 3F | "BRKORA????????|
00001BE0: 3F 4F 52 41 41 53 4C 3F 3F 3F 50 48 50 4F 52 41 |?ORAASL???PHPORA|
00001BF0: 41 53 4C 22 00 19 24 26 07 2E C6 20 22 3F 3F 3F |ASL"..$&... "???|
00001C00: 3F 3F 3F 4F 52 41 41 53 4C 3F 3F 3F 42 50 4C 4F |???ORAASL???BPLO|
00001C10: 52 41 3F 3F 3F 3F 3F 3F 22 00 3E 24 30 07 2E C6 |RA??????".>$0...|
00001C20: 20 22 3F 3F 3F 4F 52 41 41 53 4C 3F 3F 3F 43 4C | "???ORAASL???CL|
00001C30: 43 4F 52 41 3F 3F 3F 3F 3F 3F 3F 3F 3F 22 00 63 |CORA?????????".c|
00001C40: 24 3A 07 2E C6 20 22 4F 52 41 41 53 4C 3F 3F 3F |$:... "ORAASL???|
00001C50: 4A 53 52 41 4E 44 3F 3F 3F 3F 3F 3F 42 49 54 41 |JSRAND??????BITA|
00001C60: 4E 44 22 00 88 24 44 07 2E C6 20 22 52 4F 4C 3F |ND"..$D... "ROL?|
00001C70: 3F 3F 50 4C 50 41 4E 44 52 4F 4C 3F 3F 3F 42 49 |??PLPANDROL???BI|
00001C80: 54 41 4E 44 52 4F 4C 22 00 AD 24 4E 07 2E C6 20 |TANDROL"..$N... |
00001C90: 22 3F 3F 3F 42 4D 49 41 4E 44 3F 3F 3F 3F 3F 3F |"???BMIAND??????|
00001CA0: 3F 3F 3F 41 4E 44 52 4F 4C 3F 3F 3F 22 00 D2 24 |???ANDROL???"..$|
00001CB0: 58 07 2E C6 20 22 53 45 43 41 4E 44 3F 3F 3F 3F |X... "SECAND????|
00001CC0: 3F 3F 3F 3F 3F 41 4E 44 52 4F 4C 3F 3F 3F 52 54 |?????ANDROL???RT|
00001CD0: 49 22 00 F7 24 62 07 2E C6 20 22 45 4F 52 3F 3F |I"..$b... "EOR??|
00001CE0: 3F 3F 3F 3F 3F 3F 3F 45 4F 52 4C 53 52 3F 3F 3F |???????EORLSR???|
00001CF0: 50 48 41 45 4F 52 22 00 1C 25 6C 07 2E C6 20 22 |PHAEOR"..%l... "|
00001D00: 4C 53 52 3F 3F 3F 4A 4D 50 45 4F 52 4C 53 52 3F |LSR???JMPEORLSR?|
00001D10: 3F 3F 42 56 43 45 4F 52 3F 3F 3F 22 00 41 25 76 |??BVCEOR???".A%v|
00001D20: 07 2E C6 20 22 3F 3F 3F 3F 3F 3F 45 4F 52 4C 53 |... "??????EORLS|
00001D30: 52 3F 3F 3F 43 4C 49 45 4F 52 3F 3F 3F 3F 3F 3F |R???CLIEOR??????|
00001D40: 22 00 66 25 80 07 2E C6 20 22 3F 3F 3F 45 4F 52 |".f%.... "???EOR|
00001D50: 4C 53 52 3F 3F 3F 52 54 53 41 44 43 3F 3F 3F 3F |LSR???RTSADC????|
00001D60: 3F 3F 3F 3F 3F 22 00 8B 25 8A 07 2E C6 20 22 41 |?????"..%.... "A|
00001D70: 44 43 52 4F 52 3F 3F 3F 50 4C 41 41 44 43 52 4F |DCROR???PLAADCRO|
00001D80: 52 3F 3F 3F 4A 4D 50 41 44 43 22 00 B0 25 94 07 |R???JMPADC"..%..|
00001D90: 2E C6 20 22 52 4F 52 3F 3F 3F 42 56 53 41 44 43 |.. "ROR???BVSADC|
00001DA0: 3F 3F 3F 3F 3F 3F 3F 3F 3F 41 44 43 52 4F 52 22 |?????????ADCROR"|
00001DB0: 00 D5 25 9E 07 2E C6 20 22 3F 3F 3F 53 45 49 41 |..%.... "???SEIA|
00001DC0: 44 43 3F 3F 3F 3F 3F 3F 3F 3F 3F 41 44 43 52 4F |DC?????????ADCRO|
00001DD0: 52 3F 3F 3F 22 00 FA 25 A8 07 2E C6 20 22 3F 3F |R???"..%.... "??|
00001DE0: 3F 53 54 41 3F 3F 3F 3F 3F 3F 53 54 59 53 54 41 |?STA??????STYSTA|
00001DF0: 53 54 58 3F 3F 3F 44 45 59 22 00 1F 26 B2 07 2E |STX???DEY"..&...|
00001E00: C6 20 22 3F 3F 3F 54 58 41 3F 3F 3F 53 54 59 53 |. "???TXA???STYS|
00001E10: 54 41 53 54 58 3F 3F 3F 42 43 43 53 54 41 22 00 |TASTX???BCCSTA".|
00001E20: 44 26 BC 07 2E C6 20 22 3F 3F 3F 3F 3F 3F 53 54 |D&.... "??????ST|
00001E30: 59 53 54 41 53 54 58 3F 3F 3F 54 59 41 53 54 41 |YSTASTX???TYASTA|
00001E40: 54 58 53 22 00 69 26 C6 07 2E C6 20 22 3F 3F 3F |TXS".i&.... "???|
00001E50: 3F 3F 3F 53 54 41 3F 3F 3F 3F 3F 3F 4C 44 59 4C |???STA??????LDYL|
00001E60: 44 41 4C 44 58 3F 3F 3F 22 00 8E 26 D0 07 2E C6 |DALDX???"..&....|
00001E70: 20 22 4C 44 59 4C 44 41 4C 44 58 3F 3F 3F 54 41 | "LDYLDALDX???TA|
00001E80: 59 4C 44 41 54 41 58 3F 3F 3F 4C 44 59 22 00 B3 |YLDATAX???LDY"..|
00001E90: 26 DA 07 2E C6 20 22 4C 44 41 4C 44 58 3F 3F 3F |&.... "LDALDX???|
00001EA0: 42 43 53 4C 44 41 3F 3F 3F 3F 3F 3F 4C 44 59 4C |BCSLDA??????LDYL|
00001EB0: 44 41 22 00 D8 26 E4 07 2E C6 20 22 4C 44 58 3F |DA"..&.... "LDX?|
00001EC0: 3F 3F 43 4C 56 4C 44 41 54 53 58 3F 3F 3F 4C 44 |??CLVLDATSX???LD|
00001ED0: 59 4C 44 41 4C 44 58 22 00 FD 26 EE 07 2E C6 20 |YLDALDX"..&.... |
00001EE0: 22 3F 3F 3F 43 50 59 43 4D 50 3F 3F 3F 3F 3F 3F |"???CPYCMP??????|
00001EF0: 43 50 59 43 4D 50 44 45 43 3F 3F 3F 22 00 22 27 |CPYCMPDEC???"."'|
00001F00: F8 07 2E C6 20 22 49 4E 59 43 4D 50 44 45 58 3F |.... "INYCMPDEX?|
00001F10: 3F 3F 43 50 59 43 4D 50 44 45 43 3F 3F 3F 42 4E |??CPYCMPDEC???BN|
00001F20: 45 22 00 47 27 02 08 2E C6 20 22 43 4D 50 3F 3F |E".G'.... "CMP??|
00001F30: 3F 3F 3F 3F 3F 3F 3F 43 4D 50 44 45 43 3F 3F 3F |???????CMPDEC???|
00001F40: 43 4C 44 43 4D 50 22 00 6C 27 0C 08 2E C6 20 22 |CLDCMP".l'.... "|
00001F50: 3F 3F 3F 3F 3F 3F 3F 3F 3F 43 4D 50 44 45 43 3F |?????????CMPDEC?|
00001F60: 3F 3F 43 50 58 53 42 43 3F 3F 3F 22 00 91 27 16 |??CPXSBC???"..'.|
00001F70: 08 2E C6 20 22 3F 3F 3F 43 50 58 53 42 43 49 4E |... "???CPXSBCIN|
00001F80: 43 3F 3F 3F 49 4E 58 53 42 43 4E 4F 50 3F 3F 3F |C???INXSBCNOP???|
00001F90: 22 00 B6 27 20 08 2E C6 20 22 43 50 58 53 42 43 |"..' ... "CPXSBC|
00001FA0: 49 4E 43 3F 3F 3F 42 45 51 53 42 43 3F 3F 3F 3F |INC???BEQSBC????|
00001FB0: 3F 3F 3F 3F 3F 22 00 DB 27 2A 08 2E C6 20 22 53 |?????"..'*... "S|
00001FC0: 42 43 49 4E 43 3F 3F 3F 53 45 44 53 42 43 3F 3F |BCINC???SEDSBC??|
00001FD0: 3F 3F 3F 3F 3F 3F 3F 53 42 43 22 00 EB 27 34 08 |???????SBC"..'4.|
00001FE0: 2E C6 20 22 49 4E 43 3F 3F 3F 22 00 26 28 3E 08 |.. "INC???".&(>.|
00001FF0: 3B 54 41 42 45 4C 4C 45 20 41 44 52 45 53 53 49 |;TABELLE ADRESSI|
00002000: 45 8A 47 20 28 4B 45 49 4E 45 20 53 C0 44 41 52 |E.G (KEINE S.DAR|
00002010: 44 57 45 52 54 45 20 4E 55 52 20 46 55 45 52 20 |DWERTE NUR FUER |
00002020: 44 49 53 41 53 29 00 4C 28 48 08 54 41 44 52 20 |DISAS).L(H.TADR |
00002030: 2E 42 59 54 20 31 2C 36 2C 31 2C 31 2C 31 2C 33 |.BYT 1,6,1,1,1,3|
00002040: 2C 33 2C 31 2C 31 2C 32 2C 31 2C 31 00 71 28 52 |,3,1,1,2,1,1.q(R|
00002050: 08 2E 42 59 54 20 31 2C 33 2C 33 2C 31 2C 30 2C |..BYT 1,3,3,1,0,|
00002060: 37 2C 31 2C 31 2C 31 2C 34 2C 34 2C 31 2C 31 2C |7,1,1,1,4,4,1,1,|
00002070: 35 00 96 28 5C 08 2E 42 59 54 20 31 2C 31 2C 31 |5..(\..BYT 1,1,1|
00002080: 2C 34 2C 34 2C 31 2C 33 2C 36 2C 31 2C 31 2C 33 |,4,4,1,3,6,1,1,3|
00002090: 2C 33 2C 33 2C 31 00 BB 28 66 08 2E 42 59 54 20 |,3,3,1..(f..BYT |
000020A0: 31 2C 32 2C 31 2C 31 2C 33 2C 33 2C 33 2C 31 2C |1,2,1,1,3,3,3,1,|
000020B0: 30 2C 37 2C 31 2C 31 2C 31 2C 34 00 E0 28 70 08 |0,7,1,1,1,4..(p.|
000020C0: 2E 42 59 54 20 34 2C 31 2C 31 2C 35 2C 31 2C 31 |.BYT 4,1,1,5,1,1|
000020D0: 2C 31 2C 34 2C 34 2C 31 2C 31 2C 36 2C 31 2C 31 |,1,4,4,1,1,6,1,1|
000020E0: 00 05 29 7A 08 2E 42 59 54 20 31 2C 33 2C 33 2C |..)z..BYT 1,3,3,|
000020F0: 31 2C 31 2C 32 2C 31 2C 31 2C 33 2C 33 2C 33 2C |1,1,2,1,1,3,3,3,|
00002100: 31 2C 30 2C 37 00 2A 29 84 08 2E 42 59 54 20 31 |1,0,7.*)...BYT 1|
00002110: 2C 31 2C 31 2C 34 2C 34 2C 31 2C 31 2C 35 2C 31 |,1,1,4,4,1,1,5,1|
00002120: 2C 31 2C 31 2C 34 2C 34 2C 31 00 4F 29 8E 08 2E |,1,1,4,4,1.O)...|
00002130: 42 59 54 20 31 2C 36 2C 31 2C 31 2C 31 2C 33 2C |BYT 1,6,1,1,1,3,|
00002140: 33 2C 31 2C 31 2C 32 2C 31 2C 31 2C 38 2C 33 00 |3,1,1,2,1,1,8,3.|
00002150: 76 29 98 08 2E 42 59 54 20 33 2C 31 2C 30 2C 37 |v)...BYT 3,1,0,7|
00002160: 2C 31 2C 31 2C 31 2C 34 2C 34 2C 31 2C 31 2C 35 |,1,1,1,4,4,1,1,5|
00002170: 2C 31 2C 31 2C 31 00 9B 29 A2 08 2E 42 59 54 20 |,1,1,1..)...BYT |
00002180: 34 2C 34 2C 31 2C 31 2C 36 2C 31 2C 31 2C 33 2C |4,4,1,1,6,1,1,3,|
00002190: 33 2C 33 2C 31 2C 31 2C 31 2C 31 00 C0 29 AC 08 |3,3,1,1,1,1..)..|
000021A0: 2E 42 59 54 20 31 2C 33 2C 33 2C 33 2C 31 2C 30 |.BYT 1,3,3,3,1,0|
000021B0: 2C 37 2C 31 2C 31 2C 34 2C 34 2C 35 2C 31 2C 31 |,7,1,1,4,4,5,1,1|
000021C0: 00 E5 29 B6 08 2E 42 59 54 20 35 2C 31 2C 31 2C |..)...BYT 5,1,1,|
000021D0: 31 2C 34 2C 31 2C 31 2C 32 2C 36 2C 32 2C 31 2C |1,4,1,1,2,6,2,1,|
000021E0: 33 2C 33 2C 33 00 0A 2A C0 08 2E 42 59 54 20 31 |3,3,3..*...BYT 1|
000021F0: 2C 31 2C 32 2C 31 2C 31 2C 33 2C 33 2C 33 2C 31 |,1,2,1,1,3,3,3,1|
00002200: 2C 30 2C 37 2C 31 2C 31 2C 34 00 2F 2A CA 08 2E |,0,7,1,1,4./*...|
00002210: 42 59 54 20 34 2C 35 2C 31 2C 31 2C 35 2C 31 2C |BYT 4,5,1,1,5,1,|
00002220: 31 2C 34 2C 34 2C 35 2C 31 2C 32 2C 36 2C 31 00 |1,4,4,5,1,2,6,1.|
00002230: 54 2A D4 08 2E 42 59 54 20 31 2C 33 2C 33 2C 33 |T*...BYT 1,3,3,3|
00002240: 2C 31 2C 31 2C 32 2C 31 2C 31 2C 33 2C 33 2C 33 |,1,1,2,1,1,3,3,3|
00002250: 2C 31 2C 30 00 79 2A DE 08 2E 42 59 54 20 37 2C |,1,0.y*...BYT 7,|
00002260: 31 2C 31 2C 31 2C 34 2C 34 2C 31 2C 31 2C 35 2C |1,1,1,4,4,1,1,5,|
00002270: 31 2C 31 2C 31 2C 34 2C 34 00 9E 2A E8 08 2E 42 |1,1,1,4,4..*...B|
00002280: 59 54 20 31 2C 32 2C 36 2C 31 2C 31 2C 33 2C 33 |YT 1,2,6,1,1,3,3|
00002290: 2C 33 2C 31 2C 31 2C 32 2C 31 2C 31 2C 33 00 C3 |,3,1,1,2,1,1,3..|
000022A0: 2A F2 08 2E 42 59 54 20 33 2C 33 2C 31 2C 30 2C |*...BYT 3,3,1,0,|
000022B0: 37 2C 31 2C 31 2C 31 2C 34 2C 34 2C 31 2C 31 2C |7,1,1,1,4,4,1,1,|
000022C0: 35 2C 31 00 D6 2A FC 08 2E 42 59 54 20 31 2C 31 |5,1..*...BYT 1,1|
000022D0: 2C 34 2C 34 2C 31 00 DD 2A 06 09 2E 80 00 E3 2A |,4,4,1..*......*|
000022E0: 10 09 80 00 FC 2A 1A 09 85 41 3A 99 C2 28 41 AA |.....*...A:..(A.|
000022F0: 35 31 34 35 36 29 3A 89 32 33 33 30 00 00 00 43 |51456):.2330...C|
....P..1,4...Z..9.4096.".D...49152.Q.N.;
:;:;TRACE . .GLE . FUER C64 9.8
4.Q.X.;:; .DISASSEMBLER . EDI.R.B...;:
; JUERGEN KEBEL:;:; 8 MUENCH
EN 82:;:; GROSCHENWEG 19:;:;.....;
:; TEL. 089 . 432709:;:;......OPT O
O,P.(. .IRQVEK .$314:STACK .$100:COL .55
296;H.ERG.DFARBE.E...SCREEN .1024:.Y .$A
474.1.....CIA .$DC00:TL .CIA.6;TIMERWERT
E:TH .CIA.7:TAST .$EA87;TASTATURROUT....
..DDRB .$DD03.W.H.ICR .CIA.13;.ERR..ROLR
EG.:CRB .CIA.15:TSTART ...$0500...R.NOP:
LDA #0:STA DIS.:BEQ K.....LDA #255:STA D
IS..6...K SEI:LDA #.TRACE:STA IRQVEK;IRQ
VEK.R.]...LDA #.TRACE:STA IRQVEK.1;AUF
TRACE.....LDA #130:STA ICR;TIMER B .ERRU
PT ERLAUBT:LDX #255:TXS;STACK INITIAL...
...LDA #..Y;STACK FUER TRACE:PHA;V.BEREI
TEN:LDA #..Y:PHA.....LDA #$C0;PC.$C000:P
HA:LDA #0:PHA.(...LDA #32:PHA:LDA #0:PHA
:PHA:PHA.X.".TRACE CLD:LDY #0:TITEL LDA
TEXT,Y;KOPFZEILE...,.JSR PRIZEI;AUSGEBEN
:CPY #40:BNE TITEL...6.TSX:LDA STACK.6,X
;PC AUSGEBEN:STA TMP.3:JSR PRBYTE...@.LD
A STACK.5,X:STA TMP.4:JSR PRBYTE...J.LDA
DIS.:BMI DISOFF.'.T.JSR DISAS:DISOFF JS
R SPACE:TXA;SP AUSGEBEN.6.^.JSR PRBYTE.F
.H.REGISTER JSR SPACE:LDA STACK.1,X:JSR
PRBYTE...R.INX:CPY #56:BCC REGISTER:JSR
SPACE...|.LDA STACK.1,X;PROZESS.STATUS.F
LAGS ANZEIGEN.H...LDX #8......1 ASL:PHA:
LDA #94;PFEIL:BCS FLSETZ.....LDA #45;MIN
US:FLSETZ JSR PRIZEI:PLA.I...DEX:BNE .1:
JSR SPACE:LDX #8;USERP.T ANZEIGEN.X...LD
A DDRB.2.Z....2 ASL:PHA:LDA #$31:BCS USE
TZ...B.LDA #$30:USETZ JSR PRIZEI:PLA.X.L
.DEX:BNE .2:LDX #8;DATENRICHTUNGSREGISTE
R:LDA DDRB;LADEN...V..3 ASL SCREEN.65,X:
LSR;ENTSPRECH.E BITS DER ANZEIGE.@...R.
SCREEN.65,X;WERDEN INVERTIERT:DEX:BNE .3
.{.... JSR .;WARTET AUF:CMP #23;F1,F3,F5
,F7 ODER X:BEQ EXIT.....CMP #5:BEQ FAST;
UND VERZWEIGT ENTSPRECH......CMP #6:BEQ
SLOW.....CMP #3:BEQ .L:CMP #4:BNE ......
JMP SET.$....L JSR .;WARTET BIS F7 WIEDE
R LOSGELASSEN:CMP #64:BNE .L.=.&.FAST LD
A #$16:STA TL...0.LDA #0;TIMER LADEN:STA
TH:LDA #17:STA CRB;UND STARTEN:LDA $DC0
D;.E IRQ...:.PLA:TAY:PLA:TAX...D.PLA:RTI
.Q.N.SLOW LDX #0:.4 DEX:BNE .4:DEY:BNE .
4...X.BEQ FAST.&.B.EXIT LDA #2;X TASTE:S
TA ICR:LDA #$31:STA IRQVEK;SETZT IRQ VEK
.R AUF.R.L.LDA #$EA;ALTEN WERT:STA IRQVE
K.1:LDA #4:STA $028B:LDA #16;REPEAT K.RI
G....V.STA $028C:CLI:JMP .Y.1;SP.G ZU BA
SIC.....PRBYTE PHA;1 BYTE ALS 2 HEXZ. AU
F SCHIRM:STX TMP:LSR:LSR:LSR:LSR.....TAX
:LDA HEX,X:JSR PRIZEI."...PLA:. #$0F:TAX
:LDA HEX,X:LDX TMP.1...JMP PRIZEI.D...SP
ACE LDA #$20.K...PRIZEI . #$3F;WEGEN BIL
DSCHIRMCODE.....STA SCREEN,Y:LDA #1;FARB
E SETZEN:STA COL,Y:INY:RTS.M.F.. JSR TAS
T;HOLT TASTENCODE:LDA $CB:RTS...P.SET JS
R DISAS:LDY #40;F1 TASTE.$.Z.START LDA S
CREEN,Y:.A #128:STA SCREEN,Y:STY TMP.\..
.JSR ZEICHHOL;EINGABEROUT.:LDY TMP:CMP #
13:BNE LINKS.....CPY #100:BPL M.:JMP .:M
. RTS;ZUR LESEROUTINE.....REVERSE LDA SC
REEN,Y;INVERTIEREN.N.... #127:STA SCREEN
,Y:RTS.....LINKS CMP #17;CURS. LINKS:BNE
RECHTS:JSR REVERSE:DEY:BNE START.R...RE
CHTS CMP #29;CURS. RECHTS:BNE .6:JSR REV
ERSE:INY:BNE START... ..6 JSR PRIZEI;WER
T ANZEIGEN:BNE START:ZEICHHOL LDA #0;TAS
T.ABFRAGE...*.STA $C6:JSR TAST:LDA $277.
..4.CMP #0:BEQ ZEICHHOL:LDY #0:STY $277;
TASTATURPUFFERSTART...>.CMP #$85;F1 TAST
E:BEQ ZEICHHOL.Q.H.LDY #64;VERZOEGE.G RE
PEATZAEHLER:STY $28B:STY $28C:RTS...R..
JSR REVERSE:LDY #40;PC LESEN:TSX:JSR BYT
:STA STACK.6,X...\.STA TMP.3:INY:JSR BYT
...F.STA STACK.5,X:STA TMP.4:INY:INY;SP
UEBERLESEN:INY:INY...P.LOOP INY;REGISTER
LESEN:JSR BYT:STA STACK.1,X:INY:INX.1.Z
.CPY #56:BNE LOOP.T...INY:LDA #0:STA TMP
:LOOP1 LDA SCREEN,Y;FLAGS LESEN:. #%0001
1111.....CMP #30:ROL TMP.K...INY:CPY #65
:BNE LOOP1:TSX:LDA TMP:. #%11111011;I FL
AG LOESCHEN.....STA STACK.4,X:JSR DISAS:
JSR .PC:JSR DISAS:JMP ..E...BYT JSR LBIT
;8 BIT ZAHL V. SCREEN HOC:ASL:ASL:ASL:AS
L:INY:STA TMP.B...JSR LBIT:CLC:ADC TMP:R
TS.....LBIT LDA SCREEN,Y;1 BYTE V. SCREE
N IN HEX:CMP #48:BCS ZAHL:ADC #57.B.J.SE
C:ZAHL SBC #48:RTS...T.;BERECHNET .. ADR
ESSEN BEI BRANCHES.....OFFSET LDA COD2:B
MI BMINUS.?...CLC;BRANCH V.:ADC #2:ADC T
MP.4:STA TMP1:LDA TMP.3.{...ADC #0:JSR P
RBYTE:LDA TMP1:JSR PRBYTE:RTS:;BRANCH RU
ECK.....BMINUS E. #255:SEC:SBC #1:STA TM
P.J...LDA TMP.4:SBC TMP:STA TMP1:LDA TMP
.3.....SBC #0:JSR PRBYTE:LDA TMP1:JSR PR
BYTE:RTS;.E OFFSET.....;LAENGE OPCODE.D.
$.;BERECHNET BEFEHLSLAENGE (1,2 OD. 3 BY
TES).C...;OPCODE IN AKKU UEBERGEBEN...8.
;IM Y.REG. STEHT DANN BEFEHLSLAENGE...B.
LAENGE LDY #1.C.L.CMP #$20:BEQ LOO1:. #$
9F:BEQ LOO3...V.. #$1F:CMP #9:BEQ LOO2:C
MP #$19...`.BEQ LOO1:. #$0D:CMP #8:BEQ L
OO3...J.. #8:BEQ LOO2.<.T.LOO1 INY:LOO2
INY:LOO3 RTS.H.~.DISAS STY OLDY:STX OLDX
;REGISTER RETTEN.....LDX #20:LDA #" ":CL
E1 STA SCREEN.120,X;ZEILE FUER DISAS. LO
ESCHEN.....DEX:BNE CLE1.....;PC L.H IN T
MP.4 . TMP.3:;BELEGT 'RAM' PO.ER ZUM LES
EN.A...LDA TMP.4:STA PPOIN1.1:STA TMP.6
:LDA TMP.3:STA PPOIN1.2:STA TMP.5.O...IN
C TMP.6:LDA TMP.6:STA PPOIN2.1:BNE LOO5.
....INC TMP.5:LOO5 LDA TMP.5:STA PPOIN2.
2:INC TMP.6.G.D.LDA TMP.6:STA PPOIN3.1:B
NE LOO6...N.INC TMP.5:LOO6 LDA TMP.5:STA
PPOIN3.2...X.PPOIN1 LDA $C000:STA COD1;
LIEST OPCODES.;...PPOIN2 LDA $C000:STA C
OD2.Y...PPOIN3 LDA $C000:STA COD3.....LD
A COD1:JSR LAENGE:TYA:STA CODEL:TAX:LDY
#120;BYTES AB PC AUSGEBEN.G...LDA COD1:J
SR PRBYTE:JSR SPACE:DEX.....BEQ LOO7:LDA
COD2:JSR PRBYTE:JSR SPACE.....DEX:BEQ L
OO7:LDA COD3:JSR PRBYTE.Q...LOO7 LDY #12
9:LDA COD1;GIBT OPCODE (3 BUCHSTABEN) AU
S...(.CLC:LDA #.TSTART:STA TMP:LDA COD1:
ADC COD1:BCC LOO8.U.2.INC TMP:LOO8 CLC:A
DC COD1:BCC LOO9:INC TMP:LOO9 STA OPP.1;
PO.ER BELEGEN...<.LDA TMP:STA OPP.2:LDX
#0:OPP LDA $C000,X:JSR PRIZEI:INX...F.CP
X #3:BNE OPP:JSR SPACE.U.P.LDA CODEL:CMP
#2:BPL CODE2:JMP .AS...Z.CODE2 LDX COD1
:LDA TADR,X;ADRESS. FESTSTELC:TAX...D.;
'#$','$' OD.'($' AUSGEBEN.R.N.CPX #6:BMI
LOO10:LDA #"(":JSR PRIZEI...X.LOO10 CPX
#2:BNE LOO11:LDA #"#".....JSR PRIZEI:LO
O11 LDA #"$":JSR PRIZEI.G...CPX #1:BPL L
OO12:JSR OFFSET:JMP .AS.}...LOO12 LDA CO
DEL;OPER.EN AUSGEBEN:CMP #3:BEQ CODL3...
.LDA COD2:JSR PRBYTE:JMP LOO13.Q...CODL
3 LDA COD3:JSR PRBYTE:LDA COD2:JSR PRBYT
E.....LOO13 CPX #4:BMI .AS.....; ',X',',
Y',',X)','),Y' OD. ')' AUSGEBEN.9.H.BNE
LOO14:LDA #",":JSR PRIZEI.Y.R.LDA #"X":J
SR PRIZEI:JMP .AS.T...LOO14 CPX #5:BNE L
OO15.....LDA #",":JSR PRIZEI:LDA #"Y":JS
R PRIZEI:JMP .AS.W...LOO15 CPX #6:BNE LO
O16:LDA #",":JSR PRIZEI.. ..LDA #"X":JSR
PRIZEI:LDA #")":JSR PRIZEI:JMP .AS.) ..
LOO16 LDA #")":JSR PRIZEI.P ..CPX #8:BEQ
.AS:LDA #",":JSR PRIZEI.H ..LDA #"Y":JS
R PRIZEI.. "..AS LDY OLDY;REG. HOC:LDX O
LDX:RTS;.E DISAS.X ,..PC LDY #120:JSR ST
ART;DIS.ZEILE EDIT.:JSR REVERSE:LDY #120
.. 6.;LIEST BYTES UND SPEICHERT IN RAM.#
!@.JSR BYT:STA COD1:INY:INY:JSR BYT.I!J.
STA COD2:INY:INY:JSR BYT:STA COD3.A!T.LD
A TMP.4:STA P.1.1..!^.LDA TMP.3:STA P.1.
2:LDA COD1:P.1 STA $C000..!H.LDY CODEL:C
PY #2:BMI E..O!R.LDA TMP.4:CLC:ADC #1:ST
A P.2.1..!|.LDA TMP.3:ADC #0:STA P.2.2..
"..LDA COD2:P.2 STA $C000.."..CPY #3:BMI
E..>"..LDA TMP.4:CLC:ADC #2:STA P.3.1.]
"..LDA TMP.3:ADC #0:STA P.3.2.X"..LDA CO
D3:P.3 STA $C000.."..E. RTS;ALLE BYTES G
ELESEN. .E .PC.U"B.TEXT .F " PC SP YR X
R AC NV-BDIZC 76543210 ".."L.HEX .F
"0123456789ABCDEF"..#V.TMP .BYT 0,0,0,0
,0,0,0;ARBEITSVARIABC.-#..TMP1 .BYT 0.=#
..OLDY .BYT 0.M#..OLDX .BYT 0.U#..COD1 .
BYT 0:COD2 .BYT 0:COD3 .BYT 0..#..CODEL
.BYT 0:DIS. .BYT 0.I#....TSTART:;TAB. OP
CODES (L.BYTE TSTART MUSS 0 SEIN)..#...F
"BRKORA?????????ORAASL???PHPORAASL"..$&
..F "??????ORAASL???BPLORA??????".>$0..F
"???ORAASL???CLCORA?????????".C$:..F "O
RAASL???JSRAND??????BITAND"..$D..F "ROL?
??PLPANDROL???BITANDROL"..$N..F "???BMIA
ND?????????ANDROL???".R$X..F "SECAND????
?????ANDROL???RTI"..$B..F "EOR?????????E
ORLSR???PHAEOR"..%L..F "LSR???JMPEORLSR?
??BVCEOR???".A%V..F "??????EORLSR???CLIE
OR??????".F%...F "???EORLSR???RTSADC????
?????"..%...F "ADCROR???PLAADCROR???JMPA
DC"..%...F "ROR???BVSADC?????????ADCROR"
.U%...F "???SEIADC?????????ADCROR???"..%
...F "???STA??????STYSTASTX???DEY"..&...
F "???TXA???STYSTASTX???BCCSTA".D&...F "
??????STYSTASTX???TYASTATXS".I&F..F "???
???STA??????LDYLDALDX???"..&P..F "LDYLDA
LDX???TAYLDATAX???LDY"..&Z..F "LDALDX???
BCSLDA??????LDYLDA".X&...F "LDX???CLVLDA
TSX???LDYLDALDX"..&...F "???CPYCMP??????
CPYCMPDEC???"."'...F "INYCMPDEX???CPYCMP
DEC???BNE".G'...F "CMP?????????CMPDEC???
CLDCMP".L'...F "?????????CMPDEC???CPXSBC
???"..'...F "???CPXSBCINC???INXSBCNOP???
"..' ..F "CPXSBCINC???BEQSBC?????????"..
'*..F "SBCINC???SEDSBC?????????SBC"..'4.
.F "INC???".&(>.;TABELLE ADRESSIE.G (KEI
NE S.DARDWERTE NUR FUER DISAS).L(H.TADR
.BYT 1,6,1,1,1,3,3,1,1,2,1,1.Q(R..BYT 1,
3,3,1,0,7,1,1,1,4,4,1,1,5..(\..BYT 1,1,1
,4,4,1,3,6,1,1,3,3,3,1..(F..BYT 1,2,1,1,
3,3,3,1,0,7,1,1,1,4..(P..BYT 4,1,1,5,1,1
,1,4,4,1,1,6,1,1..)Z..BYT 1,3,3,1,1,2,1,
1,3,3,3,1,0,7.*)...BYT 1,1,1,4,4,1,1,5,1
,1,1,4,4,1.O)...BYT 1,6,1,1,1,3,3,1,1,2,
1,1,8,3.V)...BYT 3,1,0,7,1,1,1,4,4,1,1,5
,1,1,1..)...BYT 4,4,1,1,6,1,1,3,3,3,1,1,
1,1..)...BYT 1,3,3,3,1,0,7,1,1,4,4,5,1,1
..)...BYT 5,1,1,1,4,1,1,2,6,2,1,3,3,3..*
...BYT 1,1,2,1,1,3,3,3,1,0,7,1,1,4./*J..
BYT 4,5,1,1,5,1,1,4,4,5,1,2,6,1.T*T..BYT
1,3,3,3,1,1,2,1,1,3,3,3,1,0.Y*...BYT 7,
1,1,1,4,4,1,1,5,1,1,1,4,4..*...BYT 1,2,6
,1,1,3,3,3,1,1,2,1,1,3.C*...BYT 3,3,1,0,
7,1,1,1,4,4,1,1,5,1.V*...BYT 1,1,4,4,1..
*......*.....*...A:.B(A.51456):.2330...C
> CLICK IMAGE PREVIEW FOR FULL MODAL