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

<EFBFBD><EFBFBD>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:<inventory.countitem(601)>=0 <and> <inventory.countitem(602)>=0 <and> <inventory.countitem(603)>=0 <and> <inventory.countitem(604)>=0 <and> <inventory.countitem(605)>=0 <and> <inventory.countitem(606)>=0 <and> <inventory.countitem(607)>=0 <and> <inventory.countitem(608)>=0 <and> <inventory.countitem(609)>=0 <and> <inventory.countitem(610)>=0 <and> <inventory.countitem(611)>=0
	:if:<inventory.countitem(612)>>0 <or> <inventory.countitem(613)>>0 <or> <inventory.countitem(614)>>0 <or> <inventory.countitem(615)>>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:<inventory.countitem(601)>>0
	@storage.set(str,fossils,<storage.get(str,fossils)>Helix Fossil,)
	@storage.set(int,fossilcount,<storage.get(int,fossilcount)>+1)
:endif

:if:<inventory.countitem(602)>>0
	@storage.set(str,fossils,<storage.get(str,fossils)>Dome Fossil,)
	@storage.set(int,fossilcount,<storage.get(int,fossilcount)>+1)
:endif

:if:<inventory.countitem(603)>>0
	@storage.set(str,fossils,<storage.get(str,fossils)>Old Amber,)
	@storage.set(int,fossilcount,<storage.get(int,fossilcount)>+1)
:endif

:if:<inventory.countitem(604)>>0
	@storage.set(str,fossils,<storage.get(str,fossils)>Root Fossil,)
	@storage.set(int,fossilcount,<storage.get(int,fossilcount)>+1)
:endif

:if:<inventory.countitem(605)>>0
	@storage.set(str,fossils,<storage.get(str,fossils)>Claw Fossil,)
	@storage.set(int,fossilcount,<storage.get(int,fossilcount)>+1)
:endif

:if:<inventory.countitem(606)>>0
	:if:<storage.get(int,fossilcount)>=5
		@storage.set(str,fossils,<storage.get(str,fossils)>More,)
	:endif
	:if:<storage.get(int,fossilcount)>>4	
		@storage.set(str,fossils2,<storage.get(str,fossils2)>Skull Fossil,)
	:else
		@storage.set(str,fossils,<storage.get(str,fossils)>Skull Fossil,)
	:endif
	@storage.set(int,fossilcount,<storage.get(int,fossilcount)>+1)
:endif

:if:<inventory.countitem(607)>>0
	:if:<storage.get(int,fossilcount)>=5
		@storage.set(str,fossils,<storage.get(str,fossils)>More,)
	:endif
	:if:<storage.get(int,fossilcount)>>4	
		@storage.set(str,fossils2,<storage.get(str,fossils2)>Armor Fossil,)
	:else
		@storage.set(str,fossils,<storage.get(str,fossils)>Armor Fossil,)
	:endif
	@storage.set(int,fossilcount,<storage.get(int,fossilcount)>+1)
:endif

:if:<inventory.countitem(608)>>0
	:if:<storage.get(int,fossilcount)>=5
		@storage.set(str,fossils,<storage.get(str,fossils)>More,)
	:endif
	:if:<storage.get(int,fossilcount)>>4	
		@storage.set(str,fossils2,<storage.get(str,fossils2)>Cover Fossil,)
	:else
		@storage.set(str,fossils,<storage.get(str,fossils)>Cover Fossil,)
	:endif
	@storage.set(int,fossilcount,<storage.get(int,fossilcount)>+1)
:endif

:if:<inventory.countitem(609)>>0
	:if:<storage.get(int,fossilcount)>=5
		@storage.set(str,fossils,<storage.get(str,fossils)>More,)
	:endif
	:if:<storage.get(int,fossilcount)>>4	
		@storage.set(str,fossils2,<storage.get(str,fossils2)>Plume Fossil,)
	:else
		@storage.set(str,fossils,<storage.get(str,fossils)>Plume Fossil,)
	:endif
	@storage.set(int,fossilcount,<storage.get(int,fossilcount)>+1)
:endif

:if:<inventory.countitem(610)>>0
	:if:<storage.get(int,fossilcount)>=5
		@storage.set(str,fossils,<storage.get(str,fossils)>More,)
	:endif
	:if:<storage.get(int,fossilcount)>>4	
		@storage.set(str,fossils2,<storage.get(str,fossils2)>Jaw Fossil,)
	:else
		@storage.set(str,fossils,<storage.get(str,fossils)>Jaw Fossil,)
	:endif
	@storage.set(int,fossilcount,<storage.get(int,fossilcount)>+1)
:endif

:if:<inventory.countitem(611)>>0
	:if:<storage.get(int,fossilcount)>=5
		@storage.set(str,fossils,<storage.get(str,fossils)>More,)
	:endif
	:if:<storage.get(int,fossilcount)>>4	
		@storage.set(str,fossils2,<storage.get(str,fossils2)>Sail Fossil,)
	:else
		@storage.set(str,fossils,<storage.get(str,fossils)>Sail Fossil,)
	:endif
	@storage.set(int,fossilcount,<storage.get(int,fossilcount)>+1)
:endif

@storage.set(str,fossils,<storage.get(str,fossils)>Cancel)
@storage.set(str,fossils2,<storage.get(str,fossils2)>Cancel)

@text.show(Which fossil should I revive?)
@options.show(<storage.get(str,fossils)>)
	: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(<storage.get(str,fossils2)>)
			: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:<inventory.countitem(<storage.get(int,fosnum)>)>>1
	@text.show(Should I revive all <inventory.countitem(<storage.get(int,fosnum)>)>~of your <storage.get(str,fosname)>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:<inventory.countitem(<storage.get(int,fosnum)>)>>0
				: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,fosnum)>,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 <storage.get(str,pokname)>!)
		:when:Just one
			:if:<pokemon.freeplaceinparty>=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:<system.random(512)>=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,fosnum)>,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 <storage.get(str,pokname)>!)
				@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:<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,fosnum)>,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 <storage.get(str,pokname)>!)
			:endif
	:endwhen
:else
	:if:<pokemon.freeplaceinparty>=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:<system.random(512)>=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,fosnum)>,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 <storage.get(str,pokname)>!)
		@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:<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,fosnum)>,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 <storage.get(str,pokname)>!)
	:endif
:endif
:end