This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.
For more information, see this announcement post . Click the X in the top right-corner of this box to dismiss this message.
Old posts that have not been replied to for several years.
Sir_Fz
Revered One
Posts: 3793 Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:
Post
by Sir_Fz » Wed Jun 18, 2003 6:04 am
Well can u make Tsunami.tcl work on Notice Floods too ?
is it like bind * NOTC ... or something to add ?
caesar
Mint Rubber
Posts: 3776 Joined: Sun Oct 14, 2001 8:00 pm
Location: Mint Factory
Post
by caesar » Wed Jun 18, 2003 9:10 am
Code: Select all
##
# "x" notices sent to channel in "y" seconds will lock the channel for "z" minutes"
set ntl 5:3:60
##
# What channel modes do you want to be used when locking the channel?
set modes "mr"
##
# How the ban reason should sound like?
set ntcbreas "Some reason here.."
##
# For how many minutes the flooder should be banned?
set ntctime 5
#
###
#### Done with configurations, do not edit past here unless you know TCL!
###
#
# binds #
bind notc - * chan:notice
bind part - * notice:part
# stuff #
set blist ""
# array fix #
foreach dest [channels] {
set ntc([strlwr $dest]) 0
}
# notice? #
proc chan:notice {nick uhost hand text dest} {
global ntc blist
if {[lindex [split $dest "@"] 0] == $::botnick || [lindex [split $dest "@"] 1] != ""} {
return
}
set cm [getchanmode [strlwr $dest]]
if {(([string match {+*[$::modes]*[::modes]*} $cm]) && ([llength [split $::modes]] == 1)) || (([string match {+*[::modes]*[::modes]* *} $cm]) && ([length [split $cm]] > 1))} { return }
if {![info exists ntc([strlwr $dest])]} { set ntc([strlwr $dest]) 0 }
lappend blist [strlwr $nick]
set nonotc [lindex [split $::ntl ":"] 0]
set insec [lindex [split $::ntl ":"] 1]
set unlockin [lindex [split $::ntl ":"] 2]
incr ntc([strlwr $dest])
utimer $insec [list reset [strlwr $dest]]
utimer $insec [list remove [strlwr $uhost]]
if {$ntc([strlwr $dest]) >= $nonotc} {
putquick "MODE [strlwr $dest] +$::modes" -next
foreach luser $blist {
set mask "*!*@[lindex [split [getchanhost $luser [strlwr $dest]] @] 1]"
newchanban [strlwr $dest] $mask $::botnick $::ntcbreas $::ntctime
}
utimer $unlockin [list unlock [strlwr $dest]]
}
}
# reset #
proc reset {dest} {
global ntc
incr ntc([strlwr $dest]) -1
return
}
# remove #
proc remove {nick} {
global blist
set index [lsearch -exact $blist [strlwr $nick]]
set blist [lreplace $blist $index $index]
return
}
# unlock #
proc unlock {dest} {
putquick "MODE [strlwr $dest] -$::modes"
return
}
# array remove #
proc notice:part {nick uhost hand chan msg} {
global ntc
if {$nick != $::botnick} {
return
}
foreach arr_part [array names ntc] {
if {[string match [strlwr $chan] $arr_part]} {
array unset ntc [strlwr $chan]
}
}
}
I've tested it and seemed to be working fine. Let me know if something is not working properly.
Once the game is over, the king and the pawn go back in the same box.
Sir_Fz
Revered One
Posts: 3793 Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:
Post
by Sir_Fz » Wed Jun 18, 2003 11:25 am
Well Sentinel worked but your code didn't do anything.
It didn't give any errors though. can u find an explanation for this ?
caesar
Mint Rubber
Posts: 3776 Joined: Sun Oct 14, 2001 8:00 pm
Location: Mint Factory
Post
by caesar » Wed Jun 18, 2003 3:43 pm
I may have a hint, anyway, better stick to Sentitel, since is a real protection thing when the tsunami.tcl was practicaly a test, wanted to see if I can do something like that. Never intentioned to make it public.. oh well, Sentinel is more leet than mine so use it.
Once the game is over, the king and the pawn go back in the same box.
Sir_Fz
Revered One
Posts: 3793 Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:
Post
by Sir_Fz » Thu Jun 19, 2003 4:01 am
Well I always use Sentinel, its the most important script for botnet floods.
but u must put high numbers for it to trigger (for example 12:20 - the seconds must be in the range of 20-60 so the script woud find the flooders)
I liked Tsunami.tcl cuz u can put low triggers, I just want it to detect on notice too.
thanx
caesar
Mint Rubber
Posts: 3776 Joined: Sun Oct 14, 2001 8:00 pm
Location: Mint Factory
Post
by caesar » Fri Jun 20, 2003 2:25 pm
Get the new version of the script from
here .. Also, please do tell me if you notice something wrong. Thank you.
Once the game is over, the king and the pawn go back in the same box.
Sir_Fz
Revered One
Posts: 3793 Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:
Post
by Sir_Fz » Sat Jun 21, 2003 6:10 am
Thanx
this version looks nice, I'll try it when I sit on my PC and tell u if there's something wrong ot not working.
Sir_Fz
Revered One
Posts: 3793 Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:
Post
by Sir_Fz » Sat Jun 21, 2003 11:12 am
Well The script is very very good
it worked for both Notice Tsunami and longline tsunami floods.
But there's a little problem, the bot makes a mode flood like:
· · ChanMode: @Laged sets mode [ +mR ]
· · ChanMode: @Laged sets mode [ +mR ]
(after unlock time )
· · ChanMode: @Laged sets mode [ -mR ]
· · ChanMode: @Laged sets mode [ -mR ]
· · ChanMode: @Laged sets mode [ -mR ]
can u fix it in a way that it locks the channel once and unlocks once.
or atleast unlock the channel only once please
Thank you again for this good script
caesar
Mint Rubber
Posts: 3776 Joined: Sun Oct 14, 2001 8:00 pm
Location: Mint Factory
Post
by caesar » Sat Jun 21, 2003 2:26 pm
The *chanmode* confused me a bit. Anyway, fixed it, added what you've asked for. Get the latest version from
here .. Thank you for reporting the bug.
Once the game is over, the king and the pawn go back in the same box.
Sir_Fz
Revered One
Posts: 3793 Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:
Post
by Sir_Fz » Sat Jun 21, 2003 4:19 pm
Well man, the locking is good (2 time maximum if the flood is big)
But the unlocking is annoying, it unlocks for like 5 or 6 times.
can u make it like, if mode set by bot for tsunami, then bot unlocks once.
or something like that ?
caesar
Mint Rubber
Posts: 3776 Joined: Sun Oct 14, 2001 8:00 pm
Location: Mint Factory
Post
by caesar » Sat Jun 21, 2003 4:38 pm
Are you absolutly shure you got the latest version (0.3) and replaced and also removed + unloaded the older versions befor loading the new one? Also, if it's possible please do give me an exaple how did he locked and unlocked the channel more than once. In my tests he locked and unlocked it only once..
Once the game is over, the king and the pawn go back in the same box.
Sir_Fz
Revered One
Posts: 3793 Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:
Post
by Sir_Fz » Sat Jun 21, 2003 5:20 pm
Script:
And I'm sure I removed the old one and rehashed+restarted the bot before I tested the script:
· · Joins: h7378 [ ~q1926@80.84.128.143] - Clones from *!*@80.84.128.143 (h7378 q5920 w400[3])
· · Performing custom penalty on h7378 about join.
· · Joins: d8486 [ ~f5209@80.84.128.148] - Clones from *!*@80.84.128.148 (d8486 r648 w336[3])
« h7378 » JaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoT
« r648 » JaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoTJaZNoT
· · ChanMode: @Laged sets mode [ +mR ]
· · Kicks: d8486 was kicked from #web4u by [ @Laged ] : [ Codes/LongLine Tsunami flooder - Banned 5mins. ]
*** Laged sets mode: +b *!*@80.84.128.148
*** q5920 was kicked by Laged (Codes/LongLine Tsunami flooder - Banned 5mins.)
· · Kicks: w400 was kicked from #web4u by [ @Laged ] : [ banned: Codes/LongLine Tsunami flooder - Banned 5mins. ]
· · ChanMode: @Laged sets mode [ -mR ]
· · ChanMode: @Laged sets mode [ -mR ]
· · ChanMode: @Laged sets mode [ -mR ]
and I have also concluded that if the bot locks once, it unlocks 3 times.
If the bot locks twice, it unlocks 4 or six times.
caesar
Mint Rubber
Posts: 3776 Joined: Sun Oct 14, 2001 8:00 pm
Location: Mint Factory
Post
by caesar » Sat Jun 21, 2003 5:26 pm
Replace the unlock proc with this one:
Code: Select all
proc tsunlock {args} {
switch -- [lindex $args 0] {
"tlines" {
set cm [getchanmode [strlwr [lindex $args 1]]]
if {([string match {+*\[$::linemds]*\[$::linemds]*} $cm]) && ([llength [split $cm]] >= 1)} {
putquick "MODE [strlwr [lindex $args 1]] -$::linemds"
return
}
}
"tnotc" {
set cm [getchanmode [strlwr [lindex $args 1]]]
if {([string match {+*\[$::notcmds]*\[$::notcmds]*} $cm]) && ([llength [split $cm]] >= 1)} {
putquick "MODE [strlwr [lindex $args 1]] -$::notcmds"
return
}
}
}
}
and see if this helps..
Once the game is over, the king and the pawn go back in the same box.
Sir_Fz
Revered One
Posts: 3793 Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:
Post
by Sir_Fz » Sat Jun 21, 2003 5:54 pm
Well using this proc, the bot doesn't unlock at all.
Sir_Fz
Revered One
Posts: 3793 Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:
Post
by Sir_Fz » Sat Jun 21, 2003 6:03 pm
Reply Deleted (it wasn't correct) sorry
.
Last edited by
Sir_Fz on Sun Jun 22, 2003 4:50 pm, edited 2 times in total.