sub Time_Cast()
var k=6
var mana=uo.mana
while true
if UO.InJournal(uo.GetName('self')+ ": Kal Vas Flam") then
repeat
wait(1000)
k=k-1
uo.Print('wait '+STR(k)+'000 to cast.')
until uo.InJournal('fizzles') || uo.mana <> mana
end if
wait(100)
uo.DeleteJournal()
wend
end sub
sub Time_Cast()
var k=6
var mana=uo.mana
uo.DeleteJournal()
while true
if UO.InJournal(uo.GetName('self')+ ": Kal Vas Flam") then
repeat
wait(1000)
k=k-1
uo.Print('wait '+STR(k)+'000 to cast.')
until uo.InJournal('fizzles') || uo.mana <> mana
end if
wait(100)
wend
end sub
sub Time_Cast()
var k=6
var mana
uo.DeleteJournal()
while not uo.injournal(uo.GetName('self')+ ": Kal Vas Flam")
wait(100)
wend
mana=uo.mana
repeat
wait(1000)
k=k-1
uo.Print('wait '+STR(k)+'000 to cast.')
until uo.InJournal('fizzles') || uo.mana < mana
end sub