    # Example 6color -- Plot IR image of Gulf of Maine

    # define characteristics of norda images
    \0val = "5"			# 0 in image
    \255val = "30.5"		# 255 in image
    .rows. = 128
    .cols. = 128
    .pixel_width. = 2
    .km. = {rpn .cols. .pixel_width. *}

    # get filenames
    query \filename "Name image file" ("example6image.dat")
    query \maskname "Name mask  file" ("example6mask.dat")

    # get data
    open \filename binary uchar
    set image range \0val \255val
    read image .rows. .cols. box 0 0 .km. .km.
    close
    open \maskname binary uchar
    read image mask .rows. .cols.
    close

    # find out what grayscale method to use
    query \minT  "T/deg for white on page?          " ("11")
    query \maxT  "T/deg for black on page?          " ("14")
    \incT = "1"

    # set up scales.
    set x size 12.8
    set y size 12.8
    set x name "km"
    set y name "km"
    set x axis 0 .km. 32
    set y axis 0 .km. 32

    # plot image, grayscale, and histogram
    set image colorscale hsb 0 1 1 \maxT hsb .6666666 1 1 \minT
    draw image
    draw image palette left \minT right \maxT increment \incT
    draw image histogram
    draw title "Example 6: colorscale"