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

Magry
http://forum.yoko.com.ua/viewtopic.php?f=20&t=8026		 Page 1 of 1
Author:  P [ 2006-06-20 17:25:27 ]
Post subject:  Magry
дайте скрипт на магию чтобы каставал инох на вещь в паке и медетировал
Author:  ДРВ [ 2006-06-20 18:08:31 ]
Post subject:  Re: Magry
P wrote:
дайте скрипт на магию чтобы каставал инох на вещь в паке и медетировал
Code:
sub PoisonSelf() 
while uo.mana >= uo.INT 
Uo.Exec("cast 'Poison' self") 
wait(4000) 
wend 

while uo.mana < UO.INT 
Uo.Exec("useskill Meditation") 
wait(3000) 
wend 
uo.exec("exec PoisonSelf") 
endsub
Author:  P [ 2006-06-20 18:10:58 ]
Post subject: 
Нужно на придмет в паке а не на себя !
Author:  ДРВ [ 2006-06-20 18:17:44 ]
Post subject: 
P wrote:
Нужно на придмет в паке а не на себя !
а какая разница? :(
Author:  ghost_hnt [ 2006-06-20 18:52:15 ]
Post subject:  Re: Magry
Code:
sub PoisonSelf() 
 UO.Cast('Poison', 'backpack') #поставь ID предмета в паке и оставь пак открытым 
         wait(3000) 
if uo.mana < 9 then 
UO.Useskill('Meditation') 
repeat
wait(3000) 
end if 
wend 
endsub


Разница большая - когда кастуешь на себя - тратятся ХП :)

или вот еще попробуй (!!!ТОЛЬКО ЗАМЕНИ СООБЩЕНИЯ СЕРВЕРА ПРИ СРЫВАНИИ МЕДИТАЦИИ!!!)
Code:
sub pOISON()
  UO.Cast('Poison', 'backpack') 
         wait(3000) 
      wend 
      If UO.Mana<9 Then  
         While UO.Mana<UO.Int 
            UO.DeleteJournal() 
            wait(1000) 
            UO.Useskill('Meditation') 
            Repeat 
               wait(100) 
            until UO.InJournal("You are") OR UO.InJournal("Медитация") 
         Wend 
      Endif
      end sub

я блин все время с вендами путаю)!
Author:  ДРВ [ 2006-06-20 19:27:36 ]
Post subject:  Re: Magry
ghost_hnt wrote:
Разница большая - когда кастуешь на себя - тратятся ХП :)
Только не на моем сервере! :lol:
Author:  Edred [ 2006-06-20 23:54:48 ]
Post subject: 
Вот народ ленивый пошел, лень даже в прилепленных топиках порыться... Еду закомментировал, checklag() и deletejournal() прилепи к скрипту сам.

Code:
#####################################################################
sub Magery() 
   ; ver. 2.01 (c) Edred
   ;
   ; Вводим сундук (пак) с найтшэдом, вводим подкормку чара.
   ;
   VAR sunduk = '0x40531245'
   VAR targ = '0x4041C420'
   VAR mir = 'You are at peace'
   VAR NS = '0x0F88'
;      UO.SetGlobal( 'TimeProcess', str( UO.Timer() ) )
   UO.UseObject( sunduk )
   wait(1000)
   CheckLag()
   While UO.SkillVal( 'Magery' ) < 1000
      If UO.Count( NS ) == 0 Then
         UO.Findtype( NS, '-1', sunduk )
         If UO.FindCount() == 0 Then
            UO.Print( 'NightShade not found, script terminated' )
            return
         Endif
         UO.MoveItem( 'finditem', '100' )
         wait(500)
         CheckLag()
      Endif
      If UO.Mana < 20 Then
         DeleteJournal( mir )
         repeat
            UO.UseSkill( 'Meditation' )
            wait(2000)
         until UO.InJournal( mir )
;         EatChar( sunduk, 2, 1, 60 )
      Endif
      UO.WaitTargetObject( targ )
      UO.Cast( 'Poison' )
      wait(3000)
   Wend
endsub
Author:  ghost_hnt [ 2006-06-21 11:08:15 ]
Post subject: 
аахахах так у тебя прилеплено 11 страниц))
мог бы прогу какую-нить написать))
в них рыться оч долго и напряжно
и все равно спасибо тебе Endred :D
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/