00000000: 46 4C 59 50 20 20 20 20 20 4C 44 59 20 23 24 30 |FLYP LDY #$0|
00000010: 30 0D 5A 4C 30 20 20 20 20 20 20 4C 44 58 20 5A |0.ZL0 LDX Z|
00000020: 54 41 42 2C 59 0D 5A 4C 31 20 20 20 20 20 20 4C |TAB,Y.ZL1 L|
00000030: 44 41 20 24 44 30 31 32 0D 20 20 20 20 20 20 20 |DA $D012. |
00000040: 20 20 41 44 43 20 23 24 30 37 0D 20 20 20 20 20 | ADC #$07. |
00000050: 20 20 20 20 41 4E 44 20 23 24 30 37 0D 20 20 20 | AND #$07. |
00000060: 20 20 20 20 20 20 4F 52 41 20 23 24 31 38 0D 20 | ORA #$18. |
00000070: 20 20 20 20 20 20 20 20 53 54 41 20 24 44 30 31 | STA $D01|
00000080: 31 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 57 |1. JSR W|
00000090: 41 49 54 0D 20 20 20 20 20 20 20 20 20 44 45 58 |AIT. DEX|
000000A0: 0D 20 20 20 20 20 20 20 20 20 42 50 4C 20 5A 4C |. BPL ZL|
000000B0: 31 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 |1.. LDX |
000000C0: 23 24 30 35 0D 5A 4C 32 20 20 20 20 20 20 4A 53 |#$05.ZL2 JS|
000000D0: 52 20 57 41 49 54 0D 20 20 20 20 20 20 20 20 20 |R WAIT. |
000000E0: 44 45 58 0D 20 20 20 20 20 20 20 20 20 42 50 4C |DEX. BPL|
000000F0: 20 5A 4C 32 0D 0D 20 20 20 20 20 20 20 20 20 49 | ZL2.. I|
00000100: 4E 59 0D 20 20 20 20 20 20 20 20 20 49 4E 59 0D |NY. INY.|
00000110: 20 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 | NOP. |
00000120: 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 20 20 | NOP. |
00000130: 20 20 20 43 50 59 20 23 24 31 30 0D 20 20 20 20 | CPY #$10. |
00000140: 20 20 20 20 20 42 4E 45 20 5A 4C 30 0D 0D 20 20 | BNE ZL0.. |
00000150: 20 20 20 20 20 20 20 49 4E 43 20 5A 4C 30 2B 31 | INC ZL0+1|
00000160: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 5A 4C |. LDA ZL|
00000170: 30 2B 31 0D 20 20 20 20 20 20 20 20 20 42 50 4C |0+1. BPL|
00000180: 20 5A 4C 33 0D 20 20 20 20 20 20 20 20 20 4C 44 | ZL3. LD|
00000190: 41 20 23 24 30 30 0D 20 20 20 20 20 20 20 20 20 |A #$00. |
000001A0: 53 54 41 20 5A 4C 30 2B 31 0D 0D 5A 4C 33 20 20 |STA ZL0+1..ZL3 |
000001B0: 20 20 20 20 4C 44 58 20 23 24 30 34 0D 5A 4C 34 | LDX #$04.ZL4|
000001C0: 20 20 20 20 20 20 44 45 58 0D 20 20 20 20 20 20 | DEX. |
000001D0: 20 20 20 42 4E 45 20 5A 4C 34 0D 20 20 20 20 20 | BNE ZL4. |
000001E0: 20 20 20 20 52 54 53 0D 0D 57 41 49 54 20 20 20 | RTS..WAIT |
000001F0: 20 20 4C 44 41 20 24 44 30 31 32 0D 53 54 33 20 | LDA $D012.ST3 |
00000200: 20 20 20 20 20 43 4D 50 20 24 44 30 35 32 0D 20 | CMP $D052. |
00000210: 20 20 20 20 20 20 20 20 42 43 53 20 53 54 33 0D | BCS ST3.|
00000220: 20 20 20 20 20 20 20 20 20 52 54 53 0D 0D 3B 24 | RTS..;$|
00000230: 31 37 30 30 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |1700------------|
00000240: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000250: 2D 2D 2D 2D 2D 2D 0D 20 20 20 20 20 20 20 20 20 |------. |
00000260: 2A 3D 20 24 34 32 30 30 0D 5A 54 41 42 20 20 20 |*= $4200.ZTAB |
00000270: 20 20 2E 42 59 54 45 20 24 30 34 2C 24 30 34 2C | .BYTE $04,$04,|
00000280: 24 30 35 2C 24 30 35 2C 24 30 36 2C 24 30 36 0D |$05,$05,$06,$06.|
00000290: 20 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 24 | .BYTE $|
000002A0: 30 36 2C 24 30 36 2C 24 30 36 2C 24 30 36 2C 24 |06,$06,$06,$06,$|
000002B0: 30 35 2C 24 30 35 0D 20 20 20 20 20 20 20 20 20 |05,$05. |
000002C0: 2E 42 59 54 45 20 24 30 34 2C 24 30 33 2C 24 30 |.BYTE $04,$03,$0|
000002D0: 33 2C 24 30 32 2C 24 30 31 2C 24 30 31 0D 20 20 |3,$02,$01,$01. |
000002E0: 20 20 20 20 20 20 20 2E 42 59 54 45 20 24 30 31 | .BYTE $01|
000002F0: 2C 24 30 31 2C 24 30 31 2C 24 30 31 2C 24 30 31 |,$01,$01,$01,$01|
00000300: 2C 24 30 32 0D 20 20 20 20 20 20 20 20 20 2E 42 |,$02. .B|
00000310: 59 54 45 20 24 30 32 2C 24 30 33 2C 24 30 34 2C |YTE $02,$03,$04,|
00000320: 24 30 35 2C 24 30 35 2C 24 30 36 0D 20 20 20 20 |$05,$05,$06. |
00000330: 20 20 20 20 20 2E 42 59 54 45 20 24 30 36 2C 24 | .BYTE $06,$|
00000340: 30 36 2C 24 30 36 2C 24 30 36 2C 24 30 36 2C 24 |06,$06,$06,$06,$|
00000350: 30 36 0D 20 20 20 20 20 20 20 20 20 2E 42 59 54 |06. .BYT|
00000360: 45 20 24 30 35 2C 24 30 35 2C 24 30 34 2C 24 30 |E $05,$05,$04,$0|
00000370: 33 2C 24 30 32 2C 24 30 32 0D 20 20 20 20 20 20 |3,$02,$02. |
00000380: 20 20 20 2E 42 59 54 45 20 24 30 31 2C 24 30 31 | .BYTE $01,$01|
00000390: 2C 24 30 31 2C 24 30 31 2C 24 30 31 2C 24 30 31 |,$01,$01,$01,$01|
000003A0: 0D 20 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 |. .BYTE |
000003B0: 24 30 31 2C 24 30 32 2C 24 30 33 2C 24 30 33 2C |$01,$02,$03,$03,|
000003C0: 24 30 34 2C 24 30 35 0D 20 20 20 20 20 20 20 20 |$04,$05. |
000003D0: 20 2E 42 59 54 45 20 24 30 35 2C 24 30 36 2C 24 | .BYTE $05,$06,$|
000003E0: 30 36 2C 24 30 36 2C 24 30 36 2C 24 30 36 0D 20 |06,$06,$06,$06. |
000003F0: 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 24 30 | .BYTE $0|
00000400: 36 2C 24 30 36 2C 24 30 35 2C 24 30 34 2C 24 30 |6,$06,$05,$04,$0|
00000410: 33 2C 24 30 33 0D 20 20 20 20 20 20 20 20 20 2E |3,$03. .|
00000420: 42 59 54 45 20 24 30 32 2C 24 30 31 2C 24 30 31 |BYTE $02,$01,$01|
00000430: 2C 24 30 31 2C 24 30 31 2C 24 30 31 0D 20 20 20 |,$01,$01,$01. |
00000440: 20 20 20 20 20 20 2E 42 59 54 45 20 24 30 31 2C | .BYTE $01,|
00000450: 24 30 31 2C 24 30 32 2C 24 30 32 2C 24 30 33 2C |$01,$02,$02,$03,|
00000460: 24 30 33 0D 20 20 20 20 20 20 20 20 20 2E 42 59 |$03. .BY|
00000470: 54 45 20 24 30 34 2C 24 30 34 2C 24 30 34 2C 24 |TE $04,$04,$04,$|
00000480: 30 35 2C 24 30 35 2C 24 30 35 0D 20 20 20 20 20 |05,$05,$05. |
00000490: 20 20 20 20 2E 42 59 54 45 20 24 30 36 2C 24 30 | .BYTE $06,$0|
000004A0: 36 2C 24 30 36 2C 24 30 35 2C 24 30 35 2C 24 30 |6,$06,$05,$05,$0|
000004B0: 34 0D 20 20 20 20 20 20 20 20 20 2E 42 59 54 45 |4. .BYTE|
000004C0: 20 24 30 33 2C 24 30 32 2C 24 30 32 2C 24 30 31 | $03,$02,$02,$01|
000004D0: 2C 24 30 31 2C 24 30 31 0D 20 20 20 20 20 20 20 |,$01,$01. |
000004E0: 20 20 2E 42 59 54 45 20 24 30 31 2C 24 30 31 2C | .BYTE $01,$01,|
000004F0: 24 30 31 2C 24 30 31 2C 24 30 32 2C 24 30 32 0D |$01,$01,$02,$02.|
00000500: 20 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 24 | .BYTE $|
00000510: 30 33 2C 24 30 34 2C 24 30 35 2C 24 30 35 2C 24 |03,$04,$05,$05,$|
00000520: 30 36 2C 24 30 36 0D 20 20 20 20 20 20 20 20 20 |06,$06. |
00000530: 2E 42 59 54 45 20 24 30 36 2C 24 30 36 2C 24 30 |.BYTE $06,$06,$0|
00000540: 36 2C 24 30 36 2C 24 30 36 2C 24 30 35 0D 20 20 |6,$06,$06,$05. |
00000550: 20 20 20 20 20 20 20 2E 42 59 54 45 20 24 30 34 | .BYTE $04|
00000560: 2C 24 30 34 2C 24 30 33 2C 24 30 32 2C 24 30 32 |,$04,$03,$02,$02|
00000570: 2C 24 30 31 0D 20 20 20 20 20 20 20 20 20 2E 42 |,$01. .B|
00000580: 59 54 45 20 24 30 31 2C 24 30 31 2C 24 30 31 2C |YTE $01,$01,$01,|
00000590: 24 30 31 2C 24 30 31 2C 24 30 31 0D 20 20 20 20 |$01,$01,$01. |
000005A0: 20 20 20 20 20 2E 42 59 54 45 20 24 30 32 2C 24 | .BYTE $02,$|
000005B0: 30 33 2C 24 30 33 2C 24 30 34 2C 24 30 35 2C 24 |03,$03,$04,$05,$|
000005C0: 30 36 0D 20 20 20 20 20 20 20 20 20 2E 42 59 54 |06. .BYT|
000005D0: 45 20 24 30 36 2C 24 30 36 2C 24 30 36 2C 24 30 |E $06,$06,$06,$0|
000005E0: 36 0D 20 20 20 20 20 20 20 20 20 2E 42 59 54 45 |6. .BYTE|
000005F0: 20 24 30 36 2C 24 30 35 2C 24 30 34 2C 24 30 33 | $06,$05,$04,$03|
00000600: 2C 24 30 32 2C 24 30 32 0D 20 20 20 20 20 20 20 |,$02,$02. |
00000610: 20 20 2E 42 59 54 45 20 24 30 31 2C 24 30 31 2C | .BYTE $01,$01,|
00000620: 24 30 31 2C 24 30 31 2C 24 30 31 2C 24 30 32 0D |$01,$01,$01,$02.|
00000630: 20 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 24 | .BYTE $|
00000640: 30 32 2C 24 30 33 2C 24 30 34 2C 24 30 35 2C 24 |02,$03,$04,$05,$|
00000650: 30 36 2C 24 30 36 0D 20 20 20 20 20 20 20 20 20 |06,$06. |
00000660: 2E 42 59 54 45 20 24 30 36 2C 24 30 36 2C 24 30 |.BYTE $06,$06,$0|
00000670: 36 2C 24 30 36 2C 24 30 35 2C 24 30 34 0D 20 20 |6,$06,$05,$04. |
00000680: 20 20 20 20 20 20 20 2E 42 59 54 45 20 24 30 34 | .BYTE $04|
00000690: 2C 24 30 33 2C 24 30 32 2C 24 30 31 2C 24 30 31 |,$03,$02,$01,$01|
000006A0: 2C 24 30 31 0D 20 20 20 20 20 20 20 20 20 2E 42 |,$01. .B|
000006B0: 59 54 45 20 24 30 31 2C 24 30 31 2C 24 30 31 2C |YTE $01,$01,$01,|
000006C0: 24 30 32 2C 24 30 33 2C 24 30 34 0D 20 20 20 20 |$02,$03,$04. |
000006D0: 20 20 20 20 20 2E 42 59 54 45 20 24 30 35 2C 24 | .BYTE $05,$|
000006E0: 30 35 2C 24 30 36 2C 24 30 36 2C 24 30 36 2C 24 |05,$06,$06,$06,$|
000006F0: 30 36 0D 20 20 20 20 20 20 20 20 20 2E 42 59 54 |06. .BYT|
00000700: 45 20 24 30 36 2C 24 30 35 2C 24 30 34 2C 24 30 |E $06,$05,$04,$0|
00000710: 33 2C 24 30 32 2C 24 30 32 0D 20 20 20 20 20 20 |3,$02,$02. |
00000720: 20 20 20 2E 42 59 54 45 20 24 30 31 2C 24 30 31 | .BYTE $01,$01|
00000730: 2C 24 30 31 2C 24 30 31 2C 24 30 31 2C 24 30 32 |,$01,$01,$01,$02|
00000740: 0D 20 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 |. .BYTE |
00000750: 24 30 32 2C 24 30 33 0D 3B 24 31 37 42 46 2D 2D |$02,$03.;$17BF--|
00000760: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000770: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000780: 0D 0D |.. |
FLYP LDY #$00.ZL0 LDX ZTAB,Y.ZL
1 LDA $D012. ADC #$07.
AND #$07. ORA #$18.
STA $D011. JSR WAIT. DEX
. BPL ZL1.. LDX #$05.ZL2
JSR WAIT. DEX. BPL
ZL2.. INY. INY.
NOP. NOP. CPY #$10.
BNE ZL0.. INC ZL0+1.
LDA ZL0+1. BPL ZL3. LD
A #$00. STA ZL0+1..ZL3 LDX
#$04.ZL4 DEX. BNE ZL4.
RTS..WAIT LDA $D012.ST3 CMP
$D052. BCS ST3. RTS..;$
1700----------------------------------.
*= $4200.ZTAB .BYTE $04,$04,
$05,$05,$06,$06. .BYTE $06,$06,$
06,$06,$05,$05. .BYTE $04,$03,$0
3,$02,$01,$01. .BYTE $01,$01,$01
,$01,$01,$02. .BYTE $02,$03,$04,
$05,$05,$06. .BYTE $06,$06,$06,$
06,$06,$06. .BYTE $05,$05,$04,$0
3,$02,$02. .BYTE $01,$01,$01,$01
,$01,$01. .BYTE $01,$02,$03,$03,
$04,$05. .BYTE $05,$06,$06,$06,$
06,$06. .BYTE $06,$06,$05,$04,$0
3,$03. .BYTE $02,$01,$01,$01,$01
,$01. .BYTE $01,$01,$02,$02,$03,
$03. .BYTE $04,$04,$04,$05,$05,$
05. .BYTE $06,$06,$06,$05,$05,$0
4. .BYTE $03,$02,$02,$01,$01,$01
. .BYTE $01,$01,$01,$01,$02,$02.
.BYTE $03,$04,$05,$05,$06,$06.
.BYTE $06,$06,$06,$06,$06,$05.
.BYTE $04,$04,$03,$02,$02,$01.
.BYTE $01,$01,$01,$01,$01,$01.
.BYTE $02,$03,$03,$04,$05,$06.
.BYTE $06,$06,$06,$06. .BYTE
$06,$05,$04,$03,$02,$02. .BYTE
$01,$01,$01,$01,$01,$02. .BYTE $
02,$03,$04,$05,$06,$06. .BYTE $0
6,$06,$06,$06,$05,$04. .BYTE $04
,$03,$02,$01,$01,$01. .BYTE $01,
$01,$01,$02,$03,$04. .BYTE $05,$
05,$06,$06,$06,$06. .BYTE $06,$0
5,$04,$03,$02,$02. .BYTE $01,$01
,$01,$01,$01,$02. .BYTE $02,$03.
;$17BF----------------------------------
..