HSB and RGB Example

globals [
  HSB-as-RGB
  HSB-color
  RGB-color
]

to go
  set HSB-as-RGB hsb hue saturation brightness
  set HSB-color approximate-hsb hue saturation brightness
  ask quadrant -1  1 [ set pcolor HSB-as-RGB ]
  ask quadrant  1  1 [ set pcolor HSB-color ]
  set RGB-color approximate-rgb rgb-red rgb-green rgb-blue
  ask quadrant -1 -1 [ set pcolor (list rgb-red rgb-green rgb-blue) ]
  ask quadrant  1 -1 [ set pcolor RGB-color ]
end 

to-report quadrant [x y]  ;; inputs are 1 or -1
  report patches with [patch-quadrant = list x y]
end 

to-report patch-quadrant  ;; patch procedure
  report list ifelse-value (pxcor < world-width / 2) [-1] [1]
              ifelse-value (pycor < world-width / 2) [-1] [1]
end 


; Public Domain:
; To the extent possible under law, Uri Wilensky has waived all
; copyright and related or neighboring rights to this model.