;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Spin Jump block
; By: Sonikku
; This block makes the player launch off of the block if he is spin-jumping. 
; If he is pressing A, he launches higher, much like when he spin jumps off an enemy.
; This is the Blocktool Super Delux compatible version. 
; Fakescaper/Chdata's edits: It now hurts you just like a sprite.
; Think of it as a stationary spiny or boo.
; Below hurts no matter what.
; If you just jump onto it without spinning it hurts you and you fall through it.
;
; ACTS LIKE 25
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

JMP Below : JMP Main : JMP Main : JMP Return : JMP Return : JMP Return : JMP Return

Main:
	LDA #$01	;
	CMP $140D	;Is Mario spin-jumping?
	BEQ SPINZY	;If he isn't, return. 
Below:
	JSL $00F5B7 ;hurt mario
	RTL
SPINZY:
	LDA $15		;He is, so, is he pressing A?
	AND #$80	;
	BEQ BounceLow	;If he isn't, make him BounceLow.
	LDA #$A8	;If he is, launch him into the air!
	STA $7D		;
	BRA Sound	;Go to Sound.
BounceLow:
	LDA #$D0	;
	STA $7D		;Make Mario bounce low. 
	BRA Sound	;Go to Sound.
Sound:
	LDA #$02	;Set sound (Spin jumping off enemy)
	STA $1DF9	;I/O Port
	JSL $01AB99	;Spin Jumping off spiked enemy effect.
Return:	RTL		;Return