Нужен скрипт на обкаст себя

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Klanded
Posts: 25
Joined: 2007-01-31 12:15:24

Нужен скрипт на обкаст себя

Post by Klanded »

Народ нужен скрипт на обкаст себя 4 спелами чтоб запускаеш скрипт он снимал лук делал обкаст одевал лук обратно когда обкаст проходит он повторялбы процедуру. Играю на Middle-earth.ru. Плиз помогите. За ранее спасибо.
Question_GimFlex
Posts: 188
Joined: 2007-03-24 08:12:51

Post by Question_GimFlex »

Code: Select all

uo.cast(
wait(


используй эту комбинацию 4 раза :)
Klanded
Posts: 25
Joined: 2007-01-31 12:15:24

Post by Klanded »

мне нужно чтоб при включении он снял оружие обкастился одел оружие когда каст сподает он опять обкастился
Question_GimFlex
Posts: 188
Joined: 2007-03-24 08:12:51

Post by Question_GimFlex »

запомнил
одел
снял (вроде бы так)

Code: Select all

uo.setarm(
uo.arm(
uo.disarm(
Question_GimFlex
Posts: 188
Joined: 2007-03-24 08:12:51

Post by Question_GimFlex »

получаем
:)

Code: Select all

uo.setarm(
uo.disarm(
uo.cast(
uo.cast(
uo.cast(
uo.cast(
uo.arm(
Klanded
Posts: 25
Joined: 2007-01-31 12:15:24

Post by Klanded »

А как чтоб когда каст спадал он заново все запускал
Question_GimFlex
Posts: 188
Joined: 2007-03-24 08:12:51

Post by Question_GimFlex »

засеки скоко каст держиться)
to4a
Posts: 265
Joined: 2006-03-10 00:19:11
Location: http://drw.ru/

Post by to4a »

ну блин так и быть, щас подниму весь тот мусор что я писал два года назад, было гдето)

Code: Select all

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
Post Reply