Под 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