MoonScript IRC — File Browser

MoonScriptIRCv3.0 / MoonScriptIRCv3.0 / system / alt-text.mrc

alt-text.mrc — 6.4 KB — Download this file

on *:INPUT:*: {
  if ($left($1,3) = /me) && ( %tawker.1 == ON ) { action $funkyv($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.1 == ON ) { msg $active $funkyv($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.2 == ON ) { action $r1($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.2 == ON ) { msg $active $r1($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.3 == ON ) { action $clr($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.3 == ON ) { msg $active $clr($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.4 == ON ) { action $r2($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.4 == ON ) { msg $active $r2($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.5 == ON ) { action $moontxt($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.5 == ON ) { msg $active $moontxt($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.6 == ON ) { action $moontxt2($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.6 == ON ) { msg $active $moontxt2($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.7 == ON ) { action $leet($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.7 == ON ) { msg $active $leet($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.8 == ON ) { action $bk($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.8 == ON ) { msg $active $bk($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.9 == ON ) { action $brick1($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.9 == ON ) { msg $active $brick1($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.10 == ON ) { action $brick2($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.10 == ON ) { msg $active $brick2($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.11 == ON ) { action $brick3($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.11 == ON ) { msg $active $brick3($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.12 == ON ) { action $brick4($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.12 == ON ) { msg $active $brick4($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.13 == ON ) { action $asciic($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.13 == ON ) { msg $active $asciic($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.14 == ON ) { action $ascii($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.14 == ON ) { msg $active $ascii($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.15 == ON ) { action $moontalk($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.15 == ON ) { msg $active $moontalk($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.16 == ON ) { action $m3($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.16 == ON ) { msg $active $m3($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.17 == ON ) { action $m2($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.17 == ON ) { msg $active $m2($1-) | halt }
  if ($left($1,3) = /me) && ( %tawker.18 == ON ) { action $encrypt($2-) | halt }
  elseif ($left($1,1) != /) && ( %tawker.18 == ON ) { msg $active $encrypt($1-) | halt }
  elseif ($left($1,3) = /me) && ( $group(#haltdef) == ON ) && ($me isop $chan) && ($me isvo $chan) { echo -a 4 $atime * 4[ $+ 3±12@4 $+ $me $+ ]4 $2- | /.action $2- | halt }
  elseif ($left($1,3) = /me) && ( $group(#haltdef) == ON ) && ($me isop $chan) { echo -a 4 $atime * 4[ $+ 12@4 $+ $me $+ ]4 $2- | /.action $2- | halt }
  elseif ($left($1,3) = /me) && ( $group(#haltdef) == ON ) && ($me isvo $chan) { echo -a 4 $atime * 4[ $+ 3±4 $+ $me $+ ]4 $2- | /.action $2- | halt }
  elseif ($left($1,3) = /me) && ( $group(#haltdef) == ON ) { echo -a 4 $atime * 4[ $+ $me $+ ]4 $2- | /.action $2- | halt }
  elseif ($left($1,1) = /) { return }
  elseif ( %wb == on ) && ( $1- == wb ) { msg $active $moontxt2(Welcome Back) | halt }
  elseif ( %np == on ) && ( $1- == np ) { msg $active $moontxt2(No Problem) | halt }
  elseif ( %brb == on ) && ( $1- == brb ) { msg $active $moontxt2(Be Right Back) | halt }
  elseif ( %bbl == on ) && ( $1- == bbl ) { msg $active $moontxt2(Be Back Later) | halt }
  elseif ( %lol == on ) && ( $1- == lol ) { action $moontxt2(Laughs Out Loud) | halt }
  elseif ( %bbs == on ) && ( $1- == bbs ) { msg $active $moontxt2(Be Back Soon) | halt }
  elseif ( %gtg == on ) && ( $1- == gtg ) { msg $active $moontxt2(Got To Go) | halt }
  elseif ( %wtf == on ) && ( $1- == wtf ) { msg $active $moontxt2(What The Fuck) | halt }
  elseif ( %afk == on ) && ( $1- == afk ) { action is $moontxt2(Away From Keyboard) | halt }
  elseif ( %nm == on ) && ( $1- == nm ) { msg $active $moontxt2(Never Mind) | halt }
  elseif ( %jk == on ) && ( $1- == jk ) { msg $active $moontxt2(Just Kidding) | halt }
  elseif ( %lmao == on ) && ( $1- == lmao ) { msg $active $moontxt2(Laughing My Ass Off) | halt }
  elseif ( %roflmao == on ) && ( $1- == roflmao ) { msg $active $moontxt2(Rolling On The Floor Laughing My Ass Off) | halt }
  elseif ( %groovy == on ) && ( $1- == groovy ) { msg $active $moontxt2(Groovy) $+ 09,01! | halt }
  elseif ( %woohoo == on ) && ( $1- == woohoo ) { msg $active $moontxt2(Woo) $+ $moontxt2(Hoo) $+ 09,01! | .splay woohoo | halt } 
  elseif ( %doh == on ) && ( $1- == doh ) { msg $active $moontxt2(Doh) $+ 09,01! | .splay doh | halt }   
  elseif ( %mia == on ) && ( $1- == mama mia ) { msg $active $moontxt2(Mama Mia) $+ 09,01! | .splay mariomia | halt } 
  elseif ( %itsa == on ) && ( $1- == itsa me ) { msg $active $moontxt2(Itsa Me...) | msg $active $moontxt2($me) | .splay itsamario | halt }  
  elseif ( $group(#haltdef) == ON ) && ( $group(#nickcomp) == ON ) && ( $right($1,1) == : ) { goto end }
  elseif ( $group(#haltdef) == ON ) && ( $me isop $chan ) && ( $me isvo $chan ) { echo -a $atime ( $+ 3±12@ $+ $me $+ ) $1- | .msg $active $1- | halt }
  elseif ( $group(#haltdef) == ON ) && ( $me isvo $chan ) { echo -a $atime ( $+ 3± $+ $me $+ ) $1- | .msg $active $1- | halt }
  elseif ( $group(#haltdef) == ON ) && ( $me isop $chan ) { echo -a $atime ( $+ 12@ $+ $me $+ ) $1- | .msg $active $1- | halt }
  elseif ( $group(#haltdef) == ON )  { echo -a $atime ( $+  $me $+ ) $1- | .msg $active $1- | halt }
  elseif ( $group(#haltdef) == ON ) && ( $1- == $null ) { echo 4 -a *** it would help to actually say something! | halt }
  ; elseif ( $opnick(#,0) >= 1 ) && ( chris_jericho isin # ) && ( webchat isin $server ) && ( $right($1,1) != : ) { msg $active $replace($1-,fuck,fuck,shit,shit,cunt,cunt,pussy,pussy,dick,dick,cock,cock) | halt }
    :end
}