Anonymous user
Colour bars/Display: Difference between revisions
→{{header|PureBasic}}
(Added BBC BASIC) |
|||
Line 485:
CloseConsole()
EndIf</lang>
=={{header|Run BASIC}}==
<lang runbasic>dim color$(8)
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=";color$(i);"</td>"
next i
html "</tr></table>"</lang>
<TABLE BORDER=1 CELLPADDING=0 CELLSPACING=4><tr height=70><td width=20 bgcolor=black</td><td width=20 bgcolor=red</td><td width=20 bgcolor=green</td><td width=20 bgcolor=blue</td><td width=20 bgcolor=magenta</td><td width=20 bgcolor=cyan</td><td width=20 bgcolor=yellow</td><td width=20 bgcolor=white</td></tr></table>
=={{header|Scala}}==
| |||