nopalfade for FR

.thumb

@kleenexfeu's palfade thing is at 0x5E70A in EM, and I'm
@putting it in at 0x34FFC in FR.

start:
	ldr r0, currentmove
	ldrh r0, [r0]
	cmp r0, #0x90 @compares move to Tranform
	bne nopalfade
continue:
	ldr r3, thing
	mov r0, r10
	mov r1, #0x10
	mov r2, #0x6
	ldr r4, palfade
	bl jump
	ldr r1, return
	mov pc, r1
nopalfade:
	ldr r0, return2
	mov pc, r0
jump:
	mov pc, r4

.align 2
current_move:	.word 0x02023D4A
thing:		.word 0x7FFF
palfade:	.word 0x08045274
return:		.word 0x08035008
return2:	.word 0x08035028