Переплавка фулов ирона,дрв
Posted: 2009-08-29 16:48:55
плавит фуллы,указываеться гдк лежат фулы куда железо и что есть форж
Code: Select all
sub armorsplav()
uo.print('!!Где Фуллы!! ')
uo.exec('addobject cu')
while uo.targeting()
wait(100)
wend
uo.print('!!Куда Ирон!! ')
uo.exec('addobject cu2')
while uo.targeting()
wait(100)
wend
uo.print('!!Что есть форжа?!! ')
uo.exec('addobject cu3')
while uo.targeting()
wait(100)
wend
dim armor[10]
armor[0]=0x1411
armor[1]=0x1413
armor[2]=0x1412
armor[3]=0x1410
armor[4]=0x1414
armor[5]=0x1415
armor[6]=0x140E
armor[7]=0x1408
armor[8]=0x1B76
armor[9]=0x140A
var i
for i = 0 to 9
while uo.dead()<1
UO.FindType( armor[i],'-1','cu')
if UO.FindCount()> 0 Then
UO.FindType( armor[i],'-1','cu')
if UO.FindCount() > 0 Then
UO.moveitem('finditem','1','my')
wait(800)
Endif
else
next
endif
UO.FindType( armor[i],'-1','my')
if uo.findcount()>0 then
wait(200)
uo.waittargetobject('finditem')
wait(800)
uo.useobject('cu3')
endif
wait(800)
uo.findtype('0x1BEF')
if uo.GetQuantity('finditem')>=50 then
uo.findtype('0x1BEF','-1','my')
uo.moveitem('finditem','1000','cu2')
wait(800)
endif
wend
end sub