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