通达信DS寻找临界点X(原创首发)（主图 源码 贴图）

主图源码：

 

JJ:=(CLOSE+HIGH+LOW)/3;

A:=EMA(JJ,10);

B:=REF(A,1);

STICKLINE(A>B,A,B,3,0),COLORYELLOW;

STICKLINE(A<B,A,B,3,0),COLORBLUE;

{寻找临界点}

{M(1,300,88)}

{N1(1,100,6)}

M:=88;

N1:=6;

VAR0A:=EMA(EMA(EMA(CLOSE,2),2),2);

MA13:(MA(VAR0A,13)*0.99);

MA13B:(MA(VAR0A,13)*0.999);

STICKLINE(MA13>REF(MA13,1),MA13,MA13B,1,0),COLORRED;

STICKLINE(MA13<REF(MA13,1),MA13,MA13B,1,0),COLORGREEN;

STICKLINE(MA13=REF(MA13,1),MA13,MA13B,1,0),COLORYELLOW;

TLAMSENR:=MAX(MAX((HIGH-LOW),ABS((REF(CLOSE,1)-HIGH))),ABS((REF(CLOSE,1)-LOW)));

ATR:=MA(TLAMSENR,13);VAR1A:=(REF(CLOSE,1)-REF(ATR,1));

生命线:(HHV(VAR1A,12)),LINETHICK4,COLOR0080FF;

VAR1:=EMA(AMOUNT/VOL/100,3);

控盘成本:EMA(VAR1,M),LINETHICK2;

低吸伏击:EMA(VAR1,M)*0.85,LINETHICK2,COLORFFFF00;

走势铁底:低吸伏击*0.87,LINETHICK3,COLORFF00FF;

VAR2:=LOW<=走势铁底 AND CLOSE>REF(CLOSE,1)*1.02;

DRAWICON(FILTER(VAR2,N1),L*0.98,23);

EFAN中值:(控盘成本+低吸伏击)/2;

 

红十字选股：

M:=88;

N1:=6;

TLAMSENR:=MAX(MAX((HIGH-LOW),ABS((REF(CLOSE,1)-HIGH))),ABS((REF(CLOSE,1)-LOW)));

ATR:=MA(TLAMSENR,13);VAR1A:=(REF(CLOSE,1)-REF(ATR,1));

生命线:=(HHV(VAR1A,12)),LINETHICK4,COLOR0080FF;

VAR1:=EMA(AMOUNT/VOL/100,3);

控盘成本:=EMA(VAR1,M),LINETHICK2;

低吸伏击:=EMA(VAR1,M)*0.85,LINETHICK2,COLORFFFF00;

．．．．省略！