i have done it! lol. okay maybe you'll think this is a useless snippet, but imagine the possibilities.....
alias plat {
var %a = 1
while (%a <= $numtok($1-,32)) {
var %m = 1, %t = $gettok($1-,%a,32), %b, %c
if (($len($remove(%t,a,e,i,o,u)) == $len(%t))) || (($len(%t) == 1) || (($left(%t,1) isin aeiou) && ($remove($right(%t,-1),a,e,i,o,u) == $right(%t,-1)))) var %c = %t
else {
while (%m <= $len(%t)) {
if (%m > 1) && ($mid(%t,%m,1) isin aeiou) { var %c = $mid(%t,%m,500) $+ %b $+ ay | break }
else { var %b = $left(%t,%m) | inc %m }
}
}
var %d = %d %c
inc %a
}
return %d
}
usage: $plat(multiword text string goes here)
hahaha im l33t.