GRAPH 3D v2.425 (20-FEB-2017)

[Han]

You mean like this?

Change the g3D_zcolor() function to this:

Code:


//----------------------------
// g3D_zcolor
//----------------------------
g3D_zcolor(x,y)
begin
  local r,c;
  local minz,maxz;
  minz:=max(minZ,zmin3D);
  maxz:=min(maxZ,zmax3D);

  case
    if cmode==0 then
      r:=RGB((x-1)/grid3D*255,1,(y-1)/grid3D*255);
    end;
    if cmode==1 then
      r:=Zvals(x,y);
      if r>maxz then r:=maxz; end;
      if r<minz then r:=minz; end;
      r:=(r-minz)/(maxz-minz+1);
      c:=IP(4*r);
      r:=IP(r*254)+1;
      case
        if c==0 then r:=RGB(255,r,0); end;
        if c==1 then r:=RGB(255-r,255,0); end;
        if c==2 then r:=RGB(0,255,r); end;
        if c==3 then r:=RGB(0,255-r,255); end; 
      end;
    end;
  end;

  if zColor(x,y) then
    return(r);
  else
    return(0);
  end;
end;