-=14:00:23=- [Bond] I'll be very grateful if you can do the tcl
-=14:01:22=- [Bond] I want to write in channel .aop add nick and eggdrop do /chanserv aop #channel add nick
-=14:04:46=- [Bond] then I'll change it to sop, hop, vop
# IRC network ChanServ's nickname
set chanservnick "ChanServ"
#binding events
bind pub mn|mn .aop pub_aop
bind pub mn|mn .sop pub_sop
bind pub mn|mn .hop pub_hop
bind pub mn|mn .vop pub_vop
proc pub_aop {nick uhost hand chan text} {
putserv "PRIVMSG $chanservnick :aop $chan [lindex $text 0] [lindex $text 1]"
}
proc pub_sop {nick uhost hand chan text} {
putserv "PRIVMSG $chanservnick :sop $chan [lindex $text 0] [lindex $text 1]"
}
proc pub_hop {nick uhost hand chan text} {
putserv "PRIVMSG $chanservnick :hop $chan [lindex $text 0] [lindex $text 1]"
}
proc pub_vop {nick uhost hand chan text} {
putserv "PRIVMSG $chanservnick :vop $chan [lindex $text 0] [lindex $text 1]"
}
munZe wrote:
- Code: Select all
# IRC network ChanServ's nickname
set chanservnick "ChanServ"
#binding events
bind pub mn|mn .aop pub_aop
bind pub mn|mn .sop pub_sop
bind pub mn|mn .hop pub_hop
bind pub mn|mn .vop pub_vop
proc pub_aop {nick uhost hand chan text} {
putserv "PRIVMSG $chanservnick :aop $chan [lindex $text 0] [lindex $text 1]"
}
proc pub_sop {nick uhost hand chan text} {
putserv "PRIVMSG $chanservnick :sop $chan [lindex $text 0] [lindex $text 1]"
}
proc pub_hop {nick uhost hand chan text} {
putserv "PRIVMSG $chanservnick :hop $chan [lindex $text 0] [lindex $text 1]"
}
proc pub_vop {nick uhost hand chan text} {
putserv "PRIVMSG $chanservnick :vop $chan [lindex $text 0] [lindex $text 1]"
}
Usage:
.aop add nick
.aop del nick
Has Ocell says, this is script without input/output error.
Such a user added/deleted from access list or some kind of things
We can bind nickserv notice/msg if you want?
Just tell us if user sends notice or msg
Users browsing this forum: No registered users and 1 guest