New Window( "Example", Graph Box( Y Scale( -0.6, 1.6 ), X Scale( -5, 105 ), framesize( 700, 300 ), Marker Size( 6 ), suppressAxes, For( x = 0, x <= 100, x += .0625, Pen Color( Heat Color( x / 100, "jet" ) ); Line( {x, 0}, {x, .5} ); Pen Color( Heat Color( x / 100, "spectral" ) ); Line( {x, .6}, {x, 1.1} ); ); Text Color( "black" ); Text( right justified, {98, .1}, "jet color interpolation" ); // use right Text( right justified, {98, .7}, "spectral color interpolation" ); // justification ) );