GIGA DEMO.SRC
FILE INFORMATION
FILENAME(S): GIGA DEMO.SRC
FILE TYPE(S): PRG
FILE SIZE: 15.5K
FIRST SEEN: 2025-11-30 01:13:02
APPEARS ON: 1 disk(s)
FILE HASH
dbcb93a4c14b0f36031747e8b6d4aeb8f996e869ff98740a4f9930e202bc9c4a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10101 SEITE A | GIGA DEMO.SRC | PRG | C64er | 12 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: D8 1F E6 1F 0A 00 2E 42 41 20 24 43 30 38 30 00 |.......BA $C080.|
00000010: EC 1F 14 00 3B 00 06 20 1E 00 3B C1 44 52 45 53 |....;.. ..;.DRES|
00000020: 53 45 4E 46 45 53 54 4C 45 47 55 4E 47 45 4E 00 |SENFESTLEGUNGEN.|
00000030: 0C 20 26 00 3B 00 4C 20 29 00 2E 47 4C 20 56 49 |. &.;.L )..GL VI|
00000040: 43 42 41 53 45 20 20 3D 20 24 38 30 30 30 20 20 |CBASE = $8000 |
00000050: 20 20 20 20 20 20 20 3B D6 C9 C3 2D C1 44 52 45 | ;...-.DRE|
00000060: 53 53 42 45 52 45 49 43 48 20 24 38 30 30 30 2D |SSBEREICH $8000-|
00000070: 24 42 46 46 46 00 87 20 2A 00 2E 47 4C 20 53 50 |$BFFF.. *..GL SP|
00000080: 52 50 4E 54 20 20 20 3D 20 56 49 43 42 41 53 45 |RPNT = VICBASE|
00000090: 2B 24 30 37 46 38 20 3B C1 44 52 45 53 53 45 20 |+$07F8 ;.DRESSE |
000000A0: 44 45 52 20 D3 50 52 49 54 45 5A 45 49 47 45 52 |DER .PRITEZEIGER|
000000B0: 00 C9 20 2C 00 2E 47 4C 20 53 43 52 45 45 4E 20 |.. ,..GL SCREEN |
000000C0: 20 20 3D 20 56 49 43 42 41 53 45 2B 24 30 34 30 | = VICBASE+$040|
000000D0: 30 20 3B C1 44 52 45 53 53 45 20 44 45 53 20 C2 |0 ;.DRESSE DES .|
000000E0: 49 4C 44 53 43 48 49 52 4D 53 50 45 49 43 48 45 |ILDSCHIRMSPEICHE|
000000F0: 52 53 00 FE 20 2D 00 2E 47 4C 20 43 48 41 52 31 |RS.. -..GL CHAR1|
00000100: 20 20 20 20 3D 20 56 49 43 42 41 53 45 2B 24 30 | = VICBASE+$0|
00000110: 38 30 30 20 3B DA 45 49 43 48 45 4E 53 41 54 5A |800 ;.EICHENSATZ|
00000120: 41 44 52 45 53 53 45 00 1F 21 2E 00 2E 47 4C 20 |ADRESSE..!...GL |
00000130: 43 48 41 52 32 20 20 20 20 3D 20 56 49 43 42 41 |CHAR2 = VICBA|
00000140: 53 45 2B 24 32 30 30 30 00 55 21 2F 00 2E 47 4C |SE+$2000.U!/..GL|
00000150: 20 53 50 52 49 54 45 53 20 20 3D 20 56 49 43 42 | SPRITES = VICB|
00000160: 41 53 45 2B 24 30 45 30 30 20 3B C1 44 52 45 53 |ASE+$0E00 ;.DRES|
00000170: 53 45 20 44 45 52 20 D3 50 52 49 54 45 53 00 A4 |SE DER .PRITES..|
00000180: 21 32 00 2E 47 4C 20 53 43 52 49 50 54 20 20 20 |!2..GL SCRIPT |
00000190: 3D 20 24 43 44 30 30 20 20 20 20 20 20 20 20 20 |= $CD00 |
000001A0: 3B C1 44 52 45 53 53 45 20 44 45 53 20 C1 55 53 |;.DRESSE DES .US|
000001B0: 53 45 48 45 4E 53 20 44 45 52 20 4F 42 45 52 45 |SEHENS DER OBERE|
000001C0: 4E 20 CC 41 55 46 53 43 48 52 49 46 54 00 F1 21 |N .AUFSCHRIFT..!|
000001D0: 3C 00 2E 47 4C 20 50 41 47 45 30 20 20 20 20 3D |<..GL PAGE0 =|
000001E0: 20 24 43 45 30 30 20 20 20 20 20 20 20 20 20 3B | $CE00 ;|
000001F0: C6 41 52 42 54 41 42 45 4C 4C 45 20 46 55 45 52 |.ARBTABELLE FUER|
00000200: 20 45 46 46 45 43 54 32 20 28 DA 45 49 4C 45 20 | EFFECT2 (.EILE |
00000210: 31 31 31 35 30 20 46 46 2E 29 00 3A 22 46 00 2E |11150 FF.).:"F..|
00000220: 47 4C 20 50 41 47 45 31 20 20 20 20 3D 20 24 43 |GL PAGE1 = $C|
00000230: 46 30 30 20 20 20 20 20 20 20 20 20 3B D3 43 52 |F00 ;.CR|
00000240: 4F 4C 4C 54 41 42 45 4C 4C 45 20 28 D6 C9 C3 20 |OLLTABELLE (... |
00000250: 24 44 30 31 36 29 20 46 55 45 52 20 45 46 46 45 |$D016) FUER EFFE|
00000260: 43 54 32 00 40 22 6E 00 3B 00 62 22 78 00 3B C4 |CT2.@"n.;.b"x.;.|
00000270: 45 46 49 4E 49 54 49 4F 4E 20 44 45 52 20 C9 2F |EFINITION DER ./|
00000280: CF 2D C2 41 55 53 54 45 49 4E 45 00 68 22 82 00 |.-.AUSTEINE.h"..|
00000290: 3B 00 81 22 96 00 2E 47 4C 20 56 49 43 20 20 20 |;.."...GL VIC |
000002A0: 20 20 20 3D 20 24 44 30 30 30 00 9A 22 A0 00 2E | = $D000.."...|
000002B0: 47 4C 20 53 49 44 20 20 20 20 20 20 3D 20 24 44 |GL SID = $D|
000002C0: 34 30 30 00 B3 22 A5 00 2E 47 4C 20 43 4F 4C 4F |400.."...GL COLO|
000002D0: 52 20 20 20 20 3D 20 24 44 38 30 30 00 CC 22 AA |R = $D800..".|
000002E0: 00 2E 47 4C 20 43 49 41 31 20 20 20 20 20 3D 20 |..GL CIA1 = |
000002F0: 24 44 43 30 30 00 E5 22 B4 00 2E 47 4C 20 43 49 |$DC00.."...GL CI|
00000300: 41 32 20 20 20 20 20 3D 20 24 44 44 30 30 00 EB |A2 = $DD00..|
00000310: 22 C8 00 3B 00 03 23 D2 00 3B D2 CF CD 2D D5 4E |"..;..#..;...-.N|
00000320: 54 45 52 50 52 4F 47 52 41 4D 4D 45 00 09 23 DC |TERPROGRAMME..#.|
00000330: 00 3B 00 38 23 E6 00 2E 47 4C 20 4E 4F 52 4D 49 |.;.8#...GL NORMI|
00000340: 52 51 20 20 3D 20 24 45 41 33 31 20 20 20 20 20 |RQ = $EA31 |
00000350: 20 20 20 20 3B 4E 4F 52 4D 41 4C 45 52 20 C9 D2 | ;NORMALER ..|
00000360: D1 00 66 23 F0 00 2E 47 4C 20 49 52 51 45 4E 44 |..f#...GL IRQEND|
00000370: 20 20 20 3D 20 24 45 41 37 45 20 20 20 20 20 20 | = $EA7E |
00000380: 20 20 20 3B C9 D2 D1 20 42 45 45 4E 44 45 4E 00 | ;... BEENDEN.|
00000390: 6C 23 FA 00 3B 00 7B 23 FF 00 3B D6 41 52 49 41 |l#..;.{#..;.ARIA|
000003A0: 42 4C 45 4E 00 AC 23 00 01 3B C1 4E 4D 2E 20 CC |BLEN..#..;.NM. .|
000003B0: D3 31 20 3D 20 CC 41 55 46 53 43 48 52 49 46 54 |.1 = .AUFSCHRIFT|
000003C0: 31 20 3D 20 C2 4F 52 44 45 52 4C 41 55 46 53 43 |1 = .ORDERLAUFSC|
000003D0: 48 52 49 46 54 00 DD 23 01 01 3B 20 20 20 20 20 |HRIFT..#..; |
000003E0: CC D3 32 20 3D 20 CC 41 55 46 53 43 48 52 49 46 |..2 = .AUFSCHRIF|
000003F0: 54 32 20 3D 20 4F 42 45 52 45 20 CC 41 55 46 53 |T2 = OBERE .AUFS|
00000400: 43 48 52 49 46 54 00 E3 23 04 01 3B 00 16 24 05 |CHRIFT..#..;..$.|
00000410: 01 2E 47 4C 20 52 31 20 20 20 20 20 20 20 3D 20 |..GL R1 = |
00000420: 24 46 37 20 20 20 20 20 20 20 20 20 20 20 3B C1 |$F7 ;.|
00000430: 52 42 45 49 54 53 5A 45 49 47 45 52 20 52 31 00 |RBEITSZEIGER R1.|
00000440: 49 24 06 01 2E 47 4C 20 52 32 20 20 20 20 20 20 |I$...GL R2 |
00000450: 20 3D 20 24 46 39 20 20 20 20 20 20 20 20 20 20 | = $F9 |
00000460: 20 3B C1 52 42 45 49 54 53 5A 45 49 47 45 52 20 | ;.RBEITSZEIGER |
00000470: 52 32 00 8E 24 08 01 2E 47 4C 20 43 31 20 20 20 |R2..$...GL C1 |
00000480: 20 20 20 20 3D 20 24 46 42 20 20 20 20 20 20 20 | = $FB |
00000490: 20 20 20 20 3B DA 41 45 48 4C 45 52 20 46 55 45 | ;.AEHLER FUE|
000004A0: 52 20 DA 45 49 43 48 45 4E 42 52 45 49 54 45 20 |R .EICHENBREITE |
000004B0: 56 4F 4E 20 CC D3 31 00 D3 24 09 01 2E 47 4C 20 |VON ..1..$...GL |
000004C0: 43 32 20 20 20 20 20 20 20 3D 20 24 46 43 20 20 |C2 = $FC |
000004D0: 20 20 20 20 20 20 20 20 20 3B DA 41 45 48 4C 45 | ;.AEHLE|
000004E0: 52 20 46 55 45 52 20 DA 45 49 43 48 45 4E 42 52 |R FUER .EICHENBR|
000004F0: 45 49 54 45 20 56 4F 4E 20 CC D3 31 00 14 25 0B |EITE VON ..1..%.|
00000500: 01 2E 47 4C 20 49 4E 44 45 58 31 20 20 20 3D 20 |..GL INDEX1 = |
00000510: 24 46 44 20 20 20 20 20 20 20 20 20 20 20 3B C9 |$FD ;.|
00000520: 4E 44 45 58 20 5A 55 4D 20 4C 49 4E 4B 45 4E 20 |NDEX ZUM LINKEN |
00000530: D2 41 4E 44 20 46 55 45 52 20 CC D3 32 00 5F 25 |.AND FUER ..2._%|
00000540: 0C 01 2E 47 4C 20 43 48 41 52 20 20 20 20 20 3D |...GL CHAR =|
00000550: 20 24 46 45 20 20 20 20 20 20 20 20 20 20 20 3B | $FE ;|
00000560: DA 57 49 53 43 48 45 4E 53 50 45 49 43 48 45 52 |.WISCHENSPEICHER|
00000570: 20 46 55 45 52 20 DA 45 49 43 48 45 4E 41 44 52 | FUER .EICHENADR|
00000580: 45 53 53 45 20 CC D3 32 00 65 25 F4 01 3B 00 7C |ESSE ..2.e%..;.||
00000590: 25 FE 01 3B CD 41 4B 52 4F 44 45 46 49 4E 49 54 |%..;.AKRODEFINIT|
000005A0: 49 4F 4E 45 4E 00 82 25 08 02 3B 00 B5 25 0A 02 |IONEN..%..;..%..|
000005B0: 3B 2D 3E 20 C1 44 52 45 53 53 45 20 28 41 44 52 |;-> .DRESSE (ADR|
000005C0: 29 20 4D 49 54 20 D7 4F 52 54 20 28 56 41 4C 55 |) MIT .ORT (VALU|
000005D0: 45 29 20 42 45 53 43 48 52 45 49 42 45 4E 00 BB |E) BESCHREIBEN..|
000005E0: 25 0C 02 3B 00 D4 25 12 02 2E 4D 41 20 4C 44 41 |%..;..%...MA LDA|
000005F0: 44 52 28 41 44 52 2C 56 41 4C 55 45 29 00 E6 25 |DR(ADR,VALUE)..%|
00000600: 1C 02 20 4C 44 41 23 3C 28 56 41 4C 55 45 29 00 |.. LDA#<(VALUE).|
00000610: F2 25 26 02 20 53 54 41 41 44 52 00 04 26 30 02 |.%&. STAADR..&0.|
00000620: 20 4C 44 41 23 3E 28 56 41 4C 55 45 29 00 12 26 | LDA#>(VALUE)..&|
00000630: 3A 02 20 53 54 41 41 44 52 2B 31 00 1A 26 44 02 |:. STAADR+1..&D.|
00000640: 2E 52 54 00 20 26 4E 02 3B 00 6E 26 50 02 3B 2D |.RT. &N.;.n&P.;-|
00000650: 3E 20 C9 D2 D1 2D D6 45 4B 54 4F 52 20 24 33 31 |> ...-.EKTOR $31|
00000660: 34 2F 35 20 41 55 46 20 28 41 44 52 29 20 53 45 |4/5 AUF (ADR) SE|
00000670: 54 5A 45 4E 20 55 4E 44 20 C9 D2 D1 20 42 45 49 |TZEN UND ... BEI|
00000680: 20 DA 45 49 4C 45 20 28 4C 49 4E 45 29 20 41 55 | .EILE (LINE) AU|
00000690: 53 4C 4F 45 53 45 4E 00 74 26 52 02 3B 00 90 26 |SLOESEN.t&R.;..&|
000006A0: 58 02 2E 4D 41 20 52 41 53 54 45 52 49 52 51 28 |X..MA RASTERIRQ(|
000006B0: 41 44 52 2C 4C 49 4E 45 29 00 A9 26 62 02 20 2E |ADR,LINE)..&b. .|
000006C0: 2E 2E 4C 44 41 44 52 28 24 30 33 31 34 2C 41 44 |..LDADR($0314,AD|
000006D0: 52 29 00 B9 26 67 02 20 4C 44 41 56 49 43 2B 24 |R)..&g. LDAVIC+$|
000006E0: 31 31 00 C9 26 6C 02 2E 49 46 20 3E 28 4C 49 4E |11..&l..IF >(LIN|
000006F0: 45 29 00 D6 26 76 02 20 4F 52 41 23 24 38 30 00 |E)..&v. ORA#$80.|
00000700: DE 26 80 02 2E 45 4C 00 EB 26 8A 02 20 41 4E 44 |.&...EL..&.. AND|
00000710: 23 24 37 46 00 F3 26 94 02 2E 45 49 00 03 27 9E |#$7F..&...EI..'.|
00000720: 02 20 53 54 41 56 49 43 2B 24 31 31 00 14 27 A8 |. STAVIC+$11..'.|
00000730: 02 20 4C 44 41 23 3C 28 4C 49 4E 45 29 00 24 27 |. LDA#<(LINE).$'|
00000740: B2 02 20 53 54 41 56 49 43 2B 24 31 32 00 31 27 |.. STAVIC+$12.1'|
00000750: BC 02 20 4C 44 41 23 24 38 31 00 41 27 C6 02 20 |.. LDA#$81.A'.. |
00000760: 53 54 41 56 49 43 2B 24 31 39 00 49 27 D0 02 2E |STAVIC+$19.I'...|
00000770: 52 54 00 4F 27 DA 02 3B 00 9C 27 DC 02 3B 2D 3E |RT.O'..;..'..;->|
00000780: 20 41 55 46 20 44 49 45 20 4E 41 45 43 48 53 54 | AUF DIE NAECHST|
00000790: 45 20 C2 49 4C 44 53 43 48 49 52 4D 5A 45 49 4C |E .ILDSCHIRMZEIL|
000007A0: 45 20 57 41 52 54 45 4E 20 28 2D 3E 20 49 4E 49 |E WARTEN (-> INI|
000007B0: 54 54 49 4D 45 52 20 DA 45 49 4C 45 20 31 34 32 |TTIMER .EILE 142|
000007C0: 30 46 46 2E 29 00 A2 27 DF 02 3B 00 B2 27 E4 02 |0FF.)..'..;..'..|
000007D0: 2E 4D 41 20 4E 45 57 4C 49 4E 45 00 C7 27 EE 02 |.MA NEWLINE..'..|
000007E0: 57 41 49 54 20 4C 44 41 43 49 41 32 2B 24 30 44 |WAIT LDACIA2+$0D|
000007F0: 00 D4 27 F8 02 20 42 45 51 57 41 49 54 00 DC 27 |..'.. BEQWAIT..'|
00000800: 02 03 2E 52 54 00 E2 27 04 03 3B 00 19 28 06 03 |...RT..'..;..(..|
00000810: 3B 2D 3E 20 49 4E 53 20 D2 45 47 49 53 54 45 52 |;-> INS .EGISTER|
00000820: 50 41 41 52 20 28 58 2C 59 29 20 44 49 45 20 C1 |PAAR (X,Y) DIE .|
00000830: 44 52 45 53 53 45 20 28 41 44 52 29 20 4C 41 44 |DRESSE (ADR) LAD|
00000840: 45 4E 00 1F 28 0C 03 3B 00 32 28 0E 03 2E 4D 41 |EN..(..;.2(...MA|
00000850: 20 4C 44 58 59 20 28 41 44 52 29 00 42 28 10 03 | LDXY (ADR).B(..|
00000860: 20 4C 44 58 23 3C 28 41 44 52 29 00 52 28 12 03 | LDX#<(ADR).R(..|
00000870: 20 4C 44 59 23 3E 28 41 44 52 29 00 5A 28 14 03 | LDY#>(ADR).Z(..|
00000880: 2E 52 54 00 60 28 16 03 3B 00 66 28 84 03 3B 00 |.RT.`(..;.f(..;.|
00000890: 6C 28 8E 03 3B 00 7A 28 98 03 20 4A 4D 50 53 54 |l(..;.z(.. JMPST|
000008A0: 41 52 54 00 80 28 A2 03 3B 00 86 28 E8 03 3B 00 |ART..(..;..(..;.|
000008B0: A0 28 F2 03 3B 2D 2D 2D 3E 20 D7 20 C1 20 C9 20 |.(..;---> . . . |
000008C0: D4 20 CC 20 C9 20 CE 20 C5 00 A6 28 FC 03 3B 00 |. . . . ...(..;.|
000008D0: ED 28 06 04 3B C1 55 46 20 45 49 4E 45 20 D2 41 |.(..;.UF EINE .A|
000008E0: 53 54 45 52 5A 45 49 4C 45 20 57 41 52 54 45 4E |STERZEILE WARTEN|
000008F0: 20 55 4E 44 20 45 56 54 4C 2E 20 D5 4E 47 45 4E | UND EVTL. .NGEN|
00000900: 41 55 49 47 4B 45 49 54 45 4E 20 41 55 53 47 4C |AUIGKEITEN AUSGL|
00000910: 45 49 43 48 45 4E 00 F3 28 10 04 3B 00 0E 29 1A |EICHEN..(..;..).|
00000920: 04 3B 3E 3E 3E 3A 28 59 29 20 2D 20 D2 41 53 54 |.;>>>:(Y) - .AST|
00000930: 45 52 5A 45 49 4C 45 00 14 29 24 04 3B 00 1A 29 |ERZEILE..)$.;..)|
00000940: 2E 04 3B 00 32 29 38 04 57 41 49 54 4C 49 4E 45 |..;.2)8.WAITLINE|
00000950: 20 43 50 59 56 49 43 2B 24 31 32 00 43 29 42 04 | CPYVIC+$12.C)B.|
00000960: 20 42 4E 45 57 41 49 54 4C 49 4E 45 00 4F 29 4C | BNEWAITLINE.O)L|
00000970: 04 20 4C 44 58 23 31 30 00 5E 29 56 04 44 45 4C |. LDX#10.^)V.DEL|
00000980: 41 59 31 20 44 45 58 00 6D 29 60 04 20 42 4E 45 |AY1 DEX.m)`. BNE|
00000990: 44 45 4C 41 59 31 00 76 29 6A 04 20 49 4E 59 00 |DELAY1.v)j. INY.|
000009A0: 86 29 74 04 20 43 50 59 56 49 43 2B 24 31 32 00 |.)t. CPYVIC+$12.|
000009B0: 8F 29 7E 04 20 4E 4F 50 00 9D 29 88 04 20 42 45 |.)~. NOP..).. BE|
000009C0: 51 53 4B 49 50 31 00 A9 29 92 04 20 43 4D 50 24 |QSKIP1..).. CMP$|
000009D0: 30 30 00 B2 29 9C 04 20 4E 4F 50 00 C2 29 A6 04 |00..).. NOP..)..|
000009E0: 53 4B 49 50 31 20 4C 44 58 23 39 00 D1 29 B0 04 |SKIP1 LDX#9..)..|
000009F0: 44 45 4C 41 59 32 20 44 45 58 00 E0 29 BA 04 20 |DELAY2 DEX..).. |
00000A00: 42 4E 45 44 45 4C 41 59 32 00 E9 29 C4 04 20 49 |BNEDELAY2..).. I|
00000A10: 4E 59 00 F2 29 CE 04 20 4E 4F 50 00 FB 29 D8 04 |NY..).. NOP..)..|
00000A20: 20 4E 4F 50 00 0B 2A E2 04 20 43 50 59 56 49 43 | NOP..*.. CPYVIC|
00000A30: 2B 24 31 32 00 14 2A EC 04 20 4E 4F 50 00 22 2A |+$12..*.. NOP."*|
00000A40: F6 04 20 42 45 51 53 4B 49 50 32 00 2E 2A 00 05 |.. BEQSKIP2..*..|
00000A50: 20 43 4D 50 24 30 30 00 3F 2A 0A 05 53 4B 49 50 | CMP$00.?*..SKIP|
00000A60: 32 20 4C 44 58 23 31 30 00 4E 2A 14 05 44 45 4C |2 LDX#10.N*..DEL|
00000A70: 41 59 33 20 44 45 58 00 5D 2A 1E 05 20 42 4E 45 |AY3 DEX.]*.. BNE|
00000A80: 44 45 4C 41 59 33 00 66 2A 28 05 20 49 4E 59 00 |DELAY3.f*(. INY.|
00000A90: 76 2A 32 05 20 43 50 59 56 49 43 2B 24 31 32 00 |v*2. CPYVIC+$12.|
00000AA0: 84 2A 3C 05 20 42 4E 45 53 4B 49 50 33 00 92 2A |.*<. BNESKIP3..*|
00000AB0: 46 05 53 4B 49 50 33 20 52 54 53 00 98 2A 50 05 |F.SKIP3 RTS..*P.|
00000AC0: 3B 00 9E 2A 5A 05 3B 00 BA 2A 64 05 3B 2D 2D 2D |;..*Z.;..*d.;---|
00000AD0: 3E 20 C9 20 CE 20 C9 20 D4 20 D4 20 C9 20 CD 20 |> . . . . . . . |
00000AE0: C5 20 D2 00 C0 2A 6E 05 3B 00 F2 2A 78 05 3B C3 |. ...*n.;..*x.;.|
00000AF0: C9 C1 32 3A D4 49 4D 45 52 20 C1 20 41 55 46 20 |..2:.IMER . AUF |
00000B00: D2 41 53 54 45 52 5A 45 49 4C 45 20 53 59 4E 43 |.ASTERZEILE SYNC|
00000B10: 48 52 4F 4E 49 53 49 45 52 45 4E 00 F8 2A 82 05 |HRONISIEREN..*..|
00000B20: 3B 00 0A 2B 8C 05 49 4E 49 54 54 49 4D 45 52 20 |;..+..INITTIMER |
00000B30: 53 45 49 00 31 2B 96 05 20 4C 44 41 23 24 37 46 |SEI.1+.. LDA#$7F|
00000B40: 3B D4 49 4D 45 52 49 4E 54 45 52 52 55 50 54 20 |;.IMERINTERRUPT |
00000B50: 56 45 52 48 49 4E 44 45 52 4E 00 42 2B A0 05 20 |VERHINDERN.B+.. |
00000B60: 53 54 41 43 49 41 32 2B 24 30 44 00 85 2B AA 05 |STACIA2+$0D..+..|
00000B70: 20 2E 2E 2E 4C 44 41 44 52 28 43 49 41 32 2B 24 | ...LDADR(CIA2+$|
00000B80: 30 34 2C 24 30 30 33 45 29 3B D4 49 4D 45 52 20 |04,$003E);.IMER |
00000B90: C1 3D 36 33 2C 20 DA 45 49 54 20 46 55 45 52 20 |.=63, .EIT FUER |
00000BA0: 31 20 DA 45 49 4C 45 4E 41 55 46 42 41 55 00 90 |1 .EILENAUFBAU..|
00000BB0: 2B B4 05 20 4C 44 59 23 30 00 B9 2B BE 05 20 4A |+.. LDY#0..+.. J|
00000BC0: 53 52 57 41 49 54 4C 49 4E 45 3B 2D 2D 2D 3E 20 |SRWAITLINE;---> |
00000BD0: 41 55 46 20 DA 45 49 4C 45 20 30 20 57 41 52 54 |AUF .EILE 0 WART|
00000BE0: 45 4E 00 D1 2B C8 05 20 4C 44 58 23 34 3B D6 45 |EN..+.. LDX#4;.E|
00000BF0: 52 5A 4F 45 47 45 52 55 4E 47 00 E0 2B D2 05 44 |RZOEGERUNG..+..D|
00000C00: 45 4C 41 59 34 20 44 45 58 00 EF 2B DC 05 20 42 |ELAY4 DEX..+.. B|
00000C10: 4E 45 44 45 4C 41 59 34 00 F8 2B F0 05 20 4E 4F |NEDELAY4..+.. NO|
00000C20: 50 00 15 2C FA 05 20 4C 44 41 23 24 31 31 3B D4 |P..,.. LDA#$11;.|
00000C30: 49 4D 45 52 20 C1 20 53 54 41 52 54 45 4E 00 26 |IMER . STARTEN.&|
00000C40: 2C 04 06 20 53 54 41 43 49 41 32 2B 24 30 45 00 |,.. STACIA2+$0E.|
00000C50: 2F 2C 0E 06 20 43 4C 49 00 38 2C 18 06 20 52 54 |/,.. CLI.8,.. RT|
00000C60: 53 00 3E 2C D0 07 3B 00 5A 2C DA 07 3B 2D 2D 2D |S.>,..;.Z,..;---|
00000C70: 3E 20 D3 20 C3 20 D2 20 CF 20 CC 20 CC 20 D3 20 |> . . . . . . . |
00000C80: D0 20 D2 00 60 2C E4 07 3B 00 A1 2C EE 07 3B D3 |. ..`,..;..,..;.|
00000C90: 43 52 4F 4C 4C 54 20 D3 50 52 49 54 45 44 41 54 |CROLLT .PRITEDAT|
00000CA0: 45 4E 20 49 4D 20 DA 45 49 4C 45 4E 42 45 52 45 |EN IM .EILENBERE|
00000CB0: 49 43 48 20 45 49 4E 45 4E 20 D0 49 58 45 4C 20 |ICH EINEN .IXEL |
00000CC0: 4E 41 43 48 20 4C 49 4E 4B 53 00 A7 2C F8 07 3B |NACH LINKS..,..;|
00000CD0: 00 C7 2C 02 08 3B 3E 3E 3E 3A 28 58 29 20 2D 20 |..,..;>>>:(X) - |
00000CE0: C1 4E 46 41 4E 47 53 5A 45 49 4C 45 20 2A 20 33 |.NFANGSZEILE * 3|
00000CF0: 00 E3 2C 0C 08 3B 20 20 20 20 28 59 29 20 2D 20 |..,..; (Y) - |
00000D00: C5 4E 44 5A 45 49 4C 45 20 2A 20 33 00 E9 2C 16 |.NDZEILE * 3..,.|
00000D10: 08 3B 00 02 2D 20 08 53 43 52 4F 4C 4C 53 50 52 |.;..- .SCROLLSPR|
00000D20: 20 53 54 59 43 4F 4D 50 58 2B 31 00 1E 2D 2A 08 | STYCOMPX+1..-*.|
00000D30: 4C 4F 4F 50 31 20 41 53 4C 53 50 52 49 54 45 53 |LOOP1 ASLSPRITES|
00000D40: 2B 24 32 30 32 2C 58 00 35 2D 34 08 20 52 4F 4C |+$202,X.5-4. ROL|
00000D50: 53 50 52 49 54 45 53 2B 24 32 30 31 2C 58 00 4C |SPRITES+$201,X.L|
00000D60: 2D 3E 08 20 52 4F 4C 53 50 52 49 54 45 53 2B 24 |->. ROLSPRITES+$|
00000D70: 32 30 30 2C 58 00 63 2D 48 08 20 52 4F 4C 53 50 |200,X.c-H. ROLSP|
00000D80: 52 49 54 45 53 2B 24 31 43 32 2C 58 00 7A 2D 52 |RITES+$1C2,X.z-R|
00000D90: 08 20 52 4F 4C 53 50 52 49 54 45 53 2B 24 31 43 |. ROLSPRITES+$1C|
00000DA0: 31 2C 58 00 91 2D 5C 08 20 52 4F 4C 53 50 52 49 |1,X..-\. ROLSPRI|
00000DB0: 54 45 53 2B 24 31 43 30 2C 58 00 A8 2D 66 08 20 |TES+$1C0,X..-f. |
00000DC0: 52 4F 4C 53 50 52 49 54 45 53 2B 24 31 38 32 2C |ROLSPRITES+$182,|
00000DD0: 58 00 BF 2D 70 08 20 52 4F 4C 53 50 52 49 54 45 |X..-p. ROLSPRITE|
00000DE0: 53 2B 24 31 38 31 2C 58 00 D6 2D 7A 08 20 52 4F |S+$181,X..-z. RO|
00000DF0: 4C 53 50 52 49 54 45 53 2B 24 31 38 30 2C 58 00 |LSPRITES+$180,X.|
00000E00: ED 2D 84 08 20 52 4F 4C 53 50 52 49 54 45 53 2B |.-.. ROLSPRITES+|
00000E10: 24 31 34 32 2C 58 00 04 2E 8E 08 20 52 4F 4C 53 |$142,X..... ROLS|
00000E20: 50 52 49 54 45 53 2B 24 31 34 31 2C 58 00 1B 2E |PRITES+$141,X...|
00000E30: 98 08 20 52 4F 4C 53 50 52 49 54 45 53 2B 24 31 |.. ROLSPRITES+$1|
00000E40: 34 30 2C 58 00 32 2E C0 08 20 52 4F 4C 53 50 52 |40,X.2... ROLSPR|
00000E50: 49 54 45 53 2B 24 31 30 32 2C 58 00 49 2E CA 08 |ITES+$102,X.I...|
00000E60: 20 52 4F 4C 53 50 52 49 54 45 53 2B 24 31 30 31 | ROLSPRITES+$101|
00000E70: 2C 58 00 60 2E D4 08 20 52 4F 4C 53 50 52 49 54 |,X.`... ROLSPRIT|
00000E80: 45 53 2B 24 31 30 30 2C 58 00 76 2E DE 08 20 52 |ES+$100,X.v... R|
00000E90: 4F 4C 53 50 52 49 54 45 53 2B 24 43 32 2C 58 00 |OLSPRITES+$C2,X.|
00000EA0: 8C 2E E8 08 20 52 4F 4C 53 50 52 49 54 45 53 2B |.... ROLSPRITES+|
00000EB0: 24 43 31 2C 58 00 A2 2E F2 08 20 52 4F 4C 53 50 |$C1,X..... ROLSP|
00000EC0: 52 49 54 45 53 2B 24 43 30 2C 58 00 B8 2E FC 08 |RITES+$C0,X.....|
00000ED0: 20 52 4F 4C 53 50 52 49 54 45 53 2B 24 38 32 2C | ROLSPRITES+$82,|
00000EE0: 58 00 CE 2E 06 09 20 52 4F 4C 53 50 52 49 54 45 |X..... ROLSPRITE|
00000EF0: 53 2B 24 38 31 2C 58 00 E4 2E 10 09 20 52 4F 4C |S+$81,X..... ROL|
00000F00: 53 50 52 49 54 45 53 2B 24 38 30 2C 58 00 FA 2E |SPRITES+$80,X...|
00000F10: 1A 09 20 52 4F 4C 53 50 52 49 54 45 53 2B 24 34 |.. ROLSPRITES+$4|
00000F20: 32 2C 58 00 10 2F 24 09 20 52 4F 4C 53 50 52 49 |2,X../$. ROLSPRI|
00000F30: 54 45 53 2B 24 34 31 2C 58 00 26 2F 2E 09 20 52 |TES+$41,X.&/.. R|
00000F40: 4F 4C 53 50 52 49 54 45 53 2B 24 34 30 2C 58 00 |OLSPRITES+$40,X.|
00000F50: 3B 2F 38 09 20 52 4F 4C 53 50 52 49 54 45 53 2B |;/8. ROLSPRITES+|
00000F60: 24 32 2C 58 00 50 2F 42 09 20 52 4F 4C 53 50 52 |$2,X.P/B. ROLSPR|
00000F70: 49 54 45 53 2B 24 31 2C 58 00 62 2F 4C 09 20 52 |ITES+$1,X.b/L. R|
00000F80: 4F 4C 53 50 52 49 54 45 53 2C 58 00 6B 2F 56 09 |OLSPRITES,X.k/V.|
00000F90: 20 49 4E 58 00 74 2F 60 09 20 49 4E 58 00 7D 2F | INX.t/`. INX.}/|
00000FA0: 6A 09 20 49 4E 58 00 8D 2F 74 09 43 4F 4D 50 58 |j. INX../t.COMPX|
00000FB0: 20 43 50 58 23 30 00 9B 2F 7E 09 20 42 43 43 4C | CPX#0../~. BCCL|
00000FC0: 4F 4F 50 31 00 A4 2F 88 09 20 52 54 53 00 AA 2F |OOP1../.. RTS../|
00000FD0: 92 09 3B 00 B0 2F 9C 09 3B 00 C8 2F A6 09 3B 2D |..;../..;../..;-|
00000FE0: 2D 2D 3E 20 D3 20 C3 20 D2 20 CF 20 CC 20 CC 20 |--> . . . . . . |
00000FF0: D4 00 CE 2F B0 09 3B 00 F5 2F BA 09 3B D3 43 52 |.../..;../..;.CR|
00001000: 4F 4C 4C 54 20 D4 45 58 54 20 49 4E 20 44 45 4E |OLLT .EXT IN DEN|
00001010: 20 C2 4F 52 44 45 52 53 50 52 49 54 45 53 00 FB | .ORDERSPRITES..|
00001020: 2F C4 09 3B 00 27 30 C6 09 53 43 52 4F 4C 4C 54 |/..;.'0..SCROLLT|
00001030: 20 4C 44 41 54 45 58 54 31 3B D0 41 55 53 45 5A | LDATEXT1;.AUSEZ|
00001040: 45 49 47 45 52 20 3D 20 30 3F 20 4A 41 3A 2D 3E |EIGER = 0? JA:->|
00001050: 00 34 30 C7 09 20 42 45 51 53 43 52 54 00 42 30 |.40.. BEQSCRT.B0|
00001060: C8 09 20 44 45 43 54 45 58 54 31 00 4B 30 C9 09 |.. DECTEXT1.K0..|
00001070: 20 52 54 53 00 80 30 CE 09 53 43 52 54 20 4C 44 | RTS..0..SCRT LD|
00001080: 58 23 36 2A 33 3B DA 45 49 4C 45 4E 20 36 2D 31 |X#6*3;.EILEN 6-1|
00001090: 34 20 49 4E 20 44 45 4E 20 D3 50 52 49 54 45 53 |4 IN DEN .PRITES|
000010A0: 20 53 43 52 4F 4C 4C 45 4E 00 8E 30 D8 09 20 4C | SCROLLEN..0.. L|
000010B0: 44 59 23 31 34 2A 33 00 9A 30 DA 09 20 4C 44 41 |DY#14*3..0.. LDA|
000010C0: 24 30 31 00 A3 30 DB 09 20 50 48 41 00 B0 30 DC |$01..0.. PHA..0.|
000010D0: 09 20 4C 44 41 23 24 33 30 00 BC 30 DD 09 20 53 |. LDA#$30..0.. S|
000010E0: 54 41 24 30 31 00 E4 30 E2 09 20 4A 53 52 53 43 |TA$01..0.. JSRSC|
000010F0: 52 4F 4C 4C 53 50 52 3B 2D 2D 2D 3E 20 D3 50 52 |ROLLSPR;---> .PR|
00001100: 49 54 45 53 20 53 43 52 4F 4C 4C 45 4E 00 ED 30 |ITES SCROLLEN..0|
00001110: E4 09 20 50 4C 41 00 F9 30 E6 09 20 53 54 41 24 |.. PLA..0.. STA$|
00001120: 30 31 00 22 31 EC 09 20 4C 44 41 43 31 3B 53 43 |01."1.. LDAC1;SC|
00001130: 48 4F 4E 20 38 20 D0 49 58 45 4C 20 47 45 53 43 |HON 8 .IXEL GESC|
00001140: 52 4F 4C 4C 54 3F 20 4E 3A 2D 3E 00 30 31 F6 09 |ROLLT? N:->.01..|
00001150: 20 42 4E 45 4E 4F 43 48 52 00 4B 31 00 0A 20 4C | BNENOCHR.K1.. L|
00001160: 44 41 23 38 3B DA 41 45 48 4C 45 52 3D 38 20 D0 |DA#8;.AEHLER=8 .|
00001170: 49 58 45 4C 00 56 31 0A 0A 20 53 54 41 43 31 00 |IXEL.V1.. STAC1.|
00001180: 6A 31 14 0A 20 2E 2E 2E 4C 44 58 59 28 54 45 58 |j1.. ...LDXY(TEX|
00001190: 54 31 29 00 9B 31 1E 0A 20 4A 53 52 49 4E 43 54 |T1)..1.. JSRINCT|
000011A0: 45 58 54 3B 2D 2D 2D 3E 20 D4 45 58 54 5A 45 49 |EXT;---> .EXTZEI|
000011B0: 47 45 52 20 55 4D 20 45 49 4E 53 20 45 52 48 4F |GER UM EINS ERHO|
000011C0: 45 48 45 4E 00 BF 31 28 0A 20 41 4E 44 23 24 33 |EHEN..1(. AND#$3|
000011D0: 46 3B CD 41 53 4B 45 20 46 55 45 52 20 C1 D3 C3 |F;.ASKE FUER ...|
000011E0: C9 C9 2D C3 4F 44 45 53 00 D1 31 5A 0A 20 4C 44 |..-.ODES..1Z. LD|
000011F0: 58 23 3E 28 43 48 41 52 31 29 00 05 32 64 0A 20 |X#>(CHAR1)..2d. |
00001200: 4A 53 52 43 48 41 52 41 44 52 3B 2D 2D 2D 3E 20 |JSRCHARADR;---> |
00001210: C1 44 52 45 53 53 45 20 44 45 53 20 DA 45 49 43 |.DRESSE DES .EIC|
00001220: 48 45 4E 53 20 42 45 52 45 43 48 4E 45 4E 00 11 |HENS BERECHNEN..|
00001230: 32 66 0A 20 4C 44 41 24 30 31 00 1A 32 68 0A 20 |2f. LDA$01..2h. |
00001240: 50 48 41 00 27 32 69 0A 20 4C 44 41 23 24 33 34 |PHA.'2i. LDA#$34|
00001250: 00 33 32 6B 0A 20 53 54 41 24 30 31 00 71 32 6E |.32k. STA$01.q2n|
00001260: 0A 20 4C 44 59 23 37 3B C4 41 54 45 4E 20 44 45 |. LDY#7;.ATEN DE|
00001270: 53 20 DA 45 49 43 48 45 4E 53 20 49 4E 20 D3 50 |S .EICHENS IN .P|
00001280: 52 49 54 45 53 4F 4E 44 45 52 42 45 52 45 49 43 |RITESONDERBEREIC|
00001290: 48 20 4B 4F 50 49 45 52 45 4E 00 7F 32 78 0A 20 |H KOPIEREN..2x. |
000012A0: 4C 44 58 23 31 33 2A 33 00 96 32 82 0A 43 4F 50 |LDX#13*3..2..COP|
000012B0: 59 43 48 41 52 20 4C 44 41 28 52 31 29 2C 59 00 |YCHAR LDA(R1),Y.|
000012C0: AD 32 8C 0A 20 53 54 41 53 50 52 49 54 45 53 2B |.2.. STASPRITES+|
000012D0: 24 32 30 30 2C 58 00 B6 32 96 0A 20 44 45 58 00 |$200,X..2.. DEX.|
000012E0: BF 32 A0 0A 20 44 45 58 00 C8 32 AA 0A 20 44 45 |.2.. DEX..2.. DE|
000012F0: 58 00 D1 32 B4 0A 20 44 45 59 00 E2 32 BE 0A 20 |X..2.. DEY..2.. |
00001300: 42 50 4C 43 4F 50 59 43 48 41 52 00 EB 32 C8 0A |BPLCOPYCHAR..2..|
00001310: 20 50 4C 41 00 F7 32 D2 0A 20 53 54 41 24 30 31 | PLA..2.. STA$01|
00001320: 00 07 33 DC 0A 4E 4F 43 48 52 20 44 45 43 43 31 |..3..NOCHR DECC1|
00001330: 00 10 33 E6 0A 20 52 54 53 00 16 33 F0 0A 3B 00 |..3.. RTS..3..;.|
00001340: 1C 33 FA 0A 3B 00 34 33 04 0B 3B 2D 2D 2D 3E 20 |.3..;.43..;---> |
00001350: C3 20 C8 20 C1 20 D2 20 C1 20 C4 20 D2 00 3A 33 |. . . . . . ..:3|
00001360: 0E 0B 3B 00 64 33 18 0B 3B C2 45 52 45 43 48 4E |..;.d3..;.ERECHN|
00001370: 45 54 20 44 49 45 20 C1 44 52 45 53 53 45 20 45 |ET DIE .DRESSE E|
00001380: 49 4E 45 53 20 DA 45 49 43 48 45 4E 53 00 6A 33 |INES .EICHENS.j3|
00001390: 22 0B 3B 00 8D 33 2C 0B 3B 3E 3E 3E 3A 28 41 29 |".;..3,.;>>>:(A)|
000013A0: 20 2D 20 CE 55 4D 4D 45 52 20 44 45 53 20 DA 45 | - .UMMER DES .E|
000013B0: 49 43 48 45 4E 53 00 AC 33 36 0B 3B 20 20 20 20 |ICHENS..36.; |
000013C0: 28 58 29 20 2D 20 DA 45 49 43 48 45 4E 42 41 53 |(X) - .EICHENBAS|
000013D0: 49 53 20 C8 C9 00 B2 33 40 0B 3B 00 C4 33 4A 0B |IS ....3@.;..3J.|
000013E0: 43 48 41 52 41 44 52 20 4C 44 59 23 30 00 D1 33 |CHARADR LDY#0..3|
000013F0: 54 0B 20 53 54 59 52 31 2B 31 00 DA 33 5E 0B 20 |T. STYR1+1..3^. |
00001400: 41 53 4C 00 E7 33 68 0B 20 52 4F 4C 52 31 2B 31 |ASL..3h. ROLR1+1|
00001410: 00 F0 33 72 0B 20 41 53 4C 00 FD 33 7C 0B 20 52 |..3r. ASL..3|. R|
00001420: 4F 4C 52 31 2B 31 00 06 34 86 0B 20 41 53 4C 00 |OLR1+1..4.. ASL.|
00001430: 13 34 90 0B 20 52 4F 4C 52 31 2B 31 00 1E 34 9A |.4.. ROLR1+1..4.|
00001440: 0B 20 53 54 41 52 31 00 27 34 A4 0B 20 54 58 41 |. STAR1.'4.. TXA|
00001450: 00 30 34 AE 0B 20 43 4C 43 00 3D 34 B8 0B 20 41 |.04.. CLC.=4.. A|
00001460: 44 43 52 31 2B 31 00 4A 34 C2 0B 20 53 54 41 52 |DCR1+1.J4.. STAR|
00001470: 31 2B 31 00 53 34 CC 0B 20 52 54 53 00 59 34 D6 |1+1.S4.. RTS.Y4.|
00001480: 0B 3B 00 5F 34 E0 0B 3B 00 79 34 EA 0B 3B 2D 2D |.;._4..;.y4..;--|
00001490: 2D 3E 20 C9 20 CE 20 C9 20 D4 20 D3 20 D0 20 D2 |-> . . . . . . .|
000014A0: 20 31 00 7F 34 F4 0B 3B 00 B2 34 FE 0B 3B C9 4E | 1..4..;..4..;.N|
000014B0: 49 54 49 41 4C 49 53 49 45 52 54 20 D3 50 52 49 |ITIALISIERT .PRI|
000014C0: 54 45 53 20 46 55 45 52 20 C2 4F 52 44 45 52 2D |TES FUER .ORDER-|
000014D0: CC 41 55 46 53 43 48 52 49 46 54 00 B8 34 08 0C |.AUFSCHRIFT..4..|
000014E0: 3B 00 CD 34 12 0C 49 4E 49 54 53 50 52 31 20 4C |;..4..INITSPR1 L|
000014F0: 44 58 23 24 31 30 00 03 35 1C 0C 4E 53 50 4F 53 |DX#$10..5..NSPOS|
00001500: 20 4C 44 41 50 4F 53 31 2C 58 3B D3 50 52 49 54 | LDAPOS1,X;.PRIT|
00001510: 45 50 4F 53 49 54 49 4F 4E 45 4E 20 46 55 45 52 |EPOSITIONEN FUER|
00001520: 20 CC 41 55 46 53 43 48 52 49 46 54 00 11 35 26 | .AUFSCHRIFT..5&|
00001530: 0C 20 53 54 41 56 49 43 2C 58 00 1A 35 30 0C 20 |. STAVIC,X..50. |
00001540: 44 45 58 00 28 35 3A 0C 20 42 50 4C 4E 53 50 4F |DEX.(5:. BPLNSPO|
00001550: 53 00 53 35 44 0C 20 4C 44 58 23 24 30 37 3B D3 |S.S5D. LDX#$07;.|
00001560: 50 52 49 54 45 5A 45 49 47 45 52 20 53 45 54 5A |PRITEZEIGER SETZ|
00001570: 45 4E 20 28 24 33 38 2D 24 33 46 29 00 60 35 49 |EN ($38-$3F).`5I|
00001580: 0C 20 4C 44 59 23 24 33 46 00 70 35 4E 0C 4E 53 |. LDY#$3F.p5N.NS|
00001590: 43 4F 4C 20 4C 44 41 23 30 00 82 35 58 0C 20 53 |COL LDA#0..5X. S|
000015A0: 54 41 56 49 43 2B 24 32 37 2C 58 00 8B 35 5B 0C |TAVIC+$27,X..5[.|
000015B0: 20 54 59 41 00 9C 35 5D 0C 20 53 54 41 53 50 52 | TYA..5]. STASPR|
000015C0: 50 4E 54 2C 58 00 A5 35 5F 0C 20 44 45 59 00 AE |PNT,X..5_. DEY..|
000015D0: 35 62 0C 20 44 45 58 00 BC 35 6C 0C 20 42 50 4C |5b. DEX..5l. BPL|
000015E0: 4E 53 43 4F 4C 00 C9 35 76 0C 20 4C 44 41 23 24 |NSCOL..5v. LDA#$|
000015F0: 46 46 00 E9 35 80 0C 20 53 54 41 56 49 43 2B 24 |FF..5.. STAVIC+$|
00001600: 31 35 3B C1 4C 4C 45 20 D3 50 52 49 54 45 53 20 |15;.LLE .PRITES |
00001610: 41 4E 00 07 36 8A 0C 20 53 54 41 56 49 43 2B 24 |AN..6.. STAVIC+$|
00001620: 31 44 3B D8 2D D6 45 52 44 4F 50 50 4C 55 4E 47 |1D;.-.ERDOPPLUNG|
00001630: 00 12 36 94 0C 20 4C 44 41 23 30 00 31 36 9E 0C |..6.. LDA#0.16..|
00001640: 20 53 54 41 56 49 43 2B 24 31 42 3B D0 52 49 4F | STAVIC+$1B;.RIO|
00001650: 52 49 54 41 45 54 20 CF C6 C6 00 50 36 A8 0C 20 |RITAET ....P6.. |
00001660: 53 54 41 56 49 43 2B 24 31 43 3B CD 55 4C 54 49 |STAVIC+$1C;.ULTI|
00001670: 43 4F 4C 4F 52 20 CF C6 C6 00 6E 36 B2 0C 20 53 |COLOR ....n6.. S|
00001680: 54 41 56 49 43 2B 24 31 37 3B D9 2D D6 45 52 44 |TAVIC+$17;.-.ERD|
00001690: 4F 50 50 4C 55 4E 47 00 77 36 BC 0C 20 52 54 53 |OPPLUNG.w6.. RTS|
000016A0: 00 7D 36 C6 0C 3B 00 83 36 D0 0C 3B 00 9D 36 DA |.}6..;..6..;..6.|
000016B0: 0C 3B 2D 2D 2D 3E 20 C3 20 CC 20 C5 20 C1 20 D2 |.;---> . . . . .|
000016C0: 20 D3 20 D0 20 D2 00 A3 36 E4 0C 3B 00 BD 36 EE | . . ...6..;..6.|
000016D0: 0C 3B CC 4F 45 53 43 48 54 20 D3 50 52 49 54 45 |.;.OESCHT .PRITE|
000016E0: 2D C4 41 54 45 4E 00 C3 36 F8 0C 3B 00 D6 36 02 |-.ATEN..6..;..6.|
000016F0: 0D 43 4C 45 41 52 53 50 52 20 4C 44 58 23 30 00 |.CLEARSPR LDX#0.|
00001700: E1 36 0C 0D 20 4C 44 41 23 30 00 FA 36 16 0D 4E |.6.. LDA#0..6..N|
00001710: 43 4C 52 53 50 52 20 53 54 41 53 50 52 49 54 45 |CLRSPR STASPRITE|
00001720: 53 2C 58 00 12 37 20 0D 20 53 54 41 53 50 52 49 |S,X..7 . STASPRI|
00001730: 54 45 53 2B 24 30 31 30 30 2C 58 00 1B 37 2A 0D |TES+$0100,X..7*.|
00001740: 20 49 4E 58 00 2B 37 34 0D 20 42 4E 45 4E 43 4C | INX.+74. BNENCL|
00001750: 52 53 50 52 00 34 37 3E 0D 20 52 54 53 00 3A 37 |RSPR.47>. RTS.:7|
00001760: 48 0D 3B 00 40 37 52 0D 3B 00 5A 37 5C 0D 3B 2D |H.;.@7R.;.Z7\.;-|
00001770: 2D 2D 3E 20 C8 20 D3 20 C3 20 D2 20 CF 20 CC 20 |--> . . . . . . |
00001780: CC 20 31 00 60 37 66 0D 3B 00 83 37 70 0D 3B D3 |. 1.`7f.;..7p.;.|
00001790: 43 52 4F 4C 4C 54 20 44 49 45 20 4F 42 45 52 45 |CROLLT DIE OBERE|
000017A0: 20 CC 41 55 46 53 43 48 52 49 46 54 00 89 37 7A | .AUFSCHRIFT..7z|
000017B0: 0D 3B 00 9C 37 84 0D 48 53 43 52 4F 4C 4C 31 20 |.;..7..HSCROLL1 |
000017C0: 4C 44 58 23 30 00 B3 37 8E 0D 4E 53 43 31 20 4C |LDX#0..7..NSC1 L|
000017D0: 44 41 53 43 52 45 45 4E 2B 31 2C 58 00 C4 37 98 |DASCREEN+1,X..7.|
000017E0: 0D 20 53 54 41 53 43 52 45 45 4E 2C 58 00 D9 37 |. STASCREEN,X..7|
000017F0: A2 0D 20 4C 44 41 53 43 52 45 45 4E 2B 24 32 39 |.. LDASCREEN+$29|
00001800: 2C 58 00 EE 37 AC 0D 20 53 54 41 53 43 52 45 45 |,X..7.. STASCREE|
00001810: 4E 2B 24 32 38 2C 58 00 03 38 B6 0D 20 4C 44 41 |N+$28,X..8.. LDA|
00001820: 53 43 52 45 45 4E 2B 24 35 31 2C 58 00 18 38 C0 |SCREEN+$51,X..8.|
00001830: 0D 20 53 54 41 53 43 52 45 45 4E 2B 24 35 30 2C |. STASCREEN+$50,|
00001840: 58 00 21 38 CA 0D 20 49 4E 58 00 2D 38 D4 0D 20 |X.!8.. INX.-8.. |
00001850: 43 50 58 23 33 39 00 3A 38 DE 0D 20 42 4E 45 4E |CPX#39.:8.. BNEN|
00001860: 53 43 31 00 43 38 E8 0D 20 52 54 53 00 49 38 F2 |SC1.C8.. RTS.I8.|
00001870: 0D 3B 00 4F 38 FC 0D 3B 00 67 38 06 0E 3B 2D 2D |.;.O8..;.g8..;--|
00001880: 2D 3E 20 D3 20 C3 20 D2 20 CF 20 CC 20 CC 20 31 |-> . . . . . . 1|
00001890: 00 6D 38 10 0E 3B 00 97 38 1A 0E 3B D3 4F 46 54 |.m8..;..8..;.OFT|
000018A0: 53 43 52 4F 4C 4C 49 4E 47 20 44 45 52 20 4F 42 |SCROLLING DER OB|
000018B0: 45 52 45 4E 20 CC 41 55 46 53 43 48 52 49 46 54 |EREN .AUFSCHRIFT|
000018C0: 00 9D 38 24 0E 3B 00 C7 38 26 0E 53 43 52 4F 4C |..8$.;..8&.SCROL|
000018D0: 4C 31 20 4C 44 41 54 45 58 54 32 3B D0 41 55 53 |L1 LDATEXT2;.AUS|
000018E0: 45 5A 41 45 48 4C 45 52 3D 30 3F 20 4A 3A 2D 3E |EZAEHLER=0? J:->|
000018F0: 00 D4 38 29 0E 20 42 45 51 53 43 52 31 00 E2 38 |..8). BEQSCR1..8|
00001900: 2B 0E 20 44 45 43 54 45 58 54 32 00 EB 38 2C 0E |+. DECTEXT2..8,.|
00001910: 20 52 54 53 00 1C 39 2E 0E 53 43 52 31 20 4C 44 | RTS..9..SCR1 LD|
00001920: 41 49 4E 44 45 58 31 3B C9 4E 44 45 58 20 5A 55 |AINDEX1;.NDEX ZU|
00001930: 4D 20 C2 49 4C 44 52 41 4E 44 20 56 45 52 41 45 |M .ILDRAND VERAE|
00001940: 4E 44 45 52 4E 00 29 39 38 0E 20 45 4F 52 23 24 |NDERN.)98. EOR#$|
00001950: 30 34 00 38 39 42 0E 20 53 54 41 49 4E 44 45 58 |04.89B. STAINDEX|
00001960: 31 00 4C 39 4C 0E 20 42 45 51 4E 48 53 43 3B 3D |1.L9L. BEQNHSC;=|
00001970: 30 3A 20 2D 3E 00 76 39 56 0E 20 4A 53 52 48 53 |0: ->.v9V. JSRHS|
00001980: 43 52 4F 4C 4C 31 3B 2D 2D 2D 3E 20 C2 49 4C 44 |CROLL1;---> .ILD|
00001990: 53 43 48 49 52 4D 20 53 43 52 4F 4C 4C 45 4E 00 |SCHIRM SCROLLEN.|
000019A0: AB 39 60 0E 20 49 4E 43 43 32 3B DA 41 45 48 4C |.9`. INCC2;.AEHL|
000019B0: 45 52 20 46 55 45 52 20 C2 52 45 49 54 45 20 44 |ER FUER .REITE D|
000019C0: 45 53 20 DA 45 49 43 48 45 4E 53 20 45 52 48 4F |ES .EICHENS ERHO|
000019D0: 45 48 45 4E 00 B6 39 6A 0E 20 4C 44 41 43 32 00 |EHEN..9j. LDAC2.|
000019E0: CA 39 74 0E 20 43 4D 50 23 33 3B 3D 33 3F 20 4E |.9t. CMP#3;=3? N|
000019F0: 3A 2D 3E 00 D8 39 7E 0E 20 42 43 43 4E 4E 43 48 |:->..9~. BCCNNCH|
00001A00: 52 00 EC 39 88 0E 20 2E 2E 2E 4C 44 58 59 28 54 |R..9.. ...LDXY(T|
00001A10: 45 58 54 32 29 00 1D 3A 92 0E 20 4A 53 52 49 4E |EXT2)..:.. JSRIN|
00001A20: 43 54 45 58 54 3B 2D 2D 2D 3E 20 D4 45 58 54 5A |CTEXT;---> .EXTZ|
00001A30: 45 49 47 45 52 20 55 4D 20 45 49 4E 53 20 45 52 |EIGER UM EINS ER|
00001A40: 48 4F 45 48 45 4E 00 33 3A C4 0E 4E 46 42 20 4C |HOEHEN.3:..NFB L|
00001A50: 44 58 23 3E 28 53 43 52 49 50 54 29 00 57 3A C9 |DX#>(SCRIPT).W:.|
00001A60: 0E 20 41 4E 44 23 24 31 46 3B CD 41 53 4B 45 20 |. AND#$1F;.ASKE |
00001A70: 46 55 45 52 20 C1 D3 C3 C9 C9 2D C3 4F 44 45 53 |FUER .....-.ODES|
00001A80: 00 60 3A CE 0E 20 50 48 41 00 91 3A D8 0E 20 4A |.`:.. PHA..:.. J|
00001A90: 53 52 43 48 41 52 41 44 52 3B 2D 2D 2D 3E 20 C1 |SRCHARADR;---> .|
00001AA0: 44 52 45 53 53 45 20 42 45 52 45 43 48 4E 45 4E |DRESSE BERECHNEN|
00001AB0: 20 28 CE 52 2E 20 2A 20 38 29 00 9A 3A E2 0E 20 | (.R. * 8)..:.. |
00001AC0: 50 4C 41 00 BE 3A EC 0E 20 43 4C 43 3B CE 52 2E |PLA..:.. CLC;.R.|
00001AD0: 2A 38 20 2B 20 CE 52 20 45 52 47 49 42 54 20 CE |*8 + .R ERGIBT .|
00001AE0: 52 2E 20 2A 20 39 21 00 C9 3A F6 0E 20 41 44 43 |R. * 9!..:.. ADC|
00001AF0: 52 31 00 D4 3A 00 0F 20 53 54 41 52 31 00 E1 3A |R1..:.. STAR1..:|
00001B00: 0A 0F 20 42 43 43 4E 49 4E 43 00 EE 3A 14 0F 20 |.. BCCNINC..:.. |
00001B10: 49 4E 43 52 31 2B 31 00 22 3B 15 0F 4E 49 4E 43 |INCR1+1.";..NINC|
00001B20: 20 4C 44 41 52 31 3B C5 52 47 45 42 4E 49 53 20 | LDAR1;.RGEBNIS |
00001B30: 49 4E 20 DA 45 49 43 48 45 4E 53 50 45 49 43 48 |IN .EICHENSPEICH|
00001B40: 45 52 20 4B 4F 50 49 45 52 45 4E 00 2F 3B 16 0F |ER KOPIEREN./;..|
00001B50: 20 53 54 41 43 48 41 52 00 3C 3B 17 0F 20 4C 44 | STACHAR.<;.. LD|
00001B60: 41 52 31 2B 31 00 4B 3B 18 0F 20 53 54 41 43 48 |AR1+1.K;.. STACH|
00001B70: 41 52 2B 31 00 56 3B 1E 0F 20 4C 44 41 23 30 00 |AR+1.V;.. LDA#0.|
00001B80: 61 3B 28 0F 20 53 54 41 43 32 00 71 3B 32 0F 4E |a;(. STAC2.q;2.N|
00001B90: 4E 43 48 52 20 4C 44 59 43 32 00 7A 3B 34 0F 20 |NCHR LDYC2.z;4. |
00001BA0: 53 45 49 00 B2 3B 35 0F 20 4C 44 58 24 30 31 3B |SEI..;5. LDX$01;|
00001BB0: CE 41 45 43 48 53 54 45 20 D3 50 41 4C 54 45 20 |.AECHSTE .PALTE |
00001BC0: 44 45 53 20 DA 45 49 43 48 45 4E 53 20 41 55 46 |DES .EICHENS AUF|
00001BD0: 20 C2 49 4C 44 53 43 48 49 52 4D 00 BF 3B 36 0F | .ILDSCHIRM..;6.|
00001BE0: 20 4C 44 41 23 24 33 30 00 CB 3B 37 0F 20 53 54 | LDA#$30..;7. ST|
00001BF0: 41 24 30 31 00 DC 3B 3C 0F 20 4C 44 41 28 43 48 |A$01..;<. LDA(CH|
00001C00: 41 52 29 2C 59 00 EF 3B 46 0F 20 53 54 41 53 43 |AR),Y..;F. STASC|
00001C10: 52 45 45 4E 2B 24 32 37 00 F8 3B 50 0F 20 49 4E |REEN+$27..;P. IN|
00001C20: 59 00 01 3C 5A 0F 20 49 4E 59 00 0A 3C 64 0F 20 |Y..<Z. INY..<d. |
00001C30: 49 4E 59 00 1B 3C 6E 0F 20 4C 44 41 28 43 48 41 |INY..<n. LDA(CHA|
00001C40: 52 29 2C 59 00 2E 3C 78 0F 20 53 54 41 53 43 52 |R),Y..<x. STASCR|
00001C50: 45 45 4E 2B 24 34 46 00 37 3C 82 0F 20 49 4E 59 |EEN+$4F.7<.. INY|
00001C60: 00 40 3C 8C 0F 20 49 4E 59 00 49 3C 96 0F 20 49 |.@<.. INY.I<.. I|
00001C70: 4E 59 00 5A 3C A0 0F 20 4C 44 41 28 43 48 41 52 |NY.Z<.. LDA(CHAR|
00001C80: 29 2C 59 00 6D 3C AA 0F 20 53 54 41 53 43 52 45 |),Y.m<.. STASCRE|
00001C90: 45 4E 2B 24 37 37 00 79 3C AC 0F 20 53 54 58 24 |EN+$77.y<.. STX$|
00001CA0: 30 31 00 82 3C AE 0F 20 43 4C 49 00 8F 3C B4 0F |01..<.. CLI..<..|
00001CB0: 4E 48 53 43 20 52 54 53 00 95 3C BE 0F 3B 00 9B |NHSC RTS..<..;..|
00001CC0: 3C C8 0F 3B 00 B3 3C D2 0F 3B 2D 2D 2D 3E 20 C3 |<..;..<..;---> .|
00001CD0: 20 CF 20 D0 20 D9 20 D3 20 C5 20 D1 00 B9 3C DC | . . . . . ...<.|
00001CE0: 0F 3B 00 EC 3C E6 0F 3B D3 45 51 55 45 4E 5A 20 |.;..<..;.EQUENZ |
00001CF0: 56 45 52 53 43 48 4F 42 45 4E 20 49 4E 20 C1 52 |VERSCHOBEN IN .R|
00001D00: 42 45 49 54 53 42 45 52 45 49 43 48 20 4B 4F 50 |BEITSBEREICH KOP|
00001D10: 49 45 52 45 4E 00 F2 3C F0 0F 3B 00 18 3D FA 0F |IEREN..<..;..=..|
00001D20: 3B 3E 3E 3E 3A 20 28 52 32 29 20 20 2D 20 C1 44 |;>>>: (R2) - .D|
00001D30: 52 45 53 53 45 20 44 45 52 20 D3 45 51 55 45 4E |RESSE DER .EQUEN|
00001D40: 5A 00 45 3D FF 0F 3B 20 20 20 20 20 41 20 20 20 |Z.E=..; A |
00001D50: 20 20 2D 20 CC 41 45 4E 47 45 20 44 45 53 20 C1 | - .AENGE DES .|
00001D60: 52 42 45 49 54 53 42 45 52 45 49 43 48 53 00 73 |RBEITSBEREICHS.s|
00001D70: 3D 04 10 3B 20 20 20 20 20 28 58 2C 59 29 20 2D |=..; (X,Y) -|
00001D80: 20 C1 44 52 45 53 53 45 20 44 45 53 20 C1 52 42 | .DRESSE DES .RB|
00001D90: 45 49 54 53 42 45 52 45 49 43 48 53 00 79 3D 0E |EITSBEREICHS.y=.|
00001DA0: 10 3B 00 90 3D 18 10 43 4F 50 59 53 45 51 20 53 |.;..=..COPYSEQ S|
00001DB0: 54 58 53 54 4F 52 45 2B 31 00 A0 3D 22 10 20 53 |TXSTORE+1..=". S|
00001DC0: 54 59 53 54 4F 52 45 2B 32 00 AE 3D 27 10 20 53 |TYSTORE+2..='. S|
00001DD0: 54 41 43 4D 57 2B 31 00 B9 3D 2C 10 20 4C 44 59 |TACMW+1..=,. LDY|
00001DE0: 23 30 00 C8 3D 36 10 20 4C 44 41 28 52 32 29 2C |#0..=6. LDA(R2),|
00001DF0: 59 00 D1 3D 40 10 20 50 48 41 00 DA 3D 4A 10 20 |Y..=@. PHA..=J. |
00001E00: 49 4E 59 00 E9 3D 54 10 20 4C 44 41 28 52 32 29 |INY..=T. LDA(R2)|
00001E10: 2C 59 00 F7 3D 5E 10 20 53 54 41 43 4D 50 2B 31 |,Y..=^. STACMP+1|
00001E20: 00 00 3E 68 10 20 50 4C 41 00 09 3E 72 10 20 54 |..>h. PLA..>r. T|
00001E30: 41 59 00 12 3E 7C 10 20 43 4C 43 00 1D 3E 86 10 |AY..>|. CLC..>..|
00001E40: 20 4C 44 41 52 32 00 28 3E 90 10 20 41 44 43 23 | LDAR2.(>.. ADC#|
00001E50: 32 00 33 3E 9A 10 20 53 54 41 52 32 00 42 3E A4 |2.3>.. STAR2.B>.|
00001E60: 10 20 42 43 43 4E 4F 49 4E 52 32 00 4F 3E AE 10 |. BCCNOINR2.O>..|
00001E70: 20 49 4E 43 52 32 2B 31 00 60 3E B8 10 4E 4F 49 | INCR2+1.`>..NOI|
00001E80: 4E 52 32 20 4C 44 58 23 30 00 74 3E C2 10 4E 43 |NR2 LDX#0.t>..NC|
00001E90: 4F 50 59 20 4C 44 41 28 52 32 29 2C 59 00 89 3E |OPY LDA(R2),Y..>|
00001EA0: CC 10 53 54 4F 52 45 20 53 54 41 24 46 46 46 46 |..STORE STA$FFFF|
00001EB0: 2C 58 00 92 3E E0 10 20 49 4E 59 00 A2 3E EA 10 |,X..>.. INY..>..|
00001EC0: 43 4D 50 20 43 50 59 23 24 46 46 00 B1 3E F9 10 |CMP CPY#$FF..>..|
00001ED0: 20 42 43 43 4E 53 45 51 4F 56 00 BC 3E FE 10 20 | BCCNSEQOV..>.. |
00001EE0: 4C 44 59 23 30 00 CB 3E 08 11 4E 53 45 51 4F 56 |LDY#0..>..NSEQOV|
00001EF0: 20 49 4E 58 00 DB 3E 12 11 43 4D 57 20 43 50 58 | INX..>..CMW CPX|
00001F00: 23 24 46 46 00 E9 3E 1C 11 20 42 43 43 4E 43 4F |#$FF..>.. BCCNCO|
00001F10: 50 59 00 F2 3E 26 11 20 52 54 53 00 F8 3E 30 11 |PY..>&. RTS..>0.|
00001F20: 3B 00 FE 3E 3A 11 3B 00 14 3F 44 11 3B 2D 2D 2D |;..>:.;..?D.;---|
00001F30: 3E 20 C9 20 CE 20 C3 20 D3 20 C5 20 D1 00 1A 3F |> . . . . . ...?|
00001F40: 4E 11 3B 00 3F 3F 58 11 3B D3 45 51 55 45 4E 5A |N.;.??X.;.EQUENZ|
00001F50: 5A 45 49 47 45 52 20 55 4D 20 28 41 29 20 56 45 |ZEIGER UM (A) VE|
00001F60: 52 41 45 4E 44 45 52 4E 00 45 3F 62 11 3B 00 6B |RAENDERN.E?b.;.k|
00001F70: 3F 6C 11 3B 3E 3E 3E 3A 20 41 20 20 2D 20 C1 44 |?l.;>>>: A - .D|
00001F80: 44 49 45 52 57 45 52 54 20 28 41 55 43 48 20 4E |DIERWERT (AUCH N|
00001F90: 45 47 2E 29 00 8C 3F 76 11 3B 20 20 20 20 20 28 |EG.)..?v.; (|
00001FA0: 58 2C 59 29 20 2D 20 D3 45 51 55 45 4E 5A 41 44 |X,Y) - .EQUENZAD|
00001FB0: 52 45 53 53 45 00 92 3F 80 11 3B 00 A3 3F 8A 11 |RESSE..?..;..?..|
00001FC0: 49 4E 43 53 45 51 20 53 54 58 52 32 00 B0 3F 94 |INCSEQ STXR2..?.|
00001FD0: 11 20 53 54 59 52 32 2B 31 00 BB 3F 9E 11 20 4C |. STYR2+1..?.. L|
00001FE0: 44 59 23 30 00 C4 3F A8 11 20 43 4C 43 00 D3 3F |DY#0..?.. CLC..?|
00001FF0: B2 11 20 41 44 43 28 52 32 29 2C 59 00 DC 3F BC |.. ADC(R2),Y..?.|
00002000: 11 20 49 4E 59 00 F0 3F C6 11 4E 54 45 53 54 20 |. INY..?..NTEST |
00002010: 43 4D 50 28 52 32 29 2C 59 00 FF 3F D0 11 20 42 |CMP(R2),Y..?.. B|
00002020: 43 43 53 45 51 50 4F 4B 00 08 40 DA 11 20 54 41 |CCSEQPOK..@.. TA|
00002030: 58 00 14 40 E4 11 20 42 50 4C 53 55 42 00 1D 40 |X..@.. BPLSUB..@|
00002040: EE 11 20 43 4C 43 00 2C 40 02 12 20 41 44 43 28 |.. CLC.,@.. ADC(|
00002050: 52 32 29 2C 59 00 3A 40 16 12 20 4A 4D 50 4E 54 |R2),Y.:@.. JMPNT|
00002060: 45 53 54 00 46 40 20 12 53 55 42 20 53 45 43 00 |EST.F@ .SUB SEC.|
00002070: 55 40 2A 12 20 53 42 43 28 52 32 29 2C 59 00 63 |U@*. SBC(R2),Y.c|
00002080: 40 48 12 20 4A 4D 50 4E 54 45 53 54 00 72 40 5C |@H. JMPNTEST.r@\|
00002090: 12 53 45 51 50 4F 4B 20 44 45 59 00 81 40 61 12 |.SEQPOK DEY..@a.|
000020A0: 20 53 54 41 28 52 32 29 2C 59 00 8A 40 66 12 20 | STA(R2),Y..@f. |
000020B0: 52 54 53 00 90 40 C0 12 3B 00 96 40 CA 12 3B 00 |RTS..@..;..@..;.|
000020C0: AE 40 D4 12 3B 2D 2D 2D 3E 20 CD 20 CF 20 D6 20 |.@..;---> . . . |
000020D0: C5 20 D3 20 C5 20 D1 00 B4 40 DE 12 3B 00 01 41 |. . . ...@..;..A|
000020E0: E8 12 3B C1 4C 4C 45 20 D3 45 51 55 45 4E 5A 5A |..;.LLE .EQUENZZ|
000020F0: 45 49 47 45 52 20 56 45 52 53 43 48 49 45 42 45 |EIGER VERSCHIEBE|
00002100: 4E 20 55 4E 44 20 D3 45 51 55 45 4E 5A 45 4E 20 |N UND .EQUENZEN |
00002110: 49 4E 20 C1 52 42 45 49 54 53 42 45 52 45 49 43 |IN .RBEITSBEREIC|
00002120: 48 20 4B 4F 50 49 45 52 45 4E 00 07 41 F2 12 3B |H KOPIEREN..A..;|
00002130: 00 21 41 FC 12 4D 4F 56 45 53 45 51 20 2E 2E 2E |.!A..MOVESEQ ...|
00002140: 4C 44 58 59 28 53 45 51 31 29 00 2C 41 06 13 20 |LDXY(SEQ1).,A.. |
00002150: 4C 44 41 23 31 00 3B 41 10 13 20 4A 53 52 49 4E |LDA#1.;A.. JSRIN|
00002160: 43 53 45 51 00 4F 41 1A 13 20 2E 2E 2E 4C 44 58 |CSEQ.OA.. ...LDX|
00002170: 59 28 57 4F 52 4B 31 29 00 5B 41 24 13 20 4C 44 |Y(WORK1).[A$. LD|
00002180: 41 23 32 34 00 6B 41 2E 13 20 4A 53 52 43 4F 50 |A#24.kA.. JSRCOP|
00002190: 59 53 45 51 00 80 41 38 13 20 2E 2E 2E 4C 44 58 |YSEQ..A8. ...LDX|
000021A0: 59 28 43 4F 4C 4F 52 32 29 00 8B 41 42 13 20 4C |Y(COLOR2)..AB. L|
000021B0: 44 41 23 31 00 9A 41 4C 13 20 4A 53 52 49 4E 43 |DA#1..AL. JSRINC|
000021C0: 53 45 51 00 AE 41 56 13 20 2E 2E 2E 4C 44 58 59 |SEQ..AV. ...LDXY|
000021D0: 28 57 4F 52 4B 32 29 00 BA 41 60 13 20 4C 44 41 |(WORK2)..A`. LDA|
000021E0: 23 32 34 00 CA 41 6A 13 20 4A 53 52 43 4F 50 59 |#24..Aj. JSRCOPY|
000021F0: 53 45 51 00 D0 41 7D 13 3B 00 E3 41 7E 13 20 2E |SEQ..A}.;..A~. .|
00002200: 2E 2E 4C 44 58 59 28 53 45 51 32 29 00 EE 41 88 |..LDXY(SEQ2)..A.|
00002210: 13 20 4C 44 41 23 31 00 FD 41 92 13 20 4A 53 52 |. LDA#1..A.. JSR|
00002220: 49 4E 43 53 45 51 00 11 42 9C 13 20 2E 2E 2E 4C |INCSEQ..B.. ...L|
00002230: 44 58 59 28 57 4F 52 4B 33 29 00 1C 42 A6 13 20 |DXY(WORK3)..B.. |
00002240: 4C 44 41 23 38 00 2C 42 B0 13 20 4A 4D 50 43 4F |LDA#8.,B.. JMPCO|
00002250: 50 59 53 45 51 00 32 42 EC 13 3B 00 38 42 F6 13 |PYSEQ.2B..;.8B..|
00002260: 3B 00 52 42 00 14 3B 2D 2D 2D 3E 20 C3 20 CC 20 |;.RB..;---> . . |
00002270: C5 20 C1 20 D2 20 D3 20 C3 20 D2 00 58 42 0A 14 |. . . . . ..XB..|
00002280: 3B 00 71 42 14 14 3B C2 49 4C 44 53 43 48 49 52 |;.qB..;.ILDSCHIR|
00002290: 4D 20 4C 4F 45 53 43 48 45 4E 00 77 42 1E 14 3B |M LOESCHEN.wB..;|
000022A0: 00 B1 42 23 14 43 4C 45 41 52 53 43 52 20 2E 2E |..B#.CLEARSCR ..|
000022B0: 2E 4C 44 41 44 52 28 52 31 2C 53 43 52 45 45 4E |.LDADR(R1,SCREEN|
000022C0: 29 3B DA 45 49 47 45 52 20 52 31 20 41 55 46 20 |);.EIGER R1 AUF |
000022D0: C2 49 4C 44 53 43 48 49 52 4D 00 BC 42 26 14 20 |.ILDSCHIRM..B&. |
000022E0: 4C 44 58 23 30 00 ED 42 29 14 43 4C 52 4C 49 4E |LDX#0..B).CLRLIN|
000022F0: 45 20 4C 44 41 43 4C 52 54 41 42 2C 58 3B CC 4F |E LDACLRTAB,X;.O|
00002300: 45 53 43 48 57 45 52 54 20 46 55 45 52 20 D6 49 |ESCHWERT FUER .I|
00002310: 44 45 4F 52 41 4D 00 F9 42 2C 14 20 4C 44 59 23 |DEORAM..B,. LDY#|
00002320: 33 39 00 1D 43 2F 14 43 4C 52 56 49 44 20 53 54 |39..C/.CLRVID ST|
00002330: 41 28 52 31 29 2C 59 3B DA 45 49 4C 45 20 4C 4F |A(R1),Y;.EILE LO|
00002340: 45 53 43 48 45 4E 00 26 43 32 14 20 44 45 59 00 |ESCHEN.&C2. DEY.|
00002350: 35 43 35 14 20 42 50 4C 43 4C 52 56 49 44 00 42 |5C5. BPLCLRVID.B|
00002360: 43 38 14 20 4C 44 41 52 31 2B 31 00 4B 43 3B 14 |C8. LDAR1+1.KC;.|
00002370: 20 50 48 41 00 56 43 3E 14 20 41 4E 44 23 33 00 | PHA.VC>. AND#3.|
00002380: 7B 43 3F 14 20 4F 52 41 23 3E 28 43 4F 4C 4F 52 |{C?. ORA#>(COLOR|
00002390: 29 3B DA 45 49 47 45 52 20 41 55 46 20 C6 41 52 |);.EIGER AUF .AR|
000023A0: 42 52 41 4D 00 88 43 41 14 20 53 54 41 52 31 2B |BRAM..CA. STAR1+|
000023B0: 31 00 B3 43 44 14 20 4C 44 41 43 4C 52 54 41 42 |1..CD. LDACLRTAB|
000023C0: 2B 31 2C 58 3B CC 4F 45 53 43 48 57 45 52 54 20 |+1,X;.OESCHWERT |
000023D0: 46 55 45 52 20 C6 41 52 42 52 41 4D 00 BF 43 47 |FUER .ARBRAM..CG|
000023E0: 14 20 4C 44 59 23 33 39 00 E2 43 4A 14 43 4C 52 |. LDY#39..CJ.CLR|
000023F0: 43 4F 4C 20 53 54 41 28 52 31 29 2C 59 3B DA 45 |COL STA(R1),Y;.E|
00002400: 49 4C 45 20 46 55 45 4C 4C 45 4E 00 EB 43 4D 14 |ILE FUELLEN..CM.|
00002410: 20 44 45 59 00 FA 43 50 14 20 42 50 4C 43 4C 52 | DEY..CP. BPLCLR|
00002420: 43 4F 4C 00 03 44 53 14 20 50 4C 41 00 29 44 56 |COL..DS. PLA.)DV|
00002430: 14 20 53 54 41 52 31 2B 31 3B DA 45 49 47 45 52 |. STAR1+1;.EIGER|
00002440: 20 57 49 45 44 45 52 20 48 45 52 53 54 45 4C 4C | WIEDER HERSTELL|
00002450: 45 4E 00 32 44 59 14 20 43 4C 43 00 66 44 5C 14 |EN.2DY. CLC.fD\.|
00002460: 20 4C 44 41 23 34 30 3B DA 45 49 47 45 52 3D DA | LDA#40;.EIGER=.|
00002470: 45 49 47 45 52 2B 34 30 20 28 45 49 4E 45 20 C2 |EIGER+40 (EINE .|
00002480: 49 4C 44 53 43 48 49 52 4D 5A 45 49 4C 45 29 00 |ILDSCHIRMZEILE).|
00002490: 71 44 5F 14 20 41 44 43 52 31 00 7C 44 62 14 20 |qD_. ADCR1.|Db. |
000024A0: 53 54 41 52 31 00 8A 44 65 14 20 42 43 43 4E 4F |STAR1..De. BCCNO|
000024B0: 56 52 31 00 97 44 68 14 20 49 4E 43 52 31 2B 31 |VR1..Dh. INCR1+1|
000024C0: 00 A5 44 6B 14 4E 4F 56 52 31 20 49 4E 58 00 AE |..Dk.NOVR1 INX..|
000024D0: 44 6E 14 20 49 4E 58 00 D8 44 71 14 20 43 50 58 |Dn. INX..Dq. CPX|
000024E0: 23 35 30 3B 53 43 48 4F 4E 20 32 35 20 28 3D 35 |#50;SCHON 25 (=5|
000024F0: 30 2F 32 29 20 DA 45 49 4C 45 4E 3F 20 4E 3A 2D |0/2) .EILEN? N:-|
00002500: 3E 00 E8 44 74 14 20 42 43 43 43 4C 52 4C 49 4E |>..Dt. BCCCLRLIN|
00002510: 45 00 F1 44 77 14 20 52 54 53 00 F7 44 7A 14 3B |E..Dw. RTS..Dz.;|
00002520: 00 FD 44 BE 14 3B 00 03 45 C8 14 3B 00 1B 45 D2 |..D..;..E..;..E.|
00002530: 14 3B 2D 2D 2D 3E 20 C9 20 CE 20 C3 20 D4 20 C5 |.;---> . . . . .|
00002540: 20 D8 20 D4 00 21 45 DC 14 3B 00 5B 45 E6 14 3B | . ..!E..;.[E..;|
00002550: CE 41 45 43 48 53 54 45 53 20 DA 45 49 43 48 45 |.AECHSTES .EICHE|
00002560: 4E 20 41 55 53 20 D3 43 52 4F 4C 4C 54 45 58 54 |N AUS .CROLLTEXT|
00002570: 20 48 4F 4C 45 4E 2B D0 41 55 53 45 20 50 52 55 | HOLEN+.AUSE PRU|
00002580: 45 46 45 4E 00 61 45 F0 14 3B 00 73 45 FA 14 49 |EFEN.aE..;.sE..I|
00002590: 4E 43 54 45 58 54 20 53 54 58 52 31 00 80 45 04 |NCTEXT STXR1..E.|
000025A0: 15 20 53 54 59 52 31 2B 31 00 8B 45 0E 15 20 4C |. STYR1+1..E.. L|
000025B0: 44 59 23 30 00 94 45 18 15 20 54 59 41 00 A3 45 |DY#0..E.. TYA..E|
000025C0: 22 15 20 53 54 41 28 52 31 29 2C 59 00 AC 45 2C |". STA(R1),Y..E,|
000025D0: 15 20 49 4E 59 00 BB 45 36 15 20 4C 44 41 28 52 |. INY..E6. LDA(R|
000025E0: 31 29 2C 59 00 C4 45 40 15 20 54 41 59 00 CD 45 |1),Y..E@. TAY..E|
000025F0: 4A 15 20 49 4E 59 00 D6 45 54 15 20 49 4E 59 00 |J. INY..ET. INY.|
00002600: E9 45 5E 15 4E 43 48 52 20 4C 44 41 28 52 31 29 |.E^.NCHR LDA(R1)|
00002610: 2C 59 00 15 46 68 15 20 42 4E 45 43 48 52 4F 4B |,Y..Fh. BNECHROK|
00002620: 3B DA 45 49 43 48 45 4E 3D 30 20 28 45 4E 44 20 |;.EICHEN=0 (END |
00002630: 4F 46 20 54 45 58 54 29 3F 20 4E 3A 2D 3E 00 4A |OF TEXT)? N:->.J|
00002640: 46 72 15 20 4C 44 41 23 30 3B D4 45 58 54 5A 45 |Fr. LDA#0;.EXTZE|
00002650: 49 47 45 52 3D 30 20 28 41 55 46 20 45 52 53 54 |IGER=0 (AUF ERST|
00002660: 45 53 20 DA 45 49 43 48 45 4E 20 49 4D 20 D4 45 |ES .EICHEN IM .E|
00002670: 58 54 29 00 55 46 7C 15 20 4C 44 59 23 31 00 64 |XT).UF|. LDY#1.d|
00002680: 46 86 15 20 53 54 41 28 52 31 29 2C 59 00 6D 46 |F.. STA(R1),Y.mF|
00002690: 8B 15 20 49 4E 59 00 7A 46 90 15 20 42 4E 45 4E |.. INY.zF.. BNEN|
000026A0: 43 48 52 00 A3 46 9A 15 43 48 52 4F 4B 20 43 4D |CHR..F..CHROK CM|
000026B0: 50 23 24 46 46 3B CB 45 4E 4E 5A 45 49 43 48 45 |P#$FF;.ENNZEICHE|
000026C0: 4E 20 46 55 45 52 20 D0 41 55 53 45 00 B3 46 A4 |N FUER .AUSE..F.|
000026D0: 15 20 42 4E 45 4E 4F 50 41 55 53 45 00 E2 46 AE |. BNENOPAUSE..F.|
000026E0: 15 20 4C 44 41 23 24 33 46 3B D0 41 55 53 45 5A |. LDA#$3F;.AUSEZ|
000026F0: 41 45 48 4C 45 52 3D 36 33 20 28 43 41 2E 20 31 |AEHLER=63 (CA. 1|
00002700: 20 53 45 43 20 D0 41 55 53 45 29 00 ED 46 B8 15 | SEC .AUSE)..F..|
00002710: 20 4C 44 59 23 30 00 FC 46 C2 15 20 53 54 41 28 | LDY#0..F.. STA(|
00002720: 52 31 29 2C 59 00 23 47 CC 15 20 4C 44 41 23 24 |R1),Y.#G.. LDA#$|
00002730: 32 30 3B D3 50 41 43 45 5A 45 49 43 48 45 4E 20 |20;.PACEZEICHEN |
00002740: 56 4F 52 54 41 45 55 53 43 48 45 4E 00 33 47 D6 |VORTAEUSCHEN.3G.|
00002750: 15 4E 4F 50 41 55 53 45 20 50 48 41 00 3E 47 E0 |.NOPAUSE PHA.>G.|
00002760: 15 20 4C 44 59 23 31 00 4D 47 EA 15 20 4C 44 41 |. LDY#1.MG.. LDA|
00002770: 28 52 31 29 2C 59 00 56 47 F4 15 20 43 4C 43 00 |(R1),Y.VG.. CLC.|
00002780: 61 47 FE 15 20 41 44 43 23 31 00 70 47 08 16 20 |aG.. ADC#1.pG.. |
00002790: 53 54 41 28 52 31 29 2C 59 00 79 47 12 16 20 50 |STA(R1),Y.yG.. P|
000027A0: 4C 41 00 82 47 1C 16 20 52 54 53 00 88 47 26 16 |LA..G.. RTS..G&.|
000027B0: 3B 00 8E 47 10 27 3B 00 AC 47 1A 27 3B 2D 2D 2D |;..G.';..G.';---|
000027C0: 3E 20 C9 20 CE 20 D4 20 C5 20 D2 20 D2 20 D5 A0 |> . . . . . . ..|
000027D0: D0 20 D4 20 31 00 B2 47 24 27 3B 00 E6 47 2E 27 |. . 1..G$';..G.'|
000027E0: 3B C2 4F 52 44 45 52 53 50 52 49 54 45 53 20 41 |;.ORDERSPRITES A|
000027F0: 4E 5A 45 49 47 45 4E 20 55 4E 44 20 D3 43 52 4F |NZEIGEN UND .CRO|
00002800: 4C 4C 49 4E 47 20 56 45 52 57 41 4C 54 45 4E 00 |LLING VERWALTEN.|
00002810: EC 47 38 27 3B 00 FB 47 42 27 49 4E 54 45 52 31 |.G8';..GB'INTER1|
00002820: 20 53 45 49 00 08 48 47 27 20 4C 44 41 23 24 46 | SEI..HG' LDA#$F|
00002830: 46 00 18 48 48 27 20 53 54 41 56 49 43 2B 24 31 |F..HH' STAVIC+$1|
00002840: 35 00 25 48 49 27 20 4C 44 41 23 24 44 38 00 35 |5.%HI' LDA#$D8.5|
00002850: 48 4A 27 20 53 54 41 56 49 43 2B 24 31 36 00 70 |HJ' STAVIC+$16.p|
00002860: 48 4C 27 20 2E 2E 2E 4C 44 41 44 52 28 52 31 2C |HL' ...LDADR(R1,|
00002870: 43 4F 4C 4F 52 31 29 3B DA 45 49 47 45 52 20 41 |COLOR1);.EIGER A|
00002880: 55 46 20 C6 41 52 42 42 41 4C 4B 45 4E 20 28 C2 |UF .ARBBALKEN (.|
00002890: 4C 41 55 54 4F 45 4E 45 29 00 7D 48 6A 27 20 4C |LAUTOENE).}Hj' L|
000028A0: 44 58 23 24 31 42 00 8A 48 6D 27 20 4C 44 59 23 |DX#$1B..Hm' LDY#|
000028B0: 24 46 39 00 A1 48 6E 27 57 41 49 54 4C 46 38 20 |$F9..Hn'WAITLF8 |
000028C0: 43 50 59 56 49 43 2B 24 31 32 00 B1 48 74 27 20 |CPYVIC+$12..Ht' |
000028D0: 42 4E 45 57 41 49 54 4C 46 38 00 BC 48 7E 27 20 |BNEWAITLF8..H~' |
000028E0: 4C 44 41 23 30 00 EA 48 88 27 20 53 54 41 56 49 |LDA#0..H.' STAVI|
000028F0: 43 2B 24 31 31 3B D3 54 45 55 45 52 52 45 47 49 |C+$11;.TEUERREGI|
00002900: 53 54 45 52 20 31 20 41 55 46 20 30 20 53 45 54 |STER 1 AUF 0 SET|
00002910: 5A 45 4E 00 F7 48 A6 27 20 4C 44 41 23 24 46 46 |ZEN..H.' LDA#$FF|
00002920: 00 07 49 B0 27 20 53 54 41 56 49 43 2B 24 31 35 |..I.' STAVIC+$15|
00002930: 00 10 49 B5 27 20 54 58 41 00 1D 49 BA 27 20 4C |..I.' TXA..I.' L|
00002940: 44 59 23 24 46 44 00 2E 49 C4 27 20 4A 53 52 57 |DY#$FD..I.' JSRW|
00002950: 41 49 54 4C 49 4E 45 00 63 49 CE 27 20 53 54 41 |AITLINE.cI.' STA|
00002960: 56 49 43 2B 24 31 31 3B D3 54 45 55 45 52 52 45 |VIC+$11;.TEUERRE|
00002970: 47 49 53 54 45 52 20 31 20 41 55 46 20 4E 4F 52 |GISTER 1 AUF NOR|
00002980: 4D 41 4C 45 4E 20 D7 45 52 54 2D 3E 00 7E 49 CF |MALEN .ERT->.~I.|
00002990: 27 3B C2 4F 52 44 45 52 20 4A 45 54 5A 54 20 53 |';.ORDER JETZT S|
000029A0: 49 43 48 54 42 41 52 00 89 49 E2 27 20 4C 44 59 |ICHTBAR..I.' LDY|
000029B0: 23 30 00 D7 49 E3 27 3B 4C 44 41 28 52 31 29 2C |#0..I.';LDA(R1),|
000029C0: 59 20 42 52 41 55 43 48 54 20 42 45 49 20 D5 45 |Y BRAUCHT BEI .E|
000029D0: 42 45 52 53 43 48 52 45 49 54 45 4E 20 44 45 52 |BERSCHREITEN DER|
000029E0: 20 D3 45 49 54 45 4E 47 52 45 4E 5A 45 20 45 49 | .EITENGRENZE EI|
000029F0: 4E 45 4E 20 DA 59 4B 4C 55 53 20 4D 45 48 52 21 |NEN .YKLUS MEHR!|
00002A00: 00 0B 4A E4 27 3B C4 49 45 20 46 4F 4C 47 45 4E |..J.';.IE FOLGEN|
00002A10: 44 45 20 C2 45 52 45 43 48 4E 55 4E 47 20 4B 4F |DE .ERECHNUNG KO|
00002A20: 52 52 49 47 49 45 52 54 20 44 41 53 20 57 49 45 |RRIGIERT DAS WIE|
00002A30: 44 45 52 21 00 19 4A EC 27 4C 4F 4F 50 33 20 54 |DER!..J.'LOOP3 T|
00002A40: 59 41 00 22 4A F6 27 20 43 4C 43 00 2D 4A 00 28 |YA."J.' CLC.-J.(|
00002A50: 20 41 44 43 52 31 00 70 4A 05 28 20 42 43 43 44 | ADCR1.pJ.( BCCD|
00002A60: 45 4C 43 59 43 3B 42 45 49 20 D5 45 42 45 52 53 |ELCYC;BEI .EBERS|
00002A70: 43 48 52 45 49 54 55 4E 47 3A 20 31 20 D4 41 4B |CHREITUNG: 1 .AK|
00002A80: 54 5A 59 4B 4C 55 53 20 57 45 4E 49 47 45 52 2C |TZYKLUS WENIGER,|
00002A90: 20 41 4C 4C 45 53 20 4F 4B 00 85 4A 06 28 44 45 | ALLES OK..J.(DE|
00002AA0: 4C 43 59 43 20 4C 44 41 28 52 31 29 2C 59 00 95 |LCYC LDA(R1),Y..|
00002AB0: 4A 0A 28 20 42 45 51 4E 4F 43 4F 4C 4F 52 00 A1 |J.( BEQNOCOLOR..|
00002AC0: 4A 14 28 20 43 4D 50 24 30 30 00 AD 4A 1E 28 20 |J.( CMP$00..J.( |
00002AD0: 43 4D 50 24 30 30 00 E5 4A 28 28 20 44 45 43 56 |CMP$00..J(( DECV|
00002AE0: 49 43 2B 24 31 36 3B D3 45 49 54 45 4E 42 45 52 |IC+$16;.EITENBER|
00002AF0: 45 49 43 48 20 53 49 43 48 54 42 41 52 20 4D 41 |EICH SICHTBAR MA|
00002B00: 43 48 45 4E 20 28 C2 49 54 20 34 3D 30 29 00 18 |CHEN (.IT 4=0)..|
00002B10: 4B 32 28 20 53 54 41 56 49 43 2B 24 32 31 3B C6 |K2( STAVIC+$21;.|
00002B20: 41 52 42 45 20 41 55 53 20 D4 41 42 45 4C 4C 45 |ARBE AUS .ABELLE|
00002B30: 20 49 4E 53 20 C6 41 52 42 52 45 47 49 53 54 45 | INS .ARBREGISTE|
00002B40: 52 00 3E 4B 3C 28 42 41 43 4B 20 49 4E 43 56 49 |R.>K<(BACK INCVI|
00002B50: 43 2B 24 31 36 3B C2 49 54 20 34 20 52 55 45 43 |C+$16;.IT 4 RUEC|
00002B60: 4B 53 45 54 5A 45 4E 00 47 4B 46 28 20 49 4E 59 |KSETZEN.GKF( INY|
00002B70: 00 69 4B 50 28 20 43 50 59 23 32 33 3B 53 43 48 |.iKP( CPY#23;SCH|
00002B80: 4F 4E 20 32 33 20 DA 45 49 4C 45 4E 3F 20 4E 3A |ON 23 .EILEN? N:|
00002B90: 2D 3E 00 77 4B 5A 28 20 42 4E 45 4C 4F 4F 50 33 |->.wKZ( BNELOOP3|
00002BA0: 00 82 4B 5D 28 20 4C 44 58 23 30 00 92 4B 6E 28 |..K]( LDX#0..Kn(|
00002BB0: 20 53 54 58 56 49 43 2B 24 31 35 00 A2 4B 78 28 | STXVIC+$15..Kx(|
00002BC0: 20 4A 53 52 53 43 52 4F 4C 4C 54 00 C2 4B 82 28 | JSRSCROLLT..K.(|
00002BD0: 20 2E 2E 2E 52 41 53 54 45 52 49 52 51 28 49 4E | ...RASTERIRQ(IN|
00002BE0: 54 45 52 32 2C 24 30 30 32 43 29 00 CB 4B 84 28 |TER2,$002C)..K.(|
00002BF0: 20 43 4C 49 00 DB 4B 87 28 20 4A 53 52 4D 4F 56 | CLI..K.( JSRMOV|
00002C00: 45 53 45 51 00 EB 4B 8C 28 20 4A 4D 50 4E 4F 52 |ESEQ..K.( JMPNOR|
00002C10: 4D 49 52 51 00 F1 4B 8D 28 3B 00 2C 4C 8E 28 4E |MIRQ..K.(;.,L.(N|
00002C20: 4F 43 4F 4C 4F 52 20 43 4D 50 24 30 30 3B 42 45 |OCOLOR CMP$00;BE|
00002C30: 49 20 C6 41 52 42 45 3D 30 20 57 49 52 44 20 44 |I .ARBE=0 WIRD D|
00002C40: 49 45 53 45 52 20 D4 45 49 4C 20 41 55 46 47 45 |IESER .EIL AUFGE|
00002C50: 52 55 46 45 4E 00 61 4C 91 28 20 43 4D 50 24 30 |RUFEN.aL.( CMP$0|
00002C60: 30 3B 28 44 41 4D 49 54 20 4B 45 49 4E 45 20 D0 |0;(DAMIT KEINE .|
00002C70: 55 45 4E 4B 54 43 48 45 4E 20 42 45 49 4D 20 C6 |UENKTCHEN BEIM .|
00002C80: 41 52 42 57 45 43 48 53 45 4C 00 85 4C 94 28 20 |ARBWECHSEL..L.( |
00002C90: 44 45 43 56 49 43 2B 24 31 36 3B 20 47 45 53 45 |DECVIC+$16; GESE|
00002CA0: 54 5A 54 20 57 45 52 44 45 4E 2E 2E 2E 29 00 92 |TZT WERDEN...)..|
00002CB0: 4C 96 28 20 4A 4D 50 42 41 43 4B 00 98 4C A0 28 |L.( JMPBACK..L.(|
00002CC0: 3B 00 9E 4C AA 28 3B 00 BC 4C B4 28 3B 2D 2D 2D |;..L.(;..L.(;---|
00002CD0: 3E 20 C9 20 CE 20 D4 20 C5 20 D2 20 D2 20 D5 A0 |> . . . . . . ..|
00002CE0: D0 A0 D4 20 32 00 C2 4C BE 28 3B 00 E4 4C C8 28 |... 2..L.(;..L.(|
00002CF0: 3B CF 42 45 52 45 20 CC 41 55 46 53 43 48 52 49 |;.BERE .AUFSCHRI|
00002D00: 46 54 20 45 49 4E 42 4C 45 4E 44 45 4E 00 EA 4C |FT EINBLENDEN..L|
00002D10: D2 28 3B 00 F9 4C D3 28 49 4E 54 45 52 32 20 53 |.(;..L.(INTER2 S|
00002D20: 45 49 00 06 4D D6 28 20 4C 44 58 23 24 43 30 00 |EI..M.( LDX#$C0.|
00002D30: 16 4D D7 28 20 53 54 58 56 49 43 2B 24 31 36 00 |.M.( STXVIC+$16.|
00002D40: 23 4D D8 28 20 4C 44 58 23 24 31 32 00 33 4D D9 |#M.( LDX#$12.3M.|
00002D50: 28 20 53 54 58 56 49 43 2B 24 31 38 00 40 4D DA |( STXVIC+$18.@M.|
00002D60: 28 20 4C 44 58 23 24 30 45 00 50 4D DC 28 20 53 |( LDX#$0E.PM.( S|
00002D70: 54 58 56 49 43 2B 24 32 33 00 5D 4D DD 28 20 4C |TXVIC+$23.]M.( L|
00002D80: 44 59 23 24 32 46 00 82 4D DE 28 20 4A 53 52 57 |DY#$2F..M.( JSRW|
00002D90: 41 49 54 4C 49 4E 45 3B 41 55 46 20 DA 45 49 4C |AITLINE;AUF .EIL|
00002DA0: 45 20 34 37 20 57 41 52 54 45 4E 00 92 4D DF 28 |E 47 WARTEN..M.(|
00002DB0: 20 2E 2E 2E 4E 45 57 4C 49 4E 45 00 9D 4D E3 28 | ...NEWLINE..M.(|
00002DC0: 20 4C 44 58 23 30 00 C8 4D E4 28 4E 4C 49 4E 45 | LDX#0..M.(NLINE|
00002DD0: 20 4C 44 59 57 4F 52 4B 32 2C 58 3B C6 41 52 42 | LDYWORK2,X;.ARB|
00002DE0: 45 20 46 55 45 52 20 C6 41 52 42 45 46 46 45 4B |E FUER .ARBEFFEK|
00002DF0: 54 00 D8 4D E6 28 20 2E 2E 2E 4E 45 57 4C 49 4E |T..M.( ...NEWLIN|
00002E00: 45 00 00 4E F0 28 20 4C 44 41 57 4F 52 4B 31 2C |E..N.( LDAWORK1,|
00002E10: 58 3B C9 4E 44 45 58 20 41 55 53 20 D4 41 42 45 |X;.NDEX AUS .ABE|
00002E20: 4C 4C 45 20 28 30 2D 33 29 00 2E 4E F5 28 20 4F |LLE (0-3)..N.( O|
00002E30: 52 41 49 4E 44 45 58 31 3B CF C4 C5 D2 2D D6 45 |RAINDEX1;....-.E|
00002E40: 52 4B 4E 55 45 50 46 55 4E 47 20 4D 49 54 20 30 |RKNUEPFUNG MIT 0|
00002E50: 20 4F 44 45 52 20 34 00 3A 4E F8 28 20 43 4D 50 | ODER 4.:N.( CMP|
00002E60: 24 30 30 00 57 4E FA 28 20 53 54 59 56 49 43 2B |$00.WN.( STYVIC+|
00002E70: 24 32 32 3B C6 41 52 42 45 20 53 45 54 5A 45 4E |$22;.ARBE SETZEN|
00002E80: 00 7F 4E 0E 29 20 53 54 41 56 49 43 2B 24 31 36 |..N.) STAVIC+$16|
00002E90: 3B D3 54 45 55 45 52 52 45 47 49 53 54 45 52 20 |;.TEUERREGISTER |
00002EA0: 32 20 53 45 54 5A 45 4E 00 88 4E 36 29 20 49 4E |2 SETZEN..N6) IN|
00002EB0: 58 00 AA 4E 40 29 20 43 50 58 23 32 34 3B 53 43 |X..N@) CPX#24;SC|
00002EC0: 48 4F 4E 20 32 34 20 DA 45 49 4C 45 4E 3F 20 4E |HON 24 .EILEN? N|
00002ED0: 3A 2D 3E 00 B8 4E 4A 29 20 42 4E 45 4E 4C 49 4E |:->..NJ) BNENLIN|
00002EE0: 45 00 C5 4E 4C 29 20 4C 44 58 23 24 43 38 00 D0 |E..NL) LDX#$C8..|
00002EF0: 4E 4E 29 20 4C 44 59 23 30 00 E0 4E 4F 29 20 2E |NN) LDY#0..NO) .|
00002F00: 2E 2E 4E 45 57 4C 49 4E 45 00 EE 4E 52 29 20 43 |..NEWLINE..NR) C|
00002F10: 4D 50 28 30 2C 58 29 00 FC 4E 53 29 20 43 4D 50 |MP(0,X)..NS) CMP|
00002F20: 28 30 2C 58 29 00 23 4F 5E 29 20 53 54 58 56 49 |(0,X).#O^) STXVI|
00002F30: 43 2B 24 31 36 3B D3 54 45 55 45 52 52 2E 20 32 |C+$16;.TEUERR. 2|
00002F40: 20 52 55 45 43 4B 53 45 54 5A 45 4E 00 33 4F 72 | RUECKSETZEN.3Or|
00002F50: 29 20 53 54 59 56 49 43 2B 24 32 32 00 53 4F 77 |) STYVIC+$22.SOw|
00002F60: 29 20 2E 2E 2E 52 41 53 54 45 52 49 52 51 28 49 |) ...RASTERIRQ(I|
00002F70: 4E 54 45 52 33 2C 24 30 30 37 36 29 00 5C 4F 78 |NTER3,$0076).\Ox|
00002F80: 29 20 43 4C 49 00 6C 4F AE 29 20 4A 53 52 53 43 |) CLI.lO.) JSRSC|
00002F90: 52 4F 4C 4C 31 00 7B 4F C2 29 20 4A 4D 50 49 52 |ROLL1.{O.) JMPIR|
00002FA0: 51 45 4E 44 00 81 4F 30 2A 3B 00 87 4F 3A 2A 3B |QEND..O0*;..O:*;|
00002FB0: 00 A5 4F 44 2A 3B 2D 2D 2D 3E 20 C9 20 CE 20 D4 |..OD*;---> . . .|
00002FC0: 20 C5 20 D2 20 D2 20 D5 20 D0 20 D4 20 33 00 AB | . . . . . . 3..|
00002FD0: 4F 4E 2A 3B 00 C8 4F 58 2A 3B C7 52 41 46 49 4B |ON*;..OX*;.RAFIK|
00002FE0: 20 41 4E 5A 45 49 47 45 4E 20 55 4E 44 20 C6 CC | ANZEIGEN UND ..|
00002FF0: C4 00 CE 4F 62 2A 3B 00 E1 4F 6E 2A 49 4E 54 45 |...Ob*;..On*INTE|
00003000: 52 33 20 4C 44 58 23 24 31 38 00 F1 4F 70 2A 20 |R3 LDX#$18..Op* |
00003010: 53 54 58 56 49 43 2B 24 31 38 00 FE 4F 71 2A 20 |STXVIC+$18..Oq* |
00003020: 4C 44 58 23 24 44 30 00 0E 50 72 2A 20 53 54 58 |LDX#$D0..Pr* STX|
00003030: 56 49 43 2B 24 31 36 00 1B 50 7B 2A 20 4C 44 58 |VIC+$16..P{* LDX|
00003040: 23 24 33 36 00 2B 50 7C 2A 20 53 54 58 56 49 43 |#$36.+P|* STXVIC|
00003050: 2B 24 31 31 00 4B 50 7D 2A 20 2E 2E 2E 52 41 53 |+$11.KP}* ...RAS|
00003060: 54 45 52 49 52 51 28 49 4E 54 45 52 31 2C 24 30 |TERIRQ(INTER1,$0|
00003070: 30 46 36 29 00 72 50 7E 2A 20 42 49 54 46 4C 41 |0F6).rP~* BITFLA|
00003080: 47 3B C5 46 46 45 4B 54 20 32 20 45 49 4E 42 4C |G;.FFEKT 2 EINBL|
00003090: 45 4E 44 45 4E 3F 20 4A 3A 2D 3E 00 82 50 7F 2A |ENDEN? J:->..P.*|
000030A0: 20 42 4D 49 45 46 46 45 43 54 32 00 8D 50 80 2A | BMIEFFECT2..P.*|
000030B0: 20 4C 44 59 23 30 00 9D 50 8A 2A 4E 58 4C 49 4E | LDY#0..P.*NXLIN|
000030C0: 20 4C 44 58 23 30 00 A6 50 94 2A 20 54 58 41 00 | LDX#0..P.* TXA.|
000030D0: CE 50 9E 2A 20 43 4D 50 57 4F 52 4B 33 2C 59 3B |.P.* CMPWORK3,Y;|
000030E0: C6 CC C4 2D C1 42 53 54 41 4E 44 20 41 55 53 20 |...-.BSTAND AUS |
000030F0: D4 41 42 45 4C 4C 45 00 E1 50 A8 2A 20 42 45 51 |.ABELLE..P.* BEQ|
00003100: 4E 46 4C 44 3B 3D 30 3A 2D 3E 00 05 51 B2 2A 4E |NFLD;=0:->..Q.*N|
00003110: 46 4C 20 4C 44 41 56 49 43 2B 24 31 32 3B 27 C6 |FL LDAVIC+$12;'.|
00003120: CC C4 2D CB 45 52 4E 53 54 55 45 43 4B 27 00 17 |..-.ERNSTUECK'..|
00003130: 51 BC 2A 57 4C 20 43 4D 50 56 49 43 2B 24 31 32 |Q.*WL CMPVIC+$12|
00003140: 00 22 51 C6 2A 20 42 45 51 57 4C 00 2D 51 D0 2A |."Q.* BEQWL.-Q.*|
00003150: 20 41 4E 44 23 37 00 3A 51 DA 2A 20 41 44 43 23 | AND#7.:Q.* ADC#|
00003160: 24 33 30 00 4A 51 E4 2A 20 53 54 41 56 49 43 2B |$30.JQ.* STAVIC+|
00003170: 24 31 31 00 53 51 EE 2A 20 49 4E 58 00 5C 51 F8 |$11.SQ.* INX.\Q.|
00003180: 2A 20 54 58 41 00 83 51 02 2B 20 43 4D 50 57 4F |* TXA..Q.+ CMPWO|
00003190: 52 4B 33 2C 59 3B C1 42 53 54 41 4E 44 20 45 52 |RK3,Y;.BSTAND ER|
000031A0: 52 45 49 43 48 54 3F 20 4E 3A 2D 3E 00 8F 51 0C |REICHT? N:->..Q.|
000031B0: 2B 20 42 43 43 4E 46 4C 00 B7 51 16 2B 4E 46 4C |+ BCCNFL..Q.+NFL|
000031C0: 44 20 4C 44 58 23 38 3B 38 20 D2 41 53 54 45 52 |D LDX#8;8 .ASTER|
000031D0: 5A 45 49 4C 45 4E 20 41 55 53 4C 41 53 53 45 4E |ZEILEN AUSLASSEN|
000031E0: 00 CC 51 20 2B 57 41 49 54 38 20 4C 44 41 56 49 |..Q +WAIT8 LDAVI|
000031F0: 43 2B 24 31 32 00 DF 51 2A 2B 57 4C 32 20 43 4D |C+$12..Q*+WL2 CM|
00003200: 50 56 49 43 2B 24 31 32 00 EB 51 34 2B 20 42 45 |PVIC+$12..Q4+ BE|
00003210: 51 57 4C 32 00 F4 51 3E 2B 20 44 45 58 00 02 52 |QWL2..Q>+ DEX..R|
00003220: 48 2B 20 42 4E 45 57 41 49 54 38 00 0B 52 52 2B |H+ BNEWAIT8..RR+|
00003230: 20 49 4E 59 00 16 52 5C 2B 20 43 50 59 23 38 00 | INY..R\+ CPY#8.|
00003240: 24 52 66 2B 20 42 4E 45 4E 58 4C 49 4E 00 50 52 |$Rf+ BNENXLIN.PR|
00003250: 67 2B 20 4C 44 41 53 45 51 32 3B D3 45 51 55 45 |g+ LDASEQ2;.EQUE|
00003260: 4E 5A 20 57 49 45 44 45 52 20 41 4D 20 C1 4E 46 |NZ WIEDER AM .NF|
00003270: 41 4E 47 3F 20 4E 3A 2D 3E 00 60 52 68 2B 20 42 |ANG? N:->.`Rh+ B|
00003280: 4E 45 4F 4C 44 42 41 43 4B 00 84 52 69 2B 20 44 |NEOLDBACK..Ri+ D|
00003290: 45 43 43 4F 55 4E 54 45 52 3B DA 41 45 48 4C 45 |ECCOUNTER;.AEHLE|
000032A0: 52 20 45 52 4E 49 45 44 52 49 47 45 4E 00 9D 52 |R ERNIEDRIGEN..R|
000032B0: 6A 2B 20 42 4E 45 4F 4C 44 42 41 43 4B 3B 3D 30 |j+ BNEOLDBACK;=0|
000032C0: 3F 20 4E 3A 2D 3E 00 BE 52 6B 2B 20 4C 44 41 23 |? N:->..Rk+ LDA#|
000032D0: 24 38 30 3B C5 46 46 45 4B 54 20 32 20 45 49 4E |$80;.FFEKT 2 EIN|
000032E0: 42 4C 45 4E 44 45 4E 00 CB 52 6C 2B 20 53 54 41 |BLENDEN..Rl+ STA|
000032F0: 46 4C 41 47 00 FA 52 70 2B 4F 4C 44 42 41 43 4B |FLAG..Rp+OLDBACK|
00003300: 20 4C 44 41 56 49 43 2B 24 31 31 3B D3 54 45 55 | LDAVIC+$11;.TEU|
00003310: 45 52 52 45 47 2E 31 20 52 55 45 43 4B 53 45 54 |ERREG.1 RUECKSET|
00003320: 5A 45 4E 00 05 53 71 2B 20 41 4E 44 23 37 00 12 |ZEN..Sq+ AND#7..|
00003330: 53 72 2B 20 4F 52 41 23 24 33 38 00 22 53 73 2B |Sr+ ORA#$38."Ss+|
00003340: 20 53 54 41 56 49 43 2B 24 31 31 00 31 53 7A 2B | STAVIC+$11.1Sz+|
00003350: 20 4A 4D 50 49 52 51 45 4E 44 00 37 53 84 2B 3B | JMPIRQEND.7S.+;|
00003360: 00 4A 53 8E 2B 45 46 46 45 43 54 32 20 4C 44 58 |.JS.+EFFECT2 LDX|
00003370: 50 54 52 00 77 53 90 2B 20 4C 44 41 23 38 30 3B |PTR.wS.+ LDA#80;|
00003380: C5 46 46 45 4B 54 20 55 45 42 45 52 20 38 30 20 |.FFEKT UEBER 80 |
00003390: C2 49 4C 44 53 43 48 49 52 4D 5A 45 49 4C 45 4E |.ILDSCHIRMZEILEN|
000033A0: 00 87 53 91 2B 20 53 54 41 43 4F 55 4E 54 45 52 |..S.+ STACOUNTER|
000033B0: 00 99 53 92 2B 20 4C 44 59 23 36 3B 57 41 52 54 |..S.+ LDY#6;WART|
000033C0: 45 4E 00 AC 53 93 2B 57 36 4C 20 2E 2E 2E 4E 45 |EN..S.+W6L ...NE|
000033D0: 57 4C 49 4E 45 00 B5 53 94 2B 20 44 45 59 00 C1 |WLINE..S.+ DEY..|
000033E0: 53 95 2B 20 42 4E 45 57 36 4C 00 FB 53 98 2B 4E |S.+ BNEW6L..S.+N|
000033F0: 4C 45 46 46 32 20 4C 44 59 50 41 47 45 30 2C 58 |LEFF2 LDYPAGE0,X|
00003400: 3B D7 45 52 54 45 20 46 55 45 52 20 C6 41 52 42 |;.ERTE FUER .ARB|
00003410: 45 2B C9 4E 44 45 58 20 41 55 53 20 D4 41 42 45 |E+.NDEX AUS .ABE|
00003420: 4C 4C 45 4E 00 0B 54 A2 2B 20 2E 2E 2E 4E 45 57 |LLEN..T.+ ...NEW|
00003430: 4C 49 4E 45 00 1B 54 AC 2B 20 4C 44 41 50 41 47 |LINE..T.+ LDAPAG|
00003440: 45 31 2C 58 00 2E 54 B6 2B 20 43 4D 50 24 30 30 |E1,X..T.+ CMP$00|
00003450: 3B D4 49 4D 49 4E 47 00 3B 54 C0 2B 20 4F 52 41 |;.IMING.;T.+ ORA|
00003460: 23 24 44 30 00 59 54 CA 2B 20 53 54 41 56 49 43 |#$D0.YT.+ STAVIC|
00003470: 2B 24 31 36 3B 2E 2E 2E 55 4E 44 20 53 45 54 5A |+$16;...UND SETZ|
00003480: 45 4E 00 69 54 D4 2B 20 53 54 59 56 49 43 2B 24 |EN.iT.+ STYVIC+$|
00003490: 32 31 00 72 54 DE 2B 20 49 4E 58 00 82 54 E8 2B |21.rT.+ INX..T.+|
000034A0: 20 44 45 43 43 4F 55 4E 54 45 52 00 91 54 F2 2B | DECCOUNTER..T.+|
000034B0: 20 42 4E 45 4E 4C 45 46 46 32 00 A1 54 F4 2B 20 | BNENLEFF2..T.+ |
000034C0: 2E 2E 2E 4E 45 57 4C 49 4E 45 00 C1 54 F5 2B 20 |...NEWLINE..T.+ |
000034D0: 4C 44 41 23 30 3B D2 45 47 49 53 54 45 52 20 52 |LDA#0;.EGISTER R|
000034E0: 55 45 43 4B 53 45 54 5A 45 4E 00 D1 54 F6 2B 20 |UECKSETZEN..T.+ |
000034F0: 53 54 41 56 49 43 2B 24 32 31 00 DE 54 F7 2B 20 |STAVIC+$21..T.+ |
00003500: 4C 44 41 23 24 44 30 00 EE 54 F8 2B 20 53 54 41 |LDA#$D0..T.+ STA|
00003510: 56 49 43 2B 24 31 36 00 0E 55 FC 2B 20 49 4E 43 |VIC+$16..U.+ INC|
00003520: 50 54 52 3B C5 46 46 45 4B 54 20 46 45 52 54 49 |PTR;.FFEKT FERTI|
00003530: 47 3F 20 4E 3A 2D 3E 00 1F 55 06 2C 20 42 4E 45 |G? N:->..U., BNE|
00003540: 4E 4F 43 48 41 4E 47 45 00 3E 55 10 2C 20 4C 44 |NOCHANGE.>U., LD|
00003550: 41 23 30 3B C5 46 46 45 4B 54 20 31 20 45 49 4E |A#0;.FFEKT 1 EIN|
00003560: 42 4C 45 4E 44 45 4E 00 4B 55 1A 2C 20 53 54 41 |BLENDEN.KU., STA|
00003570: 46 4C 41 47 00 66 55 1F 2C 4E 4F 43 48 41 4E 47 |FLAG.fU.,NOCHANG|
00003580: 45 20 4C 44 41 23 31 30 3B 31 30 20 4D 41 4C 00 |E LDA#10;10 MAL.|
00003590: 76 55 20 2C 20 53 54 41 43 4F 55 4E 54 45 52 00 |vU , STACOUNTER.|
000035A0: 89 55 24 2C 20 4A 4D 50 4F 4C 44 42 41 43 4B 3B |.U$, JMPOLDBACK;|
000035B0: 2D 3E 00 8F 55 20 4E 3B 00 A3 55 2A 4E 3B 2D 2D |->..U N;..U*N;--|
000035C0: 2D 3E 20 D3 20 D4 20 C1 20 D2 20 D4 00 A9 55 34 |-> . . . . ...U4|
000035D0: 4E 3B 00 C0 55 3E 4E 53 54 41 52 54 20 4A 53 52 |N;..U>NSTART JSR|
000035E0: 49 4E 49 54 54 49 4D 45 52 00 D1 55 43 4E 20 4A |INITTIMER..UCN J|
000035F0: 53 52 49 4E 49 54 53 50 52 31 00 DA 55 48 4E 20 |SRINITSPR1..UHN |
00003600: 53 45 49 00 E7 55 52 4E 20 4C 44 41 23 24 37 46 |SEI..URN LDA#$7F|
00003610: 00 F8 55 5C 4E 20 53 54 41 43 49 41 31 2B 24 30 |..U\N STACIA1+$0|
00003620: 44 00 05 56 61 4E 20 4C 44 41 23 24 31 33 00 15 |D..VaN LDA#$13..|
00003630: 56 63 4E 20 53 54 41 56 49 43 2B 24 31 38 00 22 |VcN STAVIC+$18."|
00003640: 56 66 4E 20 4C 44 41 23 24 38 31 00 32 56 70 4E |VfN LDA#$81.2VpN|
00003650: 20 53 54 41 56 49 43 2B 24 31 41 00 52 56 7A 4E | STAVIC+$1A.RVzN|
00003660: 20 2E 2E 2E 52 41 53 54 45 52 49 52 51 28 49 4E | ...RASTERIRQ(IN|
00003670: 54 45 52 31 2C 24 30 30 46 30 29 00 63 56 7F 4E |TER1,$00F0).cV.N|
00003680: 20 4A 53 52 43 4C 45 41 52 53 50 52 00 74 56 80 | JSRCLEARSPR.tV.|
00003690: 4E 20 4A 53 52 43 4C 45 41 52 53 43 52 00 7F 56 |N JSRCLEARSCR..V|
000036A0: 81 4E 20 4C 44 41 23 30 00 95 56 82 4E 20 53 54 |.N LDA#0..V.N ST|
000036B0: 41 56 49 43 42 41 53 45 2B 24 33 46 46 46 00 A4 |AVICBASE+$3FFF..|
000036C0: 56 83 4E 20 53 54 41 49 4E 44 45 58 31 00 B4 56 |V.N STAINDEX1..V|
000036D0: 84 4E 20 53 54 41 56 49 43 2B 24 32 30 00 C1 56 |.N STAVIC+$20..V|
000036E0: 89 4E 20 4C 44 58 23 31 31 39 00 D6 56 8A 4E 53 |.N LDX#119..V.NS|
000036F0: 43 54 58 20 4C 44 41 53 43 52 54 58 54 2C 58 00 |CTX LDASCRTXT,X.|
00003700: E3 56 8B 4E 20 41 4E 44 23 24 33 46 00 F9 56 8C |.V.N AND#$3F..V.|
00003710: 4E 20 53 54 41 53 43 52 45 45 4E 2B 34 2A 34 30 |N STASCREEN+4*40|
00003720: 2C 58 00 02 57 8D 4E 20 44 45 58 00 0F 57 8E 4E |,X..W.N DEX..W.N|
00003730: 20 42 50 4C 53 43 54 58 00 18 57 97 4E 20 43 4C | BPLSCTX..W.N CL|
00003740: 49 00 25 57 98 4E 20 4C 44 41 43 49 41 32 00 2E |I.%W.N LDACIA2..|
00003750: 57 A2 4E 20 50 48 41 00 62 57 AC 4E 20 4C 44 41 |W.N PHA.bW.N LDA|
00003760: 23 24 39 37 2D 56 49 43 42 41 53 45 2F 24 34 30 |#$97-VICBASE/$40|
00003770: 30 30 3B D6 C9 C3 2D C1 44 52 45 53 53 42 45 52 |00;...-.DRESSBER|
00003780: 45 49 43 48 20 53 45 54 5A 45 4E 00 6F 57 B6 4E |EICH SETZEN.oW.N|
00003790: 20 53 54 41 43 49 41 32 00 9D 57 C0 4E 57 41 49 | STACIA2..W.NWAI|
000037A0: 54 53 50 41 43 45 20 4C 44 41 43 49 41 31 2B 31 |TSPACE LDACIA1+1|
000037B0: 3B C1 55 46 20 D3 50 41 43 45 54 41 53 54 45 20 |;.UF .PACETASTE |
000037C0: 57 41 52 54 45 4E 00 AA 57 CA 4E 20 41 4E 44 23 |WARTEN..W.N AND#|
000037D0: 24 31 30 00 BC 57 D4 4E 20 42 4E 45 57 41 49 54 |$10..W.N BNEWAIT|
000037E0: 53 50 41 43 45 00 C5 57 DE 4E 20 50 4C 41 00 D2 |SPACE..W.N PLA..|
000037F0: 57 E8 4E 20 53 54 41 43 49 41 32 00 DB 57 F2 4E |W.N STACIA2..W.N|
00003800: 20 52 54 53 00 E1 57 C8 AF 3B 00 FD 57 D2 AF 3B | RTS..W..;..W..;|
00003810: D6 C9 C3 2D D2 45 47 49 53 54 45 52 42 45 4C 45 |...-.EGISTERBELE|
00003820: 47 55 4E 47 45 4E 00 03 58 DC AF 3B 00 43 58 E6 |GUNGEN..X..;.CX.|
00003830: AF 50 4F 53 31 20 2E 42 59 24 45 44 2C 32 2C 24 |.POS1 .BY$ED,2,$|
00003840: 32 35 2C 32 2C 24 35 35 2C 32 2C 24 38 35 2C 32 |25,2,$55,2,$85,2|
00003850: 2C 24 42 35 2C 32 2C 24 45 35 2C 32 2C 24 31 35 |,$B5,2,$E5,2,$15|
00003860: 2C 32 2C 24 34 35 2C 32 2C 24 43 31 00 49 58 50 |,2,$45,2,$C1.IXP|
00003870: C3 3B 00 71 58 5A C3 3B C6 41 52 42 54 41 42 45 |.;.qXZ.;.ARBTABE|
00003880: 4C 4C 45 4E 20 55 4E 44 20 D2 45 47 49 53 54 45 |LLEN UND .EGISTE|
00003890: 52 53 45 51 55 45 4E 5A 45 4E 00 77 58 64 C3 3B |RSEQUENZEN.wXd.;|
000038A0: 00 C0 58 6E C3 43 4F 4C 4F 52 31 20 2E 42 59 30 |..Xn.COLOR1 .BY0|
000038B0: 2C 30 2C 30 2C 36 2C 31 34 2C 31 34 2C 33 2C 31 |,0,0,6,14,14,3,1|
000038C0: 34 2C 33 2C 33 2C 31 2C 33 2C 31 2C 31 2C 33 2C |4,3,3,1,3,1,1,3,|
000038D0: 31 2C 33 2C 33 2C 31 34 2C 31 34 2C 36 2C 31 36 |1,3,3,14,14,6,16|
000038E0: 2C 31 36 2C 31 36 2C 31 36 00 CC 58 78 C3 20 2E |,16,16,16..Xx. .|
000038F0: 42 59 24 46 46 00 D2 58 82 C3 3B 00 D8 58 B4 C3 |BY$FF..X..;..X..|
00003900: 3B 00 EB 58 BE C3 43 4F 4C 4F 52 32 20 2E 42 59 |;..X..COLOR2 .BY|
00003910: 30 2C 32 37 00 2D 59 C8 C3 2E 42 59 20 34 2C 34 |0,27.-Y...BY 4,4|
00003920: 2C 34 2C 34 2C 34 2C 31 30 2C 31 30 2C 31 30 2C |,4,4,4,10,10,10,|
00003930: 31 30 2C 34 2C 34 2C 34 2C 34 2C 32 2C 32 2C 32 |10,4,4,4,4,2,2,2|
00003940: 2C 32 2C 39 2C 39 2C 39 2C 39 2C 39 2C 39 2C 32 |,2,9,9,9,9,9,9,2|
00003950: 2C 32 2C 32 2C 32 00 33 59 D2 C3 3B 00 64 59 DC |,2,2,2.3Y..;.dY.|
00003960: C3 53 45 51 31 20 2E 42 59 30 2C 31 31 2C 24 44 |.SEQ1 .BY0,11,$D|
00003970: 30 2C 24 44 30 2C 24 44 31 2C 24 44 31 2C 24 44 |0,$D0,$D1,$D1,$D|
00003980: 32 2C 24 44 32 2C 24 44 33 2C 24 44 33 00 7C 59 |2,$D2,$D3,$D3.|Y|
00003990: E6 C3 20 2E 42 59 24 44 32 2C 24 44 32 2C 24 44 |.. .BY$D2,$D2,$D|
000039A0: 31 2C 24 44 31 00 82 59 F0 C3 3B 00 93 59 FA C3 |1,$D1..Y..;..Y..|
000039B0: 53 45 51 32 20 2E 42 59 30 2C 34 32 00 DC 59 04 |SEQ2 .BY0,42..Y.|
000039C0: C4 2E 42 59 30 2C 30 2C 30 2C 31 2C 31 2C 31 2C |..BY0,0,0,1,1,1,|
000039D0: 32 2C 32 2C 32 2C 33 2C 33 2C 33 2C 34 2C 34 2C |2,2,2,3,3,3,4,4,|
000039E0: 34 2C 35 2C 35 2C 35 2C 36 2C 36 2C 36 2C 37 2C |4,5,5,5,6,6,6,7,|
000039F0: 37 2C 37 2C 36 2C 36 2C 36 2C 35 2C 35 2C 35 2C |7,7,6,6,6,5,5,5,|
00003A00: 34 2C 34 2C 34 00 F5 59 0E C4 2E 42 59 33 2C 33 |4,4,4..Y...BY3,3|
00003A10: 2C 33 2C 32 2C 32 2C 32 2C 31 2C 31 2C 31 00 FB |,3,2,2,2,1,1,1..|
00003A20: 59 D8 D6 3B 00 0C 5A E2 D6 3B D3 43 52 4F 4C 4C |Y..;..Z..;.CROLL|
00003A30: 54 45 58 54 45 00 12 5A EC D6 3B 00 23 5A F1 D6 |TEXTE..Z..;.#Z..|
00003A40: 54 45 58 54 31 20 2E 42 59 30 2C 30 00 44 5A F6 |TEXT1 .BY0,0.DZ.|
00003A50: D6 2E 54 58 20 22 20 20 20 20 20 20 47 49 47 41 |..TX " GIGA|
00003A60: 20 44 45 4D 4F 21 20 20 20 20 20 20 22 00 50 5A | DEMO! ".PZ|
00003A70: F7 D6 2E 42 59 20 24 46 46 00 91 5A F8 D6 2E 54 |...BY $FF..Z...T|
00003A80: 58 20 22 31 32 2E 2F 31 33 2E 30 33 2E 31 39 39 |X "12./13.03.199|
00003A90: 30 20 45 4E 54 57 49 43 4B 45 4C 54 20 56 4F 4E |0 ENTWICKELT VON|
00003AA0: 20 20 20 20 20 55 4C 52 49 43 48 20 57 41 4C 54 | ULRICH WALT|
00003AB0: 48 45 52 20 20 20 20 20 20 22 00 9D 5A F9 D6 2E |HER "..Z...|
00003AC0: 42 59 20 24 46 46 00 A7 5A 00 D7 2E 42 59 20 30 |BY $FF..Z...BY 0|
00003AD0: 00 AD 5A 0A D7 3B 00 B3 5A C0 DA 3B 00 C4 5A C5 |..Z..;..Z..;..Z.|
00003AE0: DA 54 45 58 54 32 20 2E 42 59 30 2C 30 00 DA 5A |.TEXT2 .BY0,0..Z|
00003AF0: CA DA 2E 54 58 20 22 47 49 47 41 20 44 45 4D 4F |...TX "GIGA DEMO|
00003B00: 20 20 22 00 E6 5A CB DA 2E 42 59 20 24 46 46 00 | "..Z...BY $FF.|
00003B10: 0A 5B CC DA 2E 54 58 22 44 45 56 45 4C 4F 50 45 |.[...TX"DEVELOPE|
00003B20: 44 20 42 59 20 20 20 20 55 4C 52 49 43 48 20 20 |D BY ULRICH |
00003B30: 20 20 22 00 15 5B CD DA 2E 42 59 24 46 46 00 2B | "..[...BY$FF.+|
00003B40: 5B CE DA 2E 54 58 22 20 20 57 41 4C 54 48 45 52 |[...TX" WALTHER|
00003B50: 20 20 20 22 00 36 5B CF DA 2E 42 59 24 46 46 00 | ".6[...BY$FF.|
00003B60: 40 5B D4 DA 2E 42 59 20 30 00 46 5B 9C E0 3B 00 |@[...BY 0.F[..;.|
00003B70: 4C 5B A6 E0 3B 00 73 5B B0 E0 3B D3 43 52 45 45 |L[..;.s[..;.CREE|
00003B80: 4E 54 45 58 54 20 28 C2 49 4C 44 53 43 48 49 52 |NTEXT (.ILDSCHIR|
00003B90: 4D 5A 45 49 4C 45 4E 20 34 2D 36 29 00 79 5B BA |MZEILEN 4-6).y[.|
00003BA0: E0 3B 00 B2 5B C4 E0 53 43 52 54 58 54 20 2E 54 |.;..[..SCRTXT .T|
00003BB0: 58 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |X"--------------|
00003BC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003BD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 E5 5B CE E0 |----------"..[..|
00003BE0: 2E 54 58 20 22 20 20 30 33 2F 39 30 20 45 4E 54 |.TX " 03/90 ENT|
00003BF0: 57 49 43 4B 45 4C 54 20 56 4F 4E 20 55 4C 52 49 |WICKELT VON ULRI|
00003C00: 43 48 20 57 41 4C 54 48 45 52 21 20 20 22 00 18 |CH WALTHER! "..|
00003C10: 5C D8 E0 2E 54 58 20 22 2D 2D 2D 2D 2D 2D 2D 2D |\...TX "--------|
00003C20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003C30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003C40: 22 00 1E 5C E2 E0 3B 00 24 5C 90 E2 3B 00 2A 5C |"..\..;.$\..;.*\|
00003C50: 9A E2 3B 00 50 5C A4 E2 3B D4 41 42 45 4C 4C 45 |..;.P\..;.ABELLE|
00003C60: 20 46 55 45 52 20 C2 49 4C 44 53 43 48 49 52 4D | FUER .ILDSCHIRM|
00003C70: 20 4C 4F 45 53 43 48 45 4E 00 56 5C AE E2 3B 00 | LOESCHEN.V\..;.|
00003C80: 9C 5C B8 E2 3B 28 46 55 45 52 20 4A 45 44 45 20 |.\..;(FUER JEDE |
00003C90: C2 49 4C 44 53 43 48 49 52 4D 5A 45 49 4C 45 20 |.ILDSCHIRMZEILE |
00003CA0: 32 20 C2 59 54 45 53 3A D3 43 52 45 45 4E 2D 20 |2 .YTES:.CREEN- |
00003CB0: 55 4E 44 20 C3 4F 4C 4F 52 52 41 4D 42 45 4C 45 |UND .OLORRAMBELE|
00003CC0: 47 55 4E 47 29 00 A2 5C C2 E2 3B 00 DB 5C CC E2 |GUNG)..\..;..\..|
00003CD0: 43 4C 52 54 41 42 20 2E 42 59 33 32 2C 31 34 2C |CLRTAB .BY32,14,|
00003CE0: 33 32 2C 31 34 2C 33 32 2C 31 34 2C 33 32 2C 31 |32,14,32,14,32,1|
00003CF0: 2C 33 32 2C 31 2C 33 32 2C 31 2C 33 32 2C 31 2C |,32,1,32,1,32,1,|
00003D00: 31 32 2C 30 00 24 5D D6 E2 2E 42 59 20 31 32 2C |12,0.$]...BY 12,|
00003D10: 30 2C 31 32 2C 31 33 2C 31 32 2C 31 33 2C 31 32 |0,12,13,12,13,12|
00003D20: 2C 31 33 2C 31 32 2C 31 33 2C 31 32 2C 31 33 2C |,13,12,13,12,13,|
00003D30: 31 32 2C 31 33 2C 31 32 2C 31 33 2C 31 32 2C 31 |12,13,12,13,12,1|
00003D40: 33 2C 31 32 2C 31 33 2C 31 32 2C 31 33 00 4D 5D |3,12,13,12,13.M]|
00003D50: E0 E2 2E 42 59 20 31 32 2C 31 33 2C 31 32 2C 31 |...BY 12,13,12,1|
00003D60: 33 2C 31 32 2C 31 33 2C 31 32 2C 30 2C 31 32 2C |3,12,13,12,0,12,|
00003D70: 30 2C 31 32 2C 30 00 53 5D 78 E6 3B 00 68 5D 82 |0,12,0.S]x.;.h].|
00003D80: E6 3B C1 52 42 45 49 54 53 42 45 52 45 49 43 48 |.;.RBEITSBEREICH|
00003D90: 45 00 6E 5D 8C E6 3B 00 7C 5D 8E E6 46 4C 41 47 |E.n]..;.|]..FLAG|
00003DA0: 20 2E 42 59 30 00 8E 5D 8F E6 43 4F 55 4E 54 45 | .BY0..]..COUNTE|
00003DB0: 52 20 2E 42 59 31 30 00 9B 5D 90 E6 50 54 52 20 |R .BY10..]..PTR |
00003DC0: 2E 42 59 30 00 B1 5D 96 E6 57 4F 52 4B 31 20 2E |.BY0..]..WORK1 .|
00003DD0: 42 41 57 4F 52 4B 31 2B 32 34 00 C7 5D A0 E6 57 |BAWORK1+24..]..W|
00003DE0: 4F 52 4B 32 20 2E 42 41 57 4F 52 4B 32 2B 32 34 |ORK2 .BAWORK2+24|
00003DF0: 00 E4 5D AA E6 57 4F 52 4B 33 20 2E 42 59 30 2C |..]..WORK3 .BY0,|
00003E00: 31 2C 32 2C 33 2C 34 2C 33 2C 32 2C 31 00 EC 5D |1,2,3,4,3,2,1..]|
00003E10: 60 EA 2E 45 4E 00 00 00 |`..EN... |
X......BA $C080.....;.. ..;ADRESSENFESTL
EGUNGEN.. &.;.L )..GL VICBASE = $8000
;VIC-ADRESSBEREICH $8000-$BFFF..
*..GL SPRPNT = VICBASE+$07F8 ;ADRESSE
DER SPRITEZEIGER.I ,..GL SCREEN = VICB
ASE+$0400 ;ADRESSE DES BILDSCHIRMSPEICHE
RS.. -..GL CHAR1 = VICBASE+$0800 ;ZEI
CHENSATZADRESSE..!...GL CHAR2 = VICBA
SE+$2000.U!/..GL SPRITES = VICBASE+$0E0
0 ;ADRESSE DER SPRITES..!2..GL SCRIPT
= $CD00 ;ADRESSE DES AUSSEHENS D
ER OBEREN LAUFSCHRIFT..!<..GL PAGE0 =
$CE00 ;FARBTABELLE FUER EFFECT2
(ZEILE 11150 FF.).:"F..GL PAGE1 = $C
F00 ;SCROLLTABELLE (VIC $D016) F
UER EFFECT2.@"N.;.B"X.;DEFINITION DER I/
O-BAUSTEINE.H"..;.."...GL VIC = $D0
00.." ..GL SID = $D400.."...GL COLO
R = $D800.L"...GL CIA1 = $DC00.."
...GL CIA2 = $DD00.."H.;..#R.;ROM-UN
TERPROGRAMME..#..;.8#...GL NORMIRQ = $E
A31 ;NORMALER IRQ.F#...GL IRQEND
= $EA7E ;IRQ BEENDEN.L#..;.{#
..;VARIABLEN..#..;ANM. LS1 = LAUFSCHRIFT
1 = BORDERLAUFSCHRIFT..#..; LS2 = LA
UFSCHRIFT2 = OBERE LAUFSCHRIFT..#..;..$.
..GL R1 = $F7 ;ARBEITSZE
IGER R1.I$...GL R2 = $F9
;ARBEITSZEIGER R2..$...GL C1 = $F
B ;ZAEHLER FUER ZEICHENBREITE
VON LS1.S$...GL C2 = $FC
;ZAEHLER FUER ZEICHENBREITE VON LS1..%.
..GL INDEX1 = $FD ;INDEX ZUM
LINKEN RAND FUER LS2._%...GL CHAR =
$FE ;ZWISCHENSPEICHER FUER ZE
ICHENADRESSE LS2.E%..;.|%..;MAKRODEFINIT
IONEN..%..;..%..;-> ADRESSE (ADR) MIT WO
RT (VALUE) BESCHREIBEN..%..;.T%...MA LDA
DR(ADR,VALUE)..%.. LDA#<(VALUE)..%&. STA
ADR..&0. LDA#>(VALUE)..&:. STAADR+1..&D.
.RT. &N.;.N&P.;-> IRQ-VEKTOR $314/5 AUF
(ADR) SETZEN UND IRQ BEI ZEILE (LINE) AU
SLOESEN.T&R.;..&X..MA RASTERIRQ(ADR,LINE
)..&B. ...LDADR($0314,ADR)..&G. LDAVIC+$
11.I&L..IF >(LINE).V&V. ORA#$80..&...EL.
.&.. AND#$7F..&...EI..'.. STAVIC+$11..'.
. LDA#<(LINE).$'.. STAVIC+$12.1'.. LDA#$
81.A'F. STAVIC+$19.I'P..RT.O'Z.;..'..;->
AUF DIE NAECHSTE BILDSCHIRMZEILE WARTEN
(-> INITTIMER ZEILE 1420FF.)..'..;..'..
.MA NEWLINE.G'..WAIT LDACIA2+$0D.T'.. BE
QWAIT..'...RT..'..;..(..;-> INS REGISTER
PAAR (X,Y) DIE ADRESSE (ADR) LADEN..(..;
.2(...MA LDXY (ADR).B(.. LDX#<(ADR).R(..
LDY#>(ADR).Z(...RT.`(..;.F(..;.L(..;.Z(
.. JMPSTART..(..;..(..;. (..;---> W A I
T L I N E..(..;..(..;AUF EINE RASTERZEIL
E WARTEN UND EVTL. UNGENAUIGKEITEN AUSGL
EICHEN..(..;..)..;>>>:(Y) - RASTERZEILE.
.)$.;..)..;.2)8.WAITLINE CPYVIC+$12.C)B.
BNEWAITLINE.O)L. LDX#10.^)V.DELAY1 DEX.
M)`. BNEDELAY1.V)J. INY..)T. CPYVIC+$12.
.)~. NOP..).. BEQSKIP1..).. CMP$00..)..
NOP.B)..SKIP1 LDX#9.Q)..DELAY2 DEX..)..
BNEDELAY2..)D. INY..)N. NOP..)X. NOP..*.
. CPYVIC+$12..*.. NOP."*.. BEQSKIP2..*..
CMP$00.?*..SKIP2 LDX#10.N*..DELAY3 DEX.
]*.. BNEDELAY3.F*(. INY.V*2. CPYVIC+$12.
.*<. BNESKIP3..*F.SKIP3 RTS..*P.;..*Z.;.
.*D.;---> I N I T T I M E R..*N.;..*X.;C
IA2:TIMER A AUF RASTERZEILE SYNCHRONISIE
REN..*..;..+..INITTIMER SEI.1+.. LDA#$7F
;TIMERINTERRUPT VERHINDERN.B+ . STACIA2+
$0D..+.. ...LDADR(CIA2+$04,$003E);TIMER
A=63, ZEIT FUER 1 ZEILENAUFBAU..+.. LDY#
0..+.. JSRWAITLINE;---> AUF ZEILE 0 WART
EN.Q+H. LDX#4;VERZOEGERUNG..+R.DELAY4 DE
X..+.. BNEDELAY4..+.. NOP..,.. LDA#$11;T
IMER A STARTEN.&,.. STACIA2+$0E./,.. CLI
.8,.. RTS.>,P.;.Z,Z.;---> S C R O L L S
P R.`,..;..,..;SCROLLT SPRITEDATEN IM ZE
ILENBEREICH EINEN PIXEL NACH LINKS..,..;
.G,..;>>>:(X) - ANFANGSZEILE * 3..,..;
(Y) - ENDZEILE * 3..,..;..- .SCROLLSPR
STYCOMPX+1..-*.LOOP1 ASLSPRITES+$202,X.
5-4. ROLSPRITES+$201,X.L->. ROLSPRITES+$
200,X.C-H. ROLSPRITES+$1C2,X.Z-R. ROLSPR
ITES+$1C1,X..-\. ROLSPRITES+$1C0,X..-F.
ROLSPRITES+$182,X..-P. ROLSPRITES+$181,X
.V-Z. ROLSPRITES+$180,X..-.. ROLSPRITES+
$142,X..... ROLSPRITES+$141,X..... ROLSP
RITES+$140,X.2... ROLSPRITES+$102,X.I.J.
ROLSPRITES+$101,X.`.T. ROLSPRITES+$100,
X.V... ROLSPRITES+$C2,X..... ROLSPRITES+
$C1,X..... ROLSPRITES+$C0,X..... ROLSPRI
TES+$82,X.N... ROLSPRITES+$81,X..... ROL
SPRITES+$80,X..... ROLSPRITES+$42,X../$.
ROLSPRITES+$41,X.&/.. ROLSPRITES+$40,X.
;/8. ROLSPRITES+$2,X.P/B. ROLSPRITES+$1,
X.B/L. ROLSPRITES,X.K/V. INX.T/`. INX.}/
J. INX../T.COMPX CPX#0../~. BCCLOOP1../.
. RTS../..;../..;.H/..;---> S C R O L L
T.N/..;../..;SCROLLT TEXT IN DEN BORDERS
PRITES../D.;.'0F.SCROLLT LDATEXT1;PAUSEZ
EIGER = 0? JA:->.40G. BEQSCRT.B0H. DECTE
XT1.K0I. RTS..0N.SCRT LDX#6*3;ZEILEN 6-1
4 IN DEN SPRITES SCROLLEN..0X. LDY#14*3.
.0Z. LDA$01..0.. PHA..0.. LDA#$30..0.. S
TA$01..0.. JSRSCROLLSPR;---> SPRITES SCR
OLLEN..0.. PLA..0.. STA$01."1.. LDAC1;SC
HON 8 PIXEL GESCROLLT? N:->.01.. BNENOCH
R.K1.. LDA#8;ZAEHLER=8 PIXEL.V1.. STAC1.
J1.. ...LDXY(TEXT1)..1.. JSRINCTEXT;--->
TEXTZEIGER UM EINS ERHOEHEN..1(. AND#$3
F;MASKE FUER ASCII-CODES.Q1Z. LDX#>(CHAR
1)..2D. JSRCHARADR;---> ADRESSE DES ZEIC
HENS BERECHNEN..2F. LDA$01..2H. PHA.'2I.
LDA#$34.32K. STA$01.Q2N. LDY#7;DATEN DE
S ZEICHENS IN SPRITESONDERBEREICH KOPIER
EN.2X. LDX#13*3..2..COPYCHAR LDA(R1),Y.
.2.. STASPRITES+$200,X..2.. DEX..2 . DEX
.H2.. DEX.Q2.. DEY..2.. BPLCOPYCHAR..2H.
PLA..2R. STA$01..3..NOCHR DECC1..3.. RT
S..3..;..3..;.43..;---> C H A R A D R.:3
..;.D3..;BERECHNET DIE ADRESSE EINES ZEI
CHENS.J3".;..3,.;>>>:(A) - NUMMER DES ZE
ICHENS..36.; (X) - ZEICHENBASIS HI..3
@.;.D3J.CHARADR LDY#0.Q3T. STYR1+1.Z3^.
ASL..3H. ROLR1+1..3R. ASL..3|. ROLR1+1..
4.. ASL..4.. ROLR1+1..4.. STAR1.'4.. TXA
.04.. CLC.=4.. ADCR1+1.J4B. STAR1+1.S4L.
RTS.Y4V.;._4..;.Y4..;---> I N I T S P R
1.4..;..4..;INITIALISIERT SPRITES FUER
BORDER-LAUFSCHRIFT..4..;.M4..INITSPR1 L
DX#$10..5..NSPOS LDAPOS1,X;SPRITEPOSITIO
NEN FUER LAUFSCHRIFT..5&. STAVIC,X..50.
DEX.(5:. BPLNSPOS.S5D. LDX#$07;SPRITEZEI
GER SETZEN ($38-$3F).`5I. LDY#$3F.P5N.NS
COL LDA#0..5X. STAVIC+$27,X..5[. TYA..5]
. STASPRPNT,X..5_. DEY..5B. DEX..5L. BPL
NSCOL.I5V. LDA#$FF..5.. STAVIC+$15;ALLE
SPRITES AN..6.. STAVIC+$1D;X-VERDOPPLUNG
..6.. LDA#0.16.. STAVIC+$1B;PRIORITAET O
FF.P6.. STAVIC+$1C;MULTICOLOR OFF.N6.. S
TAVIC+$17;Y-VERDOPPLUNG.W6.. RTS.}6F.;..
6P.;..6Z.;---> C L E A R S P R..6..;..6.
.;LOESCHT SPRITE-DATEN.C6..;.V6..CLEARSP
R LDX#0..6.. LDA#0..6..NCLRSPR STASPRITE
S,X..7 . STASPRITES+$0100,X..7*. INX.+74
. BNENCLRSPR.47>. RTS.:7H.;.@7R.;.Z7\.;-
--> H S C R O L L 1.`7F.;..7P.;SCROLLT D
IE OBERE LAUFSCHRIFT..7Z.;..7..HSCROLL1
LDX#0..7..NSC1 LDASCREEN+1,X.D7.. STASCR
EEN,X.Y7.. LDASCREEN+$29,X..7.. STASCREE
N+$28,X..8.. LDASCREEN+$51,X..8.. STASCR
EEN+$50,X.!8J. INX.-8T. CPX#39.:8.. BNEN
SC1.C8.. RTS.I8..;.O8..;.G8..;---> S C R
O L L 1.M8..;..8..;SOFTSCROLLING DER OB
EREN LAUFSCHRIFT..8$.;.G8&.SCROLL1 LDATE
XT2;PAUSEZAEHLER=0? J:->.T8). BEQSCR1..8
+. DECTEXT2..8,. RTS..9..SCR1 LDAINDEX1;
INDEX ZUM BILDRAND VERAENDERN.)98. EOR#$
04.89B. STAINDEX1.L9L. BEQNHSC;=0: ->.V9
V. JSRHSCROLL1;---> BILDSCHIRM SCROLLEN.
.9`. INCC2;ZAEHLER FUER BREITE DES ZEICH
ENS ERHOEHEN..9J. LDAC2.J9T. CMP#3;=3? N
:->.X9~. BCCNNCHR..9.. ...LDXY(TEXT2)..:
.. JSRINCTEXT;---> TEXTZEIGER UM EINS ER
HOEHEN.3:D.NFB LDX#>(SCRIPT).W:I. AND#$1
F;MASKE FUER ASCII-CODES.`:N. PHA..:X. J
SRCHARADR;---> ADRESSE BERECHNEN (NR. *
8)..:.. PLA..:.. CLC;NR.*8 + NR ERGIBT N
R. * 9!.I:.. ADCR1.T:.. STAR1..:.. BCCNI
NC..:.. INCR1+1.";..NINC LDAR1;ERGEBNIS
IN ZEICHENSPEICHER KOPIEREN./;.. STACHAR
.<;.. LDAR1+1.K;.. STACHAR+1.V;.. LDA#0.
A;(. STAC2.Q;2.NNCHR LDYC2.Z;4. SEI..;5.
LDX$01;NAECHSTE SPALTE DES ZEICHENS AUF
BILDSCHIRM..;6. LDA#$30.K;7. STA$01..;<
. LDA(CHAR),Y..;F. STASCREEN+$27..;P. IN
Y..<Z. INY..<D. INY..<N. LDA(CHAR),Y..<X
. STASCREEN+$4F.7<.. INY.@<.. INY.I<.. I
NY.Z< . LDA(CHAR),Y.M<.. STASCREEN+$77.Y
<.. STX$01..<.. CLI..<..NHSC RTS..<..;..
<H.;..<R.;---> C O P Y S E Q..<..;..<..;
SEQUENZ VERSCHOBEN IN ARBEITSBEREICH KOP
IEREN..<..;..=..;>>>: (R2) - ADRESSE DE
R SEQUENZ.E=..; A - LAENGE DES A
RBEITSBEREICHS.S=..; (X,Y) - ADRESSE
DES ARBEITSBEREICHS.Y=..;..=..COPYSEQ S
TXSTORE+1. =". STYSTORE+2..='. STACMW+1.
.=,. LDY#0.H=6. LDA(R2),Y.Q=@. PHA.Z=J.
INY..=T. LDA(R2),Y..=^. STACMP+1..>H. PL
A..>R. TAY..>|. CLC..>.. LDAR2.(>.. ADC#
2.3>.. STAR2.B>.. BCCNOINR2.O>.. INCR2+1
.`>..NOINR2 LDX#0.T>B.NCOPY LDA(R2),Y..>
L.STORE STA$FFFF,X..>.. INY..>..CMP CPY#
$FF..>.. BCCNSEQOV..>.. LDY#0.K>..NSEQOV
INX..>..CMW CPX#$FF..>.. BCCNCOPY..>&.
RTS..>0.;..>:.;..?D.;---> I N C S E Q..?
N.;.??X.;SEQUENZZEIGER UM (A) VERAENDERN
.E?B.;.K?L.;>>>: A - ADDIERWERT (AUCH N
EG.)..?V.; (X,Y) - SEQUENZADRESSE..?
..;..?..INCSEQ STXR2..?.. STYR2+1..?.. L
DY#0.D?.. CLC.S?.. ADC(R2),Y..?.. INY..?
F.NTEST CMP(R2),Y..?P. BCCSEQPOK..@Z. TA
X..@.. BPLSUB..@.. CLC.,@.. ADC(R2),Y.:@
.. JMPNTEST.F@ .SUB SEC.U@*. SBC(R2),Y.C
@H. JMPNTEST.R@\.SEQPOK DEY..@A. STA(R2)
,Y..@F. RTS..@..;..@J.;..@T.;---> M O V
E S E Q..@..;..A..;ALLE SEQUENZZEIGER VE
RSCHIEBEN UND SEQUENZEN IN ARBEITSBEREIC
H KOPIEREN..A..;.!A..MOVESEQ ...LDXY(SEQ
1).,A.. LDA#1.;A.. JSRINCSEQ.OA.. ...LDX
Y(WORK1).[A$. LDA#24.KA.. JSRCOPYSEQ..A8
. ...LDXY(COLOR2)..AB. LDA#1..AL. JSRINC
SEQ..AV. ...LDXY(WORK2)..A`. LDA#24.JAJ.
JSRCOPYSEQ.PA}.;..A~. ...LDXY(SEQ2)..A.
. LDA#1..A.. JSRINCSEQ..B.. ...LDXY(WORK
3)..B.. LDA#8.,B.. JMPCOPYSEQ.2B..;.8B..
;.RB..;---> C L E A R S C R.XB..;.QB..;B
ILDSCHIRM LOESCHEN.WB..;..B#.CLEARSCR ..
.LDADR(R1,SCREEN);ZEIGER R1 AUF BILDSCHI
RM..B&. LDX#0..B).CLRLINE LDACLRTAB,X;LO
ESCHWERT FUER VIDEORAM..B,. LDY#39..C/.C
LRVID STA(R1),Y;ZEILE LOESCHEN.&C2. DEY.
5C5. BPLCLRVID.BC8. LDAR1+1.KC;. PHA.VC>
. AND#3.{C?. ORA#>(COLOR);ZEIGER AUF FAR
BRAM..CA. STAR1+1..CD. LDACLRTAB+1,X;LOE
SCHWERT FUER FARBRAM..CG. LDY#39..CJ.CLR
COL STA(R1),Y;ZEILE FUELLEN..CM. DEY..CP
. BPLCLRCOL..DS. PLA.)DV. STAR1+1;ZEIGER
WIEDER HERSTELLEN.2DY. CLC.FD\. LDA#40;
ZEIGER=ZEIGER+40 (EINE BILDSCHIRMZEILE).
QD_. ADCR1.|DB. STAR1..DE. BCCNOVR1..DH.
INCR1+1..DK.NOVR1 INX..DN. INX.XDQ. CPX
#50;SCHON 25 (=50/2) ZEILEN? N:->..DT. B
CCCLRLINE..DW. RTS..DZ.;..D..;..EH.;..ER
.;---> I N C T E X T.!E..;.[E..;NAECHSTE
S ZEICHEN AUS SCROLLTEXT HOLEN+PAUSE PRU
EFEN.AE..;.SE..INCTEXT STXR1..E.. STYR1+
1..E.. LDY#0..E.. TYA..E". STA(R1),Y..E,
. INY..E6. LDA(R1),Y.DE@. TAY.MEJ. INY.V
ET. INY..E^.NCHR LDA(R1),Y..FH. BNECHROK
;ZEICHEN=0 (END OF TEXT)? N:->.JFR. LDA#
0;TEXTZEIGER=0 (AUF ERSTES ZEICHEN IM TE
XT).UF|. LDY#1.DF.. STA(R1),Y.MF.. INY.Z
F.. BNENCHR..F..CHROK CMP#$FF;KENNZEICHE
N FUER PAUSE..F.. BNENOPAUSE..F.. LDA#$3
F;PAUSEZAEHLER=63 (CA. 1 SEC PAUSE)..F..
LDY#0..FB. STA(R1),Y.#GL. LDA#$20;SPACE
ZEICHEN VORTAEUSCHEN.3GV.NOPAUSE PHA.>G.
. LDY#1.MG.. LDA(R1),Y.VG.. CLC.AG.. ADC
#1.PG.. STA(R1),Y.YG.. PLA..G.. RTS..G&.
;..G.';..G.';---> I N T E R R U P T 1..G
$';..G.';BORDERSPRITES ANZEIGEN UND SCRO
LLING VERWALTEN..G8';..GB'INTER1 SEI..HG
' LDA#$FF..HH' STAVIC+$15.%HI' LDA#$D8.5
HJ' STAVIC+$16.PHL' ...LDADR(R1,COLOR1);
ZEIGER AUF FARBBALKEN (BLAUTOENE).}HJ' L
DX#$1B..HM' LDY#$F9..HN'WAITLF8 CPYVIC+$
12..HT' BNEWAITLF8..H~' LDA#0..H.' STAVI
C+$11;STEUERREGISTER 1 AUF 0 SETZEN..H.'
LDA#$FF..I.' STAVIC+$15..I.' TXA..I.' L
DY#$FD..ID' JSRWAITLINE.CIN' STAVIC+$11;
STEUERREGISTER 1 AUF NORMALEN WERT->.~IO
';BORDER JETZT SICHTBAR..I.' LDY#0.WI.';
LDA(R1),Y BRAUCHT BEI UEBERSCHREITEN DER
SEITENGRENZE EINEN ZYKLUS MEHR!..J.';DI
E FOLGENDE BERECHNUNG KORRIGIERT DAS WIE
DER!..J.'LOOP3 TYA."J.' CLC.-J.( ADCR1.P
J.( BCCDELCYC;BEI UEBERSCHREITUNG: 1 TAK
TZYKLUS WENIGER, ALLES OK..J.(DELCYC LDA
(R1),Y..J.( BEQNOCOLOR..J.( CMP$00..J.(
CMP$00..J(( DECVIC+$16;SEITENBEREICH SIC
HTBAR MACHEN (BIT 4=0)..K2( STAVIC+$21;F
ARBE AUS TABELLE INS FARBREGISTER.>K<(BA
CK INCVIC+$16;BIT 4 RUECKSETZEN.GKF( INY
.IKP( CPY#23;SCHON 23 ZEILEN? N:->.WKZ(
BNELOOP3..K]( LDX#0..KN( STXVIC+$15..KX(
JSRSCROLLT.BK.( ...RASTERIRQ(INTER2,$00
2C).KK.( CLI..K.( JSRMOVESEQ..K.( JMPNOR
MIRQ..K.(;.,L.(NOCOLOR CMP$00;BEI FARBE=
0 WIRD DIESER TEIL AUFGERUFEN.AL.( CMP$0
0;(DAMIT KEINE PUENKTCHEN BEIM FARBWECHS
EL..L.( DECVIC+$16; GESETZT WERDEN...)..
L.( JMPBACK..L (;..L.(;..L.(;---> I N T
E R R U P T 2.BL.(;..LH(;OBERE LAUFSCHRI
FT EINBLENDEN..LR(;..LS(INTER2 SEI..MV(
LDX#$C0..MW( STXVIC+$16.#MX( LDX#$12.3MY
( STXVIC+$18.@MZ( LDX#$0E.PM.( STXVIC+$2
3.]M.( LDY#$2F..M.( JSRWAITLINE;AUF ZEIL
E 47 WARTEN..M.( ...NEWLINE..M.( LDX#0.H
M.(NLINE LDYWORK2,X;FARBE FUER FARBEFFEK
T.XM.( ...NEWLINE..N.( LDAWORK1,X;INDEX
AUS TABELLE (0-3)..N.( ORAINDEX1;ODER-VE
RKNUEPFUNG MIT 0 ODER 4.:N.( CMP$00.WN.(
STYVIC+$22;FARBE SETZEN.N.) STAVIC+$16
;STEUERREGISTER 2 SETZEN..N6) INX..N@) C
PX#24;SCHON 24 ZEILEN? N:->..NJ) BNENLIN
E.ENL) LDX#$C8.PNN) LDY#0..NO) ...NEWLIN
E..NR) CMP(0,X)..NS) CMP(0,X).#O^) STXVI
C+$16;STEUERR. 2 RUECKSETZEN.3OR) STYVIC
+$22.SOW) ...RASTERIRQ(INTER3,$0076).\OX
) CLI.LO.) JSRSCROLL1.{OB) JMPIRQEND..O0
*;..O:*;..OD*;---> I N T E R R U P T 3..
ON*;.HOX*;GRAFIK ANZEIGEN UND FLD.NOB*;.
.ON*INTER3 LDX#$18..OP* STXVIC+$18..OQ*
LDX#$D0..PR* STXVIC+$16..P{* LDX#$36.+P|
* STXVIC+$11.KP}* ...RASTERIRQ(INTER1,$0
0F6).RP~* BITFLAG;EFFEKT 2 EINBLENDEN? J
:->..P* BMIEFFECT2..P.* LDY#0..P.*NXLIN
LDX#0..P.* TXA.NP.* CMPWORK3,Y;FLD-ABST
AND AUS TABELLE..P.* BEQNFLD;=0:->..Q.*N
FL LDAVIC+$12;'FLD-KERNSTUECK'..Q.*WL CM
PVIC+$12."QF* BEQWL.-QP* AND#7.:QZ* ADC#
$30.JQ.* STAVIC+$11.SQ.* INX.\Q.* TXA..Q
.+ CMPWORK3,Y;ABSTAND ERREICHT? N:->..Q.
+ BCCNFL..Q.+NFLD LDX#8;8 RASTERZEILEN A
USLASSEN.LQ +WAIT8 LDAVIC+$12..Q*+WL2 CM
PVIC+$12..Q4+ BEQWL2..Q>+ DEX..RH+ BNEWA
IT8..RR+ INY..R\+ CPY#8.$RF+ BNENXLIN.PR
G+ LDASEQ2;SEQUENZ WIEDER AM ANFANG? N:-
>.`RH+ BNEOLDBACK..RI+ DECCOUNTER;ZAEHLE
R ERNIEDRIGEN..RJ+ BNEOLDBACK;=0? N:->..
RK+ LDA#$80;EFFEKT 2 EINBLENDEN.KRL+ STA
FLAG..RP+OLDBACK LDAVIC+$11;STEUERREG.1
RUECKSETZEN..SQ+ AND#7..SR+ ORA#$38."SS+
STAVIC+$11.1SZ+ JMPIRQEND.7S.+;.JS.+EFF
ECT2 LDXPTR.WS.+ LDA#80;EFFEKT UEBER 80
BILDSCHIRMZEILEN..S.+ STACOUNTER..S.+ LD
Y#6;WARTEN..S.+W6L ...NEWLINE..S.+ DEY.A
S.+ BNEW6L..S.+NLEFF2 LDYPAGE0,X;WERTE F
UER FARBE+INDEX AUS TABELLEN..T.+ ...NEW
LINE..T.+ LDAPAGE1,X..T.+ CMP$00;TIMING.
;T.+ ORA#$D0.YTJ+ STAVIC+$16;...UND SETZ
EN.ITT+ STYVIC+$21.RT.+ INX..T.+ DECCOUN
TER..T.+ BNENLEFF2..T.+ ...NEWLINE.AT.+
LDA#0;REGISTER RUECKSETZEN.QT.+ STAVIC+$
21..T.+ LDA#$D0..T.+ STAVIC+$16..U.+ INC
PTR;EFFEKT FERTIG? N:->..U., BNENOCHANGE
.>U., LDA#0;EFFEKT 1 EINBLENDEN.KU., STA
FLAG.FU.,NOCHANGE LDA#10;10 MAL.VU , STA
COUNTER..U$, JMPOLDBACK;->..U N;..U*N;--
-> S T A R T..U4N;..U>NSTART JSRINITTIME
R.QUCN JSRINITSPR1.ZUHN SEI..URN LDA#$7F
..U\N STACIA1+$0D..VAN LDA#$13..VCN STAV
IC+$18."VFN LDA#$81.2VPN STAVIC+$1A.RVZN
...RASTERIRQ(INTER1,$00F0).CVN JSRCLEA
RSPR.TV.N JSRCLEARSCR.V.N LDA#0..V.N ST
AVICBASE+$3FFF..V.N STAINDEX1..V.N STAVI
C+$20.AV.N LDX#119.VV.NSCTX LDASCRTXT,X.
.V.N AND#$3F..V.N STASCREEN+4*40,X..W.N
DEX..W.N BPLSCTX..W.N CLI.%W.N LDACIA2..
W.N PHA.BW.N LDA#$97-VICBASE/$4000;VIC-A
DRESSBEREICH SETZEN.OW.N STACIA2..W.NWAI
TSPACE LDACIA1+1;AUF SPACETASTE WARTEN..
WJN AND#$10..WTN BNEWAITSPACE.EW.N PLA.R
W.N STACIA2..W.N RTS..WH.;..WR.;VIC-REGI
STERBELEGUNGEN..X..;.CX..POS1 .BY$ED,2,$
25,2,$55,2,$85,2,$B5,2,$E5,2,$15,2,$45,2
,$C1.IXPC;.QXZC;FARBTABELLEN UND REGISTE
RSEQUENZEN.WXDC;..XNCCOLOR1 .BY0,0,0,6,1
4,14,3,14,3,3,1,3,1,1,3,1,3,3,14,14,6,16
,16,16,16.LXXC .BY$FF.RX.C;.XX.C;..X.CCO
LOR2 .BY0,27.-YHC.BY 4,4,4,4,4,10,10,10,
10,4,4,4,4,2,2,2,2,9,9,9,9,9,9,2,2,2,2.3
YRC;.DY.CSEQ1 .BY0,11,$D0,$D0,$D1,$D1,$D
2,$D2,$D3,$D3.|Y.C .BY$D2,$D2,$D1,$D1..Y
.C;..Y.CSEQ2 .BY0,42..Y.D.BY0,0,0,1,1,1,
2,2,2,3,3,3,4,4,4,5,5,5,6,6,6,7,7,7,6,6,
6,5,5,5,4,4,4..Y.D.BY3,3,3,2,2,2,1,1,1..
YXV;..Z.V;SCROLLTEXTE..Z.V;.#Z.VTEXT1 .B
Y0,0.DZ.V.TX " GIGA DEMO! ".PZ
.V.BY $FF..Z.V.TX "12./13.03.1990 ENTWIC
KELT VON ULRICH WALTHER "..Z.V.
BY $FF..Z.W.BY 0..Z.W;..Z.Z;.DZEZTEXT2 .
BY0,0.ZZJZ.TX "GIGA DEMO "..ZKZ.BY $FF.
.[LZ.TX"DEVELOPED BY ULRICH "..[MZ
.BY$FF.+[NZ.TX" WALTHER ".6[OZ.BY$FF.
@[TZ.BY 0.F[..;.L[..;.S[..;SCREENTEXT (B
ILDSCHIRMZEILEN 4-6).Y[..;..[D.SCRTXT .T
X"--------------------------------------
--"..[N..TX " 03/90 ENTWICKELT VON ULRI
CH WALTHER! "..\X..TX "----------------
------------------------"..\..;.$\..;.*\
..;.P\..;TABELLE FUER BILDSCHIRM LOESCHE
N.V\..;..\..;(FUER JEDE BILDSCHIRMZEILE
2 BYTES:SCREEN- UND COLORRAMBELEGUNG)..\
B.;..\L.CLRTAB .BY32,14,32,14,32,14,32,1
,32,1,32,1,32,1,12,0.$]V..BY 12,0,12,13,
12,13,12,13,12,13,12,13,12,13,12,13,12,1
3,12,13,12,13.M]...BY 12,13,12,13,12,13,
12,0,12,0,12,0.S]X.;.H]..;ARBEITSBEREICH
E.N]..;.|]..FLAG .BY0..]..COUNTER .BY10.
.]..PTR .BY0..]..WORK1 .BAWORK1+24.G] .W
ORK2 .BAWORK2+24..]..WORK3 .BY0,1,2,3,4,
3,2,1..]`..EN...
> CLICK IMAGE PREVIEW FOR FULL MODAL