<?xml version="1.0" encoding="UTF-8"?>
<feed xmlns="http://www.w3.org/2005/Atom" xml:lang="en-gb">
	<link rel="self" type="application/atom+xml" href="https://forum.eggheads.org/app.php/feed/topic/8828" />

	<title>egghelp/eggheads community</title>
	<subtitle>Discussion of eggdrop bots, shell accounts and tcl scripts.</subtitle>
	<link href="https://forum.eggheads.org/index.php" />
	<updated>2005-01-11T10:01:32-04:00</updated>

	<author><name><![CDATA[egghelp/eggheads community]]></name></author>
	<id>https://forum.eggheads.org/app.php/feed/topic/8828</id>

		<entry>
		<author><name><![CDATA[awyeah]]></name></author>
		<updated>2005-01-11T10:01:32-04:00</updated>

		<published>2005-01-11T10:01:32-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=45274#p45274</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=45274#p45274"/>
		<title type="html"><![CDATA[Global variables?]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=45274#p45274"><![CDATA[
Oops, I didn't take a look at your actual binds and forgot to modify them. Here use these:<br><div class="codebox"><p>Code: </p><pre><code>bind pub - !test testbind msgm - * back proc test {n u h c t} { global test_nick set test_nick $n puthelp "PRIVMSG askBOT :[lindex $t 0]"}proc back {n u h t} { global test_nick if {![string equal -nocase "askBOT" $n] || ![info exists test_nick]} { return 0 } puthelp "PRIVMSG #my_channel :$test_nick: [lindex $t 0] [lrange $t 1 end]" unset test_nick}</code></pre></div><p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=4875">awyeah</a> — Tue Jan 11, 2005 10:01 am</p><hr />
]]></content>
	</entry>
		<entry>
		<author><name><![CDATA[micky]]></name></author>
		<updated>2004-12-20T09:45:16-04:00</updated>

		<published>2004-12-20T09:45:16-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=44244#p44244</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=44244#p44244"/>
		<title type="html"><![CDATA[Global variables?]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=44244#p44244"><![CDATA[
awyeah:<div class="codebox"><p>Code: </p><pre><code>Tcl error [back]: can't read "test_nick": no such variable</code></pre></div>:/<br><br>user:<br>1. bind msgm - * back <br>2. Bot always replay: $arg1[1]: <a href="http://link.com/FYTD" class="postlink">http://link.com/FYTD</a><br><br>[1] my arg1 from procedure test<br><br>Walked it about it? ;] <br>Sorry, for my monkey language :&gt;<p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=5782">micky</a> — Mon Dec 20, 2004 9:45 am</p><hr />
]]></content>
	</entry>
		<entry>
		<author><name><![CDATA[user]]></name></author>
		<updated>2004-12-20T08:19:37-04:00</updated>

		<published>2004-12-20T08:19:37-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=44238#p44238</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=44238#p44238"/>
		<title type="html"><![CDATA[Global variables?]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=44238#p44238"><![CDATA[
Where's the mask in your msgm bind? Is askBOT's reply always a valid tcl list?<p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=2878">user</a> — Mon Dec 20, 2004 8:19 am</p><hr />
]]></content>
	</entry>
		<entry>
		<author><name><![CDATA[awyeah]]></name></author>
		<updated>2004-12-20T08:08:36-04:00</updated>

		<published>2004-12-20T08:06:25-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=44236#p44236</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=44236#p44236"/>
		<title type="html"><![CDATA[Global variables?]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=44236#p44236"><![CDATA[
Try something simple as this:<br><div class="codebox"><p>Code: </p><pre><code>bind pub !test testbind msgm - backproc test {n uh h c a} { global test_nick set arg1 [lindex $a 0]; set test_nick $n puthelp "PRIVMSG askBOT :$arg1" return 0}proc back {n u h a} { global test_nick if {![string equal -nocase "askBOT" $n]} { return 0 } set arg1 [lindex $a 0] set arg2 [lrange $a 1 end] puthelp "PRIVMSG #my_channel :$test_nick: $arg1 $arg2" unset test_nick; return 0}</code></pre></div><p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=4875">awyeah</a> — Mon Dec 20, 2004 8:06 am</p><hr />
]]></content>
	</entry>
		<entry>
		<author><name><![CDATA[micky]]></name></author>
		<updated>2004-12-20T07:14:50-04:00</updated>

		<published>2004-12-20T07:14:50-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=44233#p44233</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=44233#p44233"/>
		<title type="html"><![CDATA[Global variables?]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=44233#p44233"><![CDATA[
<div class="codebox"><p>Code: </p><pre><code>bind pub !test testbind msgm - backproc back {n u h a} { if {$nick != "askBOT"} {return 0} set arg1 [lindex $a 0] set arg2 [lrange $a 1 end]   puthelp "PRIVMSG #my_channel :$arg1 $arg2" } proc test {n uh h c a} {set arg1 [lindex $a 0]puthelp "PRIVMSG $askBOT :$arg1"}</code></pre></div>And i need to procedure 'back' write: "Nick_user_who_last_use_!test : $arg1 $arg2"<p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=5782">micky</a> — Mon Dec 20, 2004 7:14 am</p><hr />
]]></content>
	</entry>
	</feed>
