Script: Fireballbase

inherits spelskil;

member int Q5NQ;
member obj Q57L;
member obj Q57M;

function int Q4JZ(obj user, obj usedon, int Q5NM)
{
  int Q5NC = 0x00;
  if (Q50G(usedon))
  {
    Q5NC = 0x01;
    int damage;
    loc Q4VS = getLocation(user);
    loc there = getLocation(usedon);
    faceHere(user, getDirectionInternal(Q4VS, there));
    sfx(Q4VS, 0x015E, 0x00);
    doMissile_Mob2Mob(user, usedon, 0x36D4, 0x07, 0x00, 0x01);
    Q57M = usedon;
    Q57L = user;
    callback(this, 0x01, 0x19);
    Q5UK(user, usedon, 0x02, Q5NM);
    Q5NQ = Q5NM;
  }
  Q5UR(this, Q5NC);
  return (Q5NC);
}

trigger callback(0x19)
{
  int Q527 = Q429(this, Q57L, Q57M, 0x04, Q5NQ);
  Q5UQ(this);
  return (0x00);
}