Scriptname MG19ChestScript
;This script is responsible for timers involved in quest MG19
short startday
short dayspassed
short itemcount ;used to check if the player is trying to cheat the system
short update
float hourtimer
float currentday
float daycheck
Begin OnActivate
;when var equals 0 and chest is activated, initialize variables and increment quest var
if ( MG19Alchemy.ingredvar == 0 )
set MG19Alchemy.currentday to GameDaysPassed
set MG19Alchemy.daycheck to GameDaysPassed
set MG19Alchemy.hourtimer to GameHour
set MG19Alchemy.ingredvar to 1
set MG19Alchemy.update to 1
Activate
else
Activate
endif
End
Begin Gamemode
;when var equals 1, check for ingredients in the chest and duplicate if at least one day, and less than 7, have passed
;otherwise wipe contents of chest completely
if ( MG19Alchemy.ingredvar == 1 )
if ( MG19Alchemy.dayspassed >= 1 ) && ( MG19Alchemy.dayspassed < 7 )
if ( GetItemCount apple > 0 )
additem apple 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount beef > 0 )
additem beef 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount blackberry > 0 )
additem blackberry 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount breadloaf > 0 )
additem carrot 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount carrot > 0 )
additem carrot 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount cheesewedge > 0 )
additem cheesewedge 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount corn > 0 )
additem corn 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount flour > 0 )
additem flour 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount grapes > 0 )
additem grapes 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount ham > 0 )
additem ham 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount leek > 0 )
additem leek 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount lettuce > 0 )
additem lettuce 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount onion > 0 )
additem onion 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount pear > 0 )
additem pear 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount pumpkin > 0 )
additem pumpkin 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount radish > 0 )
additem radish 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount rice > 0 )
additem rice 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount strawberry > 0 )
additem strawberry 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount sweetcake > 0 )
additem sweetcake 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount sweetroll > 0 )
additem sweetroll 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount tobacco > 0 )
additem tobacco 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount tomato > 0 )
additem tomato 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount watermelon > 0 )
additem watermelon 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount wheatgrain > 0 )
additem wheatgrain 10
set itemcount to ( itemcount + 1 )
endif
;----------------FLORA INGREDIENTS START HERE-------------------------
if ( GetItemCount alkanetflower > 0 )
additem alkanetflower 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount aloeveraleaves > 0 )
additem aloeveraleaves 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount arrowroot > 0 )
additem arrowroot 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount bogbeaconascocap01 > 0 )
additem bogbeaconascocap01 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount CairnBoleteCap > 0 )
additem cairnboletecap 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount cinnabarpolyporecap01 > 0 )
additem cinnabarpolyporecap01 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount cloudedfunnelcap > 0 )
additem cloudedfunnelcap 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount columbinerootpulp > 0 )
additem columbinerootpulp 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount dragonstongue > 0 )
additem dragonstongue 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount dryadsaddlepolyporecap > 0 )
additem dryadsaddlepolyporecap 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount elfcupcap > 0 )
additem elfcupcap 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount emeticrussulacap > 0 )
additem emeticrussulacap 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount fennelseeds > 0 )
additem fennelseeds 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount flaxseeds > 0 )
additem flaxseeds 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount flyamanitacap > 0 )
additem flyamanitacap 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount garlic > 0 )
additem garlic 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount ginkgoleaf > 0 )
additem ginkgoleaf 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount ginseng > 0 )
additem ginseng 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount greenstaincupcap > 0 )
additem greenstaincupcap 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount ironwoodnut > 0 )
additem ironwoodnut 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount ladysmantleleaves > 0 )
additem ladysmantleleaves 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount ladyssmockleaves > 0 )
additem ladyssmockleaves 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount lavendersprig > 0 )
additem lavendersprig 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount mandrakeroot > 0 )
additem mandrakeroot 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount tigerlilynectar > 0 )
additem tigerlilynectar 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount milkthistleseeds > 0 )
additem milkthistleseeds 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount monkshoodrootpulp > 0 )
additem monkshoodrootpulp 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount morninggloryrootpulp > 0 )
additem morninggloryrootpulp 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount motherwortsprig > 0 )
additem motherwortsprig 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount mugwortseeds > 0 )
additem mugwortseeds 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount nightshade > 0 )
additem nightshade 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount peonyseeds > 0 )
additem peonyseeds 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount bergamotseeds > 0 )
additem bergamotseeds 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount primroseleaves > 0 )
additem primroseleaves 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount redwortflower > 0 )
additem redwortflower 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount sacredlotusseeds > 0 )
additem sacredlotusseeds 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount somnaliusfrond > 0 )
additem somnaliusfrond 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount steelblueentolomacap > 0 )
additem steelblueentolomacap 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount stinkhorncap > 0 )
additem stinkhorncap 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount stjohnswortnectar > 0 )
additem stjohnswortnectar 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount summerboletecap > 0 )
additem summerboletecap 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount tinderpolyporecap > 0 )
additem tinderpolyporecap 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount vipersbuglossleaves > 0 )
additem vipersbuglossleaves 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount waterhyacinthnectar > 0 )
additem waterhyacinthnectar 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount goldenrodseedpod > 0 )
additem goldenrodseedpod 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount WispStalkCaps > 0 )
additem wispstalkcaps 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount wormwoodleaves > 0 )
additem wormwoodleaves 10
set itemcount to ( itemcount + 1 )
endif
;----------------CREATURE INGREDIENTS START HERE------------------------
if ( GetItemCount clannfearclaws > 0 )
additem clannfearclaws 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount boarmeat > 0 )
additem boarmeat 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount bonemeal > 0 )
additem bonemeal 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount crabmeat > 0 )
additem crabmeat 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount daedraheart > 0 )
additem daedraheart 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount daedrasilk > 0 )
additem daedrasilk 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount daedravenin > 0 )
additem daedravenin 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount daedrothteeth > 0 )
additem daedrothteeth 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount dreughwax > 0 )
additem dreughwax 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount ectoplasm > 0 )
additem ectoplasm 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount firesalts > 0 )
additem firesalts 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount frostsalts > 0 )
additem frostsalts 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount glowdust > 0 )
additem glowdust 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount impgall > 0 )
additem impgall 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount minotaurhorn > 0 )
additem minotaurhorn 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount mortflesh > 0 )
additem mortflesh 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount mutton > 0 )
additem mutton 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount ogresteeth > 0 )
additem ogresteeth 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount ratmeat > 0 )
additem ratmeat 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount scales > 0 )
additem scales 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount scampskin > 0 )
additem scampskin 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount trollfat > 0 )
additem trollfat 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount vampiredust > 0 )
additem vampiredust 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount venison > 0 )
additem venison 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount voidsalts > 0 )
additem voidsalts 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount bloodgrass > 0 )
additem bloodgrass 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount harrada > 0 )
additem harrada 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount spiddalstick > 0 )
additem spiddalstick 10
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount MG13VampireDust > 0 )
RemoveItem MG13VampireDust 100
additem vampiredust 11
set itemcount to ( itemcount + 1 )
endif
if ( GetItemCount MG01Bonemeal > 0 )
RemoveItem MG01Bonemeal 100
additem bonemeal 11
set itemcount to ( itemcount + 1 )
endif
endif
; Activate
endif
if ( itemcount > 1 )
RemoveAllItems
set MG19Alchemy.ingredvar to 0
set MG19Alchemy.update to 0
set itemcount to 0
set MG19Alchemy.dayspassed to 0
elseif ( itemcount == 1 )
set MG19Alchemy.ingredvar to 2
endif
; if ( MG19Alchemy.ingredvar == 2 )
;After seven days have passed; pull everything out of the chest regardless of
if ( MG19Alchemy.dayspassed >= 7 )
RemoveAllItems
set MG19Alchemy.ingredvar to 0
set MG19Alchemy.update to 0
set itemcount to 0
set MG19Alchemy.dayspassed to 0
endif
; endif
endif
End