HH:HHV(H,450),COLORWHITE,LINETHICK2;
LL:LLV(L,450),COLORWHITE,LINETHICK2;
VAR1:=(HH-LL);
HL75:HH-VAR1*0.25,COLORFF0000;
HL62:HH-VAR1*0.375,CIRCLEDOT,COLORWHITE;
HL50:HH-VAR1*0.5,COLORYELLOW;
HL38:HH-VAR1*0.625,CIRCLEDOT,COLORWHITE;
HL25:HH-VAR1*0.75,COLOR0000FF;