Делает до упора вещи, если нет молотков и тонгов, изготавливает и далее делает, как обычно сетуп
Code: var INSTR = '0x1EB8' ; инструмент тинкера var Metal = '0x1BF2' var kol_met = '2000' ; по сколько хапаем металла VAR MaxWeight= ((uo.STR*3.5)+39) var Izd
sub setup() uo.Exec('addobject Box1') while uo.Targeting() wait(100) wend uo.Exec('addobject Bagpak') while uo.Targeting() wait(100) wend uo.Exec('addobject Musorka') while uo.Targeting() wait(100) wend uo.Exec('addobject obj') while uo.Targeting() wait(100) wend Izd = uo.GetGraphic('obj') Uo.addtype('Izdelie',Izd) end sub
sub main() ; Так как сначала изготавливаем инструмент, то эта процедура делает инструмент uo.setreceivingcontainer('Bagpak') ; Бакпак по умолчанию приемный контейнер while not uo.dead() ; нет то берем wait(2000) uo.useobject('Box1') ; открываем бокс с металлом wait(1000) if uo.count(INSTR) < 2 then uo.findtype(INSTR,'-1','Box1') wait(500) UO.grab('1','finditem') Wait(2000) end if if uo.count(Metal) < 20 then ; ---- Если ингов мало берем uo.findtype(Metal,'-1','Box1') wait(500) UO.grab(Kol_met,'finditem') Wait(1000) end if while uo.count('0x13E3') < 2 ; если молотков мало то делаем uo.print('delaem molot') UO.usetype(INSTR) ; ---------- Делаем молотки wait(3000) UO.LClick(422,311) ; перелистываем на страницу wait(2000) UO.LClick(273,170) ; делаем молоток wait(6000) wend
while uo.count('0x0FBB') < 2 ; если тонгов мало то делаем UO.usetype(INSTR) ; ---------- Делаем тонги wait(3000) UO.LClick(422,311) ; перелистываем на страницу wait(2000) UO.LClick(275,148) ; делаем тонг wait(6000) wend proizv() wend end sub
sub proizv() while uo.count(Metal) > 20 and UO.Weight < MaxWeight and uo.count('0x13E3') > 0 UO.usetype('0x13E3') ; ---------- Используем молоток wait(1500) UO.LClick(323,454) wait(5000) ; Изготовим последнюю вещь wend ; sell() sbros() end sub
sub sbros() repeat uo.findtype('Izdelie') uo.moveitem('finditem','0','Musorka') ; Сбросим изделия в сундук wait(600) uo.print('naideno -' + str(uo.count('Izdelie'))) until not uo.count('Izdelie') end sub
|