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

Автокаст
http://forum.yoko.com.ua/viewtopic.php?f=17&t=17373		 Page 1 of 1
Author:  some [ 2014-01-08 04:35:47 ]
Post subject:  Автокаст
Доброго времени суток .
Как давно я не играл в уо , вот собственно опять начал на клоне альфы и столкнулся с проблемой - не могу перекастовать людей которые на скриптах автокасты.
они прям без задержки идут один за одним, человек как будто не ошибается и не думает что жать .
собственно вопрос - может кто выложить скрипт акаста , чтобы я мог переделать свои скрипты ?
Author:  Mirage [ 2014-01-08 09:51:33 ]
Post subject:  Re: Автокаст
не то?
Author:  some [ 2014-01-08 13:51:18 ]
Post subject:  Re: Автокаст
нет, это же обычные касты, а там вроде очередь кастов без задержки и если нажать во время каста на кнопку то он не физлиться а становиться в очередь
Author:  some [ 2014-01-09 01:53:59 ]
Post subject:  Re: Автокаст
Code:
sub Glob()
Uo.SetGlobal('Cast','on')
end sub



sub Mana()
var Mana = Uo.Mana
Uo.SetGlobal('Cast','off')
   repeat
      wait(25)
   until Uo.Mana < Mana
Uo.SetGlobal('Cast','on')
end sub



sub lightL()
if Uo.GetGlobal('Cast')  == 'on' then
   UO.Cast('Lightning','laststatus')
           mana()
else
           Uo.Msg("Еще кастим")
end if
end sub



sub fsL()
if Uo.GetGlobal('Cast')  == on then
           UO.Cast('Flame Strike','laststatus')
           mana()
else
           Uo.Msg("Еще кастим")
end if
end sub



нашел на форуме альфы, что то типо этого .
Author:  tylllkah [ 2014-01-09 21:25:18 ]
Post subject:  Re: Автокаст
### задержка каста

Sub CastWait()
var LastMana=UO.Mana
var LastHP = uo.life
UO.DeleteJournal()
REPEAT
If LastMana > UO.Mana or LastHP > uo.life Then
return
Else
If LastMana < UO.Mana Then
LastMana = UO.Mana
End If
if LastHP < uo.life Then
LastHP = uo.life
End If
End If
Wait(5)
Until UO.InJournal("You have been poizoned!")
end sub


### пример

sub apoi()
CastWaitSpeC()
var LastMana=UO.Mana
UO.Cast('Lightning','laststatus')
REPEAT
Wait(5)
Until LastMana > UO.Mana
end sub


### пример 2
sub supalait()
UO.Cast('Lightning','lasttarget')
CastWait()
UO.Cast('Lightning','lasttarget')
CastWait()
UO.Cast('Lightning','lasttarget')
CastWait()
UO.Cast('Flame Strike','lasttarget')
CastWait()
end sub
Author:  some [ 2014-01-10 03:27:07 ]
Post subject:  Re: Автокаст
разобрался, кроме этого
Code:
CastWaitSpeC()

что должна делать эта функция ???
Author:  nana uHTepHeTa [ 2014-01-22 18:10:11 ]
Post subject:  Re: Автокаст
Требуется скрипт на касты магии с очередью кастов. Кастовать не готовый набор а произвольно. Что бы следующий каст кастовалося по кулдауну предыдущей магии без физлов.
Куплю. 283384670
papan1980
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/