# Pastebin qKG5t9L6
memset:
; frame size 5, pretend size 0, outgoing size 0
	lda _sp1
	pha
	lda _sp0
	pha
	lda _fp1
	pha
	lda _fp0
	pha
	lda _sp0
	clc
	adc #<$fffb
	sta _fp0
	lda _sp1
	adc #>$fffb
	sta _fp1
	lda _sp0
	clc
	adc #<$fffb
	sta _sp0
	lda _sp1
	adc #>$fffb
	sta _sp1
	lda _s0
	pha
	lda _r0
	sty _tmp0
	ldy #0
	sta (_fp0),y
	ldy _tmp0
	lda #$01
	tay
	lda _r1
	sta (_fp0),y
	lda #$02
	tay
	lda _r2
	sta (_fp0),y
	lda #$03
	tay
	lda _r3
	sta (_fp0),y
	lda #$04
	tay
	lda _r4
	sta (_fp0),y
	lda _fp0
	sta _r7
	lda _fp1
	sta _s0
	clc
	lda _r7
	adc #$02
	sta _r7
	bcc L@7
	inc _s0
L@7:
	lda #$01
	sta _r6
	lda #$03
	tay
	lda (_fp0),y
	sta _r4
	lda #$04
	tay
	lda (_fp0),y
	sta _r5
	sty _tmp0
	ldy #0
	lda (_fp0),y
	ldy _tmp0
	sta _r2
	lda #$01
	tay
	lda (_fp0),y
	sta _r3
	lda _r7
	sta _r0
	lda _s0
	sta _r1
	jsr _Z3dmajjjh
	nop
	pla
	sta _s0
	pla
	sta _fp0
	pla
	sta _fp1
	pla
	sta _sp0
	pla
	sta _sp1
	rts
	.export memcpy
memcpy:
; frame size 6, pretend size 0, outgoing size 0
	lda _sp1
	pha
	lda _sp0
	pha
	lda _fp1
	pha
	lda _fp0
	pha
	lda _sp0
	clc
	adc #<$fffa
	sta _fp0
	lda _sp1
	adc #>$fffa
	sta _fp1
	lda _sp0
	clc
	adc #<$fffa
	sta _sp0
	lda _sp1
	adc #>$fffa
	sta _sp1
	lda _r0
	sty _tmp0
	ldy #0
	sta (_fp0),y
	ldy _tmp0
	lda #$01
	tay
	lda _r1
	sta (_fp0),y
	lda #$02
	tay
	lda _r2
	sta (_fp0),y
	lda #$03
	tay
	lda _r3
	sta (_fp0),y
	lda #$04
	tay
	lda _r4
	sta (_fp0),y
	lda #$05
	tay
	lda _r5
	sta (_fp0),y
	lda #$00
	sta _r6
	lda #$04
	tay
	lda (_fp0),y
	sta _r4
	lda #$05
	tay
	lda (_fp0),y
	sta _r5
	lda #$02
	tay
	lda (_fp0),y
	sta _r2
	lda #$03
	tay
	lda (_fp0),y
	sta _r3
	sty _tmp0
	ldy #0
	lda (_fp0),y
	ldy _tmp0
	sta _r0
	lda #$01
	tay
	lda (_fp0),y
	sta _r1
	jsr _Z3dmajjjh
	nop
	pla
	sta _fp0
	pla
	sta _fp1
	pla
	sta _sp0
	pla
	sta _sp1
	rts