Code: Select all
sub MArrow()
var mana
mana=uo.mana
if uo.InJournal('Target is not in line of sight') then
uo.DeleteJournal()
uo.setglobal ('ccast', '0')
else
if UO.GA>0 AND UO.bm>0 AND UO.bp>0 AND UO.ga>0 AND UO.gs>0 AND UO.mr>0 AND UO.ns>0 AND UO.sa>0 AND UO.ss then
if uo.mana>=6 then
if not uo.getglobal ('ccast') == '1' then
uo.setglobal ('ccast', '1')
uo.cast ('Magic Arrow','laststatus')
wait(100)
if uo.InJournal('Target is not in line of sight') then
uo.DeleteJournal()
uo.setglobal ('ccast', '0')
uo.Exec('terminate MArrow')
end if
While uo.mana>=mana
wait(5)
wend
uo.setglobal ('ccast', '0')
else
UO.Exec("concolor 0x001c")
uo.print ('Already casting')
UO.Exec("concolor 0x0000")
end if
else
UO.Exec("concolor 0x001c")
uo.print('##################')
uo.print('######NO MANA######')
uo.print('##################')
UO.Exec("concolor 0x0000")
end if
else
UO.Exec("concolor 0x001c")
uo.print('##################')
uo.print('#####NO REGS#######')
uo.print('##################')
UO.Exec("concolor 0x0000")
end if
end if
end sub
kak zdelat chtob castila i bez reagentov . ja igraju v servere gde nenado reagentow.