Code:
alias hint { 
  var %a, %b, %c = $replace($2, $, \$, \, \\), %i = 1
  if ($prop == consenant) { %b = $regsub($1, /[^aeiou ]/ig, %c, %a) }
  elseif ($prop == consenant2) { %b = $regsub($1, /[^aeiou]/ig, %c, %a) }
  elseif ($prop == step) { 
    while (%i <= $len($1)) {
      %a = $+(%a, $mid($1, %i, $3), $2)
      inc %i $calc($3 + 1)
    }
  }
  elseif ($prop == vowel) { %b = $regsub($1, /[aeiou]/ig, %c, %a) }
  elseif ($prop == vowel2) { %b = $regsub($1, /[aeiou ]/ig, %c, %a) }
  return %a
}


$hint(<string>, <replacement character>).consenant
$hint(testing this, *).consenant

This method will replace all consenants with the replacement character (* is this case)

*e**i** **i*

$hint(<string>, <replacement character>).consenant2
$hint(testing this, *).consenant2

This method will replace all consenants and spaces with the replacement character (* in this case)

*e**i*****i*

$hint(<string>, <replacement character>, <N>).step
$hint(testing this, *, 2).step

This method will replace every N + 1 character with the replacement character (* in this case)

te*ti*g *hi*

$hint(<string>, <replacement character>).vowel
$hint(testing this, *).vowel

This method replaces all vowels with the replacement character.

t*st*ng th*s

$hint(<string>, <replacement character>).vowel2
$hint(testing this, *).vowel2

This method replaces all vowels and spaces with the replacement character.

t*st*ng*th*s