//Become a destroyable seal
IfOrdered
  tmpx = selforder
  tmpy = [VICT]
  IfXIsEqualToY
    SetTargetToSelf
    tmpargument = 116
    ChangeTargetClass

//---------------------------------------------------------------------------
//Don't let em come too close
IfTimeOut
  tmpargument = 10
  SetTime
  
  tmpdistance = 128*3
  SetTargetToDistantEnemy
    tmpx = targetdistance
    tmpy = 128*3
    IfXIsLessThanY
      //Throw the target at a speed of 75
      tmpx = 0
      tmpy = 0
      tmpturn = 65535      //Direction
      tmpdistance = 65        //Speed
      Compass
      AccelerateTarget

      //Also deal 3-7 damage
      tmpargument = DAMAGECRUSH
      SetDamageType
      tmpargument = rand & 1023 + 768
      DamageTarget

      tmpargument = 0
      PlayFullSound
      SendMessage

  //Spelly effects
  tmpargument = 0
  tmpdistance = selfz
  tmpx = selfx
  tmpy = selfy
  SpawnExactParticle
  SetTurnModeToSpin

End
