Script Function: Q4Y8

 function void Q4Y8()
 {
   deleteArray(0x01);
   if (isArrayInit(0x01))
   {
     return ();
   }
   list Q4DS = 0x00, "COL_NAME", 0x02, 0x03, "COL_ACTION";
   initArray(0x01, 0x05, 0x05, Q4DS);
   setArrayIntElem(0x01, 0x00, 0x00, 0x0DE1);
   setArrayIntElem(0x01, 0x02, 0x00, 0x00 - 0x03E8);
   setArrayIntElem(0x01, 0x00, 0x01, 0x1BD4);
   setArrayIntElem(0x01, 0x02, 0x01, 0x00);
   setArrayStrElem(0x01, 0x01, 0x01, "Arrow shafts using all wood");
   setArrayStrElem(0x01, 0x04, 0x01, "shafts");
   setArrayIntElem(0x01, 0x00, 0x02, 0x13B2);
   setArrayIntElem(0x01, 0x02, 0x02, 0x012C);
   setArrayIntElem(0x01, 0x00, 0x03, 0x0F4F);
   setArrayIntElem(0x01, 0x02, 0x03, 0x0258);
   setArrayIntElem(0x01, 0x00, 0x04, 0x13FD);
   setArrayIntElem(0x01, 0x02, 0x04, 0x0384);
   for(int i = 0x00; i < 0x05; i++)
   {
     int Q65M = getArrayIntElem(0x01, 0x00, i);
     obj Q61Z = createNoResObjectAt(Q65M, getLocation(this));
     int wood = 0x00;
     int Q4Q1 = getResource(wood, Q61Z, "wood", 0x03, 0x00);
     setArrayIntElem(0x01, 0x03, i, wood);
     deleteObject(Q61Z);
   }
   return ();
 }