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/