Yoko

UO.Cast('Flame Strike','laststatus')
uo.Print('4...')
wait(1000)
uo.Print('3...')
wait(1000)
uo.Print('2...')
wait(1000)
uo.Print('1...')

sub Time_Cast()
  var k=0
  var mana=uo.mana

repeat
  uo.DeleteJournal()
  k=0
  uo.Cast('Flame','laststatus')
  repeat
    wait(100)
    k=k+1
  until uo.InJournal('fizzles') || uo.mana <> mana
  if uo.InJournal('fizzles') then
    uo.Print('Fizzle...')
  else
    uo.Print('Casttime is :'+STR(k)+'00')
  endif
until uo.mana <> mana  
end sub

sub Time_Cast()
  var k=3
  var mana=uo.mana


  uo.DeleteJournal()
  uo.Cast('Flame','laststatus')
  repeat
    wait(1000)
    k=k-1
    uo.Print('Thats more than '+STR(k)+'000 to cast.')
  until uo.InJournal('fizzles') || uo.mana <> mana
 
end sub

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 castSpell( spellname, target )
var i, cast_time = uo.getglobal( "time-" + spellname )
if cast_time == "N/A" then
   uo.print( "Неизвестное заклинание, засекаю время." )
   castTimer( spellname, target )
   return false
endif
cast_time = val( cast_time )
if target then
   uo.waittargetobject( target )
endif
deljournal( "fizzles" )
uo.cast( spellname )
for i=cast_time to 1 step -1
   uo.print( "До конца каста: " + str( i ) + "сек." )
   wait( 1000 )
   if uo.injournal( "fizzles" ) then
      uo.print( "Каст не удался." )
      return false
   endif
next
endsub

sub castTimer( spellname, target )
if target then
   uo.waittargetobject( target )
endif
var time = 0, mana = uo.mana
deljournal( "fizzles" )
uo.cast( spellname )
repeat
   wait( 1000 )
   time = time + 1
until uo.injournal( "fizzles" ) OR uo.mana < mana
if not uo.injournal( "fizzles" ) then
   uo.print( "Каст прошёл удачно, время записано: " + str( time ) + " сек." )
   uo.setGlobal( "time-" + spellname, str( time ) )
else
   uo.print( "Каст неудался, время не записано." )
endif
endsub