View Full Version : "Show us your Colors" is hiding in the ether
boroko
- 20th September 2009, 12:00
I have went looking for "Show us your Colors" a few times and I am unable to find it anymore. The link that I have bookmarked and the one that shows up in the searches is http://www.picbasic.co.uk/forum/showthread.php?t=6221 , but that just throws an error..
Anyone?
Bo
mackrackit
- 20th September 2009, 19:03
In MCS save your project as htm. Open the htm in notepad or something like that. Copy the htm to the post between code tags.
' Convert numeric value to ASCII hexadecimal equivalents.
</i></font><font color="#FF0000"><b>INCLUDE </b></font><font color="#00FF00"><b><i>"bs1defs.bas" </i></b></font><font color="#000080"><i>' Include BS1 variable and serial definitions
</i></font><font color="#0000FF"><b>SO </b></font><font color="#FF0000"><b>CON </b></font>0 <font color="#000080"><i>' Define serial out
</i></font><font color="#0000FF"><b>mainloop</b></font>: <font color="#0000FF"><b>W6 </b></font>= <font color="#0000FF"><b>W0 </b></font>: <font color="#FF0000"><b>GOSUB </b></font><font color="#0000FF"><b>HexW </b></font><font color="#000080"><i>' Print W0
</i></font><font color="#FF0000"><b>SEROUT </b></font><font color="#0000FF"><b>SO</b></font>,<font color="#0000FF"><b>N2400</b></font>,[13,10] <font color="#000080"><i>' Print end of line
</i></font> <font color="#FF0000"><b>RANDOM </b></font><font color="#0000FF"><b>W0</b></font> <font color="#000080"><i>' Randomize W0
</i></font><font color="#FF0000"><b>GOTO </b></font><font color="#0000FF"><b>mainloop </b></font><font color="#000080"><i>' Do this forever!!!
' Send W6 as XXXX (Uses W5)
</i></font><font color="#0000FF"><b>HexW</b></font>: <font color="#FF0000"><b>GOSUB </b></font><font color="#0000FF"><b>HexB13 </b></font><font color="#000080"><i>' Print MSB
</i></font><font color="#0000FF"><b>B13 </b></font>= <font color="#0000FF"><b>B12 </b></font><font color="#000080"><i>' Print LSB
</i></font><font color="#0000FF"><b>HexB13</b></font>: <font color="#0000FF"><b>B11 </b></font>= <font color="#0000FF"><b>B13 </b></font>/ 16 <font color="#000080"><i>' Print MSN
</i></font> <font color="#FF0000"><b>GOSUB </b></font><font color="#0000FF"><b>HexB11
</b></font> <font color="#0000FF"><b>B11 </b></font>= <font color="#0000FF"><b>B13 </b></font>& 15
<font color="#0000FF"><b>HexB11</b></font>: <font color="#FF0000"><b>LOOKUP </b></font><font color="#0000FF"><b>B11</b></font>,[<font color="#00FF00"><b><i>"0123456789ABCDEF"</i></b></font>],<font color="#0000FF"><b>B10 </b></font><font color="#000080"><i>' B10 = HEX$(B11)
</i></font><font color="#FF0000"><b>SEROUT </b></font><font color="#0000FF"><b>SO</b></font>,<font color="#0000FF"><b>N2400</b></font>,[<font color="#0000FF"><b>B10</b></font>]
<font color="#FF0000"><b>RETURN
</b></font>
Above code is from MeLabs web site.
Darrel Taylor
- 20th September 2009, 19:09
Yeah, I made the mistake of posting several threads in the "Test Area"...
Back in April, the entire area was deleted without warning.
For a while it was available from google cache, but that doesn't seem to be there anymore either.
I saved a copy of the cache when it was there.
"I cached the Google cache" :D
Show us your Colors (http://www.darreltaylor.com/files/Show%20us%20your%20Colors_%20-%20MEL%20PICBASIC%20Forum.htm)
<br>
Darrel Taylor
- 20th September 2009, 22:47
Dave,
Ouch!
Your "Colors" hurt my eyes.
I go cross-eyed trying to read the strings. :eek:
Maybe they're better on a white background.
<br>
boroko
- 21st September 2009, 01:48
Thanks,
I have tried to use it a few times, but I couldn't remember what to exclude when I pasted it to get it to work right.
Bo
mackrackit
- 21st September 2009, 18:08
Dave,
Ouch!
Your "Colors" hurt my eyes.
I go cross-eyed trying to read the strings. :eek:
Maybe they're better on a white background.
<br>
Everyone is a critic :)
It does not look bad for me... but I am a little cross-eyed to start with so it has a reverse effect :eek:
comwarrior
- 22nd September 2009, 03:25
love the colours, EXCEPT THE BRIGHT GREEN! ahhh!
I cadney read it captain... :p
Darrel Taylor
- 22nd September 2009, 05:38
There ya go, it does look better on a white background, although black would be cool too.
>> EXCEPT THE BRIGHT GREEN!
In a code block ... OOOUUUUCHHH!
The deadly (green) Snow Crystals
Had deprived him of his sight
And he stood up
And he looked around
And he said:
I CAN'T SEE
OH WOE IS ME
I CAN'T SEE
NO NO
I CAN'T SEE
NO . . . I . . .
He took a dog-doo sno-cone
An' stuffed it in my right eye
He took a dog-doo sno-cone
An' stuffed it in my other eye
An' the huskie wee-wee,
I mean the doggie wee-wee
Has blinded me
An' I can't see
Temporarily
Frank Zappa
But then ... everyone is going "green" these days. :)
<br>
mackrackit
- 22nd September 2009, 06:49
OK,OK...
I will change it :)
Mr. Zappa convinced me...
' Convert numeric value to ASCII hexadecimal equivalents.
</i></font><font color="#FF0000"><b>INCLUDE </b></font><b><i>"bs1defs.bas" </i></b><font color="#000080"><i>' Include BS1 variable and serial definitions
</i></font><font color="#0000FF"><b>SO </b></font><font color="#FF0000"><b>CON </b></font><font color="#800000"><b>0 </b></font><font color="#000080"><i>' Define serial out
</i></font><font color="#0000FF"><b>mainloop</b></font>: <font color="#0000FF"><b>W6 </b></font>= <font color="#0000FF"><b>W0 </b></font>: <font color="#FF0000"><b>GOSUB </b></font><font color="#0000FF"><b>HexW </b></font><font color="#000080"><i>' Print W0
</i></font><font color="#FF0000"><b>SEROUT </b></font><font color="#0000FF"><b>SO</b></font>,<font color="#0000FF"><b>N2400</b></font>,[<font color="#800000"><b>13</b></font>,<font color="#800000"><b>10</b></font>] <font color="#000080"><i>' Print end of line
</i></font> <font color="#FF0000"><b>RANDOM </b></font><font color="#0000FF"><b>W0</b></font> <font color="#000080"><i>' Randomize W0
</i></font><font color="#FF0000"><b>GOTO </b></font><font color="#0000FF"><b>mainloop </b></font><font color="#000080"><i>' Do this forever!!!
' Send W6 as XXXX (Uses W5)
</i></font><font color="#0000FF"><b>HexW</b></font>: <font color="#FF0000"><b>GOSUB </b></font><font color="#0000FF"><b>HexB13 </b></font><font color="#000080"><i>' Print MSB
</i></font><font color="#0000FF"><b>B13 </b></font>= <font color="#0000FF"><b>B12 </b></font><font color="#000080"><i>' Print LSB
</i></font><font color="#0000FF"><b>HexB13</b></font>: <font color="#0000FF"><b>B11 </b></font>= <font color="#0000FF"><b>B13 </b></font>/ <font color="#800000"><b>16 </b></font><font color="#000080"><i>' Print MSN
</i></font> <font color="#FF0000"><b>GOSUB </b></font><font color="#0000FF"><b>HexB11
</b></font> <font color="#0000FF"><b>B11 </b></font>= <font color="#0000FF"><b>B13 </b></font>& <font color="#800000"><b>15
</b></font><font color="#0000FF"><b>HexB11</b></font>: <font color="#FF0000"><b>LOOKUP </b></font><font color="#0000FF"><b>B11</b></font>,[<b><i>"0123456789ABCDEF"</i></b>],<font color="#0000FF"><b>B10 </b></font><font color="#000080"><i>' B10 = HEX$(B11)
</i></font><font color="#FF0000"><b>SEROUT </b></font><font color="#0000FF"><b>SO</b></font>,<font color="#0000FF"><b>N2400</b></font>,[<font color="#0000FF"><b>B10</b></font>]
<font color="#FF0000"><b>RETURN
</b></font>
Powered by vBulletin® Version 4.1.7 Copyright © 2024 vBulletin Solutions, Inc. All rights reserved.