Strukturanalyse Track page $c500

--------
*Track
lda $fd
beq @
jmp *Pattern
*Anfang
@ ldx $fb
lda $c500,x
cmp #a0
bne @
lda #00
sta $fb
jmp *Anfang
@ sta $fe
inx
lda $c500,x
sta $fc
inx
lda $c500,x
sta $d418
inx
inx
stx $fb
--------

--------
*Pattern
ldy $fd

---3x---
lda ($fd),y
clc
adc $fc
tax
lda $c600,x
sta $d400 [$d407, $d40e]
lda $c700,x
sta $d401 [$d408, $d40f]
iny
lda ($fd),y
sta $d404 [$d40b, $d412]
iny
---3x---

lda ($fd),y
sta $d416
iny
lda ($fd),y
sta $d417
iny
sty $fd
rts
--------