-- 18bit colour space from palette
--
w,h=getpicturesize();
for y1=0,7,1 do
  for x1=0,7,1 do
    for y2=0,63,1 do
      for x2=0,63,1 do
        putpicturepixel(x1*64+x2,y1*64+y2,matchcolor((y2*255)/64,
((y1*8+x1)*255)/64,(x2*255)/64))
        end;end;end;end
