egghelp/eggheads community

n00b to DCC bindings :x

2003-07-28T12:06:01-04:00

oof. i see it now. i had to delete and re-write the IF block from scratch... when i did, it worked... then i copied and pasted it into notepad, and copied the original IF statement from my first post, and saw.

/me is enlightened

thank you

Statistics: Posted by LtPhil — Mon Jul 28, 2003 12:06 pm

n00b to DCC bindings :x

2003-07-28T12:00:11-04:00

user: i don't see a problem with the if statement...

Take another look. The code you pasted with the entire if stucture commented out was valid.

Because newlines don't have the same effect between braces this is basically what your code looks like to the parser (count the arguments):

Code:

proc bla {} {if {}} {}

Statistics: Posted by user — Mon Jul 28, 2003 12:00 pm

n00b to DCC bindings :x

2003-07-28T10:55:05-04:00

looking at the error more in-depth, it's acting like it's having a problem with the actual call to proc... but i'm doing

proc name {args} {
body
}

... so i don't get it

Statistics: Posted by LtPhil — Mon Jul 28, 2003 10:55 am

n00b to DCC bindings :x

2003-07-28T10:47:53-04:00

wrong # args: should be "proc name args body"
while executing
"proc xs_mailnote {hand idx text body} {
global botnet-nick
set toaddr [string range $text 0 [expr ([tcl_wordBreakAfter $text 0] - 1)]]
set subje..."

-- same error, sir_fz

user: i don't see a problem with the if statement...

Code:

proc xs_mailnote {hand idx text body} {  global botnet-nick  set toaddr [string range $text 0 [expr ([tcl_wordBreakAfter $text 0] - 1)]]  set subject "${botnet-nick} partyline note from ${hand}"  set msgbody [string range $text [expr ([tcl_wordBreakAfter $text 0] + 1)] end]#  if {[catch {exec mail -s "${subject}" $toaddr $msgbody}]}#    putlog "Error sending note to $toaddr"#  } else {#    putlog "Sent note to $toaddr"#  }  putdcc $idx "${botnet-nick} :: $text :: $body"}

still produces the error shown above (with or without "body" in the args)

(edit: btw, i put the "else" in there explicitly just to see if it was fussing about that -- no go)

Statistics: Posted by LtPhil — Mon Jul 28, 2003 10:47 am

n00b to DCC bindings :x

2003-07-28T10:41:40-04:00

The "if" is missing a "{", and because of that the rest of your code gets out of sync (in lack of a better word) and the "else" part of the if becomes the 4th argument to "proc"

Statistics: Posted by user — Mon Jul 28, 2003 10:41 am

n00b to DCC bindings :x

2003-07-28T10:39:12-04:00

err okay, that makes sense... but looking at various docs on the web, they kept specifying only three arguments for the proc... so what's the difference between $text and $bod?

Statistics: Posted by LtPhil — Mon Jul 28, 2003 10:39 am

n00b to DCC bindings :x

2003-07-28T10:36:55-04:00

the error explains what's the mistake:

wrong # args: should be "proc name args body"

and your proc is :

Code:

proc xs_mailnote {hand idx text} {

so try to make it proc xs_mailnote {hand idx text bod} {

Statistics: Posted by Sir_Fz — Mon Jul 28, 2003 10:36 am

n00b to DCC bindings :x

2003-07-28T10:30:54-04:00

i'm using the following code to try and make it so i can send quick e-mail notes while DCC'ed to my bot, but it dies with the error

wrong # args: should be "proc name args body"
while executing
"proc xs_mailnote {hand idx text} {
global botnet-nick
set toaddr [string range $text 0 [expr ([tcl_wordBreakAfter $text 0] - 1)]]
set subject "$..."

this is the code i am (trying to) use:

Code:

bind dcc n mailnote xs_mailnoteproc xs_mailnote {hand idx text} {  global botnet-nick  set toaddr [string range $text 0 [expr ([tcl_wordBreakAfter $text 0] - 1)]]  set subject "${botnet-nick} partyline note from ${hand}"  set msgbody [string range $text [expr ([tcl_wordBreakAfter $text 0] + 1)] end]  if {[catch {exec mail -s "${subject}" $toaddr $msgbody}]}    putlog "Error sending note to $toaddr"  } {    putlog "Sent note to $toaddr"  }}

[/code]

Statistics: Posted by LtPhil — Mon Jul 28, 2003 10:30 am