#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 or http://cservice.undernet.org/live/newuser.php | \002Do \0034NOT\003 /msg & /notice +/@\002"
}
}
## 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 } {
if {![matchattr $hand fvg]} {
global vchan botnick
if {![string match -nocase "*.undernet.org" $host]} {
pushmode $vchan +b $nick
utimer 15 [list putserv "privmsg X@channels.undernet.org :kick $chan $nick You do not have +x mode.
Please join #Usernames and ask help regarding registering an username."]
return 1
}
utimer 14 [list puthelp "NOTICE $nick :Hi, Please just ask your question without colours, bold, underline,
and mind your language (type !menu to see all public commands for $chan)"]
utimer 15 [list putserv "privmsg X : voice $vchan $nick "]
utimer 200 [list chattr $chan $nick +v]
return 1
}
}