/hint {
  if ($len(%answer) > 1) {
    var %numlet = $len(%answer) )
  }
  else {
    var %numlet 0
  }
  %hans = $replace( %answer , a , _ , b , _ , c , _ , d , _ , e , _ , f , _ , g , _ , h , _ , i , _ , j , _ , k , _ , l , _ , m , _ , n , _ , o , _ , p , _ , q , _ , r , _ , s , _ , t , _ , u , _ , v , _ , w , _ , x , _ , y , _ , z , _ , 1 , _ , 2 , _ , 3 , _ , 4 , _ , 5 , _ , 6 , _ , 7 , _ , 8 , _ , 9 , _ , 0 , _ )
  var %i 0
  while (%i < %numlet) {
    var %letr $rand(1,$len(%answer))
    if ($mid(%hans,%letr,1) == _) {
      %hans = $+( $left(%hans,$calc(%letr - 1)) , $mid(%trans,%letr,1) , $right(%hans,$calc($len(%hans) - %letr)) )
      /inc %i 1
    }
  }
  msg %tchan The hint is %hans $+ .
}