egghelp/eggheads community

Tcl request

2001-12-12T22:31:00-04:00

LMAO, oops, knew I shouldnt try and code anything that early in the day.

I missed out an opening brace after the "if {[string tolower $chan......" bit, this definitely works, I tested it:

Code:

bind join * * chan_message proc chan_message {nick host hand chan} { if {[string tolower $chan] == [string tolower "#youroldchanname"]} {putserv "PRIVMSG $chan :Your message goes here" return 0 } return 0 }

Regards

Ian-Highlander

_________________
How can you tell if a blonde is having a bad day?

She has a tampon behind her ear and she forgot where she put her pencil.

http://www.eggdropsrus.co.uk
ian.highlander@eggdropsrus.co.uk

[ This Message was edited by: Ian-Highlander on 2001-12-12 19:32 ]

Statistics: Posted by Ian-Highlander — Wed Dec 12, 2001 10:31 pm

Tcl request

2001-12-12T16:16:00-04:00

Hey Ian-Highlander your "if {[string tolower $chan] == [string tolower "#youroldchannel"]}' has this error:
"TCL error [chan_message]: wrong # args: no script following "{[string tolower $ch" argument".

And Sean in the future pls say in the forum what errors did you get.

Statistics: Posted by caesar — Wed Dec 12, 2001 4:16 pm

Tcl request

2001-12-12T15:45:00-04:00

Hey Sean check this out:

- Code -
bind join * * chan_message

proc chan_message {nick host hand chan} {
global botnick
if {$nick == $botnick} {return 1}
if {[validchan #YourOldChan]} {
putserv "PRIVMSG $chan :Your message to channel goes here"
putserv "NOTICE $nick :Your notice to nick goes here"
}
}
- Code -

Statistics: Posted by caesar — Wed Dec 12, 2001 3:45 pm

Tcl request

2001-12-12T13:55:00-04:00

There are several ONJOIN/GREET scripts already made, that you could be using also.

Statistics: Posted by Guest — Wed Dec 12, 2001 1:55 pm

Tcl request

2001-12-12T13:44:00-04:00

still no good

Statistics: Posted by Guest — Wed Dec 12, 2001 1:44 pm

Tcl request

2001-12-12T13:40:00-04:00

i tried rehash, i will try restart now

Statistics: Posted by Guest — Wed Dec 12, 2001 1:40 pm

Tcl request

2001-12-09T18:32:00-04:00

Have you tried a .restart of the eggy ?

Statistics: Posted by caesar — Sun Dec 09, 2001 6:32 pm

Tcl request

2001-12-08T21:15:00-04:00

Hehe, i am not that much of a newbie. I know how to operate tcls, just not how to use them... i put the line at the bottom of the conf and rehashed. i used a test channel and put the name of it into the tcl. i have exactly what you told me to put except i changed the message, channel and the NOTICE $NICK. I have no idea why it won't work

Statistics: Posted by Guest — Sat Dec 08, 2001 9:15 pm

Tcl request

2001-12-08T18:54:00-04:00

This might be stating the obvious, but you did save it as a .tcl file and add a line to the bottom of your bots config file then .rehash the bot didnt you?
Also make sure there is a space after $nick or $chan (whichever line you decided to use in the end) before the colon :

If you still cant get it working and you've done all this paste up exactly what you are typing in and how you are loading it.

Regards

Ian-Highlander

Statistics: Posted by Ian-Highlander — Sat Dec 08, 2001 6:54 pm

Tcl request

2001-12-08T16:22:00-04:00

I added the Notice $nick thingy, but it still doesn't seem to work, the two things i edited were the channel and the message is there more to be edited i can't get it to work...

Statistics: Posted by Guest — Sat Dec 08, 2001 4:22 pm

Tcl request

2001-12-08T16:17:00-04:00

This will say your "Your message goes here" in the channel when a user is joining. If you want to notice the user then change this:

- from -
putserv "PRIVMSG $chan :Your message goes here"

- to -
putserv "NOTICE $nick :Your message goes here"

This should do it.

Statistics: Posted by caesar — Sat Dec 08, 2001 4:17 pm

Tcl request

2001-12-08T14:09:00-04:00

Thanks you! This will notice the person?

Statistics: Posted by Guest — Sat Dec 08, 2001 2:09 pm

Tcl request

2001-12-08T10:45:00-04:00

bind join * * chan_message

proc chan_message {nick host hand chan} {
if {[string tolower $chan] == [string tolower "#youroldchannel"]}
putserv "PRIVMSG $chan :Your message goes here"
return 0
}
return 0
}

That should do it.

Really should make sure I'm awake before answering help queries lol
_________________
How can you tell if a blonde is having a bad day?

She has a tampon behind her ear and she forgot where she put her pencil.

http://www.eggdropsrus.co.uk
ian.highlander@eggdropsrus.co.uk

[ This Message was edited by: Ian-Highlander on 2001-12-08 07:56 ]

[ This Message was edited by: Ian-Highlander on 2001-12-08 07:56 ]

[ This Message was edited by: Ian-Highlander on 2001-12-08 07:58 ]

Statistics: Posted by Ian-Highlander — Sat Dec 08, 2001 10:45 am

Tcl request

2001-12-08T10:24:00-04:00

I run a channel and i wish to change the channel to another one, is it possible that someone can help me make a tcl which notices the user to join the new channel when they come in? Such as something like. 'Hello whoever, this channel is closed please join #newchannel' i'd be grateful if someone could help me, please.

Statistics: Posted by Guest — Sat Dec 08, 2001 10:24 am