Под RUNUO(Nova) и не только,скрипт на доски

Good scripts, not reviewed and checked yet

Moderators: Murderator+, Murderator

Post Reply
Chico
Posts: 46
Joined: 2005-05-02 17:37:12
Contact:

Под RUNUO(Nova) и не только,скрипт на доски

Post by Chico »

Простой но функциональный скрипт на делание досок по послденему сделаному, addbox прописывает где все лежит и куда выкладывать

Code: Select all

sub carpentry() 
var Pila = '0x1034'
var Derevo = '0x1bdd'
var Doska  = '0x1bd7'  ; Доска

while not uo.dead()   
 if uo.count(Pila) <1 then              ; ----   Если пил мало берем
      uo.findtype(Pila,'-1','Box1')
      UO.grab(1,'finditem')
      Wait(1000)
 end if
 if uo.count(derevo) < 1  then             ; ----   Если дерева мало берем
      uo.findtype(Derevo,'-1','Box1')
      UO.grab(150,'finditem')
      Wait(1500)
 end if
 
 UO.usetype(Pila)  ;  ---------- Делаем доски
 wait(1500)
 UO.LClick(274,110)
 wait(2000)          ; -------------------  Все
 uo.findtype(Doska)
 uo.moveitem('finditem','0','Box1')
 wait(700)
wend

end sub

sub add_box1()
   uo.Exec('addobject Box1')
   while uo.Targeting()
   wait(100)
   wend
end sub
[/code]
Post Reply