717
@verb #4909:"pig*latin" any any any rxdo #6319
@program #4909:"pig*latin" any any any
$perm_utils:is_called_from(player, "my_huh") || raise(E_PERM)
"English to Piglatin Translator"
"Version 2.2"
""
"Code by Raptor (#6319)"
"Pig Latin"
"---------"
"Most words in Pig Latin end in \"ay.\" Use the rules below to translate normal English into Pig Latin."
"1. If a word starts with a constant and a vowel, put the last letter of the word at the beginning of the word and add \"ay.\""
"Example: Happy = Yhappy + ay = Yhappay"
"2. If a word starts with two constants move the two constants to the end of the word and add \"ay.\""
"Example: Child = Ildch + ay = Ildchay"
"3. If a word starts with a vowel add the word \"way\" at the end of the word."
"Example: Awesome = Awesome +way = Awesomeway"
"Putting It All Together"
"-----------------------"
"The sentence \"Pig Latin is hard to speak.\" is written below in Pig Latin:"
"Gpiay Nlatiay isway dharay otay eakspay."
"Notice how \"Gpiay\" is actually \"Pig.\" Because the last character of pig is moved to the front, with \"ay\" added to the end, it makes Pig Latin very hard to read. "
"Note:  The latest version, 2.0, now has better handling of punctuation as well as handling of all brackets, quotation marks, and parenthesis (combined filtering also keeps smilies from being garbled...at least most of them).  In Version 2.2, added closer approximation to the rules, included the rules in the help."
"Also note that this code is meant only to handle plain text.  Numbers, equations, mathemetical symbols as well as @ # $ & * and #-3, verb notations and property notations may produce undesired results."
argstr = $encrypt_utils:piglatin(argstr)
player.location:say()
"Last modified by Lao-Tzu (#8084) on Mon Apr 23 18:59:30 2001 MDT."
.

0