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

Нужен скрипт на обкаст себя
http://forum.yoko.com.ua/viewtopic.php?f=20&t=11681		 Page 1 of 1
Author:  Klanded [ 2007-03-26 16:09:02 ]
Post subject:  Нужен скрипт на обкаст себя
Народ нужен скрипт на обкаст себя 4 спелами чтоб запускаеш скрипт он снимал лук делал обкаст одевал лук обратно когда обкаст проходит он повторялбы процедуру. Играю на Middle-earth.ru. Плиз помогите. За ранее спасибо.
Author:  Question_GimFlex [ 2007-03-26 16:25:32 ]
Post subject: 
Code:
uo.cast(
wait(


используй эту комбинацию 4 раза :)
Author:  Klanded [ 2007-03-26 16:39:31 ]
Post subject: 
мне нужно чтоб при включении он снял оружие обкастился одел оружие когда каст сподает он опять обкастился
Author:  Question_GimFlex [ 2007-03-27 06:32:47 ]
Post subject: 
запомнил
одел
снял (вроде бы так)
Code:
uo.setarm(
uo.arm(
uo.disarm(
Author:  Question_GimFlex [ 2007-03-27 06:34:27 ]
Post subject: 
получаем
:)
Code:
uo.setarm(
uo.disarm(
uo.cast(
uo.cast(
uo.cast(
uo.cast(
uo.arm(
Author:  Klanded [ 2007-03-27 08:08:56 ]
Post subject: 
А как чтоб когда каст спадал он заново все запускал
Author:  Question_GimFlex [ 2007-03-27 16:06:24 ]
Post subject: 
засеки скоко каст держиться)
Author:  to4a [ 2007-03-27 16:10:31 ]
Post subject: 
ну блин так и быть, щас подниму весь тот мусор что я писал два года назад, было гдето)
Code:
Sub CastSpell(spell)
var timer=0
   repeat
    UO.DeleteJournal()
    UO.Cast(spell)
    repeat
     timer=timer+1
     wait(10)
    until UO.InJournal('An|Ex|Por|Lor|Des|Rel|You lack') or timer==300
    if UO.InJournal('You lack') then
     if UO.InJournal('sufficient mana') then
      if UO.Count('0x0F0E','0x09DF') then
       Mana()
       goto cast
      else
       UO.Print('КАСТ НЕВОЗМОЖЕН - НЕТУ МАНЫ')
       return 'nomana'
      endif
     else
      UO.Print('КАСТ НЕВОЗМОЖЕН - НЕТУ РЕГОВ')
      return 'noregs'
     endif
    endif
    if UO.InJournal('line|see the target') then
     UO.Print('ЦЕЛЬ НЕ ВИДАТЬ')
     return 'notarg'
    endif
    WaitManaChange(UO.Mana)
    UO.Print('КАСТ ОКОНЧЕН')
   until not UO.InJournal('fizzle')
   return 'success'
endsub
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/