!zline

2010-04-26T12:35:19-04:00

First off,
Your use of lindex is improper at best; this command expect the first input to be a list, just like lrange. Further, lrange returns a list, not a string, so you'll want to convert it back into a string using join.

Next, you'll need to add a test to see whether the user supplied both arguments or not. You could either do this by testing if either $nick or $reason is the empty string, or test the number of elements in $arguments - after you've converted it into a list; if this is less than 2, atleast one argument is missing:

Code:

bind pub n !zline zlineproc zline {nickname hostname handle channel arguments} {  set items [split $arguments]  if {[llength $items] < 2} {    puthelp "PRIVMSG $channel :Sorry, can't find a reason to zline with."    return  }  set nick [lindex $items 0]  set reason [join [lrange $items 1 end]]  putquick "GZLINE $nick :$reason"  puthelp "PRIVMSG $channel :Added a \002Global Zline\002 for $nick with the reason $reason"}

Statistics: Posted by nml375 — Mon Apr 26, 2010 12:35 pm

!zline

2010-04-26T01:09:19-04:00

Hello,

I have the following code but I want to add to it

bind pub n !zline zline
proc zline { nickname hostname handle channel arguments } {
set nick [string tolower [lindex $arguments 0]]
set reason [lrange [split $arguments] 1 end]
putquick "gzline $nick :$reason"
putquick "privmsg $channel :Added a \002Global Zline\002 for $nick With The Reason $reason"
}

At the moment I can just enter !zline and it will reply back with

" Added a Global Zline for With The Reason"

I want to make it so you need to either provide a IP address OR a nickname AND with a reason or it will back with a error message like

"Sorry can't I didnt find a reason to zline with."

Thanks

Statistics: Posted by lolwutxd — Mon Apr 26, 2010 1:09 am

egghelp/eggheads community

!zline

!zline