a1:"XT3.B1##month";
a2:"XT3.B2##month";
b1:"XT3.B3##month";
b2:"XT3.B4##month";
m:="XT3.B5##month";
b3:if(m>max(a1,max(a2,max(b1,b2))),m,b2),colorffffff;
b4:if(m<min(a1,min(a2,min(b1,b2))),m,a1),colorffffff;
fillrgn(a1>a2,a1,a2),colorffffff;
fillrgn(a1<a2,a1,a2),colorffffff;
fillrgn(b1>b2,b1,b2),colorffffff;
fillrgn(b1<b2,b1,b2),colorffffff;
fillrgn(b4<min(a1,min(a2,min(b1,b2))),b4,min(a1,min(a2,min(b1,b2)))),colorff0000;
fillrgn(b3>max(a1,max(a2,max(b1,b2))),b3,max(a1,max(a2,max(b1,b2)))),color808080;
stickline(indexc>=ref(indexc,1),indexc,indexo,8,0),colorff;
stickline(indexc>=ref(indexc,1),indexc,indexh,0,0),colorff;
stickline(indexc>=ref(indexc,1),indexc,indexl,0,0),colorff;
stickline(indexc<ref(indexc,1),indexc,indexo,8,0),colorff00;
stickline(indexc<ref(indexc,1),indexc,indexl,0,0),colorff00;
stickline(indexc<ref(indexc,1),indexc,indexh,0,0),colorff00;