#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 15 [list putserv "privmsg X@channels.undernet.org :voice $chan $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
}