version=2

	@Text.Show(Where the luck of trainers~is put to the test...*Welcome to the Battle Pike...*I am your guide to~the Battle Pike...*Would you like to take~the Battle Choice Challenge?)
	@Options.Show(Yes,No)
	:when:Yes
		@player.save
		@sound.play(Save)
		@text.show(<player.name>~saved the game.)
		@storage.set(boolean,thirdperson,<player.thirdperson>)
		
		:if:<pokemon.count>>3
			@Text.Show(Please remove <system.calcint(<pokemon.count>-3)> Pokémon~from your party.)
			@Screen.StorageSystem
		:else
			:if:3><pokemon.count>
				@text.show(Please add <system.calcint(3-<pokemon.count>)> Pokémon~to your party.)
				@screen.storagesystem
			:endif
		:endif

		:if:<register.registered(frontier_battlepike_challenge_values_created)>=false
			#main stats
			@register.register(battlepike_challenge_50_class,INT,0)
			@register.register(battlepike_challenge_50_best,INT,0)
			@register.register(battlepike_challenge_50_previous_streak,INT,0)
			@register.register(battlepike_challenge_100_class,INT,0)
			@register.register(battlepike_challenge_100_best,INT,0)
			@register.register(battlepike_challenge_100_previous_streak,INT,0)
			@register.register(frontier_battlepike_challenge_values_created)
		:endif		
		
		@storage.set(integer,pike_streak,0)
		@storage.set(boolean,pike_brain,false)

		:if:<pokemon.count>=3 <and> <pokemon.countbattle>=3
			@text.show(You have the choice of two cources, Level 50 and Open Level.~Which will you challenge?)
			@options.show(Lv. 50,Lv. 100,Cancel)
			:when:Lv. 50
				@register.register(pike_level,int,50)
				@register.register(pike_class,int,<register.value(battlepike_challenge_50_class)>)
				@register.register(wildlevel,INT,46)
				@register.register(pike_room_count_temp,INT,<register.value(battlepike_challenge_50_previous_streak)>)
			:when:Lv. 100
				@register.register(pike_level,int,100)
				@register.register(pike_class,int,<register.value(battlepike_challenge_100_class)>)
				@register.register(wildlevel,INT,96)
				@register.register(pike_room_count_temp,INT,<register.value(battlepike_challenge_100_previous_streak)>)
			:when:Cancel
				@Text.Show(We look forward to seeing~you on another occasion...)
				:endscript
			:endwhen
			
			@pokemon.heal
			@register.register(pike_challenge_level_0,int,<pokemon.level(0)>)
			@register.register(pike_challenge_level_1,int,<pokemon.level(1)>)
			@register.register(pike_challenge_level_2,int,<pokemon.level(2)>)
			
			@register.register(pike_npc,INT,5)
			@register.register(pikeroom0,INT,0)
			@register.register(pikeroom1,INT,0)
			@register.register(pikeroom2,INT,0)
			@register.register(pikehintspot,INT,0)
			@register.register(pikehint,INT,0)
			@register.register(pikehinted,INT,0)
			@register.register(wildlevel,INT,0)
			@register.register(wildspecial,str,{"Pokemon"«356»}{"OriginalNumber"«-1»}{"Gender"«0»}{"EggSteps"«0»}{"Item"«0»}{"ItemData"«»}{"NickName"«»}{"Level"«<register.value(wildlevel)>»}{"OT"«00000»}{"Ability"«46»}{"Status"«»}{"Nature"«23»}{"CatchLocation"«Battle Pike»}{"CatchTrainer"«Lucy»}{"CatchBall"«5»}{"CatchMethod"«annoyed»}{"Friendship"«70»}{"isShiny"«0»}{"Attack1"«261»}{"Attack2"«212»}{"Attack3"«92»}{"Attack4"«325»}{"EVs"«88§84§84§84§84§84»}{"IVs"«22§22§22§22§22§22»}{"AdditionalData"«»})
			@register.unregister(pikelucynext)

			@Pokemon.changelevel(0,<storage.get(integer,pike_level)>)
			@Pokemon.changelevel(1,<storage.get(integer,pike_level)>)
			@Pokemon.changelevel(2,<storage.get(integer,pike_level)>)
			
			@pokemon.calcstats(0)
			@pokemon.calcstats(1)
			@pokemon.calcstats(2)
			@pokemon.heal

			@Text.Show(Well, now you are~prepared.)
			@script.start(frontier\battlepike\challenge\intro_walk)
		:else
			:if:<pokemon.count>>3 <or> <pokemon.countbattle>>3
				@Text.Show(It seems you have~too many Pokémon.*Please come see me when~you are ready...)
			:else
				@Text.Show(It seems you have~too few Pokémon.*Please come see me when~you are ready...)
			:endif
		:endif
	:when:No
		@Text.Show(We look forward to seeing~you on another occasion...)
	:endwhen
:end