Colour bars/Display: Difference between revisions
Add SmileBASIC implementation
(Add SmileBASIC implementation) |
|||
Line 1,499:
%f'colorbars.png'.open('>:raw').print(image.png);</lang>
=={{header|SmileBASIC}}==
<lang smilebasic>FOR I=0 TO 7
READ R,G,B
GFILL I*50,0,I*50+49,239,RGB(R,G,B)
NEXT
REPEAT UNTIL BUTTON(0) AND #B
DATA 0,0,0
DATA 255,0,0
DATA 0,255,0
DATA 0,0,255
DATA 255,0,255
DATA 0,255,255
DATA 255,255,0
DATA 255,255,255</lang>
=={{header|Tcl}}==
|