"open test.ctl"
pull name
"set t 1 500"
"set display color white"
"clear"
"set grads off"
"set xlopts 1 3 0.15"
"set ylopts 1 3 0.15"
"set vrange -0.01 6"
"set gxout bar"
"set datawarn off"
"set ccolor 9"
"d const(load,100,-a)"
"set datawarn off"
"set ccolor 2"
"d 5+0*const(load,100,-a)"
"set datawarn off"
"set ccolor 8"
"d 3+0*const(load,100,-a)"
"set datawarn off"
"set ccolor 7"
"d 1.5+0*const(load,100,-a)"
"set datawarn off"
"set ccolor 5"
"d 0.75+0*const(load,100,-a)"
"set datawarn off"
"set ccolor 3"
"d 0.25+0*const(load,100,-a)"
"set gxout line"
"set clab off"
"set ccolor 0"
"set cthick 3"
"d const(load,1,-a)"
"set gxout bar"
"set datawarn off"
"set ccolor 1"
"d load"
"draw xlab Time (UTC)"
"draw ylab Load per CPU/Core"
"draw title Machine Name: "name
"set gxout stat"
"d ave(load,t=1,t=500)"
rec=sublin(result,9)
val=subwrd(rec,4)
"d max(load,t=1,t=500)"
rec=sublin(result,9)
val2=subwrd(rec,4)
"set string 0 l"
"draw string 2.15 7.5 Mean load: "substr(val,1,5)
"draw string 2.15 7.25 Max load: "substr(val2,1,5)
"printim "name".png x1024 y768"
"quit"