Script: Spinningwheel

inherits globals;

trigger objectloaded
{
  if (hasObjVar(this, "inUse"))
  {
    removeObjVar(this, "inUse");
  }
  return (0x00);
}

trigger callback(0x20)
{
  string Q5WS = getObjVar(this, "CREATE_THIS");
  int Q5UA = getObjVar(this, "HUE");
  obj user = getObjVar(this, "USER");
  int Q5GS = getObjVar(this, "ORIGINAL_TYPE");
  obj Q5UB = getObjVar(this, "SOURCE");
  int Q5V6 = getObjVar(this, "SPINVALUE");
  int Q4Q1;
  int Q4DN;
  obj Q5BX;
  string Q5B4;
  string Q4Y3;
  obj Q47F = getBackpack(user);
  int Q65M;
  int Q460;
  setType(this, Q5GS);
  if (Q5WS == "yarn")
  {
    Q65M = 0x0E1D;
  }
  if (Q5WS == "thread")
  {
    Q65M = 0x0FA0;
  }
  Q5BX = createNoResObjectAt(Q65M, getLocation(user));
  if (!isValid(Q5BX))
  {
    return (0x01);
  }
  transferResources(Q5BX, this, Q5V6, "cloth");
  Q460 = getQuantity(Q5BX);
  switch (Q460)
  {
  case 0x01
    if (Q5WS == "yarn")
    {
      Q5B4 = " a ball of yarn";
    }
    else
    {
      Q5B4 = " a spool of thread";
    }
    Q4Y3 = "it";
    break;
  default
    if (Q5WS == "yarn")
    {
      Q5B4 = " " + Q460 + "  balls of yarn";
    }
    else
    {
      Q5B4 = " " + Q460 + "  spools of thread";
    }
    Q4Y3 = "them";
    break;
  }
  if (canHold(Q47F, Q5BX))
  {
    Q4Q1 = putObjContainer(Q5BX, Q47F);
    systemMessage(user, "You create" + Q5B4 + " and put " + Q4Y3 + " in your backpack.");
  }
  else
  {
    systemMessage(user, "You create the" + Q5B4 + " and put it at your feet.");
  }
  if (hasObjVar(this, "inUse"))
  {
    removeObjVar(this, "inUse");
  }
  setHue(Q5BX, Q5UA);
  removeObjVar(this, "SOURCE");
  removeObjVar(this, "CREATE_THIS");
  removeObjVar(this, "HUE");
  removeObjVar(this, "USERLOC");
  removeObjVar(this, "ORIGINAL_TYPE");
  removeObjVar(this, "SPINVALUE");
  string Q470 = Q65M;
  attachScript(Q5BX, Q470);
  return (0x01);
}