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

<EFBFBD><EFBFBD>version=2
:if:<register.registered(postblueoak)>=false <and> <player.badges>=16
	@text.show(Hello, you are begining~to hold the air of~a great Champion,~<player.name>.*It is time for your~Pok<00>dex to match~who you are.*Let me see your~Pok<00>dex for a moment.*I will upgrade your~Pok<00>dex with the~National Mode.)
	@sound.play(success,1)
	@text.color(playercolor)
	@text.show(<player.name> recieved~the National Pok<00>dex!)
	@level.wait(30)
	@register.register(pokedex_national)
	@register.register(nationaldex)
	@text.show(It won't be easy to complete~the National Pok<00>dex...*Infact I have another~gift to help you~do that!)
	@item.give(284,1)
	@item.messagegive(284,1)
	@register.register(rainbowpass)
	@text.show(That pass will allow~you to take the~Sea Gallop Ferries~from Vermilion to all~of the Sevii Islands.*I have heard many~ruins and secrets lie~on those islands.*I am sure visiting~those islands will be~an amazing experience!)

	:end
:endif

:if:<register.registered(First_time_red)>=true <and> <register.registered(kantostart1)>=false
	#Kanto starters
	:if:<register.registered(kantostart0)>=false
		@text.show(Hello, <player.name>.~Good to see you.~I heard a lot about you.*Your Pok<00>dex must be close~to complete?*For all your hard work, I would~like to give you something.)
		@text.show(Haha!*What's next to me... You must~have figured it out right away.*Yes, it is a Pok<00>mon!)
		@text.show(You don't see them very often~in Kanto.~Choose one and it'll be yours!~...Go ahead!)
		@register.register(kantostart0)
		:end
	:endif
	:if:<register.registered(kantostart1)>=false
		@text.show(Choose one and it'll be yours!~...Go ahead!)
		:end
	:endif
:endif

#This sets a flag for the evaldist script so that it knows where the call came from:
@storage.set(str,pallet_oak_scriptcaller,flag)
@script.start(pallet\evaldist)