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.

Search found 481 matches

by r0t3n
Mon Dec 31, 2007 6:47 pm
Forum: Script Requests
Topic: request admin and or op stats
Replies: 7
Views: 3405

Try:

Code: Select all

bind need - {#mychannel *} proc:need

proc proc:need {channel type} {
    global botnick
    if {$type == "op"} {
        putquick "PRIVMSG chanserv :admin $channel $botnick"
        return 1
    }
}
by r0t3n
Sat Dec 29, 2007 4:57 pm
Forum: Shell & Bouncer Help
Topic: I need a small script for one sBNC user
Replies: 6
Views: 12058

I agree with metroid.. this will only use up needed Q resources and what will it give to users in the end, a stupid little 'haha', its lame and im sure no decent tcl coder will even go that low to make it in my opinion.
by r0t3n
Thu Dec 13, 2007 1:32 pm
Forum: Script Support & Releases
Topic: Antiproxy by metroid
Replies: 29
Views: 18404

If i remember correctly, for your bot to manage the banlist you must set the channel +dynamicbans, if this is not set then the bot wont remove expired bans. @Zircon: You need to remember that custom flags should be in capitals, so your +h should be +H, all lowercase flags are used and/or reserved fo...
by r0t3n
Wed Dec 12, 2007 2:46 pm
Forum: Script Support & Releases
Topic: Antiproxy by metroid
Replies: 29
Views: 18404

This in an easy fix for excepting host(s): Change the proxy::checkuser proc to this: proc proxy::checkuser {nickname hostname handle channel} { checkstats $channel if {[channel get $channel antiproxy] && [botisop $channel] && ![string match *users.quakenet.org* $hostname] && ...
by r0t3n
Mon Nov 12, 2007 3:36 pm
Forum: Script Requests
Topic: [SOLVED] Chan. Notice:not to send notice to a kick/ban usr
Replies: 5
Views: 3628

The problem is that you dont check if the user is STILL on the channel AFTER the 10 seconds. set welc(msg1) "1st line message" set welc(msg2) "2nd line message" set welc(chan) "#MyChannel" set welc(type) "1" bind join - #MyChannel* welcome:join proc welcome:jo...
by r0t3n
Fri Nov 09, 2007 3:35 pm
Forum: Scripting Help
Topic: selecting a random item from an array
Replies: 8
Views: 4004

a little error there Sir_Fz, forgot the rand...

Code: Select all

set playersList [array names players]
set tnick [lindex $playersList [rand [llength $playersList]]]
or in one line:

Code: Select all

set tnick [lindex [array names players] [rand [array names players]]]
by r0t3n
Tue Oct 30, 2007 3:50 pm
Forum: Script Requests
Topic: Help me with a lil` script here
Replies: 5
Views: 4070

use a slower eggdrop queue, ie instead of 'putquick' use 'putserv' or 'puthelp'.
by r0t3n
Tue Oct 30, 2007 3:43 pm
Forum: Scripting Help
Topic: The best way to do this?
Replies: 4
Views: 2809

Lets say you have a mysql database named akicks, with the fields mask, set. bind time - "?0 * * * *" akick:update proc akick:update {min hour day month year} { if {[catch {[set mysql [mysql::connect -user username -password mypassword -host localhost -port 3306 -db akicks]} err]} { putlog ...
by r0t3n
Tue Oct 23, 2007 5:21 pm
Forum: Script Requests
Topic: help me with this script plz...
Replies: 3
Views: 2362

It might be because the socket does not get closed quick enough before another packet gets sent to the handler... Try something like this: proc scan_join {nick host hand chan} { variable banport; variable handle if {[matchattr $hand $handle|$handle $chan]} {return} set hostname [lindex [split $host ...
by r0t3n
Thu Oct 18, 2007 3:03 pm
Forum: Eggdrop Help
Topic: Bot ignores Services on connect
Replies: 4
Views: 2362

in your config file you should find a 'set flood-msg x|y' (where x and y is some digit/number), change it to 'set flood-msg 0:0' and make sure all hosts in the ignore list are removed, then it should now not ignore the operserv's host.
by r0t3n
Mon Oct 15, 2007 12:28 pm
Forum: Script Requests
Topic: Clone scan
Replies: 24
Views: 13564

change all

Code: Select all

$clonescan($strip)
to

Code: Select all

$clonescan(strip)
by r0t3n
Wed Oct 10, 2007 2:12 pm
Forum: Script Requests
Topic: Clone scan
Replies: 24
Views: 13564

I added a extra } in one of the expr's by mistake, the edited version should work now...
by r0t3n
Tue Oct 09, 2007 12:26 pm
Forum: Script Requests
Topic: Clone scan
Replies: 24
Views: 13564

I edited the script above, give it a try, it should work.
by r0t3n
Mon Oct 08, 2007 3:03 pm
Forum: Script Requests
Topic: Clone scan
Replies: 24
Views: 13564

set clonescan(channel) "#mychannel" set clonescan(relaychan) "#staff" set clonescan(strip) "0"; # set this to 1 to strip ~ from idents bind join - * onjoin:clonescan proc onjoin:clonescan {nick uhost hand chan} { global clonescan if {[lsearch -exact [string tolower $cl...
by r0t3n
Thu Sep 13, 2007 3:47 pm
Forum: Other Topics
Topic: Trojan detection
Replies: 6
Views: 3571

If we have just a few good/working algothims in one thread, it will be easy to share detection methods. If we all help each other to help ourselfs, we can get a better understanding of trojans and/or have a better working, more accurate trojan detection algothim/system.