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

Помагити сделать скрипт ...
http://forum.yoko.com.ua/viewtopic.php?f=20&t=7080
Page 1 of 1

Author:  Monti [ 2006-03-22 12:11:52 ]
Post subject:  Помагити сделать скрипт ...

Плиз помагити скрипт нужен чтоб мой чар поднемал по 100 регов с полу пускал в себя Magic Arrow патом бинтовался патом снова пускал стрелку опять бинтовался когда мана кончилась он медитировал есено .. :oops: буду очень счастлив если кто поделиться ....

Author:  Scripts Writer [ 2006-03-22 12:17:28 ]
Post subject: 

Code:
sub GetOnRegs()
   VAR i=0
   VAR sunduk3='0x403E7D7E'   ; ñóíäóê ñ ðåãàìè
   DIM Regs[8]
   Regs[0]='0x0F7A'      ; Black Pearl
   Regs[1]='0x0F7B'      ; Bood Moss
   Regs[2]='0x0F86'      ; Mandrake Root
   Regs[3]='0x0F84'      ; garlic
   Regs[4]='0x0F85'      ; Ginseng
   Regs[5]='0x0F88'      ; Night Shade
   Regs[6]='0x0F8C'      ; Sulphorous Ash
   Regs[7]='0x0F8D'      ; Spiders Silk
     for i = 0 to 7   
       UO.FindType(Regs[i],'-1','ground')
         UO.MoveItem( 'finditem', '100' , 'backpack')
         wait( 1000 )
     next
endsub

sub autoMedit()
  var LastTimer
  while not uo.Dead()
    uo.DeleteJournal()
    CheckLag()
    while uo.Mana>=uo.INT
        wait(1000)
    wend
    while uo.Mana<uo.INT
        LastTimer=uo.Timer()
        uo.UseSkill('Meditation')
        repeat
            wait(100)
        until uo.InJournal("You are") or uo.InJournal("You lose") or uo.InJournal("You stop") or uo.Timer()>LastTimer+200
        uo.DeleteJournal()
    wend
  wend
end sub



sub arrow()
uo.Cast('Magic Arrow','self')
wait(4000)
uo.bandageself()
end sub


сам склеишь?

Author:  Monti [ 2006-03-22 12:20:51 ]
Post subject: 

:oops: :oops: :oops:
руки у меня все оке отуда растут ну проблем я хз в скриптах полный ламер ... могу на уо пилоти тока там сделать чтоб он дабл клик делал по кооардинатам и будут вечно ошибки ... а переменые незнаю некакие так что СПАСИБО ЗА ЭТО ну буду надеиться что кто нибудь поможет склеить :? :oops:

Author:  Scripts Writer [ 2006-03-22 12:43:36 ]
Post subject: 

Code:

sub GoGo()
uo.Set('finddistance','3')
   VAR i=0
   VAR k=0
   VAR  LastTimer
   DIM Regs[8]
   Regs[0]='0x0F7A'      ; Black Pearl
   Regs[1]='0x0F7B'      ; Bood Moss
   Regs[2]='0x0F86'      ; Mandrake Root
   Regs[3]='0x0F84'      ; garlic
   Regs[4]='0x0F85'      ; Ginseng
   Regs[5]='0x0F88'      ; Night Shade
   Regs[6]='0x0F8C'      ; Sulphorous Ash
   Regs[7]='0x0F8D'      ; Spiders Silk
while NOT uo.Dead()
     for k = 0 to 100
     uo.Cast('Magic Arrow','self')
     wait(3000)
     while uo.life < uo.str
       uo.bandageself()
       wait(3500)
     wend
     while uo.mana < 90
        LastTimer=uo.Timer()
        uo.UseSkill('Meditation')
        repeat
            wait(100)
        until uo.InJournal("You are") or uo.InJournal("You lose") or uo.InJournal("You stop") or uo.Timer()>LastTimer+200
        uo.DeleteJournal()
    wend
  wend
 next
wend
endsub

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/