IF
  Allegiance(LastSummonerOf(Myself),EVILCUTOFF)
  !Race(Myself,DEMONIC)
  HaveAnySpells()
THEN
  RESPONSE #100
    Enemy()
    DisplayStringHead(Myself,5196)  // ~I hope my master appreciates my effort~
    ChangeAIScript("",OVERRIDE)
    ChangeAIScript("MAGEHIGH",CLASS)
    ChangeAIScript("",RACE)
    ChangeAIScript("",GENERAL)
    ChangeAIScript("WTARSGT",DEFAULT)
END

IF
  Allegiance(LastSummonerOf(Myself),EVILCUTOFF)
  !Race(Myself,DEMONIC)
  !HaveAnySpells()
THEN
  RESPONSE #100
    Enemy()
    DisplayStringHead(Myself,5196)  // ~I hope my master appreciates my effort~
    ChangeAIScript("",OVERRIDE)
    ChangeAIScript("WTASIGHT",CLASS)
    ChangeAIScript("",RACE)
    ChangeAIScript("",GENERAL)
    ChangeAIScript("",DEFAULT)
END

IF
  Allegiance(Myself,ALLY)
  HitBy([EVILCUTOFF],CRUSHING)
  Global("SHOUTED","LOCALS",0)
THEN
  RESPONSE #100
    Shout(156)
    SetGlobal("SHOUTED","LOCALS",1)
END

IF
  Allegiance(Myself,ALLY)
  See([EVILCUTOFF])
  ActionListEmpty()
  Global("SHOUTED","LOCALS",0)
THEN
  RESPONSE #100
    Shout(156)
    SetGlobal("SHOUTED","LOCALS",1)
END

IF
  Heard([GOODCUTOFF],156)
  Allegiance(Myself,ALLY)
  !See(NearestEnemyOf(Myself))
THEN
  RESPONSE #100
    MoveToObject(LastHeardBy(Myself))
END

IF
  Allegiance(Myself,NEUTRAL)
  Heard([GOODCUTOFF],156)
  !See([EVILCUTOFF])
THEN
  RESPONSE #100
    MoveToObject(LastHeardBy(Myself))
END

IF
  Allegiance(Myself,NEUTRAL)
  Heard([GOODCUTOFF],156)
  See([EVILCUTOFF])
THEN
  RESPONSE #100
    Ally()
    AttackOneRound([EVILCUTOFF])
    AttackOneRound([EVILCUTOFF])
END

IF
  !GlobalTimerNotExpired("WHINED","LOCALS")
  OR(2)
    Allegiance(Myself,ENEMY)
    Allegiance(Myself,NEUTRAL)
  HitBy([GOODCUTOFF],CRUSHING)
THEN
  RESPONSE #100
    SetGlobalTimer("WHINED","LOCALS",12)
    Shout(68)
    Continue()
END

IF
  !GlobalTimerNotExpired("WHINED","LOCALS")
  Allegiance(Myself,ENEMY)
  See([GOODCUTOFF])
  ActionListEmpty()
THEN
  RESPONSE #100
    SetGlobalTimer("WHINED","LOCALS",12)
    Shout(68)
    Continue()
END

IF
  Heard([EVILCUTOFF],68)
  Allegiance(Myself,NEUTRAL)
  !Class(Myself,INNOCENT)
THEN
  RESPONSE #100
    Enemy()
    MoveToObject(LastHeardBy(Myself))
END

IF
  Heard([GOODCUTOFF],68)
  Allegiance(Myself,NEUTRAL)
  !Class(Myself,INNOCENT)
THEN
  RESPONSE #100
    Ally()
    MoveToObject(LastHeardBy(Myself))
END

IF
  Allegiance(Myself,ENEMY)
  Heard([EVILCUTOFF],68)
  !See(NearestEnemyOf(Myself))
THEN
  RESPONSE #100
    MoveToObject(LastHeardBy(Myself))
    Continue()
END

IF
  Allegiance(Myself,ALLY)
  Heard([GOODCUTOFF],68)
  !See(NearestEnemyOf(Myself))
THEN
  RESPONSE #100
    MoveToObject(LastHeardBy(Myself))
    Continue()
END

