Code: Select all
##########################################################################
# Channel modes that are available on QuakeNet #
# web url http://www.quakenet.org/faq/faq.php?c=176&f=177#177 #
# Put this script in in your scripts folder and add the line #
# source scripts/qunt.tcl #
# rehash or restart your bot, to use the script the command is. #
# /msg botnick qnet #
# #
##########################################################################
bind msg - qnet msg:qnet
bind msg - mode+b msg:mode+b
bind msg - mode+c msg:mode+c
bind msg - mode+C msg:mode+C
bind msg - mode+D msg:mode+D
bind msg - mode+d msg:mode+d
bind msg - mode+i msg:mode+i
bind msg - mode+k msg:mode+k
bind msg - mode+l msg:mode+l
bind msg - mode+m msg:mode+m
bind msg - mode+n msg:mode+n
bind msg - mode+N msg:mode+N
bind msg - mode+p msg:mode+p
bind msg - mode+r msg:mode+r
bind msg - mode+s msg:mode+s
bind msg - mode+t msg:mode+t
bind msg - mode+u msg:mode+u
bind msg - mode+v msg:mode+v
proc msg:qnet {nick uhost hand rest} {
putserv "NOTICE $nick :channel modes are available on QuakeNet "
putserv "NOTICE $nick :Channel mode +b <> Channel ban "
putserv "NOTICE $nick :Channel mode +c <> No control codes "
putserv "NOTICE $nick :Channel mode +C <> No channel CTCPs"
putserv "NOTICE $nick :Channel mode +D <> Delayed join mode "
putserv "NOTICE $nick :Channel mode +d <> Hidden users present "
putserv "NOTICE $nick :Channel mode +i <> Invite only "
putserv "NOTICE $nick :Channel mode +k, Key <> Key'ed (Passworded) Channel "
putserv "NOTICE $nick :Channel mode +l <> Limit "
putserv "NOTICE $nick :Channel mode +m <> Moderated "
putserv "NOTICE $nick :Channel mode +n <> No external messages "
putserv "NOTICE $nick :Channel mode +N <> No channel notices "
putserv "NOTICE $nick :Channel mode +o <> Operator "
putserv "NOTICE $nick :Channel mode +p <> Private "
putserv "NOTICE $nick :Channel mode +r <> Authed users only "
putserv "NOTICE $nick :Channel mode +s <> Secret "
putserv "NOTICE $nick :Channel mode +t <> Topic Lock "
putserv "NOTICE $nick :Channel mode +u <> No Part/Quit reasons "
putserv "NOTICE $nick :Channel mode +v <> Voice "
putserv "NOTICE $nick :NOTE <> By default, channels are created with the flags +tCNn "
putserv "NOTICE $nick :........."
putserv "NOTICE $nick :To see the Usage on a mode use mode + letter EX: /msg botnick mode+b will return"
putserv "NOTICE $nick :Channel mode +b "
putserv "NOTICE $nick :Channel ban "
putserv "NOTICE $nick :Bans an address from a channel. Any user with a host mask matching this address will be denied entry to the channel. If the user is already in the channel and does not have op/voice status, the user will not be able to speak."
putserv "NOTICE $nick :Usage: /MODE #channel +b nick!ident@host "
putserv "NOTICE $nick :Note: When a new QuakeNet fake host is banned (i.e. *!*@authname.users.quakenet.org) that authname is banned regardless of the user's host."
}
proc msg:mode+b {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +b "
putserv "NOTICE $nick :Channel ban "
putserv "NOTICE $nick :Bans an address from a channel. Any user with a host mask matching this address will be denied entry to the channel. If the user is already in the channel and does not have op/voice status, the user will not be able to speak."
putserv "NOTICE $nick :Usage: /MODE #channel +b nick!ident@host "
putserv "NOTICE $nick :Note: When a new QuakeNet fake host is banned (i.e. *!*@authname.users.quakenet.org) that authname is banned regardless of the user's host."
}
proc msg:mode+c {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +c "
putserv "NOTICE $nick :No control codes"
putserv "NOTICE $nick :Prohibits mIRC & ANSI control codes (colours/bold/underline/italics/reverse) from being sent to a channel."
putserv "NOTICE $nick :Usage: /MODE #channel +c "
}
proc msg:mode+C {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +C "
putserv "NOTICE $nick :No channel CTCPs"
putserv "NOTICE $nick :Prohibits channel wide CTCPs."
putserv "NOTICE $nick :Usage: /MODE #channel +C "
}
proc msg:mode+D {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +D"
putserv "NOTICE $nick :Delayed join mode"
putserv "NOTICE $nick :Joining users will not be shown until they are opped/voiced, change the topic or speak."
putserv "NOTICE $nick :Usage: /MODE #channel +D "
putserv "NOTICE $nick :Note that hidden users will not be revealed when the mode is cleared. Hidden users can be seen with /NAMES -d #channel."
}
proc msg:mode+d {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +d "
putserv "NOTICE $nick :Hidden users present"
putserv "NOTICE $nick :This mode is set automatically by a server when channel mode +D is cleared and there are still users hidden in the channel. It can only be set or cleared by the server and is removed automatically when all users become visible. Hidden users can be seen with /NAMES -d #channel."
}
proc msg:mode+i {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +i "
putserv "NOTICE $nick :Invite only "
putserv "NOTICE $nick :This prevents users from joining a channel until they are invited by a channel op, L, or Q "
putserv "NOTICE $nick :Usage: /MODE #channel +i"
putserv "NOTICE $nick :You may invite users by typing /INVITE nickname #channel. Note that inviting a user bypasses possible bans set on him."
}
proc msg:mode+k {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +k, Key"
putserv "NOTICE $nick :Key'ed (Passworded) Channel"
putserv "NOTICE $nick :Sets a key/password on a channel, without which people will be unable to join the channel. "
putserv "NOTICE $nick :Usage: /MODE #channel +k key "
putserv "NOTICE $nick :To join a channel which has a key set, do /JOIN #channel key"
putserv "NOTICE $nick :To remove channel mode +k, use /MODE #channel -k key"
}
proc msg:mode+l {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +l"
putserv "NOTICE $nick :Limit "
putserv "NOTICE $nick :Only allows a certain number of people to join the channel."
putserv "NOTICE $nick :Usage: /MODE #channel +l limit"
}
proc msg:mode+m {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +m "
putserv "NOTICE $nick :Moderated "
putserv "NOTICE $nick :This mode moderates the channel, i.e. prevents users without voice or op status from sending messages to a channel."
putserv "NOTICE $nick :Usage: /MODE #channel +m"
}
proc msg:mode+n {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +n "
putserv "NOTICE $nick :No external messages "
putserv "NOTICE $nick :This prevents users from externally messaging a channel. The users must be on the channel to message it. "
putserv "NOTICE $nick :Usage: /MODE #channel +n"
putserv "NOTICE $nick :Channel mode +N "
putserv "NOTICE $nick :No channel notices "
putserv "NOTICE $nick :Prohibits the sending of channel notices."
}
proc msg:mode+N {nick uhost hand rest} {
putserv "NOTICE $nick :Usage: /MODE #channel +N"
putserv "NOTICE $nick :Channel mode +o "
putserv "NOTICE $nick :Operator "
putserv "NOTICE $nick :Gives operator status to a user on a channel, allowing them to set or remove channel modes, kick/ban users, set the topic when channel mode +t is set and invite users into the channel. "
putserv "NOTICE $nick :Usage: /MODE #channel +o nickname "
}
proc msg:mode+p {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +p"
putserv "NOTICE $nick :Private"
putserv "NOTICE $nick :This prevents the users in the channel being viewed externally. The channel also does not appear in a /LIST or /WHOIS, however the topic can be viewed using the /TOPIC command. Also see channel mode +s. +p cannot be set at the same time as +s."
putserv "NOTICE $nick :Usage: /MODE #channel +p"
}
proc msg:mode+r {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +r "
putserv "NOTICE $nick :Authed users only "
putserv "NOTICE $nick :This mode only allows users authed with Q to join the channel. They will receive the message, You must be authed to join this channel (+r) when they attempt to join your channel when not authed. Once they have authed they will be able to join the channel normally. +r is a useful mode to set during flood attacks rather than +i (invite only)."
putserv "NOTICE $nick :Usage: /MODE #channel +r"
}
proc msg:mode+s {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +s"
putserv "NOTICE $nick :Secret"
putserv "NOTICE $nick :This prevents the users in the channel or the topic being viewed externally using /TOPIC. The channel also does not appear in a /LIST or /WHOIS. Also see channel mode +p. +s cannot be set at the same time as +p."
putserv "NOTICE $nick :Usage: /MODE #channel +s"
}
proc msg:mode+t {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +t "
putserv "NOTICE $nick :Topic Lock "
putserv "NOTICE $nick :Only channel operators may set the topic."
putserv "NOTICE $nick :Usage: /MODE #channel +t"
}
proc msg:mode+u {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +u "
putserv "NOTICE $nick :No Part/Quit reasons"
putserv "NOTICE $nick :If a user is in any channel with channel mode +u set their quit and part messages are stripped, e.g. Quit (User definable quit message) would appear as Quit (Signed off). "
putserv "NOTICE $nick :Usage: /MODE #channel +u"
}
proc msg:mode+v {nick uhost hand rest} {
putserv "NOTICE $nick :Channel mode +v "
putserv "NOTICE $nick :Voice "
putserv "NOTICE $nick :Gives voice status to a user on a channel, thus allowing them to speak when the channel is moderated."
putserv "NOTICE $nick :Usage: /MODE #channel +v nickname "
putserv "NOTICE $nick :By default, channels are created with the flags +tCNn"
}
putlog "Loaded : Quakenet channel modes info script By Smash. "
it all works well, apart from when i do.
/msg botnick mode+c
the bot will return the info for /msg botnick mode+C
and the same thing happens for monde+n and mode+N
so gess the bot cant tell between c and C
is there some thing i can use in the proc , to fix this ...?
