-- Required control rate.
control_rate = 2

-- Required "control" function.
function control()
  if taskname() == "none" then
    pushtask(0, "fly")
  end
end

-- Required "attacked" function.
function attacked(attacker)
  task = taskname()
  if task ~= "attack" and task ~= "runaway" then
    -- Let's have some taunts.
      num = rng(0,4)
      if num == 0 then msg = "You will never kill me!"
      elseif num == 1 then msg = "DIE!"
      elseif num == 2 then msg = "You won't survive!"
      elseif num == 3 then msg = "I hate you!"
    end
    if msg then comm(attacker, msg) end

    pushtask(0, "attack", attacker)
  end
end

-- Runs away.
function runaway()
  target = gettargetid()
  dir = face(target, 1)
  accel()
end

-- Attack
function attack()
  target = gettargetid()
  dir = face(target)
  dist = getdist(getpos(target))

  if parmor() < 70 then
    poptask()
    pushtask(0, "runaway", target)
  elseif dir < 10 and dist > 300 then
    accel()
  elseif dir < 10 and dist < 300 then
    shoot()
  end
end

-- Fly to the player.
function fly()
  target = player
  dir = face(target)
  dist = getdist(getpos(target))
  if dir < 10 and dist > 300 then
    accel()
  end
end