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

[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