Color Chart Example

Color Chart Example preview image

1 collaborator

Uri_dolphin3 Uri Wilensky (Author)

Tags

code example 

Tagged by Reuven M. Lerner over 5 years ago

Model group CCL | Visible to everyone | Changeable by group members (CCL)
Model was written in NetLogo 5.0.4 • Viewed 929 times • Downloaded 27 times • Run 1 time
Download the 'Color Chart Example' modelDownload this modelEmbed this model

Do you have questions or comments about this model? Ask them here! (You'll first need to log in.)


Comments and Questions

Click to Run Model

;; The origin patch is (0,0) is located where the color 0 appears;
;; this helps keep the math relatively simple.  Unfortunately there's
;; no way to make pycor increase as we go down instead of up.  So
;; instead, we use the trick of using negative y coordinates: row
;; 0 has a pycor of 0, row 1 has a pycor of -1, row 2 has a pycor
;; of -2, and so on.

to setup
  ca
  ;; make the background white
  ask patches [ set pcolor white ]
  ;; draw all the colors 0 to 139
  ask patches with [(pxcor >= 0) and (pxcor <= 9) and
                    (pycor <= 0) and (pycor >= -13)]
    [ set pcolor -10 * pycor + pxcor
      set plabel int pcolor ]
  ;; draw the rightmost column of whites
  ask patches with [(pxcor = 10) and (pycor <= 0) and (pycor >= -13)]
    [ set pcolor -10 * pycor + 9.9 ]
  ;; draw the rightmost column of patch labels
  ask patches with [(pxcor = 11) and (pycor <= 0) and (pycor >= -13)]
    [ set plabel word precision (-10 * pycor + 9.9) 4 "      "]
  ;; draw the color key on the left
  ask patches with [(pxcor = -2) and (pycor <= 0)]
    [
      if pycor = int (blue      / -10) [ set plabel "blue" ]
      if pycor = int (brown     / -10) [ set plabel "brown" ]
      if pycor = int (cyan      / -10) [ set plabel "cyan" ]
      if pycor = int (gray      / -10) [ set plabel "gray" ]
      if pycor = int (green     / -10) [ set plabel "green" ]
      if pycor = int (lime      / -10) [ set plabel "lime" ]
      if pycor = int (magenta   / -10) [ set plabel "magenta" ]
      if pycor = int (orange    / -10) [ set plabel "orange" ]
      if pycor = int (pink      / -10) [ set plabel "pink" ]
      if pycor = int (red       / -10) [ set plabel "red" ]
      if pycor = int (sky       / -10) [ set plabel "sky" ]
      if pycor = int (turquoise / -10) [ set plabel "turquoise" ]
      if pycor = int (violet    / -10) [ set plabel "violet" ]
      if pycor = int (yellow    / -10) [ set plabel "yellow" ]
      set plabel (word plabel " = " (-10 * pycor + 5) " ")
    ]
  ;; add black and white in the top row
  ask patches with [pycor = 1]
    [ if pxcor = 0
        [ set plabel "black = 0" ]
      if pxcor = 11
        [ set plabel "white = 9.9      " ] ]
  ;; all make the patch labels visible against background
  ask patches
    [ ifelse pcolor mod 10 >= 4
        [ set plabel-color black ]
        [ set plabel-color white ] ]
end 


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

There are 10 versions of this model.

Uploaded by When Description Download
Uri Wilensky over 5 years ago Updated to NetLogo 5.0.4 Download this version
Uri Wilensky almost 6 years ago Updated version tag Download this version
Uri Wilensky almost 7 years ago Updated to NetLogo 5.0 Download this version
Uri Wilensky over 8 years ago Updated from NetLogo 4.1 Download this version
Uri Wilensky over 8 years ago Updated from NetLogo 4.1 Download this version
Uri Wilensky over 8 years ago Updated from NetLogo 4.1 Download this version
Uri Wilensky over 8 years ago Updated from NetLogo 4.1 Download this version
Uri Wilensky over 8 years ago Model from NetLogo distribution Download this version
Uri Wilensky over 8 years ago Color Chart Example Download this version
Uri Wilensky over 8 years ago Color Chart Example Download this version

Attached files

File Type Description Last updated
Color Chart Example.png preview Preview for 'Color Chart Example' over 5 years ago, by Uri Wilensky Download

This model does not have any ancestors.

This model does not have any descendants.