<?xml version="1.0" encoding="UTF-8"?><!-- generator="wordpress/2.1.3" -->
<rss version="2.0" 
	xmlns:content="http://purl.org/rss/1.0/modules/content/">
<channel>
	<title>Comments on: Geocachers, Welcome!</title>
	<link>http://www.scratchley.org/2008/08/06/geocachers-relax/</link>
	<description>Day by Day from the "Scratchbertans" rambling, ranting and relating for those who notice.</description>
	<pubDate>Thu, 20 Nov 2008 14:19:44 +0000</pubDate>
	<generator>http://wordpress.org/?v=2.1.3</generator>

	<item>
		<title>By: Ranger Bob</title>
		<link>http://www.scratchley.org/2008/08/06/geocachers-relax/#comment-20748</link>
		<author>Ranger Bob</author>
		<pubDate>Wed, 06 Aug 2008 22:12:25 +0000</pubDate>
		<guid>http://www.scratchley.org/2008/08/06/geocachers-relax/#comment-20748</guid>
					<description>What's your Mom's phone number?</description>
		<content:encoded><![CDATA[<p>What&#8217;s your Mom&#8217;s phone number?</p>
]]></content:encoded>
				</item>
	<item>
		<title>By: Ranger Bob</title>
		<link>http://www.scratchley.org/2008/08/06/geocachers-relax/#comment-20749</link>
		<author>Ranger Bob</author>
		<pubDate>Thu, 07 Aug 2008 00:42:15 +0000</pubDate>
		<guid>http://www.scratchley.org/2008/08/06/geocachers-relax/#comment-20749</guid>
					<description>What happened to 'The Breakfast Club' image that I stumbled across yearlier? 'Tis gone now?</description>
		<content:encoded><![CDATA[<p>What happened to &#8216;The Breakfast Club&#8217; image that I stumbled across yearlier? &#8216;Tis gone now?</p>
]]></content:encoded>
				</item>
	<item>
		<title>By: Viajero Perdido</title>
		<link>http://www.scratchley.org/2008/08/06/geocachers-relax/#comment-20751</link>
		<author>Viajero Perdido</author>
		<pubDate>Thu, 07 Aug 2008 19:58:06 +0000</pubDate>
		<guid>http://www.scratchley.org/2008/08/06/geocachers-relax/#comment-20751</guid>
					<description>You need Javascript just to click the banner to see the home page?  Manomanoman...  Who still leaves JS enabled globally?

(Just a friendly tease because I know you're a geek...)</description>
		<content:encoded><![CDATA[<p>You need Javascript just to click the banner to see the home page?  Manomanoman&#8230;  Who still leaves JS enabled globally?</p>
<p>(Just a friendly tease because I know you&#8217;re a geek&#8230;)</p>
]]></content:encoded>
				</item>
	<item>
		<title>By: Sharon Enman</title>
		<link>http://www.scratchley.org/2008/08/06/geocachers-relax/#comment-20755</link>
		<author>Sharon Enman</author>
		<pubDate>Fri, 08 Aug 2008 19:59:19 +0000</pubDate>
		<guid>http://www.scratchley.org/2008/08/06/geocachers-relax/#comment-20755</guid>
					<description>Your MOM saw that!</description>
		<content:encoded><![CDATA[<p>Your MOM saw that!</p>
]]></content:encoded>
				</item>
	<item>
		<title>By: Ranger Bob</title>
		<link>http://www.scratchley.org/2008/08/06/geocachers-relax/#comment-20758</link>
		<author>Ranger Bob</author>
		<pubDate>Mon, 11 Aug 2008 04:44:03 +0000</pubDate>
		<guid>http://www.scratchley.org/2008/08/06/geocachers-relax/#comment-20758</guid>
					<description>I didn't know you Mom could code though?

Sub Cipher()

' Source Ciper in A3

cCol = 1
cRow = 3

Cells(7, 1).Value = ""
Cells(11, 1).Value = ""

For t = cRow To cRow
  For i = 1 To Len(Cells(t, cCol))
    szChar = Mid(Cells(t, cCol), i, 1)
    If IsNumeric(szChar) Then
       ' Store Numeric Digits in A11
       Cells(11, 1).Value = Cells(11, 1).Text &#38; szChar
    Else
       ' Store ALPHA Characters Only in A7
           If szChar Like "[a-zA-Z]" Then
             Cells(7, 1).Value = Cells(7, 1).Text &#38; UCase(szChar)
           End If
    End If
  Next i
Next t

End Sub</description>
		<content:encoded><![CDATA[<p>I didn&#8217;t know you Mom could code though?</p>
<p>Sub Cipher()</p>
<p>&#8216; Source Ciper in A3</p>
<p>cCol = 1<br />
cRow = 3</p>
<p>Cells(7, 1).Value = &#8220;&#8221;<br />
Cells(11, 1).Value = &#8220;&#8221;</p>
<p>For t = cRow To cRow<br />
  For i = 1 To Len(Cells(t, cCol))<br />
    szChar = Mid(Cells(t, cCol), i, 1)<br />
    If IsNumeric(szChar) Then<br />
       &#8216; Store Numeric Digits in A11<br />
       Cells(11, 1).Value = Cells(11, 1).Text &amp; szChar<br />
    Else<br />
       &#8216; Store ALPHA Characters Only in A7<br />
           If szChar Like &#8220;[a-zA-Z]&#8221; Then<br />
             Cells(7, 1).Value = Cells(7, 1).Text &amp; UCase(szChar)<br />
           End If<br />
    End If<br />
  Next i<br />
Next t</p>
<p>End Sub</p>
]]></content:encoded>
				</item>
</channel>
</rss>
