SpurgeGymHouse_MapScriptHeader;trigger count
	db 0
 ;callback count
	db 0

SpurgeGymHouseAbra:
	faceplayer
	opentext
	writetext .text
	cry ABRA
	endtext

.text
	db TX_COMPRESSED, $ad, $5a, $f5, $c6, $57, $aa, $d7, $bb, $4f
	db $05, $34

SpurgeGymHouseTeleportationNPC:
	faceplayer
	opentext
	writetext .introduction_text
	yesorno
	sif false
		jumptext .declined_text
	checkmoney 0, 400
	sif !=, 2, then
		writetext .paid_text
	selse
		writetext .not_enough_money_text
	sendif
	takemoney 0, 400
	waitbutton
	closetext
	playsound SFX_WARP_FROM
	special FadeOutPalettes
	waitsfx
	warp SPURGE_GYM_1F, 4, 4 ; add actual coords
	end

.introduction_text
	db TX_COMPRESSED, $53, $6b, $06, $b0, $6b, $de, $f4, $ad, $67, $01, $05
	db $a7, $91, $6d, $32, $a5, $f8, $ca, $47, $dc, $d2

	db $80, $15, $05, $2b, $56, $bd, $8c, $e9, $27, $4e
	db $de, $04, $16, $a0, $5a, $bf, $cc, $02, $b9
	db $aa, $90, $fe, $f7, $b3, $03, $3a, $78

	db $00, $31, $0d, $58, $a6, $ab, $0b, $57, $4f
	db $03, $c2, $6b, $5c, $a7, $e2, $c0, $b1
	db $4b, $4d

.declined_text
	db TX_COMPRESSED, $53, $6b, $06, $b0, $6b, $de, $f4, $c0, $64, $38, $ac
	db $13, $cf, $9f
	db $a9, $a0

.paid_text
	db TX_COMPRESSED, $53, $6b, $06, $b0, $6b, $de, $f4, $06, $35, $82
	db $7a, $a3, $ef
	db $7d, $4d

.not_enough_money_text
	db TX_COMPRESSED, $17, $26, $97, $8c, $72, $85, $a9, $90, $92
	db $98, $f2, $74, $18, $e1, $90, $2d, $72
	db $95, $4f, $84, $86, $0a

	db $94, $03, $08, $60, $c7, $1f, $39, $52, $76, $cc, $18
	db $d6, $f0, $20, $b5, $13, $a0, $c7, $f9, $69, $32
	db $7a, $9a

SpurgeGymHouse_MapEventHeader ;filler
	db 0, 0

;warps
	db 1
	warp_def $0, $7, 1, SPURGE_GYM_B1F

	;xy triggers
	db 0

	;signposts
	db 0

	;people-events
	db 2
	person_event SPRITE_GRAMPS, 4, 1, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_OW_BLUE, PERSONTYPE_SCRIPT, 0, SpurgeGymHouseTeleportationNPC, -1
	person_event SPRITE_ABRA, 4, 2, SPRITEMOVEDATA_POKEMON, 0, 0, -1, -1, PAL_OW_YELLOW, PERSONTYPE_SCRIPT, 0, SpurgeGymHouseAbra, -1

