
 //resurrect Player1 vampire
 IF
   !StateCheck(Player1,STATE_REALLY_DEAD)
   Race(Player1,VAMPIRE)   
   !Global("Player1IsDead","LOCALS",0)
 THEN 
  RESPONSE #100
   SetGlobal("Player1IsDead","LOCALS",0)
   Continue()
  END
 
 IF
   StateCheck(Player1,STATE_REALLY_DEAD)
   Race(Player1,VAMPIRE)
   Global("Player1IsDead","LOCALS",0)
 THEN 
  RESPONSE #100
   RealSetGlobalTimer("Player1ResurrectTimer","GLOBAL",EIGHT_HOURS)
   SetGlobal("Player1IsDead","LOCALS",1)
   Continue()
  END
 
 IF
   StateCheck(Player1,STATE_REALLY_DEAD)
   Race(Player1,VAMPIRE)
   Global("Player1IsDead","LOCALS",1)
   RealGlobalTimerExpired("Player1ResurrectTimer","GLOBAL")
 THEN 
  RESPONSE #100
   ApplySpell(Player1,CLERIC_RESURRECTION)
   ApplySpell(Player1,RESTORE_FULL_HEALTH)
   Continue()
  END
  
  
 
 //resurrect Player2 vampire
 IF
   !StateCheck(Player2,STATE_REALLY_DEAD)
   Race(Player2,VAMPIRE)   
   !Global("Player2IsDead","LOCALS",0)
 THEN 
  RESPONSE #100
   SetGlobal("Player2IsDead","LOCALS",0)
   Continue()
  END
 
 IF
   StateCheck(Player2,STATE_REALLY_DEAD)
   Race(Player2,VAMPIRE)
   Global("Player2IsDead","LOCALS",0)
 THEN 
  RESPONSE #100
   RealSetGlobalTimer("Player2ResurrectTimer","GLOBAL",EIGHT_HOURS)
   SetGlobal("Player2IsDead","LOCALS",1)
   Continue()
  END
 
 IF
   StateCheck(Player2,STATE_REALLY_DEAD)
   Race(Player2,VAMPIRE)
      Global("Player2IsDead","LOCALS",1)
   RealGlobalTimerExpired("Player2ResurrectTimer","GLOBAL")
 THEN 
  RESPONSE #100
   ApplySpell(Player2,CLERIC_RESURRECTION)
   ApplySpell(Player2,RESTORE_FULL_HEALTH)
   Continue()
  END
  
  
  
  
  
   //resurrect Player3 vampire
   IF
   !StateCheck(Player3,STATE_REALLY_DEAD)
   Race(Player3,VAMPIRE)   
   !Global("Player3IsDead","LOCALS",0)
 THEN 
  RESPONSE #100
   SetGlobal("Player3IsDead","LOCALS",0)
//   Continue()
  END
 
 IF
   StateCheck(Player3,STATE_REALLY_DEAD)
   Race(Player3,VAMPIRE)
   Global("Player3IsDead","LOCALS",0)
 THEN 
  RESPONSE #100
   RealSetGlobalTimer("Player3ResurrectTimer","GLOBAL",EIGHT_HOURS)
   SetGlobal("Player3IsDead","LOCALS",1)
 //  Continue()
  END
 
 IF
   StateCheck(Player3,STATE_REALLY_DEAD)
   Race(Player3,VAMPIRE)
      Global("Player3IsDead","LOCALS",1)
   RealGlobalTimerExpired("Player3ResurrectTimer","GLOBAL")
 THEN 
  RESPONSE #100
   ApplySpell(Player3,CLERIC_RESURRECTION)
   ApplySpell(Player3,RESTORE_FULL_HEALTH)
 //  Continue()
  END
 
 
  
   //resurrect Player4 vampire
   IF
   !StateCheck(Player4,STATE_REALLY_DEAD)
   Race(Player4,VAMPIRE)   
   !Global("Player4IsDead","LOCALS",0)
 THEN 
  RESPONSE #100
   SetGlobal("Player4IsDead","LOCALS",0)
//   Continue()
  END
 
 IF
   StateCheck(Player4,STATE_REALLY_DEAD)
   Race(Player4,VAMPIRE)
   Global("Player4IsDead","LOCALS",0)
 THEN 
  RESPONSE #100
   RealSetGlobalTimer("Player4ResurrectTimer","GLOBAL",EIGHT_HOURS)
   SetGlobal("Player4sDead","LOCALS",1)
 //  Continue()
  END
 
 IF
   StateCheck(Player4,STATE_REALLY_DEAD)
   Race(Player4,VAMPIRE)
      Global("Player4IsDead","LOCALS",1)
   RealGlobalTimerExpired("Player4ResurrectTimer","GLOBAL")
 THEN 
  RESPONSE #100
   ApplySpell(Player4,CLERIC_RESURRECTION)
   ApplySpell(Player4,RESTORE_FULL_HEALTH)
//  Continue()
  END
 
    //resurrect Player5 vampire
   IF
   !StateCheck(Player5,STATE_REALLY_DEAD)
   Race(Player5,VAMPIRE)   
   !Global("Player5IsDead","LOCALS",0)
 THEN 
  RESPONSE #100
   SetGlobal("Player5IsDead","LOCALS",0)
//  Continue()
  END
 
 IF
   StateCheck(Player5,STATE_REALLY_DEAD)
   Race(Player5,VAMPIRE)
   Global("Player5IsDead","LOCALS",0)
 THEN 
  RESPONSE #100
   RealSetGlobalTimer("Player5ResurrectTimer","GLOBAL",EIGHT_HOURS)
   SetGlobal("Player5IsDead","LOCALS",1)
//   Continue()
  END
 
 IF
   StateCheck(Player5,STATE_REALLY_DEAD)
   Race(Player5,VAMPIRE)
      Global("Player5IsDead","LOCALS",1)
   RealGlobalTimerExpired("Player5ResurrectTimer","GLOBAL")
 THEN 
  RESPONSE #100
   ApplySpell(Player5,CLERIC_RESURRECTION)
   ApplySpell(Player5,RESTORE_FULL_HEALTH)
 //  Continue()
  END
 
 
    //resurrect Player6 vampire
   IF
   !StateCheck(Player6,STATE_REALLY_DEAD)
   Race(Player6,VAMPIRE)   
   !Global("Player6IsDead","LOCALS",0)
 THEN 
  RESPONSE #100
   SetGlobal("Player6IsDead","LOCALS",0)
//   Continue()
  END
 
 IF
   StateCheck(Player6,STATE_REALLY_DEAD)
   Race(Player6,VAMPIRE)
   Global("Player6IsDead","LOCALS",0)
 THEN 
  RESPONSE #100
   RealSetGlobalTimer("Player6ResurrectTimer","GLOBAL",EIGHT_HOURS)
   SetGlobal("Player6IsDead","LOCALS",1)
//   Continue()
  END
 
 IF
   StateCheck(Player6,STATE_REALLY_DEAD)
   Race(Player6,VAMPIRE)
      Global("Player6IsDead","LOCALS",1)
   RealGlobalTimerExpired("Player6ResurrectTimer","GLOBAL")
 THEN 
  RESPONSE #100
   ApplySpell(Player6,CLERIC_RESURRECTION)
   ApplySpell(Player6,RESTORE_FULL_HEALTH)
//   Continue()
  END
 