pixels.bas

' draw basic gradient for picocalc MMBasic

sub Draw()
  local x
  local y
  local width = 320
  local height = 320

  for x = 0 to width-1
    for y = 0 to height-1
      r = (x/width)*255
      g = (y/width)*255
      b = 128
      color RGB(r, g, b)
      pixel x, y
    next
  next

end sub

Draw()

end