IF
PartyHasItem("VPVOUC10") // Merchant League Banknote
THEN
RESPONSE #100
IncrementGlobal("IHaveVoucher10","GLOBAL",1)
TakePartyItemNum("VPVOUC10",1) // Merchant League Banknote
END
IF
PartyHasItem("VPVOUC25") // Merchant League Banknote
THEN
RESPONSE #100
IncrementGlobal("IHaveVoucher25","GLOBAL",1)
TakePartyItemNum("VPVOUC25",1) // Merchant League Banknote
END
IF
PartyHasItem("VPVOUC50") // Merchant League Banknote
THEN
RESPONSE #100
IncrementGlobal("IHaveVoucher50","GLOBAL",1)
TakePartyItemNum("VPVOUC50",1) // Merchant League Banknote
END
IF
PartyHasItem("VPVOU100") // Merchant League Banknote
THEN
RESPONSE #100
IncrementGlobal("IHaveVoucher100","GLOBAL",1)
TakePartyItemNum("VPVOU100",1) // Merchant League Banknote
END
IF
PartyHasItem("vpsword") // The Answerer +2
Global("VP_Save_Answerer","GLOBAL",0)
THEN
RESPONSE #100
SetGlobal("VP_Save_Answerer","GLOBAL",1)
Continue()
END
IF
PartyHasItem("vpnjclck") // Cloak of the Greater Werewolf
Global("VP_Save_WolfCloak","GLOBAL",0)
THEN
RESPONSE #100
SetGlobal("VP_Save_WolfCloak","GLOBAL",1)
Continue()
END
IF
PartyHasItem("vpptnbag") // Potion Case
Global("VP_Save_PotionCase","GLOBAL",0)
THEN
RESPONSE #100
SetGlobal("VP_Save_PotionCase","GLOBAL",1)
Continue()
END
IF
PartyHasItem("vpscrbag") // Scroll Tubus
Global("VP_Save_ScrollTub","GLOBAL",0)
THEN
RESPONSE #100
SetGlobal("VP_Save_ScrollTub","GLOBAL",1)
Continue()
END
IF
PartyHasItem("vpambelt") // Quiver
Global("VP_Save_Quiver","GLOBAL",0)
THEN
RESPONSE #100
SetGlobal("VP_Save_Quiver","GLOBAL",1)
Continue()
END
IF
PartyHasItem("vpgenbag") // Cloth Sack
Global("VP_Save_GenBag","GLOBAL",0)
THEN
RESPONSE #100
SetGlobal("VP_Save_GenBag","GLOBAL",1)
Continue()
END
IF
PartyHasItem("ulfists") // Fighting Gauntlets
Global("VP_Save_BoxGloves","GLOBAL",0)
THEN
RESPONSE #100
SetGlobal("VP_Save_BoxGloves","GLOBAL",1)
Continue()
END
IF
InParty("Imoen2")
THEN
RESPONSE #100
ActionOverride("Imoen2",LeaveParty())
ActionOverride("Imoen2",ChangeAIScript("",DEFAULT))
ActionOverride("Imoen2",ClearAllActions())
SetGlobal("ImoenPartyBG1","GLOBAL",1)
ActionOverride("Imoen2",MoveBetweenAreas("AR0602",[3198.2837],6))
Continue()
END
IF
InPartyAllowDead("Imoen2")
Dead("Imoen2") // Imoen
THEN
RESPONSE #100
ActionOverride("Imoen2",LeaveParty())
ActionOverride("Imoen2",DestroySelf())
Continue()
END
IF
InParty("Imoen")
THEN
RESPONSE #100
ActionOverride("Imoen",LeaveParty())
ActionOverride("Imoen",ChangeAIScript("",DEFAULT))
ActionOverride("Imoen",ClearAllActions())
SetGlobal("ImoenPartyBG1","GLOBAL",1)
ActionOverride("Imoen",MoveBetweenAreas("AR0602",[3198.2837],6))
Continue()
END
IF
InPartyAllowDead("Imoen")
Dead("Imoen") // Imoen
THEN
RESPONSE #100
ActionOverride("Imoen",LeaveParty())
ActionOverride("Imoen",DestroySelf())
Continue()
END