
IF
Global("VampireStronghold","GLOBAL",1)
Global("EncoutersNulled","DSC017",0)
THEN
RESPONSE #100
SetRestEncounterProbabilityDay(0)
SetRestEncounterProbabilityNight(0)
SetGlobal("EncoutersNulled","DSC017",1)
END




IF True()
THEN
RESPONSE #100
RemoveAreaType(OUTDOOR)
AddAreaType(DUNGEON)
END


IF
 
 Global("HeartCreate1","DSC017",0)
THEN
 RESPONSE #100
    SetGlobal("HeartCreate1","DSC017",1)
	ActionOverride("Container 4",CreateItem("VVHEART",0,0,0))
END






IF
 
 Global("HeartCreate2","DSC017",0)
THEN
 RESPONSE #100
    SetGlobal("HeartCreate2","DSC017",1)
	ActionOverride("Container 3",CreateItem("VVHEART",0,0,0))
END




















