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.

Default ban mask @ command .kickban

Requests for complete scripts or modifications/fixes for scripts you didn't write. Response not guaranteed, and no thread bumping!
Post Reply
N
Ni0
Voice
Posts: 13
Joined: Mon Dec 12, 2005 11:17 am

Default ban mask @ command .kickban

Post by Ni0 »

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? :D
User avatar
Sir_Fz
Revered One
Posts: 3793
Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:

Post by Sir_Fz »

.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.
N
Ni0
Voice
Posts: 13
Joined: Mon Dec 12, 2005 11:17 am

Post by Ni0 »

yeap but i said i want this without the @ at command.
User avatar
demond
Revered One
Posts: 3073
Joined: Sat Jun 12, 2004 9:58 am
Location: San Francisco, CA
Contact:

Post by demond »

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

Code: Select all

 tag when posting logs, code
User avatar
Nor7on
Op
Posts: 185
Joined: Sat Mar 03, 2007 8:05 am
Location: Spain - Barcelona
Contact:

hi.

Post by Nor7on »

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.
Post Reply