;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; generate score sprite
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
GEN_SCORE LDY #$05
SCORE_LOOP LDA $16E1,y
BEQ SCORE_1
DEY
BPL SCORE_LOOP
RTS
SCORE_1 LDA #$03 ;スプライトの種類
STA $16E1,y
LDA $E4,x ;x座標下位バイト
STA $16ED,y
LDA $14E0,x ;x座標上位バイト
STA $16F3,y
LDA $D8,x ;y座標下位バイト
STA $16E7,y
LDA $14D4,x ;y座標上位バイト
STA $16F9,y
LDA #$30 ;タイマー
STA $16FF,y
RTS