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.
Requests for complete scripts or modifications/fixes for scripts you didn't write. Response not guaranteed, and no thread bumping!
Ni0
Voice
Posts: 13 Joined: Mon Dec 12, 2005 11:17 am
Post
by Ni0 » Wed Dec 14, 2005 8:50 pm
i have this code (adds handle at command .kickban (or .kb))
but i want the default banmask be *!*@fullhost and not *!*identd@*host. t. Without @nick at command
Code: Select all
unbind dcc o|o kickban *dcc:kickban;
bind dcc o|o kb kban:kickban
proc kban:kickban {handle idx arg} {
if {$arg == ""} {
*dcc:kickban $handle $idx $arg
return 0
}
set date [strftime %d/%m/%y]
set defr "\002Banned Without Reason"
set host [lindex [split $arg] 0]
if {[string first # [set c [lindex [split $arg] 1]]] == 0} {
if {[string first % [set t [lindex [split $arg] 2]]] == 0} {
if {[set r [join [lrange [split $arg] 3 end]]] == ""} {
set r $defr
}
*dcc:kickban $handle $idx "$host $c $t $handle:\002 $r"
}
} {
if {[string first % [set t [lindex [split $arg] 1]]] == 0} {
if {[set r [join [lrange [split $arg] 2 end]]] == ""} {
set r $defr
}
*dcc:kickban $handle $idx "$host $t $handle:\002 $r"
} {
if {[set r [join [lrange [split $arg] 1 end]]] == ""} {
set r $defr
}
*dcc:kickban $handle $idx "$host $handle:\002 $r"
}
}
}
Any Help?
Sir_Fz
Revered One
Posts: 3794 Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:
Post
by Sir_Fz » Wed Dec 14, 2005 9:54 pm
.help kickban
### kickban [channel] [-|@]<nickname> [comment]
Kicks and bans a user from the specified channel with the with the
comment/reason given. Your handle will be attached to the ban in the
bot's internal ban list, and the ban will last for whatever time is set
for the channel's ban-time. The ban will be a channel-specific ban. Use
'.+ban' for a more permanent ban, which can be activated on every
channel the bot monitors. Appending a prefix of - or @ to a nickname
changes the banmask used:
For example, with a hostmask of nick!
ident@host.name.domain :
Command Banmask
.kickban nick *!*dent@*.name.domain
.kickban -nick *!*
dent@host.name.domain
.kickban @nick *!*@host.name.domain
Or with a host of nick!~
ident@host.name.domain (strict-host set to 1):
Command Banmask
.kickban nick *!*ident@*.name.domain
.kickban -nick *!*
ident@host.name.domain
See also: chanset, chaninfo, -ban, +ban, bans, stick
That means if you use @ before the nickname, it'll ban *!*@host.
Ni0
Voice
Posts: 13 Joined: Mon Dec 12, 2005 11:17 am
Post
by Ni0 » Wed Dec 14, 2005 10:04 pm
yeap but i said i want this without the @ at command.
demond
Revered One
Posts: 3073 Joined: Sat Jun 12, 2004 9:58 am
Location: San Francisco, CA
Contact:
Post
by demond » Thu Dec 15, 2005 12:09 am
do not pass through default *dcc:kickban and use:
Code: Select all
scan [getchanhost $nick] {%*[^@]@%s} host
connection, sharing, dcc problems? click
<here>
before asking for scripting help, read
<this>
use
Nor7on
Op
Posts: 185 Joined: Sat Mar 03, 2007 8:05 am
Location: Spain - Barcelona
Contact:
Post
by Nor7on » Tue May 20, 2008 5:46 pm
Hi everybody.
can fix this code for the last version of eggdrop 1.6.18?
Code: Select all
unbind dcc o|o kickban *dcc:kickban;
bind dcc o|o kb kban:kickban
proc kban:kickban {handle idx arg} {
if {$arg == ""} {
*dcc:kickban $handle $idx $arg
return 0
}
set date [strftime %d/%m/%y]
set nick [lindex $arg 0]
set defr "\002Banned Without Reason"
set host [getchanhost $nick]
if {[string first # [set c [lindex [split $arg] 1]]] == 0} {
if {[string first % [set t [lindex [split $arg] 2]]] == 0} {
if {[set r [join [lrange [split $arg] 3 end]]] == ""} {
set r $defr
}
*dcc:kickban $handle $idx "$host $c $t $handle:\002 $r"
}
} {
if {[string first % [set t [lindex [split $arg] 1]]] == 0} {
if {[set r [join [lrange [split $arg] 2 end]]] == ""} {
set r $defr
}
*dcc:kickban $handle $idx "$host $t $handle:\002 $r"
} {
if {[set r [join [lrange [split $arg] 1 end]]] == ""} {
set r $defr
}
*dcc:kickban $handle $idx "$host $handle:\002 $r"
}
}
}
something wrong with this code, 'cause i put in partyline and:
Code: Select all
<Nor7on> .kb testnick
<)Chasse> Invalid console channel.
<Nor7on> .kb #mychan testnick
<)Chasse> Invalid console channel.
when i put:
<Nor7on> .kb testnick #madrid
don't get error, but no found.
i want, when i put .kb nick, my eggdrop put ban(*!*@host.domain; perm) and kick in my channel.
can helpme?
thanks.