PRO whitebot ;+ ; NAME: ; WHITEBOT ; PURPOSE: ; Making the bottom of the colour table white. ; CATEGORY: ; ; CALLING SEQUENCE: ; WHITEBOT ; INPUTS: ; None. ; OPTIONAL INPUTS: ; None. ; KEYWORD PARAMETERS: ; None. ; OUTPUTS: ; None. ; OPTIONAL OUTPUTS: ; None. ; COMMON BLOCKS: ; None. ; SIDE EFFECTS: ; The lowest colour in the colour table is changed to white. ; RESTRICTIONS: ; None. ; PROCEDURE: ; The presently-loaded colour table is read into arrays for ; the red, green, and blue components. The first element in ; each array is set to 255B, and the colour table is loaded ; from the modified arrays. ; EXAMPLE: ; loadct,13 ; Load the RAINBOW colour table ; whitebot ; change the last colour from red to white ; SEE ALSO: ; ; MODIFICATION HISTORY: ; Written by: Your name here, Date. ;- TVLCT,r,g,b,/GET r(0)=255B g(0)=255B b(0)=255B TVLCT,r,g,b RETURN END