12 hex_cmd(x, y, c) = sprintf("set obj hex_id poly from %g,%g-a to %g+a*C, %g-a*S to %g+a*C,%g+a*S to %g,%g+a to %g-a*C,%g+a*S to %g-a*C,%g-a*S to %g,%g-a fs solid 0.8 border lc pal cb %g lw 2 fc pal cb %g; hex_id = hex_id + 1;", x,y,x,y,x,y,x,y,x,y,x,y,x,y,c,c)
\r
14 read_f(x, y, c) = (cmd=cmd.hex_cmd(x, y, c), y)
\r
18 plot fn using 1:(read_f($1,$2,$3))
\r
26 set xr [GPVAL_X_MIN-A:GPVAL_X_MAX+A]
\r
27 set yr [GPVAL_Y_MIN-A:GPVAL_Y_MAX+A]
\r
30 #plot fn using 1:2:3 w d lc pal notit
\r
31 plot fn using 1:2:3 notitle lc pal w d
\r