скрипт:крутить хлопок

[CHI]

сабж... дайте плиз скрипт на крутку хлопка тоесть
чар с сундука берет хлопка 50 допустим крутит на колесе складывает нитки в сундук помогите плз оч нада

[Savage]

Конт и станок свои ставишь и количество которое поднять можешь.

Code: Select all

sub Spool()
   VAR Spool='0x0FA0', Hlopok='0x0DF9', Cont='0x405D148A', Stanok='0x41691939',i, Ammount=80

   While NOT UO.Dead()
      UO.FindType(Hlopok,-1,Cont)
      UO.Grab(STR(Ammount),'finditem')
      For i=1 to Ammount
         CheckLag()
         UO.WaitTargetObject(Stanok)
         UO.UseType(Hlopok)
         wait(3000)
      Next
      UO.SetReceivingContainer(Cont)
      UO.FindType(Spool,-1,'backpack')
      UO.Grab('all','finditem')
      UO.UnSetReceivingContainer(Cont)
   Wend

end sub