PigLatin Talker

By err2 on Nov 21, 2005

i used the piglatin idea from Sasuke and enexif's alias (hope you don't mind) to make a piglatin talker. it replaces any text you type into piglatin talk. use the /enable #pigg | /disable #pigg commands to turn it on or off. enjoy o_o!
P.S. If it doesn't seem like it to you, i gave credit to Sasuke and enexif

#PIGG Off
On *:INPUT:*: {
   If ($left($1,1) == /) || ($left($1,1) == !) { return }
   msg $chan $piglatin($1-) | halt
}
#PIGG end

alias piglatin {
  var %i = 1, %x = $numtok($1-,32)
  while (%i <= %x) {
    var %w = $gettok($1-,%i,32), %nword, %f
    if ($lower($left(%w,1)) isletter aeiou) { var %output = %output $+(%w,way) }
    else {
      var %n = 1
      while (%n <= $len(%w)) {
        var %c = $lower($mid(%w,%n,1))
        if (%c isletter aeiou) {
          var %nword = $+($right(%w,- $+ $calc(%n - 1)),$left(%w,$calc(%n - 1)),ay), %output = %output $upper($left(%nword,1)) $+ $lower($right(%nword,-1))
          var %f = 1
          break
        }
        else {
          if ((!$count(%w,a) && !$count(%w,e) && !$count(%w,i) && !$count(%w,o) && !$count(%w,u)) && %c == y) {
            var %nword = $+($right(%w,- $+ $calc(%n - 1)),$left(%w,$calc(%n - 1)),ay), %output = %output $upper($left(%nword,1)) $+ $lower($right(%nword,-1))
            var %f = 1
            break
          }
        }
        inc %n
      }
      if (!%f) { var %output = %output %w }
    }
    inc %i
  }
  return %output
}
Menu Channel {
 Pigg
 .On:/enable #pigg
 .off:/disable #pigg
}

Comments

Sign in to comment.
HacknSlash   -  Feb 01, 2011

Lol. That is my nick on mIRC. AND, my greet is Latin on top of it.
Nice script though lol.

 Respond  
Sasuke   -  Nov 25, 2005

Same.. Here... LOL

 Respond  
enexif   -  Nov 22, 2005

I was just about to say WTF.. You stole my script.. then I saw you gave credit.. No problemo there.. ha ha

 Respond  
Raid   -  Nov 21, 2005

Pretty good script. I don\'t understand what the words mean but nice.

 Respond  
err2   -  Nov 21, 2005

just turn the group on and just talk

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.