version=2 @register.change(pike_room_count_temp,+1) :select:)> :when:0 @storage.set(string,pikestatuspokemon,Kirlia) :select: :when:0 @storage.set(integer,pikestatusattack,0) :when:1 @storage.set(integer,pikestatusattack,1) @npc.wearskin([POKEMON|N]356) @storage.set(string,pikestatuspokemon,Dusclops) :when:2;3 @storage.set(integer,pikestatusattack,2) :when:4;5;6;7 @storage.set(integer,pikestatusattack,3) :when:8;9;10;11;12 @storage.set(integer,pikestatusattack,4) @npc.wearskin([POKEMON|N]356) @storage.set(string,pikestatuspokemon,Dusclops) :when:13;14;15;16;17;18;19 @storage.set(integer,pikestatusattack,5) :endwhen @npc.warp(1,~,0,~) @npc.warp(2,~,0,~) @player.move(0) @text.show(Oh, my!) @npc.setspeed(1,3) @npc.move(1,1) @npc.turn(1,3) @npc.move(1,1) @npc.turn(1,2) @npc.move(1,1) @text.show(Watch out!) :select: :when:0 @storage.set(integer,pikestatuseattempts,1) @storage.set(integer,pikestatusmon0,) :when:1 @storage.set(integer,pikestatuseattempts,2) :select: :when:0 @storage.set(integer,pikestatusmon0,0) @storage.set(integer,pikestatusmon1,1) :when:1 @storage.set(integer,pikestatusmon0,0) @storage.set(integer,pikestatusmon1,2) :when:2 @storage.set(integer,pikestatusmon0,2) @storage.set(integer,pikestatusmon1,1) :endwhen :when:2 @storage.set(integer,pikestatuseattempts,3) @storage.set(integer,pikestatusmon0,0) @storage.set(integer,pikestatusmon1,1) @storage.set(integer,pikestatusmon2,2) :endwhen @storage.set(integer,pikestatusdone,0) :select: :when:0 @text.show(Kirlia used Will-O-Wisp!) :while:> :if:)>)> = none :if:)>,fire)> = false :if:)>)> = 41 )>)> = 199 )>)> = 213 @pokemon.setstatus()>,brn) :endif :endif :endif @storage.update(integer,pikestatusdone,+,1) :endwhile :when:1 @text.show(Dusclops used Will-O-Wisp!) :while:> :if:)>)> = none :if:)>,fire)> = false :if:)>)> = 41 )>)> = 199 )>)> = 213 @pokemon.setstatus()>,brn) :endif :endif :endif @storage.update(integer,pikestatusdone,+,1) :endwhile :when:2 @text.show(Kirlia used Hypnosis!) :while:> :if:)>)> = none :if:)>)> = 15 )>)> = 72 )>)> = 175 )>)> = 213 @pokemon.setstatus()>,slp) :endif :endif @storage.update(integer,pikestatusdone,+,1) :endwhile :when:3 @text.show(Kirlia used Thunder Wave!) :while:> :if:)>)> = none :if:)>,electric)> = false )>,ground)> = false :if:)>)> = 7 )>)> = 213 @pokemon.setstatus()>,prz) :endif :endif :endif @storage.update(integer,pikestatusdone,+,1) :endwhile :when:4 @text.show(Dusclops used Ice Beam!) :while:> :if:)>)> = none :if:)>,ice)> = false :if:)>)> = 40 )>)> = 213 @pokemon.setstatus()>,frz) :endif :endif :endif @storage.update(integer,pikestatusdone,+,1) :endwhile :when:5 @text.show(Kirlia used Toxic!) :while:> :if:)>)> = none :if:)>,poison)> = false )>,steel)> = false :if:)>)> = 17 )>)> = 257 )>)> = 213 @pokemon.setstatus()>,bpsn) :endif :endif :endif @storage.update(integer,pikestatusdone,+,1) :endwhile :endwhen @npc.move(2,1) @npc.turn(1,0) @text.show(Look here!~That's quite enough!) @npc.turn(1,3) @npc.move(1,-1) @npc.move(2,1) @npc.turn(2,1) @level.wait(25) @npc.turn(2,0) @text.show(I must apologize to you...*My has~a timid nature...*It attacks without warning~if it is startled by another~person...*Are you and your Pokémon~all right?) :end :when:1 #old hat man standing in front of door, heals and leaves. @npc.warp(11,~,0,~) :when:2 #trainer comes in direct ahead, starts battle with text, then walks back out :when:3 #Maid approaches, full heals, and leaves @text.show(Welcome... You must be~commended for your luck...*Your Pokémon shall be~restored to full health...~I urge you to enjoy the rest~of your Battle Choice~Challenge...) :when:4 #warp to wild room, full control :when:5 #Maid+trainer(m-left, t-center), trainer approaches, trainer leaves, maid approaches and heals fully, then leaves @npc.warp(0,~-1,0,~) @npc.warp(51,~,0,~) @npc.wearskin(51,) @player.move(0) @text.show(Welcome...*Here,we will have you battle a somewhat-tough trainer...) @npc.move(51,2) @battle.setvar(canreceiveexp,0) @battle.setvar(canuseitems,0) @battle.setvar(canblackout,0) @battle.setvar(frontiertrainer,) @battle.trainer( ) @npc.turn(51,0) @npc.move(51,3) @npc.turn(0,3) @npc.move(0,1) @npc.turn(0,2) @npc.move(0,2) @text.show(How wonderful...*To honor your victory, your Pokémon shall be restored to full health...*I urge you to enjoy the rest of your Battle Choice challenge...) @npc.turn(0,0) @npc.move(0,3) :when:6 @register.change(pike_npc,) @npc.wearskin(61,) @npc.warp(61,~,0,~) :end :when:7 #double Approach, battle, leave :when:8 @npc.warp(0,~,0,~) @player.move(0) @npc.move(0,2) @text.show(I welcome you...) @storage.set(integer,potheals,0) :if:=false @storage.set(integer,potheals,+1) :endif :if:=false @storage.set(integer,potheals,+1) :endif :if:=false @storage.set(integer,potheals,+1) :endif :select: :when:0 @text.show(You are already fully healed!) :when:1 @text.show(Ah, you're a lucky one.~I'm in somewhat-good~spirits now.*I will restore one of your~Pokémon to full health.) @pokemon.heal :when:2 :select: :when:1 @text.show(Ah, you're a lucky one.~I'm in somewhat-good~spirits now.*I will restore one of your~Pokémon to full health.) :select: :when:0 :if:=false @pokemon.heal(0) :else @pokemon.heal() :endif :when:1 :if:=false @pokemon.heal(1) :else :select: :when:0 @pokemon.heal(0) :when:1 @pokemon.heal(2) :endwhen :endif :when:2 :if:=false @pokemon.heal(2) :else @pokemon.heal() :endif :endwhen @pokemon.heal :when:2 @text.show(Ah, you're a lucky one.~I'm in somewhat-good~spirits now.*I will restore two of your~Pokémon to full health.) @pokemon.heal :endwhen :when:3 :select: :when:1 @text.show(Ah, you're a lucky one.~I'm in somewhat-good~spirits now.*I will restore one of your~Pokémon to full health.) @pokemon.heal() :when:2 @text.show(Ah, you're a lucky one.~I'm in somewhat-good~spirits now.*I will restore two of your~Pokémon to full health.) :select: :when:0 @pokemon.heal(1,2) :when:1 @pokemon.heal(0,2) :when:2 @pokemon.heal(0,1) :endwhen :endwhen :endwhen :select: :when:0 @text.show(Giggle... You seem~to be bereft of luck...*If only you hadn't chosen~this room, your Pokémon~could have been healed...) :when:1 @text.show(Since you have chosen this~room, I will restore one~Pokémon to full health...) :select: :when:0 :when:1 @pokemon.heal :when:2 :select: :when:0 :if:=false @pokemon.heal(0) :else @pokemon.heal() :endif :when:1 :if:=false @pokemon.heal(1) :else :select: :when:0 @pokemon.heal(0) :when:1 @pokemon.heal(2) :endwhen :endif :when:2 :if:=false @pokemon.heal(2) :else @pokemon.heal() :endif :endwhen :when:3 @pokemon.heal() :endwhen :when:2 @text.show(Since you have chosen this~room, I will restore two~Pokémon to full health...) :select: :when:0 :when:1 @pokemon.heal :when:2 @pokemon.heal :when:3 :select: :when:0 @pokemon.heal(1,2) :when:1 @pokemon.heal(0,2) :when:2 @pokemon.heal(0,1) :endwhen :endwhen :endwhen @text.show(I shall go fetch our master...) @npc.turn(0,0) @npc.move(0,3) @npc.remove(0) @npc.warp(8,~,0,~) @npc.move(8,1) @battle.setvar(canreceiveexp,0) @battle.setvar(canuseitems,0) @battle.setvar(canblackout,0) @battle.setvar(frontiertrainer,) :if:=28 @text.show(I am Lucy...~I am the law here...~For I am the Pike Queen...*You already know it, but to advance, you must defeat me...*...I'm not one for idle chatter. Hurry. Come on...*Your luck...~I hope you didn't use it all up here...) @player.move(2) @battle.trainer(frontier\battlefactory\lucy_silver) @text.show(Lucy: ... ... ... ... ...~Show me your Frontier Pass...) @player.achieveemblem(silver luck) @player.addfrontieremblem(2,0) @register.register(pike_silver) @text.show( received~the Silver Luck Emblem!) @text.show(...That's all there is... Disappear already...) :else @text.show(...You again...*... ... ... ... ... ...*...I've trampled flowers~and braved storms to get~to where I am...*I don't feel any compulsion~to keep losing to the~same opponent...*... ... ... ... ... ...*Fine...~I'll do it...*Now!~Come on!) @player.move(2) @battle.trainer(frontier\battlefactory\lucy_gold) :if:=112 @text.show(Lucy: ... ... ... ... ...~...Frontier Pass...) @player.achieveemblem(gold luck) @player.addfrontieremblem(2,1) @register.register(pike_gold) @text.show( received~the Gold Luck Emblem!) :endif @text.show(...You, I won't forget...~...Ever...) :endif @npc.turn(8,3) @npc.move(8,1) @npc.turn(8,1) :endwhen :end