P3D-Legacy/P3D/Content/Data/Scripts/goldenrod/namerater.dat

<EFBFBD><EFBFBD>version=2

@text.show(Hello, hello! I'm~the Name Rater.~I rate the names~of Pok<00>mon.*Would you like me~to rate names?)
@options.show(Yes,No)
:when:Yes
	@text.show(Which Pok<00>mon's nickname~should I rate for you?)
	@pokemon.select
	:if:<pokemon.selected>>-1
		:if:<pokemon.isegg(<pokemon.selected>)>=false
			:if:<pokemon.ot(<pokemon.selected>)>=<player.ot>
				@text.show(Hm...<pokemon.displayname(<pokemon.selected>)>...~That's a fairly decent~name.~But, how about a slightly~better nickname?*Want me to give it~a better name?)
				@options.show(Yes,No)
				:when:Yes
					@storage.set(string,TempPokemonCurrentNickname,<pokemon.displayname(<pokemon.selected>)>)
					@screen.input(<pokemon.name(<pokemon.selected>)>,name,<pokemon.displayname(<pokemon.selected>)>,20,<pokemon.menusprite(<pokemon.selected>)>)
					@pokemon.setnickname(<pokemon.selected>,<system.lastinput>)
					:if:<pokemon.displayname(<pokemon.selected>)>=<storage.get(string,TempPokemonCurrentNickname)>
						@text.show(All right.*This Pok<00>mon is now named~<pokemon.displayname(<pokemon.selected>)>!*It might look~the same as before,~but this new name is~much better!*Well done!)
					:else
						@text.show(All right.*This Pok<00>mon is now named~<pokemon.displayname(<pokemon.selected>)>!~That's a better name~than before!*Well done!)
					:endif
				:when:No
					@text.show(OK, then.~Come again sometime.)
				:endwhen
			:else
				@text.show(Hm... <pokemon.displayname(<pokemon.selected>)>?*What a great name!~It's perfect.~Treat <pokemon.displayname(<pokemon.selected>)>~with loving care.)
			:endif
		:else
			@text.show(This seems to be~an egg though...)
		:endif
	:else
		@text.show(OK, then.~Come again sometime.)
	:endif
:when:No
	@text.show(OK, then.~Come again sometime.)
:endwhen

@storage.clear

:end