Yoko

Code: Select all

#плавка железа
#подходим к форже и запускаем скрипт
var 1 = '****'#тайп железки1#
var 2 = '****'#тайп железки2#
var 3 = '****'#тайп железки3#
var 4 = '****'#тайп железки4#
var 5 = '****'#тайп железки5#
var 6 = '****'#тайп железки6#
sub main()       
while uo.count(1)>0)
uo.usefromground(0x0FB1)
uo.waittargettype(1)
wait(200)
wend
while uo.count(2)>0)
uo.usefromground(0x0FB1)
uo.waittargettype(2))
wait(200)
wend
while uo.count(3)>0)
uo.usefromground(0x0FB1)
uo.waittargettype(3))
wait(200)
wend
while uo.count(4)>0)
uo.usefromground(0x0FB1)
uo.waittargettype(4))
wait(200)
wend
while uo.count(5)>0)
uo.usefromground(0x0FB1)
uo.waittargettype(5))
wait(200)
wend
while uo.count(6)>0)
uo.usefromground(0x0FB1)
uo.waittargettype(6))
wait(200)
wend
end sub

Code: Select all

sub SmeltTrush()
var tType, cType, Forge='0x4015F387'
   UO.Print('Откуда тырим?')
   uo.addobject('objFrom') 
   while uo.Targeting() 
      wait(200) 
   wend
   UO.UseObject('objFrom')
   CheckLag()
   UO.Print('Что брать то?')
   uo.addobject('objType') 
   while uo.Targeting() 
      wait(200) 
   wend
   tType = uo.GetGraphic('objType')
   cType = uo.GetColor('objType')
   UO.Findtype(tType,cType,'objFrom')
   while UO.GetQuantity('finditem')>0
      UO.MoveItem('finditem',-1,'backpack')      
      CheckLag()
      UO.FindType(tType,cType,'backpack') 
      If UO.GetQuantity('finditem') then 
         UO.WaitTargetObject('finditem') 
         UO.UseObject(Forge)
         wait(3000)
         CheckLag()
      Endif
      if UO.Weight > UO.STR*4 then
         UO.FindType('0x1BEF','0x0000','backpack') 
         UO.MoveItem('finditem',-1,'objFrom')
         CheckLag()
      end if
      UO.Findtype(tType,cType,'objFrom')
   wend
end sub