00000000: 11 20 20 20 20 C1 53 53 45 4D 42 4C 45 52 4C 49 |. .SSEMBLERLI|
00000010: 53 54 49 4E 47 20 5A 55 52 20 C1 4E 49 4D 41 54 |STING ZUR .NIMAT|
00000020: 49 4F 4E 20 45 49 4E 45 53 20 D3 50 52 49 54 45 |ION EINES .PRITE|
00000030: 53 0D 0A 11 0D 0A 11 0D 0A 11 0D 0A 11 20 20 20 |S............ |
00000040: 20 2C 38 30 30 30 20 20 41 39 20 30 35 20 20 20 | ,8000 A9 05 |
00000050: 20 20 4C 44 41 20 23 30 35 20 20 20 20 20 3B D2 | LDA #05 ;.|
00000060: 41 48 4D 45 4E 46 41 52 42 45 0D 0A 11 20 20 20 |AHMENFARBE... |
00000070: 20 2C 38 30 30 32 20 20 38 44 20 32 30 20 44 30 | ,8002 8D 20 D0|
00000080: 20 20 53 54 41 20 44 30 32 30 0D 0A 11 20 20 20 | STA D020... |
00000090: 20 2C 38 30 30 35 20 20 41 39 20 30 30 20 20 20 | ,8005 A9 00 |
000000A0: 20 20 4C 44 41 20 23 30 30 20 20 20 20 20 3B C8 | LDA #00 ;.|
000000B0: 49 4E 54 45 52 47 52 55 4E 44 46 41 52 42 45 0D |INTERGRUNDFARBE.|
000000C0: 0A 11 20 20 20 20 2C 38 30 30 37 20 20 38 44 20 |.. ,8007 8D |
000000D0: 32 31 20 44 30 20 20 53 54 41 20 44 30 32 31 0D |21 D0 STA D021.|
000000E0: 0A 11 20 20 20 20 2C 38 30 30 41 20 20 41 39 20 |.. ,800A A9 |
000000F0: 30 38 20 20 20 20 20 4C 44 41 20 23 30 38 20 20 |08 LDA #08 |
00000100: 20 20 20 3B D3 50 52 49 54 45 2D C6 41 52 42 45 | ;.PRITE-.ARBE|
00000110: 20 31 0D 0A 11 20 20 20 20 2C 38 30 30 43 20 20 | 1... ,800C |
00000120: 38 44 20 32 35 20 44 30 20 20 53 54 41 20 44 30 |8D 25 D0 STA D0|
00000130: 32 35 0D 0A 11 20 20 20 20 2C 38 30 30 46 20 20 |25... ,800F |
00000140: 41 39 20 30 42 20 20 20 20 20 4C 44 41 20 23 30 |A9 0B LDA #0|
00000150: 42 20 20 20 20 20 3B D3 50 52 49 54 45 2D C6 41 |B ;.PRITE-.A|
00000160: 52 42 45 20 32 0D 0A 11 20 20 20 20 2C 38 30 31 |RBE 2... ,801|
00000170: 31 20 20 38 44 20 32 36 20 44 30 20 20 53 54 41 |1 8D 26 D0 STA|
00000180: 20 44 30 32 36 0D 0A 11 20 20 20 20 2C 38 30 31 | D026... ,801|
00000190: 34 20 20 41 39 20 30 37 20 20 20 20 20 4C 44 41 |4 A9 07 LDA|
000001A0: 20 23 30 37 20 20 20 20 20 3B D3 50 52 49 54 45 | #07 ;.PRITE|
000001B0: 2D C6 41 52 42 45 20 33 0D 0A 11 20 20 20 20 2C |-.ARBE 3... ,|
000001C0: 38 30 31 36 20 20 38 44 20 32 37 20 44 30 20 20 |8016 8D 27 D0 |
000001D0: 53 54 41 20 44 30 32 37 0D 0A 11 20 20 20 20 2C |STA D027... ,|
000001E0: 38 30 31 39 20 20 41 39 20 30 31 20 20 20 20 20 |8019 A9 01 |
000001F0: 4C 44 41 20 23 30 31 20 20 20 20 20 3B CD 55 4C |LDA #01 ;.UL|
00000200: 54 49 43 4F 4C 4F 52 0D 0A 11 20 20 20 20 2C 38 |TICOLOR... ,8|
00000210: 30 31 42 20 20 38 44 20 31 43 20 44 30 20 20 53 |01B 8D 1C D0 S|
00000220: 54 41 20 44 30 31 43 0D 0A 11 20 20 20 20 2C 38 |TA D01C... ,8|
00000230: 30 31 45 20 20 41 39 20 38 30 20 20 20 20 20 4C |01E A9 80 L|
00000240: 44 41 20 23 38 30 20 20 20 20 20 3B D3 50 52 49 |DA #80 ;.PRI|
00000250: 54 45 5A 45 49 47 45 52 20 C2 4C 4F 43 4B 20 31 |TEZEIGER .LOCK 1|
00000260: 32 38 0D 0A 11 20 20 20 20 2C 38 30 32 30 20 20 |28... ,8020 |
00000270: 38 44 20 46 38 20 30 37 20 20 53 54 41 20 30 37 |8D F8 07 STA 07|
00000280: 46 38 0D 0A 11 20 20 20 20 2C 38 30 32 33 20 20 |F8... ,8023 |
00000290: 41 39 20 41 30 20 20 20 20 20 4C 44 41 20 23 41 |A9 A0 LDA #A|
000002A0: 30 20 20 20 20 20 3B D9 2D C1 4E 46 41 4E 47 53 |0 ;.-.NFANGS|
000002B0: 50 4F 53 49 54 49 4F 4E 0D 0A 11 20 20 20 20 2C |POSITION... ,|
000002C0: 38 30 32 35 20 20 38 44 20 30 31 20 44 30 20 20 |8025 8D 01 D0 |
000002D0: 53 54 41 20 44 30 30 31 0D 0A 11 20 20 20 20 2C |STA D001... ,|
000002E0: 38 30 32 38 20 20 41 39 20 30 30 20 20 20 20 20 |8028 A9 00 |
000002F0: 4C 44 41 20 23 30 30 20 20 20 20 20 3B D8 2D C1 |LDA #00 ;.-.|
00000300: 4E 46 41 4E 47 53 50 4F 53 49 54 49 4F 4E 0D 0A |NFANGSPOSITION..|
00000310: 11 20 20 20 20 2C 38 30 32 41 20 20 38 44 20 30 |. ,802A 8D 0|
00000320: 30 20 44 30 20 20 53 54 41 20 44 30 30 30 0D 0A |0 D0 STA D000..|
00000330: 11 20 20 20 20 2C 38 30 32 44 20 20 38 44 20 31 |. ,802D 8D 1|
00000340: 30 20 44 30 20 20 53 54 41 20 44 30 31 30 20 20 |0 D0 STA D010 |
00000350: 20 20 3B 5D 42 45 52 4C 41 55 46 52 45 47 49 53 | ;]BERLAUFREGIS|
00000360: 54 45 52 20 4C 7C 53 43 48 45 4E 0D 0A 11 20 20 |TER L|SCHEN... |
00000370: 20 20 2C 38 30 33 30 20 20 41 39 20 30 31 20 20 | ,8030 A9 01 |
00000380: 20 20 20 4C 44 41 20 23 30 31 20 20 20 20 20 3B | LDA #01 ;|
00000390: D3 50 52 49 54 45 20 30 20 41 4E 0D 0A 11 20 20 |.PRITE 0 AN... |
000003A0: 20 20 2C 38 30 33 32 20 20 38 44 20 31 35 20 44 | ,8032 8D 15 D|
000003B0: 30 20 20 53 54 41 20 44 30 31 35 0D 0A 11 20 20 |0 STA D015... |
000003C0: 20 20 2C 38 30 33 35 20 20 32 30 20 35 39 20 38 | ,8035 20 59 8|
000003D0: 30 20 20 4A 53 52 20 38 30 35 39 20 20 20 20 3B |0 JSR 8059 ;|
000003E0: D5 4E 54 45 52 50 52 4F 47 52 41 4D 4D 20 C1 4E |.NTERPROGRAMM .N|
000003F0: 49 4D 41 54 49 4F 4E 0D 0A 11 20 20 20 20 2C 38 |IMATION... ,8|
00000400: 30 33 38 20 20 45 45 20 30 30 20 44 30 20 20 49 |038 EE 00 D0 I|
00000410: 4E 43 20 44 30 30 30 20 20 20 20 3B D8 2D D0 4F |NC D000 ;.-.O|
00000420: 53 49 54 49 4F 4E 20 2B 20 32 0D 0A 11 20 20 20 |SITION + 2... |
00000430: 20 2C 38 30 33 42 20 20 45 45 20 30 30 20 44 30 | ,803B EE 00 D0|
00000440: 20 20 49 4E 43 20 44 30 30 30 0D 0A 11 20 20 20 | INC D000... |
00000450: 20 2C 38 30 33 45 20 20 44 30 20 46 35 20 20 20 | ,803E D0 F5 |
00000460: 20 20 42 4E 45 20 38 30 33 35 0D 0A 11 20 20 20 | BNE 8035... |
00000470: 20 2C 38 30 34 30 20 20 41 39 20 30 31 20 20 20 | ,8040 A9 01 |
00000480: 20 20 4C 44 41 20 23 30 31 20 20 20 20 20 3B 57 | LDA #01 ;W|
00000490: 45 4E 4E 20 D8 3E 32 35 35 20 5D 42 45 52 4C 41 |ENN .>255 ]BERLA|
000004A0: 55 46 42 49 54 20 53 45 54 5A 45 4E 0D 0A 11 20 |UFBIT SETZEN... |
000004B0: 20 20 20 2C 38 30 34 32 20 20 38 44 20 31 30 20 | ,8042 8D 10 |
000004C0: 44 30 20 20 53 54 41 20 44 30 31 30 0D 0A 11 20 |D0 STA D010... |
000004D0: 20 20 20 2C 38 30 34 35 20 20 32 30 20 35 39 20 | ,8045 20 59 |
000004E0: 38 30 20 20 4A 53 52 20 38 30 35 39 20 20 20 20 |80 JSR 8059 |
000004F0: 3B D5 4E 54 45 52 50 52 4F 47 52 41 4D 4D 20 C1 |;.NTERPROGRAMM .|
00000500: 4E 49 4D 41 54 49 4F 4E 0D 0A 11 20 20 20 20 2C |NIMATION... ,|
00000510: 38 30 34 38 20 20 45 45 20 30 30 20 44 30 20 20 |8048 EE 00 D0 |
00000520: 49 4E 43 20 44 30 30 30 20 20 20 20 3B D8 2D D0 |INC D000 ;.-.|
00000530: 4F 53 49 54 49 4F 4E 20 2B 20 32 0D 0A 11 20 20 |OSITION + 2... |
00000540: 20 20 2C 38 30 34 42 20 20 45 45 20 30 30 20 44 | ,804B EE 00 D|
00000550: 30 20 20 49 4E 43 20 44 30 30 30 0D 0A 11 20 20 |0 INC D000... |
00000560: 20 20 2C 38 30 34 45 20 20 41 44 20 30 30 20 44 | ,804E AD 00 D|
00000570: 30 20 20 4C 44 41 20 44 30 30 30 20 20 20 20 3B |0 LDA D000 ;|
00000580: C1 42 46 52 41 47 45 0D 0A 11 20 20 20 20 2C 38 |.BFRAGE... ,8|
00000590: 30 35 31 20 20 43 39 20 35 41 20 20 20 20 20 43 |051 C9 5A C|
000005A0: 4D 50 20 23 35 41 20 20 20 20 20 3B 41 55 46 20 |MP #5A ;AUF |
000005B0: C5 4E 44 45 20 28 D8 3E 33 35 30 29 0D 0A 11 20 |.NDE (.>350)... |
000005C0: 20 20 20 2C 38 30 35 33 20 20 33 30 20 46 30 20 | ,8053 30 F0 |
000005D0: 20 20 20 20 42 4D 49 20 38 30 34 35 0D 0A 11 20 | BMI 8045... |
000005E0: 20 20 20 2C 38 30 35 35 20 20 31 38 20 20 20 20 | ,8055 18 |
000005F0: 20 20 20 20 43 4C 43 20 0D 0A 11 20 20 20 20 2C | CLC ... ,|
00000600: 38 30 35 36 20 20 34 43 20 30 30 20 38 30 20 20 |8056 4C 00 80 |
00000610: 4A 4D 50 20 38 30 30 30 20 20 20 20 3B CE 45 55 |JMP 8000 ;.EU|
00000620: 53 54 41 52 54 0D 0A 11 20 20 20 20 2D 2D 2D 2D |START... ----|
00000630: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000640: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D |---------------.|
00000650: 0A 11 20 20 20 20 2C 38 30 35 39 20 20 20 20 20 |.. ,8059 |
00000660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000670: 20 20 20 3B D5 4E 54 45 52 50 52 4F 47 52 41 4D | ;.NTERPROGRAM|
00000680: 4D 20 C1 4E 49 4D 41 54 49 4F 4E 0D 0A 11 20 20 |M .NIMATION... |
00000690: 20 20 2C 38 30 35 39 20 20 41 45 20 46 38 20 30 | ,8059 AE F8 0|
000006A0: 37 20 20 4C 44 58 20 30 37 46 38 0D 0A 11 20 20 |7 LDX 07F8... |
000006B0: 20 20 2C 38 30 35 43 20 20 45 38 20 20 20 20 20 | ,805C E8 |
000006C0: 20 20 20 49 4E 58 20 20 20 20 20 20 20 20 20 3B | INX ;|
000006D0: 4E 7B 43 48 53 54 45 53 20 C2 49 4C 44 0D 0A 11 |N{CHSTES .ILD...|
000006E0: 20 20 20 20 2C 38 30 35 44 20 20 45 30 20 38 38 | ,805D E0 88|
000006F0: 20 20 20 20 20 43 50 58 20 23 38 38 0D 0A 11 20 | CPX #88... |
00000700: 20 20 20 2C 38 30 35 46 20 20 44 30 20 30 32 20 | ,805F D0 02 |
00000710: 20 20 20 20 42 4E 45 20 38 30 36 33 0D 0A 11 20 | BNE 8063... |
00000720: 20 20 20 2C 38 30 36 31 20 20 41 32 20 38 30 20 | ,8061 A2 80 |
00000730: 20 20 20 20 4C 44 58 20 23 38 30 0D 0A 11 20 20 | LDX #80... |
00000740: 20 20 2C 38 30 36 33 20 20 38 45 20 46 38 20 30 | ,8063 8E F8 0|
00000750: 37 20 20 53 54 58 20 30 37 46 38 20 20 20 20 3B |7 STX 07F8 ;|
00000760: 49 4E 20 D3 50 52 49 54 45 5A 45 49 47 45 52 0D |IN .PRITEZEIGER.|
00000770: 0A 11 20 20 20 20 2C 38 30 36 36 20 20 32 30 20 |.. ,8066 20 |
00000780: 36 41 20 38 30 20 20 4A 53 52 20 38 30 36 41 20 |6A 80 JSR 806A |
00000790: 20 20 20 3B D5 4E 54 45 52 50 52 4F 47 52 41 4D | ;.NTERPROGRAM|
000007A0: 4D 20 D7 41 52 54 45 53 43 48 4C 45 49 46 45 0D |M .ARTESCHLEIFE.|
000007B0: 0A 11 20 20 20 20 2C 38 30 36 39 20 20 36 30 20 |.. ,8069 60 |
000007C0: 20 20 20 20 20 20 20 52 54 53 20 20 20 20 20 20 | RTS |
000007D0: 20 20 20 3B C5 4E 44 45 20 C1 4E 49 4D 41 54 49 | ;.NDE .NIMATI|
000007E0: 4F 4E 0D 0A 11 20 20 20 20 2D 2D 2D 2D 2D 2D 2D |ON... -------|
000007F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000800: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A 11 20 |------------... |
00000810: 20 20 20 2C 38 30 36 41 20 20 20 20 20 20 20 20 | ,806A |
00000820: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000830: 3B D5 4E 54 45 52 50 52 4F 47 52 41 4D 4D 20 D7 |;.NTERPROGRAMM .|
00000840: 41 52 54 45 53 43 48 4C 45 49 46 45 0D 0A 11 20 |ARTESCHLEIFE... |
00000850: 20 20 20 2C 38 30 36 41 20 20 41 32 20 30 30 20 | ,806A A2 00 |
00000860: 20 20 20 20 4C 44 58 20 23 30 30 0D 0A 11 20 20 | LDX #00... |
00000870: 20 20 2C 38 30 36 43 20 20 41 30 20 31 30 20 20 | ,806C A0 10 |
00000880: 20 20 20 4C 44 59 20 23 31 30 20 20 20 20 20 3B | LDY #10 ;|
00000890: D3 43 48 4C 45 49 46 45 4E 44 41 55 45 52 0D 0A |.CHLEIFENDAUER..|
000008A0: 11 20 20 20 20 2C 38 30 36 45 20 20 43 41 20 20 |. ,806E CA |
000008B0: 20 20 20 20 20 20 44 45 58 20 0D 0A 11 20 20 20 | DEX ... |
000008C0: 20 2C 38 30 36 46 20 20 44 30 20 46 44 20 20 20 | ,806F D0 FD |
000008D0: 20 20 42 4E 45 20 38 30 36 45 0D 0A 11 20 20 20 | BNE 806E... |
000008E0: 20 2C 38 30 37 31 20 20 43 41 20 20 20 20 20 20 | ,8071 CA |
000008F0: 20 20 44 45 58 20 0D 0A 11 20 20 20 20 2C 38 30 | DEX ... ,80|
00000900: 37 32 20 20 44 30 20 46 41 20 20 20 20 20 42 4E |72 D0 FA BN|
00000910: 45 20 38 30 36 45 0D 0A 11 20 20 20 20 2C 38 30 |E 806E... ,80|
00000920: 37 34 20 20 36 30 20 20 20 20 20 20 20 20 52 54 |74 60 RT|
00000930: 53 20 20 20 20 20 20 20 20 20 3B C5 4E 44 45 20 |S ;.NDE |
00000940: D7 41 52 54 45 53 43 48 4C 45 49 46 45 0D 0A 11 |.ARTESCHLEIFE...|
00000950: 20 20 20 20 20 0D 0A 0A 0A 0A 0A 0A 0A 0A 0A 0A | ...........|
00000960: 0A 0A 0A 0A 0A 0A 0A 0A 0A 0A 0A 0A 0A 0A 0A 0A |................|
00000970: 0A 0A 0A 0A 0A 0A 0A 0A 0A 0A 0A 0A 0A 0A 11 20 |............... |
00000980: 20 20 20 20 0D 0A | .. |
. ASSEMBLERLISTING ZUR ANIMATION EINE
S SPRITES............ ,8000 A9 05
LDA #05 ;RAHMENFARBE... ,8002
8D 20 D0 STA D020... ,8005 A9 00
LDA #00 ;HINTERGRUNDFARBE... ,8
007 8D 21 D0 STA D021... ,800A A9
08 LDA #08 ;SPRITE-FARBE 1...
,800C 8D 25 D0 STA D025... ,800F
A9 0B LDA #0B ;SPRITE-FARBE 2...
,8011 8D 26 D0 STA D026... ,801
4 A9 07 LDA #07 ;SPRITE-FARBE 3
... ,8016 8D 27 D0 STA D027... ,
8019 A9 01 LDA #01 ;MULTICOLOR.
.. ,801B 8D 1C D0 STA D01C... ,8
01E A9 80 LDA #80 ;SPRITEZEIGER
BLOCK 128... ,8020 8D F8 07 STA 07
F8... ,8023 A9 A0 LDA #A0 ;Y
-ANFANGSPOSITION... ,8025 8D 01 D0
STA D001... ,8028 A9 00 LDA #00
;X-ANFANGSPOSITION... ,802A 8D 0
0 D0 STA D000... ,802D 8D 10 D0 ST
A D010 ;]BERLAUFREGISTER L|SCHEN...
,8030 A9 01 LDA #01 ;SPRITE 0
AN... ,8032 8D 15 D0 STA D015...
,8035 20 59 80 JSR 8059 ;UNTERPRO
GRAMM ANIMATION... ,8038 EE 00 D0 I
NC D000 ;X-POSITION + 2... ,803B
EE 00 D0 INC D000... ,803E D0 F5
BNE 8035... ,8040 A9 01 LDA #0
1 ;WENN X>255 ]BERLAUFBIT SETZEN...
,8042 8D 10 D0 STA D010... ,8045
20 59 80 JSR 8059 ;UNTERPROGRAMM A
NIMATION... ,8048 EE 00 D0 INC D000
;X-POSITION + 2... ,804B EE 00 D
0 INC D000... ,804E AD 00 D0 LDA D
000 ;ABFRAGE... ,8051 C9 5A C
MP #5A ;AUF ENDE (X>350)... ,8053
30 F0 BMI 8045... ,8055 18
CLC ... ,8056 4C 00 80 JMP 8000
;NEUSTART... --------------------
---------------... ,8059
;UNTERPROGRAMM ANIMATION...
,8059 AE F8 07 LDX 07F8... ,805C
E8 INX ;N{CHSTES BILD...
,805D E0 88 CPX #88... ,805F
D0 02 BNE 8063... ,8061 A2 80
LDX #80... ,8063 8E F8 07 STX 0
7F8 ;IN SPRITEZEIGER... ,8066 20
6A 80 JSR 806A ;UNTERPROGRAMM WARTES
CHLEIFE... ,8069 60 RTS
;ENDE ANIMATION... ---------------
--------------------... ,806A
;UNTERPROGRAMM WARTESCHL
EIFE... ,806A A2 00 LDX #00...
,806C A0 10 LDY #10 ;SCHLEIFE
NDAUER... ,806E CA DEX ...
,806F D0 FD BNE 806E... ,8071
CA DEX ... ,8072 D0 FA BN
E 806E... ,8074 60 RTS
;ENDE WARTESCHLEIFE... ...........
............................... ..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL