进退自如 通达信副图指标 源码 贴图

VAR1:=(HHV(HIGH,9)-LLV(LOW,9));
VAR2:=(HHV(HIGH,9)-CLOSE);
VAR3:=(CLOSE-LLV(LOW,9));
VAR4:=VAR2/VAR1*100-70 ;
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR6:=(2*C+H+L)/4;
VAR7:=SMA((VAR3/VAR1*100),3,1);
VAR8:=LLV(LOW,34);
VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);
VAR10:= IF(VAR9>100,VAR9-100,0);
VARA:=HHV(HIGH,34);
防线B:EMA((VAR6-VAR8)/(VARA-VAR8)*100,8),COLORWHITE;

B1:=EMA(防线B,5);
STICKLINE(防线B>0 AND 防线B-B1>=0,79,80,6,0),COLORFF8000;
STICKLINE(防线B>0 AND 防线B-B1<0,79,80,6,1),COLORRED;
STICKLINE(防线B>0 AND 防线B-B1>=0,19,20,6,0),COLOR00FF00;
STICKLINE(防线B>0 AND 防线B-B1>=0,49,50,6,0),COLORYELLOW;
STICKLINE(防线B>0 AND 防线B-B1<0,49,50,6,1),COLORRED;
STICKLINE(防线B>0 AND 防线B-B1<0,19,20,6,1),COLORRED;
红进:防线B-B1,COLORRED;
{WWW.GPXIAZAI.COM}
{STICKLINE(防线B-B1>0,防线B,B1,8,1),COLOR00FF00;}
绿出:-红进,COLOR00FF00;
{STICKLINE(防线B-B1<0,防线B,B1,8,1),COLORRED;}
卖:(REF(红进,1)>0 AND 红进<=0) OR (红进<1 AND 红进>=0 AND C<O) AND 防线B>62,COLORRED;
卖出:FILTER(卖=1,3);
STICKLINE(卖出,0,28,2,0),COLOR00FF00;
DRAWTEXT(卖出,45,'卖'),COLOR00FF00;
买:卖出=0 AND REF(红进,1)<0 AND 红进>0 AND 防线B<42,COLORRED;
买入:FILTER(买=1,3);
STICKLINE(买入,0,28,2,0),COLORRED;
DRAWICON(买入,30,1);
DRAWTEXT(买入,33,'买'),COLORRED;