version=2 @text.show(Hello.*I study fossils.*If you find a fossil~bring it to me and I might~be able to revive it!) :if:=0 =0 =0 =0 =0 =0 =0 =0 =0 =0 =0 :if:>0 >0 >0 >0 @text.show(Oh that fossil looks~broken, I don't think~I can revive it.) :endif :end :endif @storage.set(int,fossilcount,0) @storage.set(str,fossils,) @storage.set(str,fossils2,) :if:>0 @storage.set(str,fossils,Helix Fossil,) @storage.set(int,fossilcount,+1) :endif :if:>0 @storage.set(str,fossils,Dome Fossil,) @storage.set(int,fossilcount,+1) :endif :if:>0 @storage.set(str,fossils,Old Amber,) @storage.set(int,fossilcount,+1) :endif :if:>0 @storage.set(str,fossils,Root Fossil,) @storage.set(int,fossilcount,+1) :endif :if:>0 @storage.set(str,fossils,Claw Fossil,) @storage.set(int,fossilcount,+1) :endif :if:>0 :if:=5 @storage.set(str,fossils,More,) :endif :if:>4 @storage.set(str,fossils2,Skull Fossil,) :else @storage.set(str,fossils,Skull Fossil,) :endif @storage.set(int,fossilcount,+1) :endif :if:>0 :if:=5 @storage.set(str,fossils,More,) :endif :if:>4 @storage.set(str,fossils2,Armor Fossil,) :else @storage.set(str,fossils,Armor Fossil,) :endif @storage.set(int,fossilcount,+1) :endif :if:>0 :if:=5 @storage.set(str,fossils,More,) :endif :if:>4 @storage.set(str,fossils2,Cover Fossil,) :else @storage.set(str,fossils,Cover Fossil,) :endif @storage.set(int,fossilcount,+1) :endif :if:>0 :if:=5 @storage.set(str,fossils,More,) :endif :if:>4 @storage.set(str,fossils2,Plume Fossil,) :else @storage.set(str,fossils,Plume Fossil,) :endif @storage.set(int,fossilcount,+1) :endif :if:>0 :if:=5 @storage.set(str,fossils,More,) :endif :if:>4 @storage.set(str,fossils2,Jaw Fossil,) :else @storage.set(str,fossils,Jaw Fossil,) :endif @storage.set(int,fossilcount,+1) :endif :if:>0 :if:=5 @storage.set(str,fossils,More,) :endif :if:>4 @storage.set(str,fossils2,Sail Fossil,) :else @storage.set(str,fossils,Sail Fossil,) :endif @storage.set(int,fossilcount,+1) :endif @storage.set(str,fossils,Cancel) @storage.set(str,fossils2,Cancel) @text.show(Which fossil should I revive?) @options.show() :when:Helix Fossil @storage.set(int,poknum,138) @storage.set(int,fosnum,601) @storage.set(str,pokname,Omanyte) @storage.set(str,fosname,Helix Fossil) :when:Dome Fossil @storage.set(int,poknum,140) @storage.set(int,fosnum,602) @storage.set(str,pokname,Kabuto) @storage.set(str,fosname,Dome Fossil) :when:Old Amber @storage.set(int,poknum,142) @storage.set(int,fosnum,603) @storage.set(str,pokname,Aerodactyl) @storage.set(str,fosname,Old Amber) :when:Root Fossil @storage.set(int,poknum,345) @storage.set(int,fosnum,604) @storage.set(str,pokname,Lileep) @storage.set(str,fosname,Root Fossil) :when:Claw Fossil @storage.set(int,poknum,347) @storage.set(int,fosnum,605) @storage.set(str,pokname,Anorith) @storage.set(str,fosname,Claw Fossil) :when:Skull Fossil @storage.set(int,poknum,408) @storage.set(int,fosnum,606) @storage.set(str,pokname,Cranidos) @storage.set(str,fosname,Skull Fossil) :when:Armor Fossil @storage.set(int,poknum,410) @storage.set(int,fosnum,607) @storage.set(str,pokname,Shieldon) @storage.set(str,fosname,Armor Fossil) :when:Cover Fossil @storage.set(int,poknum,564) @storage.set(int,fosnum,608) @storage.set(str,pokname,Tirtouga) @storage.set(str,fosname,Cover Fossil) :when:Plume Fossil @storage.set(int,poknum,566) @storage.set(int,fosnum,609) @storage.set(str,pokname,Archen) @storage.set(str,fosname,Plume Fossil) :when:Jaw Fossil @storage.set(int,poknum,696) @storage.set(int,fosnum,610) @storage.set(str,pokname,Tyrunt) @storage.set(str,fosname,Jaw Fossil) :when:Sail Fossil @storage.set(int,poknum,698) @storage.set(int,fosnum,611) @storage.set(str,pokname,Amaura) @storage.set(str,fosname,Sail Fossil) :when:More @options.show() :when:Skull Fossil @storage.set(int,poknum,408) @storage.set(int,fosnum,606) @storage.set(str,pokname,Cranidos) @storage.set(str,fosname,Skull Fossil) :when:Armor Fossil @storage.set(int,poknum,410) @storage.set(int,fosnum,607) @storage.set(str,pokname,Shieldon) @storage.set(str,fosname,Armor Fossil) :when:Cover Fossil @storage.set(int,poknum,564) @storage.set(int,fosnum,608) @storage.set(str,pokname,Tirtouga) @storage.set(str,fosname,Cover Fossil) :when:Plume Fossil @storage.set(int,poknum,566) @storage.set(int,fosnum,609) @storage.set(str,pokname,Archen) @storage.set(str,fosname,Plume Fossil) :when:Jaw Fossil @storage.set(int,poknum,696) @storage.set(int,fosnum,610) @storage.set(str,pokname,Tyrunt) @storage.set(str,fosname,Jaw Fossil) :when:Sail Fossil @storage.set(int,poknum,698) @storage.set(int,fosnum,611) @storage.set(str,pokname,Amaura) @storage.set(str,fosname,Sail Fossil) :when:Cancel :end :endwhen :when:Cancel :end :endwhen :if:)>>1 @text.show(Should I revive all )>~of your s?) @options.show(All,Just one) :when:All @text.show(I will put them directly~into your PC box for you!*This will take me just a moment!) @npc.turn(1,1) @npc.move(1,1) @npc.turn(1,0) @npc.move(1,1) @sound.play(enter) @level.wait(100) :while:)>>0 :if:=1 @pokemon.addtostorage(,25,Revived from a fossil,5,at Pewter City,0,,0,1) :else @pokemon.addtostorage(,25,Revived from a fossil,5,at Pewter City) :endif @item.remove(,1,0) @sound.play(pickup) @level.wait(75) :endwhile @npc.turn(1,2) @sound.play(enter) @npc.move(1,1) @npc.turn(1,3) @npc.move(1,1) @npc.warp(1,~,0.25,~) @npc.turn(1,2) @text.show(Okay, you are all set~check your PC to see~your new !) :when:Just one :if:=true @text.show(This will take me~just a moment!) @npc.turn(1,1) @npc.move(1,1) @npc.turn(1,0) @npc.move(1,1) @sound.play(enter) @level.wait(100) :if:/8)>)>=1 @pokemon.add(,25,Revived from a fossil,5,at Pewter City,0,,0,1) :else @pokemon.add(,25,Revived from a fossil,5,at Pewter City) :endif @item.remove(,1,0) @npc.turn(1,2) @sound.play(enter) @npc.move(1,1) @npc.turn(1,3) @npc.move(1,1) @npc.warp(1,~,0.25,~) @npc.turn(1,2) @text.show(Okay, here is your~new !) @sound.play(success_small) :else @text.show(I will put it directly~into your PC box for you!*This will take me just a moment!) @npc.turn(1,1) @npc.move(1,1) @npc.turn(1,0) @npc.move(1,1) @sound.play(enter) @level.wait(100) :if:=1 @pokemon.addtostorage(,25,Revived from a fossil,5,at Pewter City,0,,0,1) :else @pokemon.addtostorage(,25,Revived from a fossil,5,at Pewter City) :endif @item.remove(,1,0) @sound.play(pickup) @level.wait(75) @npc.turn(1,2) @sound.play(enter) @npc.move(1,1) @npc.turn(1,3) @npc.move(1,1) @npc.warp(1,~,0.25,~) @npc.turn(1,2) @text.show(Okay, you are all set~check your PC to see~your new !) :endif :endwhen :else :if:=true @text.show(This will take me~just a moment!) @npc.turn(1,1) @npc.move(1,1) @npc.turn(1,0) @npc.move(1,1) @sound.play(enter) @level.wait(100) :if:/8)>)>=1 @pokemon.add(,25,Revived from a fossil,5,at Pewter City,0,,0,1) :else @pokemon.add(,25,Revived from a fossil,5,at Pewter City) :endif @item.remove(,1,0) @npc.turn(1,2) @sound.play(enter) @npc.move(1,1) @npc.turn(1,3) @npc.move(1,1) @npc.warp(1,~,0.25,~) @npc.turn(1,2) @text.show(Okay, here is your~new !) @sound.play(success_small) :else @text.show(I will put it directly~into your PC box for you!*This will take me just a moment!) @npc.turn(1,1) @npc.move(1,1) @npc.turn(1,0) @npc.move(1,1) @sound.play(enter) @level.wait(100) :if:=1 @pokemon.addtostorage(,25,Revived from a fossil,5,at Pewter City,0,,0,1) :else @pokemon.addtostorage(,25,Revived from a fossil,5,at Pewter City) :endif @item.remove(,1,0) @sound.play(pickup) @level.wait(75) @npc.turn(1,2) @sound.play(enter) @npc.move(1,1) @npc.turn(1,3) @npc.move(1,1) @npc.warp(1,~,0.25,~) @npc.turn(1,2) @text.show(Okay, you are all set~check your PC to see~your new !) :endif :endif :end