egghelp/eggheads community

Help with a script

2003-07-23T18:02:10-04:00

thanx "* *\\~*@*" worked

Statistics: Posted by Sir_Fz — Wed Jul 23, 2003 6:02 pm

Help with a script

2003-07-23T09:29:29-04:00

\\~

Statistics: Posted by user — Wed Jul 23, 2003 9:29 am

Help with a script

2003-07-23T07:36:27-04:00

~ matches 1 or more space characters (can be used for whitespace between words)

ok so it should be "* *\~\*@*" or what ??

Statistics: Posted by Sir_Fz — Wed Jul 23, 2003 7:36 am

Help with a script

2003-07-23T06:38:02-04:00

but are u sure that the "* *~*@*" will check for only users with "~" in there idents ??

I'm sure it won't. Read the part about match chars in binds at the bottom of tcl-commands.doc
(escape with two backslashes)

Statistics: Posted by user — Wed Jul 23, 2003 6:38 am

Help with a script

2003-07-23T05:22:39-04:00

ok, I new it was a missin bracket, but i didn't notice it lol, thanx for your good observation

but are u sure that the "* *~*@*" will check for only users with "~" in there idents ??

Statistics: Posted by Sir_Fz — Wed Jul 23, 2003 5:22 am

Help with a script

2003-07-23T05:02:32-04:00

If you'd read your error messages you'd know. (missing close bracket in the string eq-line.)

Statistics: Posted by user — Wed Jul 23, 2003 5:02 am

Help with a script

2003-07-23T04:52:35-04:00

anybody ? why didn't it work ?

Statistics: Posted by Sir_Fz — Wed Jul 23, 2003 4:52 am

Help with a script

2003-07-22T15:31:55-04:00

using:

Code:

bind part - "* *~*@*" partchkproc partchk {nick uhost hand chan rsn} {if {[string eq -nocase $chan $rsn} { if {[getchanjoin $nick $chan] >= [expr {[clock seconds]-4}]} {  set ban "*!~*@[lindex [split $uhost @] end]"  newban $ban $::botnick "spammer." 0  } }}

didn't work, any reasons why ?
Note: the user joined and parted with reason "$chan" within 2 or 3 seconds.

Statistics: Posted by Sir_Fz — Tue Jul 22, 2003 3:31 pm

Help with a script

2003-07-22T07:01:11-04:00

okay, thanx

Statistics: Posted by Sir_Fz — Tue Jul 22, 2003 7:01 am

Help with a script

2003-07-22T05:49:42-04:00

[snip]... for more than 7 ...[/snip]
this will kick the user if he stays for mor than 7secs or it wil ban the uhost if he parts after he join in these 7secs ?

Sorry about adding misleading comments (I meant "for LESS than 7 seconds").

Statistics: Posted by user — Tue Jul 22, 2003 5:49 am

Help with a script

2003-07-22T03:53:54-04:00

yes.
yes... although the right syntax would be bind part - "* *~*@*"

Statistics: Posted by Papillon — Tue Jul 22, 2003 3:53 am

Help with a script

2003-07-21T15:49:04-04:00

[snip]
# did this luser stay for more than 7 seconds?
if {[getchanjoin $n $c]>=[expr {[clock seconds]-7}]}
[snip]

this will kick the user if he stays for mor than 7secs or it wil ban the uhost if he parts after he join in these 7secs ?

also if i do bind part - "*!~*@*" then it will check only for users with ~ in their ident ?

Statistics: Posted by Sir_Fz — Mon Jul 21, 2003 3:49 pm

Help with a script

2003-07-22T05:50:22-04:00

what it would be like ??
if {[getchanjoin * $chan] >= -7} {.... ??

No. Not unless your current time is 23:59:53 12/31/1969 and the nick of your parter is '*'.

Fetch the current time in seconds since 1970 using 'clock seconds' or 'unixtime'.

Here's some code to get you started:

Code:

bind part - "#test *" partchkproc partchk {n u h c a} {# was the part reason == the channel name?if {[string eq -nocase $c $a]} {# did this luser stay for less than 7 seconds?if {[getchanjoin $n $c]>=[expr {[clock seconds]-7}]} {# yup...ban *!*@[lindex [split $u @] end] or whatever}}}

Statistics: Posted by user — Mon Jul 21, 2003 10:03 am

Help with a script

2003-07-21T02:14:50-04:00

what it would be like ??
if {[getchanjoin * $chan] >= -7} {.... ??

Statistics: Posted by Sir_Fz — Mon Jul 21, 2003 2:14 am

Help with a script

2003-07-20T19:49:27-04:00

getchanjoin
Returns: timestamp (unixtime format) of when the specified nickname
joined the channel
Module: irc
how do I use it ? and explain more to me how the time is measured plz.

Use getchanjoin in the proc triggered by the part bind to find out when the person parting joined... if that time >= (current time - 7) ban the user.

'unixtime' is the number of seconds since 00:00:00 01/01/1970

Statistics: Posted by user — Sun Jul 20, 2003 7:49 pm