pokecrystal/maps/OlivineGym.asm

OlivineGym_MapScriptHeader:
	; trigger count
	db 0

	; callback count
	db 0

JasmineScript_0x9c12f:
	faceplayer
	loadfont
	checkevent EVENT_BEAT_JASMINE
	iftrue .FightDone
	writetext UnknownText_0x9c1b9
	closetext
	loadmovesprites
	winlosstext UnknownText_0x9c2bb, $0000
	loadtrainer JASMINE, 1
	startbattle
	returnafterbattle
	setevent EVENT_BEAT_JASMINE
	loadfont
	writetext UnknownText_0x9c33a
	playsound SFX_GET_BADGE
	waitbutton
	setflag ENGINE_MINERALBADGE
	checkcode VAR_BADGES
	scall OlivineGymTriggerRockets
.FightDone
	checkevent EVENT_GOT_TM23_IRON_TAIL
	iftrue UnknownScript_0x9c172
	writetext UnknownText_0x9c354
	keeptextopen
	verbosegiveitem TM_IRON_TAIL, 1
	iffalse UnknownScript_0x9c176
	setevent EVENT_GOT_TM23_IRON_TAIL
	writetext UnknownText_0x9c3a5
	closetext
	loadmovesprites
	end

UnknownScript_0x9c172:
	writetext UnknownText_0x9c3d1
	closetext
UnknownScript_0x9c176:
	loadmovesprites
	end

OlivineGymTriggerRockets:
	if_equal 7, .RadioTowerRockets
	if_equal 6, .GoldenrodRockets
	end

.GoldenrodRockets
	jumpstd goldenrodrockets

.RadioTowerRockets
	jumpstd radiotowerrockets

OlivineGymGuyScript:
	faceplayer
	checkevent EVENT_BEAT_JASMINE
	iftrue .OlivineGymGuyWinScript
	checkevent EVENT_JASMINE_RETURNED_TO_GYM
	iffalse .OlivineGymGuyPreScript
	loadfont
	writetext OlivineGymGuyText
	closetext
	loadmovesprites
	end

.OlivineGymGuyWinScript
	loadfont
	writetext OlivineGymGuyWinText
	closetext
	loadmovesprites
	end

.OlivineGymGuyPreScript
	loadfont
	writetext OlivineGymGuyPreText
	closetext
	loadmovesprites
	end

OlivineGymStatue:
	checkflag ENGINE_MINERALBADGE
	iftrue .Beaten
	jumpstd gymstatue1
.Beaten
	trainertotext JASMINE, 1, $1
	jumpstd gymstatue2

UnknownText_0x9c1b9:
	text "…Thank you for"
	line "your help at the"
	cont "LIGHTHOUSE…"

	para "But this is dif-"
	line "ferent. Please"

	para "allow me to intro-"
	line "duce myself."

	para "I am JASMINE, a"
	line "GYM LEADER. I use"
	cont "the steel-type."

	para "…Do you know about"
	line "the steel-type?"

	para "It's a type that"
	line "was only recently"
	cont "discovered."

	para "…Um… May I begin?"
	done

UnknownText_0x9c2bb:
	text "…You are a better"
	line "trainer than me,"

	para "in both skill and"
	line "kindness."

	para "In accordance with"
	line "LEAGUE rules, I"

	para "confer upon you"
	line "this BADGE."
	done

UnknownText_0x9c33a:
	text "<PLAYER> received"
	line "MINERALBADGE."
	done

UnknownText_0x9c354:
	text "MINERALBADGE"
	line "raises #MON's"
	cont "DEFENSE."

	para "…Um… Please take"
	line "this too…"
	done

UnknownText_0x9c393:
	text "<PLAYER> received"
	line "TM09."
	done

UnknownText_0x9c3a5:
	text "…You could use"
	line "that TM to teach"
	cont "IRON TAIL."
	done

UnknownText_0x9c3d1:
	text "Um… I don't know"
	line "how to say this,"
	cont "but good luck…"
	done

OlivineGymGuyText:
	text "JASMINE uses the"
	line "newly discovered"
	cont "steel-type."

	para "I don't know very"
	line "much about it."
	done

OlivineGymGuyWinText:
	text "That was awesome."

	para "The steel-type,"
	line "huh?"

	para "That was a close"
	line "encounter of an"
	cont "unknown kind!"
	done

OlivineGymGuyPreText:
	text "JASMINE, the GYM"
	line "LEADER, is at the"
	cont "LIGHTHOUSE."

	para "She's been tending"
	line "to a sick #MON."

	para "A strong trainer"
	line "has to be compas-"
	cont "sionate."
	done

OlivineGym_MapEventHeader:
	; filler
	db 0, 0

	; warps
	db 2
	warp_def $f, $4, 2, GROUP_OLIVINE_CITY, MAP_OLIVINE_CITY
	warp_def $f, $5, 2, GROUP_OLIVINE_CITY, MAP_OLIVINE_CITY

	; xy triggers
	db 0

	; signposts
	db 2
	signpost 13, 3, SIGNPOST_READ, OlivineGymStatue
	signpost 13, 6, SIGNPOST_READ, OlivineGymStatue

	; people-events
	db 2
	person_event SPRITE_JASMINE, 7, 9, UP << 2 | $2, $0, -1, -1, (PAL_OW_RED << 4) | $80, 0, JasmineScript_0x9c12f, EVENT_OLIVINE_GYM_JASMINE
	person_event SPRITE_GYM_GUY, 17, 11, UP << 2 | $2, $0, -1, -1, (PAL_OW_RED << 4) | $80, 0, OlivineGymGuyScript, -1