lorom

org $828B79		
	JSR $F740	
org $82F740		
LDA $0A22

;uncomment the next 8 lines if you want morph to glow without spring ball ability activated
;CMP #$0404
;BEQ CODE
;CMP #$0408
;BEQ CODE
;CMP #$0804
;BEQ CODE
;CMP #$0808
;BEQ CODE
CMP #$1104
BEQ CODE
CMP #$1108
BEQ CODE
CMP #$1204
BEQ CODE
CMP #$1208
BEQ CODE
CMP #$1304
BEQ CODE
CMP #$1308
BEQ CODE
BRA CO1
CODE:
LDA $7FFDE2
CMP #$0032
BPL RESET
TIMER:
LDA $7FFDE2		
INC				
STA $7FFDE2		
CMP #$0001
BEQ CO1
CMP #$0007
BEQ CO2
CMP #$000D
BEQ CO3
CMP #$0013
BEQ CO4
CMP #$001A
BEQ CO5
CMP #$001F
BEQ CO4
CMP #$0025
BEQ CO3
CMP #$002B
BEQ CO2
CMP #$0031
BEQ CO1

END:
LDA $0E12		
RTS	
END2:
LDA $0E12		
RTS	
RESET:			
LDA #$0000
STA $7FFDE2
BRA TIMER

CO1:
LDA #$3BE0
STA $7EC188
BRA END
CO2:
LDA #$2320
STA $7EC188
BRA END
CO3:
LDA #$1AE0
STA $7EC188
BRA END
CO4:
LDA #$0E80
STA $7EC188
BRA END
CO5:
LDA #$0220
STA $7EC188
BRA END