MoragaMoveRelearner_MapScriptHeader;trigger count
	db 0
 ;callback count
	db 0

MoragaMoveRelearnerScript:
	faceplayer
	opentext
	checkevent EVENT_MET_MOVE_RELEARNER
	sif false, then
		writetext .intro_text
		setevent EVENT_MET_MOVE_RELEARNER
	sendif
	special MoveRelearner
	endtext

.intro_text
	db TX_COMPRESSED, $62, $7d, $e8, $78, $c7, $45, $92, $d2
	db $6f, $0a, $84, $18, $e3, $90, $fa, $7a, $b2, $1a, $f8

	db $80, $75, $19, $d2, $44, $9f, $44, $40, $41, $69
	db $6f, $03, $95, $f0, $92, $2c, $df, $37, $d5, $9a
	db $c0, $3e, $10, $63, $44, $b4, $ed, $cb, $49, $82
	db $79, $3a, $0c, $73, $00, $af, $90, $dd, $99

	db $3c, $01, $d4, $67, $49, $32, $19, $69, $1a, $26, $01
	db $5b, $c0, $82, $d7, $e0, $c9, $0e, $9d, $65, $3a, $4e
	db $4d, $56, $01, $5c, $d8, $c4, $f5, $77, $14, $33, $bd, $3f

	db $00, $75, $19, $0f, $7a, $6c, $dc, $b4, $9b, $ff
	db $78, $10, $5a, $88, $33
	db $f0, $39, $80

MoragaMoveRelearner_MapEventHeader:: db 0, 0

.Warps
	db 2
	warp_def $7, $2, 3, MORAGA_TOWN
	warp_def $7, $3, 3, MORAGA_TOWN

.CoordEvents
	db 0

.BGEvents
	db 0

.ObjectEvents
	db 1
	person_event SPRITE_GENTLEMAN, 4, 5, SPRITEMOVEDATA_00, 0, 0, -1, -1, PAL_OW_RED, PERSONTYPE_SCRIPT, 0, MoragaMoveRelearnerScript, -1

