egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2003-08-27T14:38:09-04:00 https://forum.eggheads.org/app.php/feed/topic/5386 2003-08-27T14:38:09-04:00 2003-08-27T14:38:09-04:00 https://forum.eggheads.org/viewtopic.php?p=25770#p25770 <![CDATA[Getting a chan key]]>

Statistics: Posted by ^DooM^ — Wed Aug 27, 2003 2:38 pm

]]> 2003-08-27T01:40:02-04:00 2003-08-27T01:40:02-04:00 https://forum.eggheads.org/viewtopic.php?p=25719#p25719 <![CDATA[Getting a chan key]]>

Code: 

lindex [split $currentmodes] 1

Statistics: Posted by user — Wed Aug 27, 2003 1:40 am

]]> 2003-08-26T17:53:02-04:00 2003-08-26T17:53:02-04:00 https://forum.eggheads.org/viewtopic.php?p=25707#p25707 <![CDATA[Getting a chan key]]>
I'm not new to eggdrop's but i am fairly new to scripting. I have written about 10 scripts for my personal use mainly !trigger related scripts and i am trying to write a script to retrive the key from a channel i specify that the bot is in. :D

I have gotten so far but the bot seems to retrieve the number of people in the channel rather than the key that is set. :cry:

All i need is the line that retrieves the channel key if any of you could possibly help me.

Here is the proc i have written to retrieve the key

proc currentkey {chan} {
set currentmodes [getchanmode $chan]
if {[string match "*k*" [lindex $currentmodes 0 ]]} {
return [lindex $currentmodes end]
}
return 0
}

please try not to laugh at my code too much :lol:

Thanks in advance. Jon. :wink:

Statistics: Posted by ^DooM^ — Tue Aug 26, 2003 5:53 pm

]]>