egghelp/eggheads community

spaces in a kick message

2002-05-30T02:17:00-04:00

Petersen:Thank you so much!

Statistics: Posted by Guest — Thu May 30, 2002 2:17 am

spaces in a kick message

2002-05-29T23:03:00-04:00

set reason [join [lrange $args 1 end]]

Statistics: Posted by Petersen — Wed May 29, 2002 11:03 pm

spaces in a kick message

2002-05-29T22:26:00-04:00

hehe thanks, and how this will be done, can you please give me an example??/

Statistics: Posted by Guest — Wed May 29, 2002 10:26 pm

spaces in a kick message

2002-05-29T21:56:00-04:00

lrange outputs a list. you need to join it to make it a string.

Statistics: Posted by Petersen — Wed May 29, 2002 9:56 pm

spaces in a kick message

2002-05-29T20:58:00-04:00

Hi, can anyone help me please, i'll appreciate it, sometime when i use kick command, and it shows spaces in a kick message, donot know why?
advance thanks
regards
AW
.k ABC tsk tsk
*** ABC was kicked by eggdrop (tsk tsk {})

here are the codes

proc kick_command {nick host handle channel args1} {
set args [split $args1 " "]
set knick [lindex $args 0]
set date [clock format [clock seconds] -format "%b %d"]
if {[test_real $nick]} {
return 0
}
if {$knick==""} { return 0 }
set reason [lrange $args 1 end]
if {$reason==""} {
set reason "..go and play outside!"
}
set kickstring "KICK $channel $knick :$date $nick: $reason"
if {[matchattr [nick2hand $knick $channel] o]==0} {
putserv "$kickstring"
} else {
if {[matchattr $handle m]==1} {
putserv "$kickstring"
} else {
set kickstring "KICK $channel $nick :Wow! Lamerrr! Ain't it amazin? (Kick attempt on +o $knick)"
putserv "$kickstring"
}
}
return 1
}

Statistics: Posted by Guest — Wed May 29, 2002 8:58 pm