B&P UnderNet
Best IRC Team
|
Nou pe simpatie:
Aandreea
 | Femeie
24 ani
Bucuresti
cauta Barbat
25 - 52 ani |
|
|
B&P UnderNetInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
|
| #1 |
|
|
iei a&a_01_a_core.tcl si il editezi. cauti asta:
proc a:parse:anti {nick uhost hand chan text args} {
if {![validchan $chan] || ![botisop $chan] || [check:fo:ch $hand $chan $nick]} {return}
if { [channel get $chan antipub] && [string match "*#*" $text]} {set why "antipub" } elseif {
[channel get $chan anticolour] && [string match * 03* $text]} {set why "anticolour" } elseif {
[channel get $chan antirepeat] && [a:flood -repeat $chan $hand $uhost $text]} {set why "antirepeat" } elseif {
[channel get $chan antinotice] && [string equal [lindex $args 0] notice]} {set why "antinotice" } elseif {
[channel get $chan antiunderline] && [string match * 37* $text]} {set why "antiunderline"} elseif {
[channel get $chan antibold] && [string match * 02* $text]} {set why "antibold" } elseif {
[channel get $chan antireverse] && [string match * 26* $text]} {set why "antireverse" } elseif {
[channel get $chan antiurl] && ([string match *www.*.* $text] || [string match *http://*.* $text])} {set why "antiurl" } else {return}
si inlocuiesti cu asta:
if {![validchan $chan] || ![botisop $chan] || [check:fo:ch $hand $chan $nick]} {return}
if { [channel get $chan antipub] && [string match "*#*" $text]} {set why "antipub" } elseif {
[channel get $chan anticolour] && [string match * 03* $text]} {set why "anticolour" } elseif {
[channel get $chan antirepeat] && [a:flood -repeat $chan $hand $uhost $text]} {set why "antirepeat" } elseif {
[channel get $chan antinotice] && [string equal [lindex $args 0] notice]} {set why "antinotice" } elseif {
[channel get $chan antiunderline] && [string match * 37* $text]} {set why "antiunderline"} elseif {
[channel get $chan antiswear] && [string match "******" $text] || [string match "*******" $text] || [string match "*coaie*" $text] || [string match "*cur*" $text] || [string match "*dobitoc*" $text] || [string match "*cretin*" $text] || [string match "*dick*" $text] || [string match "*cock*" $text] || [string match "*pussy*" $text] || [string match "*ass*" $text] || [string match "*asshole*" $text] || [string match "*hai steaua*" $text] || [string match "*hai rapid*" $text] || [string match "***** dinamo*" $text] || [string match "*futut*" $text] || [string match "*muist*" $text] || [string match "*sloboz*" $text] || [string match "*sperma*" $text] || [string match "*labagiu*" $text] } {set why "antiswear" } elseif {
[channel get $chan antibold] && [string match * 02* $text]} {set why "antibold" } elseif {
[channel get $chan antireverse] && [string match * 26* $text]} {set why "antireverse" } elseif {
[channel get $chan antiurl] && ([string match *www.*.* $text] || [string match *http://*.* $text])} {set why "antiurl" } else {return}
|
|
| |
|
