I am trying to make my eggdrop bot display a message in the chatroom. Looking in tcl-commands.doc it would appear that putserv or putquick would do the work, but if i use either of them no message comes out on the chatroom.
Here is my script:
-----------------------------------------
set greet_a "Howdy"
set greet_b "I'm BodgerBot enjoy this"
proc join_greet { nick uhost hand chan } {
global greet_a greet_b
putserv "A $greet_a $nick $greet_b" -next
putquick "B $greet_a $nick $greet_b" -next
dccbroadcast "I am greeting $nick"
return 0
}
bind join - #tfm join_greet
dccbroadcast "greetjlb.tcl installed"
-----------------------------------------
Any suggestions why I cannot put a message out to the chatroom?
Thanx
Bodger
This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.
For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.
All data has been migrated (including user logins/passwords) to a new phpBB version.
For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.
putserv/putquick
You're sending the command "A" to the IRC server, which it won't understand. I'm assuming you want a PRIVMSG, in which case you would do:
putserv "PRIVMSG $chan :$greet_a $nick $greet_b"
Note that for these types of text messages you should use "puthelp" instead of "putserv", and you should definitely not use "putquick" which is supposed to be reserved for very important things (e.g. locking the channel quickly).
putserv "PRIVMSG $chan :$greet_a $nick $greet_b"
Note that for these types of text messages you should use "puthelp" instead of "putserv", and you should definitely not use "putquick" which is supposed to be reserved for very important things (e.g. locking the channel quickly).
-
jjlbprof
Thank you sir, that worked.
But now that I have the global variables greet_a and greet_b, I should be able to change them via partyline, but I cannot seem to do it.
I have tried
.tcl set greet_a "XX Howdy"
What? You need '.help'
I am owner on the channel I should be able to do that correct?
Thanx
Bodger
But now that I have the global variables greet_a and greet_b, I should be able to change them via partyline, but I cannot seem to do it.
I have tried
.tcl set greet_a "XX Howdy"
What? You need '.help'
I am owner on the channel I should be able to do that correct?
Thanx
Bodger
Usually only permanent owners can use the .tcl and .set commands (depends on config file setting).
My suggestion is to make your own dcc command to do it. Something simple like this:
Change it according to your needs (add flag checks, whatever) and you should be set.
My suggestion is to make your own dcc command to do it. Something simple like this:
Code: Select all
bind dcc - setgreet dcc_setgreet
proc dcc_setgreet {hand idx text} {
global greet_a
putdcc $idx "Setting greet_a to $text"
set greet_a $text
return 1
}
