Rosetta Code

Colour bars/Display: Difference between revisions

Page Discussion

Colour bars/Display (view source)

Revision as of 15:08, 2 December 2012

103 bytes removed ,  11 years ago
→‎{{header|Run BASIC}}
Line 526:
 
=={{header|Run BASIC}}==
<lang runbasic>dim colorcolors$(8) = "black,red,green,blue,magenta,cyan,yellow,white"
color$(1) = "black"
color$(2) = "red"
color$(3) = "green"
color$(4) = "blue"
color$(5) = "magenta"
color$(6) = "cyan"
color$(7) = "yellow"
color$(8) = "white"
html "<TABLE BORDER=1 CELLPADDING=0 CELLSPACING=4><tr height=70>"
for i = 1 to 8
html "<td width=20 bgcolor='";colorword$(colors$,i,",");"'</td>"
next i
html "</tr></table>"</lang>
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/182329"