P3D-Legacy/P3D/Content/Data/Scripts/pewter/caraliss.dat

162 lines
12 KiB
Plaintext

version=2
:if:<inventory.countitem(612)>=0 <and> <inventory.countitem(613)>=0
@text.show(A few Fossils are broken~into top halves and bottom~halves for some reason, huh.*Strangely, no matter which~top and bottom you combine,~we can revive them together.*Perhaps, within this~mystery, lies the key~to understanding these~combinable Pokémon, huh.)
:end
:endif
:if:<inventory.countitem(614)>=0 <and> <inventory.countitem(615)>=0
@text.show(A few Fossils are broken~into top halves and bottom~halves for some reason, huh.*Strangely, no matter which~top and bottom you combine,~we can revive them together.*Perhaps, within this~mystery, lies the key~to understanding these~combinable Pokémon, huh.)
:end
:endif
@storage.set(int,fossilcount1,0)
@storage.set(str,fossils1,)
@storage.set(int,fossilcount2,0)
@storage.set(str,fossils2,)
:if:<inventory.countitem(612)>>0
:if:<storage.get(int,fossilcount1)>>0
@storage.set(str,fossils1,<storage.get(str,fossils1)>,)
:endif
@storage.set(str,fossils1,<storage.get(str,fossils1)>Fossilized Bird)
@storage.set(int,fossilcount1,<storage.get(int,fossilcount1)>+1)
:endif
:if:<inventory.countitem(613)>>0
:if:<storage.get(int,fossilcount1)>>0
@storage.set(str,fossils1,<storage.get(str,fossils1)>,)
:endif
@storage.set(str,fossils1,<storage.get(str,fossils1)>Fossilized Fish)
@storage.set(int,fossilcount1,<storage.get(int,fossilcount1)>+1)
:endif
:if:<inventory.countitem(614)>>0
:if:<storage.get(int,fossilcount2)>>0
@storage.set(str,fossils2,<storage.get(str,fossils2)>,)
:endif
@storage.set(str,fossils2,<storage.get(str,fossils2)>Fossilized Drake)
@storage.set(int,fossilcount2,<storage.get(int,fossilcount2)>+1)
:endif
:if:<inventory.countitem(615)>>0
:if:<storage.get(int,fossilcount2)>>0
@storage.set(str,fossils2,<storage.get(str,fossils2)>,)
:endif
@storage.set(str,fossils2,<storage.get(str,fossils2)>Fossilized Dino)
@storage.set(int,fossilcount2,<storage.get(int,fossilcount2)>+1)
:endif
:if:<storage.get(int,fossilcount1)>>0
@storage.set(str,fossils1,<storage.get(str,fossils1)>,)
:endif
@storage.set(str,fossils1,<storage.get(str,fossils1)>Cancel)
:if:<storage.get(int,fossilcount2)>>0
@storage.set(str,fossils2,<storage.get(str,fossils2)>,)
:endif
@storage.set(str,fossils2,<storage.get(str,fossils2)>Cancel)
@text.show(Hm?~You've got some Fossils~there, huh.*Will you show them to me,~Cara Liss?*Which of your Fossils~do you think stands up~to the high standards~of Cara Liss?)
@options.show(<storage.get(str,fossils1)>)
:when:Fossilized Bird
@text.show(Which of your fossils do~you think will pique the~curiosity of Cara Liss?)
@options.show(<storage.get(str,fossils2)>)
:when:Fossilized Drake
@storage.set(int,poknum,880)
@storage.set(int,fosnum1,612)
@storage.set(int,fosnum2,614)
@storage.set(str,pokname,Dracozolt)
@storage.set(str,fosname1,Fossilized Bird)
@storage.set(str,fosname2,Fossilized Drake)
:when:Fossilized Dino
@storage.set(int,poknum,881)
@storage.set(int,fosnum1,612)
@storage.set(int,fosnum2,615)
@storage.set(str,pokname,Arctozolt)
@storage.set(str,fosname1,Fossilized Bird)
@storage.set(str,fosname2,Fossilized Dino)
:when:Cancel
:end
:endwhen
:when:Fossilized Fish
@text.show(Which of your fossils do~you think will pique the~curiosity of Cara Liss?)
@options.show(<storage.get(str,fossils2)>)
:when:Fossilized Drake
@storage.set(int,poknum,882)
@storage.set(int,fosnum1,613)
@storage.set(int,fosnum2,614)
@storage.set(str,pokname,Dracovish)
@storage.set(str,fosname1,Fossilized Fish)
@storage.set(str,fosname2,Fossilized Drake)
:when:Fossilized Dino
@storage.set(int,poknum,883)
@storage.set(int,fosnum1,613)
@storage.set(int,fosnum2,615)
@storage.set(str,pokname,Arctovish)
@storage.set(str,fosname1,Fossilized Fish)
@storage.set(str,fosname2,Fossilized Dino)
:when:Cancel
:end
:endwhen
:when:Cancel
:end
:endwhen
@text.show(So I should restore~the <storage.get(str,fosname1)>~and the <storage.get(str,fosname2)>~together, huh?)
@options.show(Yes!,No)
:when:Yes!
@text.show(OK.~Restoration time.~Let's unravel the mystery~of these Fossils!)
:if:<pokemon.freeplaceinparty>=true
@npc.turn(3,3)
@npc.move(3,1)
@npc.turn(3,0)
@npc.move(3,1)
@sound.play(enter)
:if:<system.random(<math.floor(<pokemon.mastershinyrate>/8)>)>=1
@pokemon.add(<storage.get(int,poknum)>,25,Revived from a fossil,5,at Pewter City,0,<player.name>,0,1)
:else
@pokemon.add(<storage.get(int,poknum)>,25,Revived from a fossil,5,at Pewter City)
:endif
@item.remove(<storage.get(int,fosnum1)>,1,0)
@item.remove(<storage.get(int,fosnum2)>,1,0)
@text.show(All right,~I'll stick 'em together!~Here...we...GO!)
@level.wait(100)
@npc.turn(3,2)
@sound.play(enter)
@npc.move(3,1)
@npc.turn(3,1)
@npc.move(3,1)
@npc.warp(3,~,0.25,~)
@npc.turn(3,2)
@text.show(Objective complete.~It seems the restoration~was a great success.*Yes, I can see it in its eyes.*This is a Pokémon that~walked the face of the~world in ancient times!*Please take and care~for this Pokémon, huh.)
@sound.play(success_small)
:else
@npc.turn(3,3)
@npc.move(3,1)
@npc.turn(3,0)
@npc.move(3,1)
@sound.play(enter)
:if:<system.random(512)>=1
@pokemon.addtostorage(<storage.get(int,poknum)>,25,Revived from a fossil,5,at Pewter City,0,<player.name>,0,1)
:else
@pokemon.addtostorage(<storage.get(int,poknum)>,25,Revived from a fossil,5,at Pewter City)
:endif
@item.remove(<storage.get(int,fosnum1)>,1,0)
@item.remove(<storage.get(int,fosnum2)>,1,0)
@text.show(All right,~I'll stick 'em together!~Here...we...GO!)
@level.wait(100)
@npc.turn(3,2)
@sound.play(enter)
@npc.move(3,1)
@npc.turn(3,1)
@npc.move(3,1)
@npc.warp(3,~,0.25,~)
@npc.turn(3,2)
@text.show(Objective complete.~It seems the restoration~was a great success.*Yes, I can see it in its eyes.*This is a Pokémon that~walked the face of the~world in ancient times!*I will put it directly~into your PC box for you!*Please care for this~Pokémon, huh.)
@sound.play(success_small)
:endif
:when:No
:endwhen
:end