<?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/10953" />

	<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-12-07T13:52:08-04:00</updated>

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

		<entry>
		<author><name><![CDATA[]Kami[]]></name></author>
		<updated>2005-12-07T13:52:08-04:00</updated>

		<published>2005-12-07T13:52:08-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=58044#p58044</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=58044#p58044"/>
		<title type="html"><![CDATA[error in tcl.]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=58044#p58044"><![CDATA[
Change<br><div class="codebox"><p>Code: </p><pre><code>notice $nick "Usage: $lastbind &lt; \002on\002 / \002off\002 &gt;" </code></pre></div>with<br><div class="codebox"><p>Code: </p><pre><code>putquick "notice $nick :Usage: $lastbind &lt; \002on\002 / \002off\002 &gt;" </code></pre></div><p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=3559">]Kami[</a> — Wed Dec 07, 2005 1:52 pm</p><hr />
]]></content>
	</entry>
		<entry>
		<author><name><![CDATA[vel0x]]></name></author>
		<updated>2005-12-07T12:49:09-04:00</updated>

		<published>2005-12-07T12:49:09-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=58042#p58042</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=58042#p58042"/>
		<title type="html"><![CDATA[error in tcl.]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=58042#p58042"><![CDATA[
Hi,<br>in this tcl, when i send the command, i have:<br><br>[10:41] Tcl error [pub_cst]: invalid command name "notice"<br><br>why ?  <img class="smilies" src="https://forum.eggheads.org/images/smilies/icon_confused.gif" width="15" height="15" alt=":?" title="Confused"> <br><div class="codebox"><p>Code: </p><pre><code>####################################################################################################################################### IRCguard Channel Settings Public Commands Version 2.0 By B0gdaN ##################### Eggdrop TCL Script: [IRCguard Tools] Copyright (C) 2003-2004 IRCguard Productions.# This software is free under the terms of GNU GPL 2.# HomePage: http://www.IRCguard.tk/# E-MAIL: B0gdaN@Undernet.ro # A complete channel settings public commands for Eggdrop v1.6.x or higher.# Short descriptions of commands is available before each procedure.# To change the setting for your channel just tipe in channel &lt;&lt;.seen on&gt;&gt; to set +seen and &lt;&lt;.seen off&gt;&gt; to # set -seen for channel.# Now you can add more channel settings!!!Example:if you are using the Next script just add &lt;&lt;next&gt;&gt; in mods list# and you can set +next or -next for your channel like with a public command-&gt;.next on or .next off# To install it just place the tcl file in your bot scripts director and creat this line in your bot config file #" source scripts/pubsettings.tcl " # Rstart your bot and enjoy!# ###################################################SETTINGS######################################################Here You can add more channel settings:#set mods "autoop autohalfop autovoice protectops protecthalfops protectfriends dontkickops revenge revengebot statuslog seen shared greet nodesynch userbans dynamicbans enforcebans inactive bitch secret cycle bitch"###Here you can add more channel modes:#set modss "flood-chan flood-nick flood-ctcp flood-deop flood-kick flood-join aop-delay ban-time"##Here you can change the prefix of your command#set cmdpfix "."### Don't edit past here unless you know TCL! #####################################################BINDS######################################################foreach modd [string tolower $modss] { bind pub n|n ${cmdpfix}$modd pub_fst }foreach mod [string tolower $mods] { bind pub n|n ${cmdpfix}$mod pub_cst }proc pub_fst {nick host hand chan args} {global botnick lastbind cmdpfixif {[llength [split $args]] &lt; 1} {notice $nick "Usage: $lastbind &lt; \002number\002 / \002seconds\002 &gt;"return 0 }set args [lindex $args 0]set args [split $args]set mode [string tolower [lindex $args 0]]        set stat [string tolower [lindex [split $lastbind "$cmdpfix"] 1]]        channel set $chan $stat $modenotice $nick "$stat mode $chan is now \002$mode\002."  putcmdlog "&lt;&lt;$nick&gt;&gt; !$hand! set $stat for $chan $mode" }proc pub_cst {nick host hand chan args} {global botnick lastbind cmdpfixif {[llength [split $args]] &lt; 1} {notice $nick "Usage: $lastbind &lt; \002on\002 / \002off\002 &gt;"return 0 }set args [lindex $args 0]set args [split $args]set mode [string tolower [lindex $args 0]]set chan_mode ""        set stat [string tolower [lindex [split $lastbind "$cmdpfix"] 1]]if { $mode == "on" } { set chan_mode "+$stat" }if { $mode == "off" } { set chan_mode "-$stat" }if { $chan_mode == ""} {notice $nick "Invalid argument \002$mode\002"notice $nick "Usage: ${cmdpfix}$stat &lt; \002on\002 / \002off\002 &gt;"return 0 }channel set $chan $chan_modenotice $nick "$stat mode for $chan is now \002$mode\002."  putcmdlog "&lt;&lt;$nick&gt;&gt; !$hand! $stat $chan $mode" }putlog "Channel Settings Commands v 2.0 By B0gdaN LOADED"</code></pre></div><p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=7078">vel0x</a> — Wed Dec 07, 2005 12:49 pm</p><hr />
]]></content>
	</entry>
	</feed>
