this is from quickbot:
Code: Select all
bind join * * Join:Checkjoin
set bossjmsg "Please Welcome \$unick, he is an $groupname Owner, and receives Auto-Op"
set adminjmsg "Please Welcome \$unick, he is an $groupname Admin, and receives Auto-Op"
set helperjmsg "Please Welcome \$unick, The is an $groupname Helper, and receives Auto-Voice"
proc Join:Checkjoin { nick userhost handle chan } {
global home bossjmsg adminjmsg helperjmsg
set unick $nick
if {[matchattr $nick L] == 1 } {
if {[matchattr $nick |o $chan ] == 1 } {
putserv "MODE $chan +o $nick "
}
if {[matchattr $nick |v $chan ] == 1 } {
putserv "MODE $chan +v $nick "
}
if {[matchattr $nick n] == 1} {
putserv "MODE $chan +o $nick "
putserv "PRIVMSG $chan :[subst $bossjmsg]"
msg $home "Owner $nick joined $chan, Auto-Op given!"
}
if {[matchattr $nick m] == 1 && [matchattr $nick n] == 0} {
putserv "MODE $chan +o $nick "
putserv "PRIVMSG $chan :[subst $adminjmsg]"
msg $home "Admin $nick joined $chan, Auto-Op given!"
}
if {[matchattr $nick H] == 1 && [matchattr $nick m] == 0} {
putserv "MODE $chan +v $nick "
putserv "PRIVMSG $chan :[subst $helperjmsg]"
msg $home "Helper $nick joined $chan, Auto-Voice given!"
}
}
}
I have given him the same flags like I have, but it still doesn't work.
Can anyone help me please?
Would be very nice!