Каторга ПвП альфа
Posted: 2007-05-10 20:07:14
Ща тоже другу помогал каторгу пошить на альфе ) 2 скриптика написал полезных. А в поиске вроде нет ничего на эту тему.
Подходим к двум круглым станкам с хлопком в паке, запускаем скрипт и получаем нитки.
Берём нитки и кожу в паке, запускаем скрипт и получаем тапки
Ну и третий скриптик, тоже оч полезный, но писал не я.
Режет кроликов и берёт с них кожу.
Code: Select all
sub nitki()
uo.set('finddistance','3')
repeat
uo.waittargetground('0x1015')
wait(100)
uo.usetype('0x0DF9')
wait (1200)
uo.deletejournal()
until uo.injournal ('Стоп')
end sub
Подходим к двум круглым станкам с хлопком в паке, запускаем скрипт и получаем нитки.
Code: Select all
sub tapki()
uo.automenu ('Footwear', 'Rabbit Slippers')
var k
VAR Kit = "0x0F9D"
VAR Kozha = "0x11F6"
repeat
uo.deletejournal()
UO.WaitTargetType( Kozha )
UO.UseType( Kit )
k = 0
while NOT UO.InJournal('You put') AND NOT UO.InJournal('failed') AND ( k < 50 )
k = k + 1
wait(300)
wend
uo.findtype(Kozha, '-1', 'backpack')
if uo.findcount()==0 then
uo.print (''Net kozi')
return
end if
until uo.dead()
end sub
Берём нитки и кожу в паке, запускаем скрипт и получаем тапки
Ну и третий скриптик, тоже оч полезный, но писал не я.
Code: Select all
sub Loot2()
var i,n
Dim Loot[1]
Loot[1]=0x11F6 ; KOZHA
UO.WaitTargetObject("lastcorpse")
UO.UseType(0x13f6)
wait(400)
i = 1200
FOR n=1 TO 1
uo.findtype(Loot[n],"-1","lastcorpse")
if uo.findcount() > 0 then
UO.grab(1, "finditem")
uo.print("furs + "+str(uo.findcount()))
Wait(i)
END if
next
end sub
Режет кроликов и берёт с них кожу.