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

	<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>2007-01-22T16:08:19-04:00</updated>

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

		<entry>
		<author><name><![CDATA[piggy]]></name></author>
		<updated>2007-01-22T16:08:19-04:00</updated>

		<published>2007-01-22T16:08:19-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=69828#p69828</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=69828#p69828"/>
		<title type="html"><![CDATA[capital letter nicks]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=69828#p69828"><![CDATA[
Thank you very much Sir_Fz  <img class="smilies" src="https://forum.eggheads.org/images/smilies/icon_smile.gif" width="15" height="15" alt=":)" title="Smile"><p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=6625">piggy</a> — Mon Jan 22, 2007 4:08 pm</p><hr />
]]></content>
	</entry>
		<entry>
		<author><name><![CDATA[Sir_Fz]]></name></author>
		<updated>2007-01-22T15:35:26-04:00</updated>

		<published>2007-01-22T15:35:26-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=69826#p69826</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=69826#p69826"/>
		<title type="html"><![CDATA[capital letter nicks]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=69826#p69826"><![CDATA[
<div class="codebox"><p>Code: </p><pre><code>set remtime 60bind join - * kickcapitalsbind time - {?0*} {foreach {a b} [array get ::capCot] {if {[unixtime]-$b &gt;= $::remtime} {unset ::capCot($a)}};#}proc kickcapitals {nick uhost hand chan} { global capCot remtime if {[regexp {^[A-Z]{1,}$} $nick]} {  putserv "kick $chan $nick :Bad nick detected."  putserv "mode $chan +b [set b *!*@[lindex [split $uhost @] 1]]"  if {[info exists capCot([set nc [string tolower $nick:$chan]])] &amp;&amp; [unixtime]-$capCot($nc) &lt; $remtime} {   timer 2 [list pushmode $chan -b $b]   unset capCot($nc)  } {   utimer 5 [list pushmode $chan -b $b]   set capCot($nc) [unixtime]  } }}</code></pre></div>Edit: The user will be banned for 2 minutes if he rejoin within $remtime seconds after being kicked the first time.<p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=3085">Sir_Fz</a> — Mon Jan 22, 2007 3:35 pm</p><hr />
]]></content>
	</entry>
		<entry>
		<author><name><![CDATA[piggy]]></name></author>
		<updated>2007-01-22T02:32:36-04:00</updated>

		<published>2007-01-22T02:32:36-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=69808#p69808</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=69808#p69808"/>
		<title type="html"><![CDATA[capital letter nicks]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=69808#p69808"><![CDATA[
Sir_Fz<br><br>Thanks, its exactly what i wanted thank you. <br> <br>Is it possible to extend on that and add a second section where by if that same user rejoins with a nick in all capitals the second time round he gets kicked with a msg and banned for 2 minutes and then again when the 2 minutes is up the ban gets removed?<br><br>Thanks<p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=6625">piggy</a> — Mon Jan 22, 2007 2:32 am</p><hr />
]]></content>
	</entry>
		<entry>
		<author><name><![CDATA[Sir_Fz]]></name></author>
		<updated>2007-01-21T21:14:19-04:00</updated>

		<published>2007-01-21T21:14:19-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=69805#p69805</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=69805#p69805"/>
		<title type="html"><![CDATA[capital letter nicks]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=69805#p69805"><![CDATA[
<div class="codebox"><p>Code: </p><pre><code>bind join - * kickcapitalsproc kickcapitals {nick uhost hand chan} { if {[regexp {^[A-Z]{1,}$} $nick]} {  putserv "kick $chan $nick :Bad nick detected."  putserv "mode $chan +b [set b *!*@[lindex [split $uhost @] 1]]"  utimer 5 [list pushmode $chan -b $b] }}</code></pre></div><p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=3085">Sir_Fz</a> — Sun Jan 21, 2007 9:14 pm</p><hr />
]]></content>
	</entry>
		<entry>
		<author><name><![CDATA[piggy]]></name></author>
		<updated>2007-01-21T20:05:46-04:00</updated>

		<published>2007-01-21T20:05:46-04:00</published>
		<id>https://forum.eggheads.org/viewtopic.php?p=69800#p69800</id>
		<link href="https://forum.eggheads.org/viewtopic.php?p=69800#p69800"/>
		<title type="html"><![CDATA[capital letter nicks]]></title>

		
		<content type="html" xml:base="https://forum.eggheads.org/viewtopic.php?p=69800#p69800"><![CDATA[
Hey Guys<br><br>I have taken a look at the "bad nick" tcl's in the archive, most of them see to respond to bad nicks that you specify in a list.<br><br>I am looking for a tcl that when a user joins the channel with a nick that is in complete capital letters it gets banned and kicked with a reason i can specify.<br>The second thing is if possible the bot must remove the ban 5 seconds later to prevent users with auto-rejoin on.<br><br>If anyone can suggest something that will be great.<br><br>Thanks in advance.<p>Statistics: Posted by <a href="https://forum.eggheads.org/memberlist.php?mode=viewprofile&amp;u=6625">piggy</a> — Sun Jan 21, 2007 8:05 pm</p><hr />
]]></content>
	</entry>
	</feed>
