VAR1:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),25);
 VAR2:=HIGH-REF(HIGH,1);
 VAR3:=REF(LOW,1)-LOW;
 VAR4:=SUM(IF(VAR2>0 AND VAR2>VAR3,VAR2,0),25);
 VAR5:=SUM(IF(VAR3>0 AND VAR3>VAR2,VAR3,0),25);
 VAR6:=VAR4*100/VAR1;
 VAR7:=VAR5*100/VAR1;
 VAR8:=MA(ABS(VAR7-VAR6)/(VAR7+VAR6)*100,15);
 VAR9:=(VAR8+REF(VAR8,15))/2;
 A:=(VAR7>VAR6 AND VAR7>25 AND VAR6<25);
 B:ZIG(3,50/5)*100,COLORWHITE;
 G:MA(B,2),COLORYELLOW;

T1:=BARSLAST(REF(CROSS(G,B),1));
 TT1:=REF(B,T1+2);
 T2:=BARSLAST(REF(CROSS(G,B),2));
 TT2:=REF(B,T2+2);
 T3:=BARSLAST(REF(CROSS(G,B),3));
 TT3:=REF(B,T3+2);
 T4:=BARSLAST(REF(CROSS(G,B),4));
 TT4:=REF(B,T4+2);
 T5:=BARSLAST(REF(CROSS(G,B),5));
 TT5:=REF(B,T5+2);
 TTT1:=MIN(TT1,MIN(TT2,MIN(TT3,MIN(TT4,TT5))))=TT1;
压线1:DRAWLINE(TTT1,TT2,TTT1,TT1,1),COLORYELLOW,LINETHICK2;
压线2:DRAWLINE(TTT1,TT3,TTT1,TT1,1),COLORYELLOW,LINETHICK2;
压线3:DRAWLINE(TTT1,TT4,TTT1,TT1,1),COLORYELLOW,LINETHICK2;
压线4:DRAWLINE(TTT1,TT5,TTT1,TT1,1),COLORYELLOW,LINETHICK2;