I'm blocked

Post by **caesar** » Tue Apr 15, 2003 1:20 pm

Scroll up and get the correct code. You've copyed and put the stuff I;ve said in the wrong one. To enable/disable the csauth thing you just do what you've did til now, from dcc chat/telnet with your eggdrop type: .csauth on/off. The auth thing is using this one two, so the auth flag I've added is to make a difference betwen the channels where he will use the Y login and the ones he dosen't need to. I've only changed the join code not the dcc one.. The dcc one is intact, except its' bind, that's all.

Gatsby · Post by **Gatsby** » Sun Apr 20, 2003 7:01 am

I come back again and again with my problem...
I have this error :

.csauth off/on
Tcl error [dcc:csauth]: wrong # args: should be "dcc:csauth nick uhost handle channel"

X and Y are juste examples the both are not the bots on Undernet. So X and Y are on the same channel for my example. I done what you told me but it doesn't work and I don't know what can I do...

I just want that if I ensure in DCC :

.auth on/off the Egddrop will disable or enable the AUTH himself to a nick in a channel I setted with .chanset #channel +/-auth

.csauth on/off will just enable/disable the CSAUTH sended to one nick

All these actions are when the eggdrop joins the channel or when the nicks setted to the variables will join the channel. The nicks setted to the variable are on the same channel.

Thank you very very much

Post by **caesar** » Mon Apr 21, 2003 12:52 am

This Tcl error [dcc:csauth]: wrong # args: should be "dcc:csauth nick uhost handle channel" is generated cos you've mixed the codes a bit. Scroll up and see exactly how is the dcc code and how is the join one, with the modifications we talked about till now.

Gatsby · Post by **Gatsby** » Mon Apr 21, 2003 5:37 am

