

Moderators: Murderator+, Murderator
Mr Nmy wrote:надо кидать в сумочку по кординатам в один угол и все - мне щас некогда
Code: Select all
#########################################################################
# Quick Mass Smelting Ore by Two ores ... for Antares #
# 1) В рюкзаке обязательно присутствие НЕ полного мешка #
# 2) В рюкзаке не желательно присутствие чего-либо кроме мешка и руды #
######### #### #### #### wrote by Recluse #### #### #### ########
# 1)После запуска скрипта укажите появившимся тагетом на ФОРЖУ #
# 2)После чего руда если она в Бэкапэ переместится в мешок #
#(мешок - произвольный если их несколько...надеюсь он не выберет полный)#
# 3)Затем инжект выложит красивыми кучками руду обратно в Бэкап :) #
# 4)И начнёт её плавить... #
# 5)Соберёт несгоревшую руду обратно в мешок #
# 6)И будет повторять 3-5 пока почти не кончится руда #
# 7)В бэкпаке останется чуть-чуть руды - плавьте ручками #
#########################################################################
sub MassSmeltingOreBy2()
var bag , i , j , forge
uo.findtype(0x0E76,-1,'backpack')
if uo.findcount() > 0 then
bag = uo.GetSerial('finditem')
uo.print('Show me FORGE.')
UO.exec('addobject forge')
while UO.targeting()
wait(200)
wend
uo.moveitem(bag,-1,'backpack','147','147','0')
uo.useobject(bag)
wait(200)
uo.findtype('0x19B9',-1,'backpack')
uo.moveitem('finditem',-1,bag)
wait(300)
while (uo.count('0x19B9') > 0)
i = 12
j = 12
while (uo.count('0x19B9') > 0) and (uo.count('0x19BA') < 425) and (i < 145) and (j<145)
uo.findtype('0x19B9',-1,bag)
uo.moveitem('finditem','2','backpack',str(i),str(j),'0')
wait(200)
if i==140 then
i = 4
j = j + 8
else
i = i + 8
end if
wend
while uo.count('0x19BA') > 0
uo.useobject('forge')
uo.waittargettype('0x19BA')
wait(300)
wend
while uo.count('0x19B7') > 0
uo.findtype('0x19B7',-1,'backpack')
uo.moveitem('finditem',-1,bag)
wait(200)
wend
wend
uo.findtype('0x19B7',-1,bag)
if uo.findcount() then
uo.Grab(-1,'finditem')
end if
uo.findtype('0x19BA',-1,bag)
if uo.findcount() then
uo.Grab(-1,'finditem')
end if
uo.findtype('0x19B8',-1,bag)
if uo.findcount() then
uo.Grab(-1,'finditem')
end if
end if
end sub
########################################################################
Code: Select all
uo.moveitem('finditem','2','backpack',str(i),str(j),'0')