RosettaCodeData/Task/Colour-bars-Display/EasyLang/colour-bars-display.easy
2023-07-01 13:44:08 -04:00

7 lines
141 B
Text

col[] = [ 000 900 090 009 909 099 990 999 ]
w = 100 / len col[]
for i = 1 to len col[]
color col[i]
move w * (i - 1) 0
rect w 100
.