But I applyed the modifications! Yes I done it as you told me! But when you tell me to replace proc c:csauth {hand idx arg} {, I don't find this!!! So I can't replace... Please I'm reaching it since one week... could you show me the definitive code where this commands would work :

.csauth off/on

And I don't know what has you puted to the code but X and Y are on the same channel... so on my or their join if the CSAUTH thing and AUTH channel is setted Robot would send the message to the both : X andY.

Thank you in advence...

Gatsby · Post by **Gatsby** » Tue Apr 22, 2003 3:38 am

Please...

Gatsby · Post by **Gatsby** » Thu Apr 24, 2003 2:00 pm

Please guys i'm still blocked i don't know what can i do here you are the only ones who can help me... please

Papillon · Post by **Papillon** » Fri Apr 25, 2003 3:12 am

please post the code you are using right now, include all the errors you get and why you get them...

Gatsby · Post by **Gatsby** » Fri Apr 25, 2003 7:31 am

Thank you very much for helping me Papillon

Description
- Zarifa is the eggdrop using this TCL
- Sephir is a bot Zarifa CSAUTH to
- Neptune is an other bot Zarifa AUTH to

Situation one
Zarifa joins #channel.
Sephir and Neptune are on #channel.
Zarifa sends them '/msg Neptune CSAUTH password' and '/msg Sephir AUTH #channel Zarifa password'

Situation Two
Zarifa is already on #channel.
Sephir or Neptune joins #channel.
Zarifa sends them '/msg Neptune CSAUTH password' and '/msg Sephir AUTH #channel Zarifa password'

Commands for this TCL
- .csauth on/off (Enables/Disables the sending of the CSAUTH by Zarifa to Neptune)
- .auth on/off (Enables/Disables the sending of the AUTH by Zarifa to Sephir)
- .chanset #channel +/-auth (Set the #channel used in the AUTH)

Errors i have
- When i ensure .csauth on/off i have this : Tcl error [dcc:csauth]: wrong # args: should be "dcc:csauth nick uhost handle channel"
- When i ensure .auth on/off i have this : What? You need '.help'
- When Sephir or Neptune join #channel or when Zarifa joins #channel no AUTH and CSAUTH is sended.
- When i ensure .chanset #channel +/-auth it's working i have this : Successfully set modes { +auth } on #channel.

The TCL

Code: Select all

### What is the name of the bot to identify to on join (CSAUTH)? 
set bot(name) "Neptune" 

### What is the name of the bot you want to do the channel identify (AUTH)? 
set bot(chan) "Sephir" 

### Set the user of the Eggdrop that will use for CSAUTH and AUTH
set bot(user) "Zarifa" 

### Set the password of the Eggdrop that will use for CSAUTH 
set bot(pass) "x0zomp69a" 

### Set the password of the Eggdrop that will use for AUTH 
set bot2(pass) "af442z9echy" 

### Set this to 1 if you want the script enabled by default, otherwise 0 //<<< this is caesar who made it, but i think it's not necessary if .auth on/off is available
set bot(enable) 1 

# stuff 
setudef flag auth 
bind join * * x:csauth 
bind dcc - csauth dcc:csauth 

# stuff 
setudef flag auth 
bind join * * x:csauth 
bind dcc - csauth dcc:csauth 

proc dcc:csauth {nick uhost handle channel} { 
global bot botnick 
if {$nick == $botnick && $bot(enable) == "1" } { 
foreach luser $bot(name) { 
putserv "PRIVMSG $luser :CSAUTH $bot(user) $bot(pass)" 
} 
foreach chan [channels] { 
if {[channel get $chan auth]} { 
putserv "PRIVMSG $bot(chan) :AUTH $chan $bot(user) $bot2(pass)" 
} 
} 
} 
}

Thank you very very very much.

Papillon · Post by **Papillon** » Fri Apr 25, 2003 8:59 am

Code: Select all

# stuff 
setudef flag auth 
bind join * * x:csauth 
bind dcc - csauth dcc:csauth

no need to have this twice..
also switch the procnames.. make it like this

Code: Select all

# stuff 
setudef flag auth 
bind join * * dcc:csauth 
bind dcc - csauth x:csauth

as for this bind dcc - csauth x:csauth....
there is no proc in this code called x:csauth, so when you do .csauth it calls a proc which does not exist... unless it is in another scriptfile
the .auth command has not been binded in this code..

Gatsby · Post by **Gatsby** » Fri Apr 25, 2003 11:51 am

All right, i can't test it now, but what is the whole code working ? What is the syntax the code I mean, could you paste all the code working as I want ?

Thanks

Gatsby · Post by **Gatsby** » Fri Apr 25, 2003 6:52 pm

I had corrected as you said me, but i have still the same answers and errors... is it really so difficult for the experts in TCL like you all on this forum ????

Tcl error [x:csauth]: wrong # args: should be "x:csauth nick uhost handle channel"

I mean i'm just a newbie who wants his eggdrop working only for this but i can't do it by myself i'm not intelligent enough... you can help me please help!!!

Code: Select all

### What is the name of the bot to identify to on join (CSAUTH)? 
set bot(name) "Neptune" 

### What is the name of the bot you want to do the channel identify (AUTH)? 
set bot(chan) "Sephir" 

### Set the user of the Eggdrop that will use for CSAUTH and AUTH 
set bot(user) "Zarifa" 

### Set the password of the Eggdrop that will use for CSAUTH 
set bot(pass) "x0zomp69a" 

### Set the password of the Eggdrop that will use for AUTH 
set bot2(pass) "af442z9echy" 

### Set this to 1 if you want the script enabled by default, otherwise 0 //<<< this is caesar who made it, but i think it's not necessary if .auth on/off is available 
set bot(enable) 1 

# stuff 
setudef flag auth 
bind join * * dcc:csauth 
bind dcc - csauth x:csauth 

# stuff 
setudef flag auth 
bind join * * x:csauth 
bind dcc - csauth dcc:csauth 

proc dcc:csauth {nick uhost handle channel} { 
global bot botnick 
if {$nick == $botnick && $bot(enable) == "1" } { 
foreach luser $bot(name) { 
putserv "PRIVMSG $luser :CSAUTH $bot(user) $bot(pass)" 
} 
foreach chan [channels] { 
if {[channel get $chan auth]} { 
putserv "PRIVMSG $bot(chan) :AUTH $chan $bot(user) $bot2(pass)" 
} 
} 
} 
}

Papillon · Post by **Papillon** » Fri Apr 25, 2003 7:27 pm

Code: Select all

### What is the name of the bot to identify to on join (CSAUTH)? 
set bot(name) "Neptune" 

### What is the name of the bot you want to do the channel identify (AUTH)? 
set bot(chan) "Sephir" 

### Set the user of the Eggdrop that will use for CSAUTH and AUTH 
set bot(user) "Zarifa" 

### Set the password of the Eggdrop that will use for CSAUTH 
set bot(pass) "x0zomp69a" 

### Set the password of the Eggdrop that will use for AUTH 
set bot2(pass) "af442z9echy" 

### Set this to 1 if you want the script enabled by default, otherwise 0 //<<< this is caesar who made it, but i think it's not necessary if .auth on/off is available <-- it is
set bot(enable) 1 

# stuff 
setudef flag auth 
bind join * * dcc:csauth 
#bind dcc - csauth x:csauth
bind dcc - auth x:csauth:on_off


proc dcc:csauth {nick uhost handle channel} { 
  global bot botnick 
  if {$nick == $botnick && $bot(enable) == "1" } { 
    foreach luser $bot(name) { 
      putserv "PRIVMSG $luser :CSAUTH $bot(user) $bot(pass)" 
    } 
    foreach chan [channels] { 
      if {[channel get $chan auth]} { 
        putserv "PRIVMSG $bot(chan) :AUTH $chan $bot(user) $bot2(pass)" 
      } 
    } 
  } 
}

proc x:csauth:on_off {hand idx arg} {
  global bot
  switch -- [lindex [split $arg] 0] {
    "on" { set bot(enable) 1; putdcc $idx "Authing turned on" }
    "off" { set bot(enable) 0; putdcc $idx "Authing turned off" }
  }
}

This should work, the .csauth command is not supported here, if you want it you make it on your own. We are NOT here to make script for peoples. We are here to give you pointers of how to do it on your own.
.auth on/off turns both AUTH and CSAUTH on or off as it is now.

Gatsby · Post by **Gatsby** » Fri Apr 25, 2003 9:29 pm

Yes i understand you're not here for me. I'm not the most important and either the question is not here, you are there to help and not to work at my place i'm agree but when i'm blocked since 2 weeks...

Thank you very much for you code it's working good except that Zarifa sends the CSAUTH and AUTH only when she joins #channel and in the DCC i have this error : Tcl error [dcc:csauth]: can't read "bot2(pass)": no such variable but she is sending the /msg because i seemed them so it's ok

Now what must i do ? What code add for Zarifa sends the CSAUTH and AUTH not only when she joins #channel but also when Neptune or Sephir join too...

If i can do somethin for you i will try, you are very a cool guy, sorry for my expression i don't know english very well...

Thank you very much papillon you made me happy

Gatsby · Post by **Gatsby** » Sat Apr 26, 2003 10:57 am

What code add for Zarifa sends the CSAUTH and AUTH not only when she joins #channel but also when Neptune or Sephir join too...

Please.... help me tell me i musn't wait 3 weeks for this TCL ! Please !

Papillon · Post by **Papillon** » Sat Apr 26, 2003 11:12 am

Gatsby wrote:
What code add for Zarifa sends the CSAUTH and AUTH not only when she joins #channel but also when Neptune or Sephir join too...
Please.... help me tell me i musn't wait 3 weeks for this TCL ! Please !

sorry but I will help you no further when your not even trying to fix the problem on you own! Try figuring out the problem and fix it. If you get some new errors post the code you've added/modified and we may talk..
If you knew just a littlebit about tcl you should be very able to fix the rest of code...