egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2003-01-25T09:59:29-04:00 https://forum.eggheads.org/app.php/feed/topic/3506 2003-01-25T09:59:29-04:00 2003-01-25T09:59:29-04:00 https://forum.eggheads.org/viewtopic.php?p=15785#p15785 <![CDATA[Basic Actions... please I'm hopeless...]]> :) :)

Statistics: Posted by Guest — Sat Jan 25, 2003 9:59 am

]]> 2003-01-25T07:40:58-04:00 2003-01-25T07:40:58-04:00 https://forum.eggheads.org/viewtopic.php?p=15778#p15778 <![CDATA[Basic Actions... please I'm hopeless...]]>

Code: 

### What is the name of the bot to identify to on join? set bot(name) "Vegeta" ### Set the user of the Eggdrop that will use for CSAUTH set bot(user) "FreeBSD" ### Set the password of the Eggdrop that will use for CSAUTH set bot(pass) "haha" ####################################################### bind join * * x:xlogin proc x:xlogin {nick uhost handle channel} {   global bot botnick  if {$nick == $bot(name) || $nick == $botnick } {     putserv "PRIVMSG $bot(name) :CSAUTH $bot(user) $bot(pass)"  } }

Statistics: Posted by Papillon — Sat Jan 25, 2003 7:40 am

]]> 2003-01-24T21:13:02-04:00 2003-01-24T21:13:02-04:00 https://forum.eggheads.org/viewtopic.php?p=15776#p15776 <![CDATA[Basic Actions... please I'm hopeless...]]>

Code: 

### What is the name of the bot to identify to on join? set bot(name) "Vegeta" ### Set the user of the Eggdrop that will use for CSAUTH set bot(user) "FreeBSD" ### Set the password of the Eggdrop that will use for CSAUTH set bot(pass) "haha" #######################################################bind join * * x:xlogin proc x:xlogin {nick uhost handle channel} { global bot if {$nick == $bot(name)" || $nick == $botnick } { putserv "PRIVMSG $bot(name) :CSAUTH $bot(user) $bot(pass)"} return 1 }
I have this error message on JOINS

Code: 

Tcl error [x:xlogin]: syntax error in expression "$nick == $bot(name)" || $nick == $botnick ": extra tokens at end of expression
caesar made the code he may say but he seems to would not help me any more...

Thank you all I'm sure someone is going to find it out !

Statistics: Posted by Guest — Fri Jan 24, 2003 9:13 pm

]]> 2003-01-24T18:54:23-04:00 2003-01-24T18:54:23-04:00 https://forum.eggheads.org/viewtopic.php?p=15771#p15771 <![CDATA[Basic Actions... please I'm hopeless...]]> proc x:login {nick uhost handle channel} {


name the proc x:xlogin like so:

proc x:xlogin {nick uhost handle channel} {

Statistics: Posted by spock — Fri Jan 24, 2003 6:54 pm

]]> 2003-01-24T18:00:25-04:00 2003-01-24T18:00:25-04:00 https://forum.eggheads.org/viewtopic.php?p=15770#p15770 <![CDATA[Basic Actions... please I'm hopeless...]]>
I have this error, on JOIN :

Code: 

Tcl error [x:xlogin]: invalid command name "x:xlogin"

Statistics: Posted by Guest — Fri Jan 24, 2003 6:00 pm

]]> 2003-01-23T13:29:49-04:00 2003-01-23T13:29:49-04:00 https://forum.eggheads.org/viewtopic.php?p=15713#p15713 <![CDATA[Basic Actions... please I'm hopeless...]]>
If one day I can do something for you tell me !

Thank you very very much !!! :D

####

I tested it, I named it csauth.tcl I added it into source/scripts/csauth.tcl
But when Eggdrop JOIN channel he doesn't send any '/MSG X CSAUTH Eggdrop pass' to X

And the same when X JOINS the channel... I had done a mistake maybe ?

I pasted the code into a NotePad Document then I renamed it into *.tcl

I don't see what can I do caesar... maybe because I test it on a Windrop before put in on my Eggdrop ? :oops:

Statistics: Posted by Guest — Thu Jan 23, 2003 1:29 pm

]]> 2003-01-23T07:52:57-04:00 2003-01-23T07:52:57-04:00 https://forum.eggheads.org/viewtopic.php?p=15704#p15704 <![CDATA[Basic Actions... please I'm hopeless...]]> Statistics: Posted by caesar — Thu Jan 23, 2003 7:52 am

]]> 2003-01-23T06:25:22-04:00 2003-01-23T06:25:22-04:00 https://forum.eggheads.org/viewtopic.php?p=15690#p15690 <![CDATA[Basic Actions... please I'm hopeless...]]>
So this code make what I described higher ?

The Bot's JOIN and the Eggdrop's join ?

Statistics: Posted by Guest — Thu Jan 23, 2003 6:25 am

]]> 2003-01-23T02:28:07-04:00 2003-01-23T02:28:07-04:00 https://forum.eggheads.org/viewtopic.php?p=15671#p15671 <![CDATA[Basic Actions... please I'm hopeless...]]> set bot(name) "X"

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

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

bind join * * x:xlogin

proc x:login {nick uhost handle channel} {
global bot
if {$nick == $bot(name)" || $nick == $botnick } {
putserv "PRIVMSG $bot(name) :CSAUTH $bot(user) $bot(pass)"}
return 1 }

Statistics: Posted by caesar — Thu Jan 23, 2003 2:28 am

]]> 2003-01-22T14:28:22-04:00 2003-01-22T14:28:22-04:00 https://forum.eggheads.org/viewtopic.php?p=15657#p15657 <![CDATA[Basic Actions... please I'm hopeless...]]>
I searched a lot of engines for this tcl but i'm looking for a TCL for queit a long time, and I still hadn't found it.
I don't know TCL language so maybe someone would help me for this...
In this example 'Eggdrop' is the eggdrop's nick, and X is an other bot's nick.


1. If Eggdrop JOIN a channel, if X is on this channel, then do this : /msg X CSAUTH Eggdrop password

2. Or If X JOINS a channel, then do this : /msg X CSAUTH Eggdrop password

And that's all!

The 'joinactions.tcl' may start like that :

### What is the name of the bot to identify to on join?
set bot_name "X"

### Set the password the Eggdrop uses on X with CSAUTH X PASSWORD
set bot_pass "password"

If anyone can help me!

Statistics: Posted by Guest — Wed Jan 22, 2003 2:28 pm

]]>