| View previous topic :: View next topic |
| Author |
Message |
pavel_kbc Voice
Joined: 28 Dec 2006 Posts: 23
|
Posted: Tue Jan 02, 2007 11:51 am Post subject: Requests: ignore user scripts |
|
|
hello. can anyone make scripts like this?
<x-r00t-x> perlbot, ignore lord 20000
<perlbot> lord (*!*@*.bois.qwest.net) is being ignored for 1 week, 6 days, 21 hours, 20 minutes
so the bot cant see users command and logs . etc
EDIT: i saw this on a perl bitch bot .  _________________ join my irc channel |
|
| Back to top |
|
 |
Sir_Fz Revered One

Joined: 27 Apr 2003 Posts: 3793 Location: Lebanon
|
Posted: Tue Jan 02, 2007 7:10 pm Post subject: |
|
|
| Code: | bind pub n|n !ignore ignore:user
proc ignore:user {nick uhost hand chan arg} {
if {[scan [join [lrange [split $arg] 0 1]] {%s %s} n t] != 2} {return 0}
if {![isignore [set h [maskhost [getchanhost $n $chan]]]]} {
newignore $h $hand "PUBLIC CMD" $t
puthelp "privmsg $chan :$n ($h) is being ignored for [duration [expr {$t*60}]]."
}
} |
You need to be an owner (global or channel-specific +n flag) to be able to use the !ignore command. _________________ Follow me on GitHub
- Opposing
Public Tcl scripts
Last edited by Sir_Fz on Tue Jan 02, 2007 8:29 pm; edited 1 time in total |
|
| Back to top |
|
 |
pavel_kbc Voice
Joined: 28 Dec 2006 Posts: 23
|
Posted: Tue Jan 02, 2007 7:58 pm Post subject: |
|
|
umm its seem its not working to me.
and please change public command to !ignore
thank you. _________________ join my irc channel |
|
| Back to top |
|
 |
Sir_Fz Revered One

Joined: 27 Apr 2003 Posts: 3793 Location: Lebanon
|
|
| Back to top |
|
 |
pavel_kbc Voice
Joined: 28 Dec 2006 Posts: 23
|
|
| Back to top |
|
 |
|