|
 |
|
 |
| |
| |
 |
Ro-Tcl
Aici Gasesti Tot Felul De Tcl`uri
|
 |
|
Acum este: 11/10/2026 13:54
|
| Autor |
Mesaj |
MeBoy
Junior
Data inscrierii: 30/Iun/2008
Mesaje: 5
|
 Trimis: 01/07/2008 14:24 Titlul subiectului: antispam.tcl |
 |
|
| Cod: | #Antispam With cycle command
#set bantime
set bantime 30
bind msgm - "*" pv_kick2
proc pv_kick2 {nick uhost hand text} {
global botnick bantime
if {[regexp -nocase "#" $text] || [regexp -nocase "join" $text] || [regexp -nocase "channel" $text] || [regexp -nocase "klik" $text] || [regexp -nocase "www" $text] || [regexp -nocase "pussy" $text] || [regexp -nocase "http" $text] || [regexp -nocase "server" $text] || [regexp -nocase "click" $text] > 0} {
foreach pvchan2 [channels] {
if {![isop $nick $pvchan2] || ![isvoice $nick $pvchan2]} {
if {[onchan $nick $pvchan2]} {
set pvmask2 "*!*$uhost"
if {![ischanban $pvmask2 $pvchan2] || [botisop $pvchan2]} {
set pvkickmsg2 "12Msg Spam 30min. Ban!"
putquick "KICK $pvchan2 $nick :$pvkickmsg2"
putquick "mode $pvchan2 +b $pvmask2 $bantime"
}
}
}
}
}
}
#### Cycle Command ###
## set how many minutes for cycle
set timecycle 10
timer $timecycle part_chan
proc part_chan {} {
global timecycle
foreach chancycle [channels] {
putserv "PART $chancycle :4Spam Check!"
timer $timecycle part_chan
}
} |
Autorul scriptului nu'l stiu...E luat scriptul de pe [url]http://qands.ucoz.com/index/0-13[/url]
_________________
#U&U Reprezentative |
|
| Sus |
|
| Autor |
Mesaj |
animalplanet2
Junior
Data inscrierii: 10/Iul/2012
Mesaje: 6
Localitate: Poland
|
| Trimis: 24/07/2012 10:19 Titlul subiectului: |
|
|
| I like your post, very interesting indeed. |
|
| Sus |
|
| Autor |
Mesaj |
animalplanet2
Junior
Data inscrierii: 10/Iul/2012
Mesaje: 6
Localitate: Poland
|
| Trimis: 26/07/2012 05:42 Titlul subiectului: |
|
|
| In my little fantasy world it's different! The more you can add a little more information! |
|
| Sus |
|
|
Nu puteti crea un subiect nou in acest forum
Nu puteti raspunde in subiectele acestui forum
Nu puteti modifica mesajele proprii din acest forum
Nu puteti sterge mesajele proprii din acest forum
Nu puteti vota in chestionarele din acest forum
|
| |
 |
|
 |
|
|
