IF
    GlobalGT("Player1CannibalVampire","GLOBAL",0)
    GlobalGT("Player1CannibalTimer","GLOBAL",0)
THEN
   RESPONSE #100	
	SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",ONE_DAY)
	SetGlobal("Player1CannibalTimer","GLOBAL",1)
END


IF
    GlobalGT("Player1CannibalVampire","GLOBAL",4)
	!GlobalTimerNotExpired("VampireVictimsAttackTimer","GLOBAL")
	OR(2)
	TimeLT(DAWN_START)
	TimeGT(DUSK_END)
	!StateCheck(LastTrigger,STATE_INVISIBLE)
	!StateCheck(LastTrigger,STATE_IMPROVEDINVISIBILITY)
THEN
	RESPONSE #30
	
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",ONE_DAY)
		
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
	RESPONSE #30
	IncrementGlobal("Player1Cannibal","GLOBAL",-1)
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",TWO_DAYS)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
	RESPONSE #40
	IncrementGlobal("Player1Cannibal","GLOBAL",-1)
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",THREE_DAYS)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S)  
END


IF
    GlobalGT("Player1CannibalVampire","GLOBAL",3)
	!GlobalTimerNotExpired("VampireVictimsAttackTimer","GLOBAL")
	OR(2)
	TimeLT(DAWN_START)
	TimeGT(DUSK_END)
	!StateCheck(LastTrigger,STATE_INVISIBLE)
	!StateCheck(LastTrigger,STATE_IMPROVEDINVISIBILITY)
THEN
	RESPONSE #30
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",ONE_DAY)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
	RESPONSE #30
	IncrementGlobal("Player1Cannibal","GLOBAL",-1)
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",TWO_DAYS)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
	RESPONSE #40
	IncrementGlobal("Player1Cannibal","GLOBAL",-1)
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",THREE_DAYS)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S)  
END

IF
    GlobalGT("Player1CannibalVampire","GLOBAL",2)
	!GlobalTimerNotExpired("VampireVictimsAttackTimer","GLOBAL")
	OR(2)
	TimeLT(DAWN_START)
	TimeGT(DUSK_END)
	!StateCheck(LastTrigger,STATE_INVISIBLE)
	!StateCheck(LastTrigger,STATE_IMPROVEDINVISIBILITY)
THEN
	RESPONSE #30
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",ONE_DAY)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
	RESPONSE #30
	IncrementGlobal("Player1Cannibal","GLOBAL",-1)
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",TWO_DAYS)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
	RESPONSE #40
	IncrementGlobal("Player1Cannibal","GLOBAL",-1)
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",THREE_DAYS)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S)  
END


IF
    GlobalGT("Player1CannibalVampire","GLOBAL",1)
	!GlobalTimerNotExpired("VampireVictimsAttackTimer","GLOBAL")
	OR(2)
	TimeLT(DAWN_START)
	TimeGT(DUSK_END)
	!StateCheck(LastTrigger,STATE_INVISIBLE)
	!StateCheck(LastTrigger,STATE_IMPROVEDINVISIBILITY)
THEN
	RESPONSE #30
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",ONE_DAY)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
	RESPONSE #30
	IncrementGlobal("Player1Cannibal","GLOBAL",-1)
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",TWO_DAYS)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S) 
	RESPONSE #40
	IncrementGlobal("Player1Cannibal","GLOBAL",-1)
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",THREE_DAYS)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S) 
		CreateCreature("mistva01",[-1.-1],S)  
END


IF
    GlobalGT("Player1CannibalVampire","GLOBAL",0)
	!GlobalTimerNotExpired("VampireVictimsAttackTimer","GLOBAL")
	OR(2)
	TimeLT(DAWN_START)
	TimeGT(DUSK_END)
	!StateCheck(LastTrigger,STATE_INVISIBLE)
	!StateCheck(LastTrigger,STATE_IMPROVEDINVISIBILITY)
THEN
	RESPONSE #30
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",ONE_DAY)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S) 
	RESPONSE #30
	IncrementGlobal("Player1Cannibal","GLOBAL",-1)
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",TWO_DAYS)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S) 
	RESPONSE #40
	IncrementGlobal("Player1Cannibal","GLOBAL",-1)
		SetGlobalTimer("VampireVictimsAttackTimer","GLOBAL",THREE_DAYS)
		DisplayStringHead(Player1,~You sence a strong feelings of hate towards you and your hair stands up.~)
		CreateCreature("mistva01",[-1.-1],S)  
END
