| View previous topic :: View next topic |
| Author |
Message |
avatar132
Voice
Joined: 17 Dec 2005
Posts: 21
|
 Posted: Sat Jan 07, 2006 3:09 pm Post subject: warn once, then ban after 3 minutes |
 |
|
hi, i've been trying to figure out how to do this but im totally lost.
Im tryin to get a script that will check a user's nickname on join for 2 things
1.) the word girl in the nick. if it sees girl it will ask the user once to change it, if they dont they will be banned in 3 minutes
2.) if a nick has numbers in it that are under 18 but excluding single digitals 10-17 maybe, (i.e.: kenola14 but not kenola1), it kick/ban the person and msg "you being banned because you are underage, if this incorrect please contact an op"
i was looking thru the forum, i could of swarn someone asked for something close to this a couple weeks ago but i couldnt find it
thanks in advance! |
|
| Back to top |
|
 |
demond
Revered One
Joined: 12 Jun 2004
Posts: 3073
Location: San Francisco, CA
|
| Posted: Sat Jan 07, 2006 7:33 pm Post subject: |
|
|
lol
_________________
connection, sharing, dcc problems? click <here>
before asking for scripting help, read <this>
use [code] tag when posting logs, code |
|
| Back to top |
|
|
avatar132
Voice
Joined: 17 Dec 2005
Posts: 21
|
| Posted: Sat Jan 07, 2006 8:48 pm Post subject: |
|
|
| lol? |
|
| Back to top |
|
|
demond
Revered One
Joined: 12 Jun 2004
Posts: 3073
Location: San Francisco, CA
|
| Posted: Sat Jan 07, 2006 11:08 pm Post subject: |
|
|
I don't know who you are really targeting, spammers and imposters or girls and children, but such naive effort won't stop anybody
_________________
connection, sharing, dcc problems? click <here>
before asking for scripting help, read <this>
use [code] tag when posting logs, code |
|
| Back to top |
|
|
Sir_Fz
Revered One
Joined: 27 Apr 2003
Posts: 3793
Location: Lebanon
|
|
| Back to top |
|
|
avatar132
Voice
Joined: 17 Dec 2005
Posts: 21
|
| Posted: Sun Jan 08, 2006 2:19 am Post subject: |
|
|
Its a 18+ Cybersex channel, [edited]... its getting very popular, 48+ daily. Honestly i dont know why they like to cyber, done it once didnt like it.. but we are gettin alot of underage in, already got a few scripts set in place.. that are helping big time, most of them had to modify to my needs.
but we have a VERY strict poilcy on young people in here |
|
| Back to top |
|
|
Alchera
Revered One
Joined: 11 Aug 2003
Posts: 3344
Location: Ballarat Victoria, Australia
|
| Posted: Sun Jan 08, 2006 10:29 am Post subject: |
|
|
I agree with demond; such efforts will not stop perverts let alone kids. So, underage boys are ok to enter but not girls?
Seriously, have you tried setting a channel key? Some kids actually have trouble fathoming channel keys. Setting it +s or +p (private) may also help. There's no real TCL solution.
_________________
Add [SOLVED] to the thread title if your issue has been.
Search | FAQ | RTM |
|
| Back to top |
|
|
Sir_Fz
Revered One
Joined: 27 Apr 2003
Posts: 3793
Location: Lebanon
|
| Posted: Sun Jan 08, 2006 10:31 am Post subject: |
|
|
You don't have to explain yourself, and next time don't open a new topic about it. (it went directly into the junk yard)
| Code: | bind join - "#gangbangsluts *" check:nick
bind time - * kick:girl
proc check:nick {n u h c} {
global gotgirl
if {[string match {*1[0234567]} $n]} {
putserv "kick $c $n :Underaged user, if incorrect msg one of the ops."
putserv "mode $c +b *!*@[lindex [split $u] 1]"
} elseif {[string match -nocase *girl* $n]} {
if {![info exists gotgirl([string tolower $n:[lindex [split $u @] 1]])]} {
set gotgirl([string tolower $n:[lindex [split $u @] 1]]) [unixtime]
puthelp "notice $n :You have 3 minutes to change your nick or else you'll get banned."
}
}
}
proc kick:girl {m args} {
global gotgirl
foreach {nu t} [array get gotgirl] {
if {([unixtime] - $t)/60 >= 3} {
if {[onchan [set n [lindex [split $nu :] 0]] #gangbangsluts]} {
putserv "kick #gangbangsluts $n :You have the phrase girl in your nick which is against our chan's policy"
putserv "mode #gangbangsluts +b *!*@[lindex [split $nu :] 1]"
}
unset gotgirl($nu)
}
}
} |
_________________
Follow me on GitHub
- Opposing
Public Tcl scripts |
|
| Back to top |
|
|
avatar132
Voice
Joined: 17 Dec 2005
Posts: 21
|
| Posted: Sun Jan 08, 2006 11:38 am Post subject: |
|
|
Worked perfect Sir_Fz, thank you!
this script will also be servered as a learnning tool for myself, so i can understand some of the verablies... is there any good learner help sites for tcl? |
|
| Back to top |
|
|
avatar132
Voice
Joined: 17 Dec 2005
Posts: 21
|
| Posted: Sun Jan 08, 2006 11:41 am Post subject: |
|
|
| Quote: | Alchera Said:
So, underage boys are ok to enter but not girls? |
Surprisingly we dont have a problem with underage boys, maybe once or twice, but no where next needing to writing up a script for it |
|
| Back to top |
|
|
Sir_Fz
Revered One
Joined: 27 Apr 2003
Posts: 3793
Location: Lebanon
|
|
| Back to top |
|
|
demond
Revered One
Joined: 12 Jun 2004
Posts: 3073
Location: San Francisco, CA
|
| Posted: Sun Jan 08, 2006 1:51 pm Post subject: |
|
|
| avatar132 wrote: | | Quote: | Alchera Said:
So, underage boys are ok to enter but not girls? |
Surprisingly we dont have a problem with underage boys, maybe once or twice, but no where next needing to writing up a script for it |
one would think it should be other way around 
_________________
connection, sharing, dcc problems? click <here>
before asking for scripting help, read <this>
use [code] tag when posting logs, code |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
