Yoko
http://forum.yoko.com.ua/

all in one
http://forum.yoko.com.ua/viewtopic.php?f=3&t=14541		 Page 1 of 1
Author:  Bangbuss [ 2009-03-14 10:21:23 ]
Post subject:  all in one
sdelal skripti na kidanie magic arrow v druga, sdelal kak umeju, hatelos bi objedenit' ih, neumeju.

kidaet magiju.
Code:
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:
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:
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:
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:
sub totalmana()
UO.FindType('0x0F0E','0x081B','box')
uo.usetype('finditem')
endsub
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/