binding a join

[Jens2410]

hi,

I am trying tomake a script, which invites everyone who joins a channel, into a certain other channel.
Here is the script that that unforunately doesen't work:

bind join - "#skylords-intern *" metainvite

proc metainvite {nick host hand chan} {
if ($chan == "#skylords-intern"){
puthelp "PRIVMSG $chan : /invite $nick #colossus"
return 0
}
return 0

Could you please help me?

Thank You

[dollar]

Wait a sec, take a look at you're script, you're sending a PRIVATE MSG to a channel, which contains the text "/invite blah". Try 'putserv "INVITE $nick #colossus"' instead...

[Jens2410]

Hmmm....
I have changed that in my script.
But the Eggdrop still displays the following Error-Message:

Tcl error [metainvite]: wrong # args: extra words after "else" clause in "if" command

The script now looks like this:

bind join - "#skylords-intern *" metainvite

proc metainvite {nick host hand chan} {
if ($chan == "#skylords-intern" ) {
putserv "INVITE $nick #colossus"
return 0
}
else {return 0}
}

Thanks for your help in advance!

[arcane]

Code: Select all

if {condition} {
    do_sth
} else {
    do_sth
}

note the {} at the condition and that the "else" has to be in the same line as the closing } of the "if"

[Jens2410]

the script now looks like this, but there is no change in the error Message


bind join - " #skylords-intern * " metainvite

proc metainvite {nick host hand chan args} {
if ($chan == "#skylords-intern" ) {
putserv "INVITE $nick #colossus"
return 0
} else {
return 0 }
}

[TALES]

Just like the man saids:

Code: Select all

proc metainvite {nick host hand chan} { 
 if ($chan == "#skylords-intern") { 
 putserv "INVITE $nick #colossus" 
 return 0 
 } else {
   return 0
  } 
}

[caesar]

instead of:

Code: Select all

if ($chan == "#skylords-intern") 

better use:

Code: Select all

if {[string equal -nocase $chan "#skylords-intern"]} {

[Jens2410]

Thank You verry much! It now works!