bind ctcp - "ACTION" pub_antislap
set slapampun {
  "ampun bosss"
  "siaaaappp bos"
  "Hadirrrr bos"
  "ada apa bos !!!"
  "siaapp grakk"
  "baiklah bosss"
  "Sik Boss lagi ML"
}
set slapkick {
  "Balaz Slaps"
  "Tolong jangan ganggu lagi ML"
  "aw aw aw kaga lihat gue lagi mojok"
  "fvck u all"
  "muach muach muach muach wataw"
  "Hancur loe prenk"
}
set slapbos {
  "Boz gua jangan di ganggu dia lagi ML"
  "napa si slaps� boz gua kamu naksir ya"
  "Permisi Jangan Slap Bosku YA..."
  "Tedangan maut wataw"
  "Pukulan Halilintar pletakz"
  "Boz gua lagi ML ama Tante cantikz"
}
proc pub_antislap { nick uhost hand dest keyword text } {
     global botnick slapampun slapkick slapbos
     set text [string tolower $text]

     if {[string index $dest 0] != "#"} { return 0 }
     if {[lindex $text 0] == "slaps" || [lindex $text 0] == "slap"} {
       if {$nick == "pandhawa" || $nick == "rey_cute" || [lindex $text 1] == "aqito" } {
         if {[lindex $text 1] == $botnick} {
           putserv "privmsg $dest :[lindex $slapampun [rand [llength $slapampun]]]"
           return 0
         }
         return 0
       }
       if {[lindex $text 1] == $botnick} {
          putserv "kick $dest $nick :1[lindex $slapkick [rand [llength $slapkick]]]"
          return 0
       }
       if {[lindex $text 1] == "pandhawa" || [lindex $text 1] == "ken_ken" || [lindex $text 1] == "rey_cute" || [lindex $text 1] == "aqito" } {
          putserv "kick $dest $nick :1[lindex $slapbos [rand [llength $slapbos]]]"
          return 0
       }
       return 0
     }
 }
putlog "pandhawaslap loaded"