egghelp/eggheads community

Searching for a coder / or script

2003-09-25T07:18:06-04:00

i dont need the deop things
i only need this

a. > ban kick the
PRIVMSG L #chan recoverchan
/j chan (join)
ban > user who has banned me..

so this 2 lines
putquick "PRIVMSG L :deop $chan $nick" -next
putquick "PRIVMSG L :RECOVER $chan"
are correct with
putquick "PRIVMSG L $chan RECOVERCHAN" -next (recover chan is a L command)
with the code down im far away?

Code:

bind kick - * channel:kick   proc channel:kick {nick uhost hand chan targ rsn} {   if {![string match -nocase "$targ" $::botnick]} { return }   global revengebans   set chan [string tolower $chan]   putquick "PRIVMSG L $chan RECOVERCHAN" -next    if {![info exists revengebans($chan)]} { set revengebans($chan) {} }   lappend revengebans($chan) [list $nick *!*@[lindex [split $uhost @] 1]] }  bind mode - "* +o" lamer:remove proc lamer:remove {nick uhost hand chan mc vict} {   global revengebans   if {[string tolower $vict] != [string tolower $::botnick]} { return }   set chan [string tolower $chan]   if {![info exists revengebans($chan)]} { return }   foreach element $revengebans($chan) {     set revenge_nick [lindex $element 0]     set revenge_banmask [lindex $element 1]     if {[onchan $revenge_nick $chan]} {       putserv "mode $chan +b $revenge_banmask"        putkick $chan $revenge_nick "Lamer Removed."     }   }   unset revengebans($chan)

Statistics: Posted by mia_richard — Thu Sep 25, 2003 7:18 am

Searching for a coder / or script

2003-09-24T17:06:03-04:00

use the code:

Code:

bind kick - * channel:kick   proc channel:kick {nick uhost hand chan targ rsn} {   if {![string match -nocase "$targ" $::botnick]} { return }   global revengebans   set chan [string tolower $chan]   putquick "PRIVMSG L :deop $chan $nick" -next   putquick "PRIVMSG L :RECOVER $chan"   if {![info exists revengebans($chan)]} { set revengebans($chan) {} }   lappend revengebans($chan) [list $nick *!*@[lindex [split $uhost @] 1]] }  bind mode - "* +o" lamer:remove proc lamer:remove {nick uhost hand chan mc vict} {   global revengebans   if {[string tolower $vict] != [string tolower $::botnick]} { return }   set chan [string tolower $chan]   if {![info exists revengebans($chan)]} { return }   foreach element $revengebans($chan) {     set revenge_nick [lindex $element 0]     set revenge_banmask [lindex $element 1]     if {[onchan $revenge_nick $chan]} {       putserv "mode $chan +b $revenge_banmask"        putkick $chan $revenge_nick "Lamer Removed."     }   }   unset revengebans($chan)  }

fix the "L" things as they should be, and make sure you dont remove the ":" .
also you can edit the bots needs.
for example to let the bot unban himself when banned do a:
.chanset #channel need-unban putquick "PRIVMSG L :verify #channel"
in the partyline. you can also edit need-op, need-limit, need-key and need-invite.

Statistics: Posted by Sir_Fz — Wed Sep 24, 2003 5:06 pm

Searching for a coder / or script

2003-09-24T16:13:16-04:00

did you mean this script?!?
http://forum.egghelp.org/viewtopic.php? ... t=kick+ban
--------
hmm

bind kick - * channel:kick

proc channel:kick {nick uhost hand chan targ rsn} {
if {[string match -nocase "$targ" $::botnick]} {
putquick "PRIVMSG L RECOVER $chan" -next
}
}

can this be correct so? or not

Statistics: Posted by mia_richard — Wed Sep 24, 2003 4:13 pm

Searching for a coder / or script

2003-09-24T16:05:42-04:00

thank you i will try it

Statistics: Posted by mia_richard — Wed Sep 24, 2003 4:05 pm

Searching for a coder / or script

2003-09-24T15:43:38-04:00

now, look at you. You are willing to spend some money for something that has already been given on this forum, which can be found if you are not lazy to click the search bottom.

You'll find a script in a thread started by me, just change the DALnet services nick and commands to suite quakenet. and about the host, then set the host to *!$uhost and it should store. *!ident@host.

Statistics: Posted by Sir_Fz — Wed Sep 24, 2003 3:43 pm

Searching for a coder / or script

2003-09-24T14:34:36-04:00

hello

searching for script and i pay over paypal (or other variants) for it

wishes (pls only guys who be able to code this) should msg me

For quakenet
if someone bans and kickes the bot
a.) rejoin, if not able (cause of ban) then
Re auth (now im using a qnet auth script) and the bot has +m priv. on quakenet L
a1.) then he must to a /msg L CHANLEV recover (so that he unbans himself)
rejoin, and revenge the guy who has make a kick ban on him
(now he has it too but if you make it fast you can ban and kick him)

b.) re script the guard102.tcl script hostmask not like yet *!*@ he should make identd@ .. ( i know ..unsecure) but better ..for ignores cause of flood
pls mail or priv msg me fore payment infos.
cya

Statistics: Posted by mia_richard — Wed Sep 24, 2003 2:34 pm