Something

#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 :- X - Hi, I'm just checking some things, if you are logged into your username I will voice you in a moment, if not, please Try #Usernames instead or http://cservice.undernet.org/live/newuser.php"
  }
}



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

bind join - * join_voice_utimer_10
proc join_voice_utimer_10 { nick host hand chan } {
   global vchan botnick
   if {![string match -nocase "*.undernet.org" $host]} {
    # utimer 5 [list \ 
    #   pushmode $vchan +b $nick ; \
    #   puthelp "NOTICE $nick :- X -You do not have +x mode. Only *.users.undernet.org can get +v on $vchan .Please join #Usernames and ask help regarding registering an username." ; \
    #   return 1]
      utimer 5 [list putserv "privmsg :X@channels.undernet.org :ban $chan $nick 1 100 You do not have +x mode.Please join #Usernames and ask help regarding registering an username."]
      return 1
   }
   utimer 30 [list pushmode $vchan +v $nick ;  puthelp "NOTICE $nick :- X - Hi, Please just ask your question without colours, bold, underline, and mind your language (type !menu to see all public commands for $chan)"]
   return 1
}