.org $0300 offsety: .db 0 .org $0320 offsetx: .db 0 ; . . . ; få start-indeksene til spritene inn i offset ($0300) offsetyl: ldx #0 ldy #0 .loop tya sta offsety,x iny iny iny iny inx cpx #32 bne .loop offsetxl: ldx #0 ldy #$FF .loop tya sta offsetx,x dey dey dey dey inx cpx #32 bne .loop ; . . . .loop tya pha lda offsety,y clc adc #1 sta offsety,y tay lda sinetab,y clc adc #16 sta $0200,x pla tay pha lda offsetx,y clc sbc #1 sta offsetx,y tay lda sinetab,y clc adc #16 sta $0203,x txa clc adc #4 tax pla tay iny cpy #32 bne .loop