!speed = 1

	!dp = $0000
	!addr = $0000
	!bank = $800000
	!sa1 = 0
	!gsu = 0

if read1($00FFD6) == $15
	sfxrom
	!dp = $6000
	!addr = !dp
	!bank = $000000
	!gsu = 1
elseif read1($00FFD5) == $23
	sa1rom
	!dp = $3000
	!addr = $6000
	!bank = $000000
	!sa1 = 1
endif

if !speed
	org $04945D
	autoclean JML restore
	return:
	RTS
	NOP #3
	poggers:
	JSR $9468
	org $049527
	JML DoNot
else
	if read1($04945D) == $5C
		autoclean read3($04945D+1)
	endif
	org $04945D
		LDA $0DD8|!addr
		BEQ +
		LDA #$08
		STA $13D9|!addr
		RTS
		+
	org $049527
		STZ $1B78|!addr
		LDX $0DD6|!addr
endif

if !speed
	freecode
	restore:
	LDA $0DD8|!addr
	BEQ +
	LDA #$08
	STA $13D9|!addr
	JML return
	+
	STZ $45
	STZ $46
	JML poggers

	DoNot:
	LDA $45
	BNE BeenThereDoneThat
	INC $45
	STZ $1B78|!addr
	LDX $0DD6|!addr
	JML $04952D

	BeenThereDoneThat:
	JML $049831
endif