P3D-Legacy/P3D/Content/Data/Scripts/olivine/oak.dat

<EFBFBD><EFBFBD>version=2
:if:<register.registered(elmticketget)>=true <and> <register.registered(pokedex_kanto)>=false <and> <player.position(y)>=0
	@npc.warp(1,<player.position(x)>,0,2)
	@player.move(0)
	@entity.showmessagebulb(1|2|1|2)
	@music.play(oak_encounter)
	@npc.turn(1,0)
	@npc.move(1,1)
	@text.show(Hello! You are starting~to have the attitude~of a Champion, <player.name>!*Since you are heading~to Kanto I figured I should~upgrade your Pok<00>dex for~the Kanto region.)
	@level.wait(50)
	@sound.play(success,1)
	@register.register(pokedex_kanto)
	@text.show(While you will see many~familiar Pok<00>mon in Kanto~there will also be plenty~of Pok<00>mon you might have~never seen before!*Oh, time flies!*I have a radio show to record~at Goldenrod Radio Tower.*If you come near~Pallet Town, do drop by~my Pok<00>mon Research Lab!)
	@npc.turn(1,3)
	:if:<player.position(x)>=3
		@npc.turn(1,1)
	:endif
	@npc.move(1,1)
	@npc.turn(1,0)
	@npc.move(1,2)
	@sound.play(enter)
	@music.play(violet)
:endif
:end