## This sets your channel password. Replace xxxxxx for your channel password.
set chanpass "xxxxxxx"

## This sets your nick password. Replace xxxxxxx for your nick password.
set nickpass "xxxxxxxx"

## This sets your bot nick. Replace lamesbot for your bt nick.
set eggnick "CuntPunt"

## You must comment the line below. :)
#die (Are you sure you've configured the script correctly mother fucker?) ( bot_identifyer.tcl )


################# YOU DON'T NEED TO EDIT THE SCRIPT BELOW #################

bind notc B "*denied." chanserv_sux
bind notc B "*This nickname is registered and protected.*" nickserv_sux

proc chanserv_sux { nick uhost hand text } {
 global channame chanpass
  putserv "PRIVMSG chanserv :identify $channame $chanpass"
  putlog "Sending Identify to ChanServ"
}

proc nickserv_sux { nick uhost hand text } {
 global botnick eggnick nickpass
  if { $botnick == "$eggnick" } {
   putserv "PRIVMSG nickserv :identify $nickpass"
   putlog "Sending Identify to NickServ"
  } else {
   putlog "$eggnick is using a nick owned by someone else"
  }
}

bind dcc o nickserv nickserv

proc nickserv { hand idx mascara } {
 global nickpass
 putserv "PRIVMSG nickserv :identify $nickpass"
}