;###	-P B6C3=C3,A000

	ORG	0A000H

normal	=	0B6C6H
muteki	=	0B6FAH

	PUSH AF
	IN A,(8)
	AND 020H
	JR Z,to_muteki

	POP AF
	DB 03AH,007H,0B7H
	JP normal

to_muteki
	POP AF
	JP muteki

	END