AAA:=(3*C+H+L+O)/6;   

VAR1:(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;   

VAR2:(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;   

VAR3:(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;   

VAR4:(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;   

VAR5:(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;   

VAR6:(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;   

{CROSS(VAR1,VAR6);   

DRAWICON(VAR1>VAR6,VAR1,1);};   

C,COLORRED;   

TY:=C;   

A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);   

A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);   

A:=REF(C,BARSLAST(HD)); B:=REF(L,BARSLAST(LD));   

T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;   

T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);   

顶:IF(T1,A,A),COLORYELLOW,POINTDOT;   

底:IF(T2,B,B),COLORGREEN,POINTDOT;