VARIABLE:mark:=0;
H20:=REF(HHV(H,20),1);
H55:=REF(HHV(H,55),1);
L20:=REF(LLV(L,20),1);
L55:=REF(LLV(L,55),1);
IF (C>H20 OR C>H55) AND MARK<=0 THEN
BEGIN
MARK:=1;
DRAWICON(1,H,1);
if C>H20 and C>H55 then DRAWTEXT(1,h,'双高',COLORRED,0);
END
IF (L<L20 OR C<L55) AND MARK>=0 THEN
BEGIN
MARK:=-1;
DRAWICON(1,l,2);
if L<L20 and C<L55 then DRAWTEXT(1,l,'双低',COLORGREEN,0);
END
VARIABLE:mark:=0;
H20:=REF(HHV(H,20),1);
H55:=REF(HHV(H,55),1);
L20:=REF(LLV(L,20),1);
L55:=REF(LLV(L,55),1);
IF (C>H20 OR C>H55) AND MARK<=0 THEN
BEGIN
MARK:=1;
DRAWICON(1,H,4);
if C>H20 and C>H55 then DRAWTEXT(1,h,'双高',COLORRED,0);
END
IF (L<L20 OR C<L55) AND MARK>=0 THEN
BEGIN
MARK:=-1;
DRAWICON(1,l,5);
if L<L20 and C<L55 then DRAWTEXT(1,l,'双低',COLORGREEN,0);
END