#colour MkDrawMan page 7/14

for $x from 0 to 255 {
  path {
    outlinecolour none
    fillcolour $x 0 ( 255 - $x )
    move ( 100 + $x ) 100
    rline 1 0  rline 0 100  rline -1 0 close
  }
}
