org  $C00
	PHP
	SEI
	JSR  swap
	JSR  $0080
	JSR  swap
	PLP
	jmp end
swap
	LDX #$00
loop
	LDY  $D00,X
	LDA  $00,X
	STY  $00,X
	STA  $D00,X
	INX
	BNE  loop
	RTS
end
;	RTS