set Graphics(arrowshape) {8 10 4} set Graphics(fill,color) {} set Graphics(fill,style) {} set Graphics(font,bold) 0 set Graphics(font,color) black set Graphics(font,italic) 0 set Graphics(font,normal) 0 set Graphics(font,overstrike) 0 set Graphics(font,roman) 0 set Graphics(font,size) 16 set Graphics(font,stipple) {} set Graphics(font,style) {} set Graphics(font,type) Times set Graphics(font,underline) 0 set Graphics(grid,on) 0 set Graphics(grid,size) 10m set Graphics(grid,snap) 1 set Graphics(line,arrow) none set Graphics(line,capstyle) butt set Graphics(line,color) black set Graphics(line,joinstyle) miter set Graphics(line,smooth) 0 set Graphics(line,style) {} set Graphics(line,width) 1 set Graphics(mode) NULL set Graphics(shape) line set Graphics(snap,on) 1 set Graphics(snap,size) 1 set Graphics(splinesteps) 20 set Graphics(text,anchor) c set Graphics(ticks,on) 0 set Graphics(mode) NULL ### End of Graphics parameters set Zoom(button,text) 100% set Zoom(caller) {} set Zoom(factor) 1 set Zoom(font,size) 16 set Zoom(selected,button) 1 set utagCounter 62 set Image(ctr) 0 set Canv(H) 538 set Canv(W) 703 set Canv(SH) 1500 set Canv(SW) 1500 set Canv(bg) white .c config -width $Canv(W) -height $Canv(H) -bg $Canv(bg) -scrollregion "0 0 $Canv(SW) $Canv(SH)" wm geometry . "" .c xview moveto 0 .c yview moveto 0 set TextInfo(utag52) £ set TextInfo(utag34) {} set TextInfo(utag53) (thousands) set TextInfo(utag35) 100 set TextInfo(utag36) 80 set TextInfo(utag37) {} set TextInfo(utag38) 60 set TextInfo(utag40) 20 set TextInfo(utag39) 40 set TextInfo(utag22) {} set TextInfo(utag41) {} set TextInfo(utag23) {Spending Variance} set TextInfo(utag42) {} set TextInfo(utag24) {} set TextInfo(utag43) 0 set TextInfo(utag25) E set TextInfo(utag44) 10 set TextInfo(utag26) D set TextInfo(utag45) 20 set TextInfo(utag27) C set TextInfo(utag46) {} set TextInfo(utag28) B set TextInfo(utag47) 30 set TextInfo(utag29) X set TextInfo(utag30) F set TextInfo(utag48) 40 set TextInfo(utag31) A set TextInfo(utag50) {Volume (Direct labour Hours)} set TextInfo(utag49) 50 set TextInfo(utag32) {Efficiency Variance} set TextInfo(utag51) (thousands) set TextInfo(utag33) 120 .c create line 178.0 414.0 178.0 28.0 -joinstyle miter -width 3 -tags {Line obj utag3} .c create line 179.0 413.0 502.0 413.0 -joinstyle miter -width 3 -tags {Line obj utag5} .c create line 178.0 414.0 562.0 28.0 -joinstyle miter -width 3 -tags {Line obj utag6} .c create line 179.0 59.0 353.0 59.0 353.0 414.0 -joinstyle miter -tags {Line obj utag8} .c create line 179.0 235.0 487.0 235.0 -joinstyle miter -tags {Line obj utag10} .c create line 413.0 414.0 413.0 178.0 -joinstyle miter -tags {Line obj utag12} .c create line 413.0 177.0 489.0 177.0 -joinstyle miter -tags {Line obj utag16} .c create text 265.0 147.0 -font {Times 24 {}} -text {Spending Variance} -tags {text obj utag23} .c create line 265.0 60.9090909091 265.0 118.181818182 -arrow first -arrowshape {8 10 4} -joinstyle miter -tags {Line obj utag20 spline} .c create line 265.0 234.0625 265.0 177.875 -arrow first -arrowshape {8 10 4} -joinstyle miter -tags {Line obj utag21 spline} .c create text 363.0 52.0 -font {Times 24 {}} -text E -tags {text obj utag25} .c create text 337.0 223.0 -font {Times 24 {}} -text D -tags {text obj utag26} .c create text 403.0 167.0 -font {Times 24 {}} -text C -tags {text obj utag27} .c create text 422.0 248.0 -font {Times 24 {}} -text B -tags {text obj utag28} .c create text 574.0 25.0 -font {Times 24 {}} -text X -tags {text obj utag29} .c create text 363.0 403.0 -font {Times 24 {}} -text F -tags {text obj utag30} .c create text 424.0 403.0 -font {Times 24 {}} -text A -tags {text obj utag31} .c create text 519.0 207.0 -font {Times 24 {}} -text {Efficiency Variance} -tags {text obj utag32} .c create text 162.0 59.0 -font {Times 16 {}} -text 120 -tags {text obj utag33} .c create text 164.0 117.0 -font {Times 16 {}} -text 100 -tags {text obj utag35} .c create text 166.0 177.0 -font {Times 16 {}} -text 80 -tags {text obj utag36} .c create text 166.0 235.0 -font {Times 16 {}} -text 60 -tags {text obj utag38} .c create text 167.0 295.0 -font {Times 16 {}} -text 40 -tags {text obj utag39} .c create text 166.0 353.0 -font {Times 16 {}} -text 20 -tags {text obj utag40} .c create text 168.0 423.0 -font {Times 16 {}} -text 0 -tags {text obj utag43} .c create text 235.0 428.0 -font {Times 16 {}} -text 10 -tags {text obj utag44} .c create text 295.0 428.0 -font {Times 16 {}} -text 20 -tags {text obj utag45} .c create text 353.0 426.0 -font {Times 16 {}} -text 30 -tags {text obj utag47} .c create text 413.0 426.0 -font {Times 16 {}} -text 40 -tags {text obj utag48} .c create text 471.0 427.0 -font {Times 16 {}} -text 50 -tags {text obj utag49} .c create text 325.0 470.0 -font {Times 16 {}} -text {Volume (Direct labour Hours)} -tags {text obj utag50} .c create text 324.0 490.0 -font {Times 16 {}} -text (thousands) -tags {text obj utag51} .c create text 108.0 187.0 -font {Times 16 {}} -text £ -tags {text obj utag52} .c create text 109.0 206.0 -font {Times 16 {}} -text (thousands) -tags {text obj utag53} .c create line 471.0 143.8 471.0 176.1 -arrow last -arrowshape {8 10 4} -joinstyle miter -tags {Line obj utag17 spline} .c create line 471.0 236.5 471.0 265.0 -arrow first -arrowshape {8 10 4} -joinstyle miter -tags {Line obj utag19 spline} .c create line 179.0 117.0 188.0 117.0 -joinstyle miter -tags {Line obj utag54} .c create line 178.0 177.0 187.0 177.0 -joinstyle miter -tags {Line obj utag55} .c create line 179.0 295.0 188.0 295.0 -joinstyle miter -tags {Line obj utag57} .c create line 178.0 353.0 188.0 353.0 -joinstyle miter -tags {Line obj utag58} .c create line 235.0 413.0 235.0 402.0 -joinstyle miter -tags {Line obj utag59} .c create line 295.0 402.0 295.0 414.0 -joinstyle miter -tags {Line obj utag61} .c create line 471.0 400.0 471.0 413.0 -joinstyle miter -tags {Line obj utag62}