#Set your channel name Here
set voicechan "#mIRCpending"

bind join - * join_atvoice

proc join_atvoice {nick uhost hand chan} {
  global botnick voicechan
  if {([lsearch -exact [string tolower $voicechan] [string tolower $chan]] != -1)} {
    if {[isop $nick $chan]} {return}
    putserv "NOTICE $nick :Checking some things, if logged into your username I will voice you in a moment, if not, please Try #Usernames instead | Do NOT /m$
    putserv "NOTICE $nick :Monitoring Line for this channels * #mIRCBeginners * #mIRCpending * #Opasistencia * #HelpVolunter * "
  }
}


## The channel where you want the script to be active
set vchan #mIRCpending

bind join - * join_whois_x
bind msgm - * join_got_whois_x


proc join_got_whois_x {nick uhost hand text} {
  if {$nick=="X"&&$uhost=="cservice@undernet.org"} {
    if {[string match -nocase "* USER: *" $text]} {
      # got a "user reply"
      set ::xlastreply [lindex [split $text " "] 1]
    } elseif {[string match -nocase "** SUSPENDED **" $text] && [info exists ::xlastreply]} {
      set ::suspended($::xlastreply) 1
      unset ::xlastreply
    }
  }
}
proc join_whois_x {nick uhost hand chan} {
  putserv "privmsg x :access $chan $nick -modif"
  utimer 10 [list join_voice_utimer_10 $nick $uhost $hand $chan]
}

proc join_voice_utimer_10 { nick host hand chan } {
    global vchan botnick
   if {[onchan $nick $chan]} {
   if {![matchattr $hand |fglov $chan]} {
   if {![string match -nocase "*.undernet.org" $host]} {
      pushmode $vchan -v $nick
     utimer 11 [list puthelp "NOTICE $nick :AUTHENTICATION FAILED as $nick . Please join #Usernames and ask help regarding registering an username."]
     utimer 16 [list puthelp "NOTICE $nick :Remember:On undernet.org NICKSERV is NOT available $nick . Please GO TO : http://cservice.undernet.org/live/newus$
     return 1
   }
      utimer 14 [list puthelp "NOTICE $nick :AUTHENTICATION SUCCESSFUL as $host"]
      utimer 17 [list puthelp "NOTICE $nick :Remember: Nobody from CService will ever ask you for your password, do NOT give out your password to anyone clai$
      utimer 19 [list puthelp "NOTICE $nick :Please just ask your question in the channel without colours, bold, underline, repeat, offensive language"]
      utimer 23 [list putserv "privmsg X : voice $vchan $nick "]