!game_mode = $7e0100
!buttons1 = $7e0016
!buttons2 = $7e0018
!ground_stand = $7e13ef
!sprite_stand = $7e1471
!water = $7e0085

	lda !game_mode
	cmp #$14
	beq +
	lda #$0
	sta !carl_initialized
	bra end
+	

	lda !carl_initialized
	cmp #$00
	beq +
	dec
	sta !carl_initialized
	bne +
	sta !water
+

;a jump test
	lda !buttons2
	bit #$80
	bne +

;b jump test
	lda !buttons1
	bit #$80
	beq end
	
; jump
+

;Test if the player is on the ground.
	lda !ground_stand
	ora !sprite_stand
	beq end

;Player is jumping off the ground. Give them water so
;they can maneuver better!
	lda #$1
	sta !water
	lda #$40
	sta !carl_initialized 

end:
	lda #$00
	rtl

back to listings