commands linkviews-config.txt;

#param pname symbolic;
#param fname symbolic = "data/" & pname & ".txt";

#let pname := "views";
#display fname;
#data (fname);

table views IN "ODBC" "data/linkviews.xls":
  [line ~ LINES],
  views[line,'width'] ~ width,
  views[line,'red'] ~ red,
  views[line,'green'] ~ green,
  views[line,'blue'] ~ blue;
read table views;

param showload >=0, <=1;

param line in LINES, =if showload>10**-view_thinnest
  then round(showload,2+int(-log10(showload)))
  else 10**-view_thinnest;

param width = views[line,'width'];
param red = views[line,'red'];
param green = views[line,'green'];
param blue = views[line,'blue'];
param color symbolic = sprintf("%f %f %f",red,green,blue);
param view symbolic = sprintf("%f setlinewidth %s setrgbcolor",view_thickness*width,color);