!buttons = $7e0018
!auto_enter_level = $7e0109
!player_mode = $7e0071
!mode_ = $7e0100
!hud_name = $7E0EF9
	phb
	phk
	plb
	
	ldx #$07
-	lda str, X
	sta !hud_name, X
	dex
	bpl -
	lda !mode_
	cmp #$14
	bne +
	lda !player_mode
	bne +
	sta !auto_enter_level
+	lda !buttons
	bit #$30
	beq +
	lda !carl_initialized
	sta !auto_enter_level
	lda #$0b
	sta !mode_
	
+	plb
	rtl
str:
db $15,$1b,$16,$18,$1b,$1d,$18,$17

back to listings