on *:input:#:{
  if ($chan == #Leandro) { goto end }
  if ($active == status window) { goto end }
  if ($left($1,1) == /) { goto end }
  if ($left($1,1) == !) { .say $1- | halt }
  /inc %counter 
  /set %rand $rand(1,5)
  if (%rand == 1) { .say  4,1( 15P14o15M4 )15 $1- 4(15 P14ido15M4 )15,01 $+ $chr(32) $+ $chr(42) $+ %counter $+ $chr(42) | halt }
  if (%rand == 2) { .say  4,1( 15P14a15M4 )15 $1- 4(15 P14ida15M4 )15,01 $+ $chr(32) $+ $chr(42) $+ %counter $+ $chr(42) | halt }
  if (%rand == 3) { .say  4,1( 15P14i15M4 )15 $1- 4(15 P14idi15M4 )15,01 $+ $chr(32) $+ $chr(42) $+ %counter $+ $chr(42) | halt }
  if (%rand == 4) { .say  4,1( 15P14u15M4 )15 $1- 4(15 P14idu15M4 )15,01 $+ $chr(32) $+ $chr(42) $+ %counter $+ $chr(42) | halt }
  if (%rand == 5) { .say  4,1( 15P14e15M4 )15 $1- 4(15 P14ide15M4 )15,01 $+ $chr(32) $+ $chr(42) $+ %counter $+ $chr(42) | halt }
  :end
}

}