Colour bars/Display: Difference between revisions

→‎{{header|Factor}}: Oops factor forgot with-ui
(Quick and dirty factor)
(→‎{{header|Factor}}: Oops factor forgot with-ui)
Line 478:
IN: rosetta-code.colour-bars-display
 
: colors ( -- ) [
horizontal <track>
{
Line 495:
{ 640 480 } >>pref-dim
"bars" open-window
] with-ui ;
;
MAIN: colors</lang>
 
Anonymous user