勾配の視覚化

//
// 勾配を彩度でグラデーションする
// RunOver:Points
//

float maxSlople = chf("slope"); // 上限の勾配（％）（赤く表示される値）

vector N = normalize(@N);
vector up = set(0,1,0);

// 傾斜角
float angle = acos(dot(N, up));
// 勾配（％）へ変換
float slope = tan(angle)*100;

float range = 0.5;      // 0～1までの彩度幅
int sign = -1;          // 1か-1のグラデーションの向き
float offset = 0.5;     // 彩度の開始位置
float hue = clamp(slope / maxSlople, 0, 1) * range * sign + offset;
@Cd = hsvtorgb(hue, 1, 1);