2合1逃顶专用－精品通达信指标公式源码分享

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,5)*100,COLORWHITE;   

G:MA(B,2);   

D:CROSS(B,G)*1000,COLORRED;   

W:CROSS(G,B)*1000,COLORBLUE;   

E:=REF(INDEXC,1);   

F:=SMA(MAX(INDEXC-E,0),3,1)/SMA(ABS(INDEXC-E),3,1);   

VAR10:=F AND F<8;   

VAR11:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;   

VAR12:=SMA(VAR11,3,1);   

VAR13:=SMA(VAR12,3,1);   

VAR14:=VAR13 AND VAR13<20;   

A AND D AND VAR10 AND VAR14 ;   

DRAWTEXT(W=1000,1000,'卖' ),COLORWHITE ;   

DRAWTEXT(D=1000, 1000,'买'),COLORWHITE ;   

VAR33:=PEAKBARS(3,15,1)<10;   

VAR55:=IF(VAR33=1,2,0);   

顶:= IF(VAR55=2,2,0);   

顶A:IF(顶>REF(顶,1),50,0),COLORGREEN;   

DRAWTEXT(顶A=50,45,'逃顶'),COLOR00FF00;