Page 1 of 1
стрелка+файрбол
Posted: 2008-01-07 01:08:12
by RoLeX
нужен вот такой вот макрос.... флуд стрелки и файрбола... такое возможно ?

Posted: 2008-01-07 04:52:03
by korzh
Code: Select all
sub arrow()
UO.Cast('Magic Arrow','laststatus')
uo.msg(' - ')
uo.msg(' - ')
uo.msg(' - ')
uo.msg(' - ')
end sub
Такой ?

Posted: 2008-01-07 16:31:07
by RoLeX
может я как не так выразился...
нужно:
нажимаю кнопку - кастую стрелку и фарбол (одно за другим)
зажимаю кнопку - кастую стрелка-файрбол-стрелка-фарбол...до тех пор пока кнопку не отпущу )))
все это в последнюю цель...)
Posted: 2008-01-07 22:48:13
by RoLeX
хееелппп

Posted: 2008-01-08 16:55:39
by www.i.ru
sub Fire_Arrow()
uo.Cast('Fireball','laststatus')
wait(900)
uo.cast('Magic Arrow','laststatus')
end sub
ммм вот нажал кнопку летит фаербол+стерлка! Токо если зажать кнопку то не чего хорошего не выдит, самому нужен такой скрипт=)
wait - ставишь сам (под своего чара)
Posted: 2008-01-08 16:59:19
by RoLeX
вот ...2 скрипта по отдельности..
Sub Arrow()
uo.cast('Magic Arrow','last')
if uo.injournal('cliloc# 0xA3A1') then
uo.cast('Magic Arrow','lastattack')
uo.deletejournal()
endif
endsub
sub fireball()
if not uo.waiting() then
UO.exec("cast 'Fireball' lasttarget")
end if
if (UO.InJournal('cliloc# 0xA3A1') or UO.InJournal('cliloc# 0xAB74')) then
UO.exec("cast 'Fireball' ")
UO.DeleteJournal()
end if
end sub
надо их как-то объеденить в один...у мну ничегошеньки не получается .....

Posted: 2008-01-09 09:17:24
by korzh
Code: Select all
sub mafb() ; magic arrow, fireball
If uo.getglobal('mafb')=='On' then
uo.setglobal('mafb',0)
uo.print(' Stop! ')
uo.exec('Terminate mafb')
else
uo.setglobal('mafb','On')
uo.print(' Strart! ')
endif
repeat
UO.Cast('Magic Arrow','laststatus')
wait(2000) ; задержку под себя выстави
UO.Cast('Fireball','laststatus')
wait(2000) ; задержку под себя выстави
until false
end sub
Нажал 1 раз - кидает стрелку и фаербол
Нажал еще раз - скрипт остановится
Не тестил, пробуй.