Yoko

Posted: **2009-03-14 10:21:23**

sdelal skripti na kidanie magic arrow v druga, sdelal kak umeju, hatelos bi objedenit' ih, neumeju.

kidaet magiju.

sub mg()
repeat
If UO.mana>3 Then
uo.cast("Magic Arrow" , '0x000228D0')
wait(1500)
Else
while uo.mana<100
UO.useskill('Meditation')
wait(3500)
wend
EndIf
until false
end sub

beret iz sumki black pearls

Code: Select all

sub bp()
  VAR box='0x4000974F'
  VAR bp='0x0F7A'
  uo.UseObject(box)
  wait(5000)
  While not UO.Dead()
    UO.FindType(bp,'0x0000','backpack')
if UO.GetQuantity('finditem')==0 then
UO.FindType(bp,'0x0000',box)
wait(500)
UO.Grab('1000','finditem')
wait(200)
    Endif
    wait(3000)
  wend
end sub

beret iz sumki nightshade

Code: Select all

sub ns()
  VAR box='0x4000974F'
  VAR ns='0x0F88'
  uo.UseObject(box)
  wait(5000)
  While not UO.Dead()
    UO.FindType(ns,'0x0000','backpack')
if UO.GetQuantity('finditem')==0 then
UO.FindType(ns,'0x0000',box)
wait(500)
UO.Grab('1000','finditem')
wait(200)
    Endif
    wait(3000)
  wend
end sub

vigruzhaet epmty botles, nado etot gde to vstavit' 6tob pereodichna vigruzhal butilki(poka kidaem magiju nelza peredvigat' predmeti)

Code: Select all

sub botl()
uo.moveitem("^0x0F0E","all","box")
end sub

nu i vot pjet' total mani katorie v meshke, hotelos bi esli mana<4 6tob vipil.

Code: Select all

sub totalmana()
UO.FindType('0x0F0E','0x081B','box')
uo.usetype('finditem')
endsub

Yoko

all in one

all in one