股票软件通达信精品指标公式－做多能量指标源码通达信公式
公式源码：
A1:=FORCAST(EMA(CLOSE,5),6);
A2:=FORCAST(EMA(CLOSE,8),6);
A3:=FORCAST(EMA(CLOSE,11),6);
A4:=FORCAST(EMA(CLOSE,14),6);
A5:=FORCAST(EMA(CLOSE,17),6);
B:=A1+A2+A3+A4-4*A5;
TOWERC:=EMA(B,2);
FORCAST(EMA(B,3),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,4),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,5),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,6),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,7),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,8),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,9),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,10),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,11),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,12),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,13),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,14),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,15),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,16),6),POINTDOT,COLORGREEN;
FORCAST(EMA(B,17),6),POINTDOT,COLORGREEN;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),8,0),COLORRED;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,REF(TOWERC,1),8,0),COLORGREEN;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),5,0),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),3,0),COLORRED;
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,REF(TOWERC,1),0,0),COLORRED;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,REF(TOWERC,1),8,0),COLORGREEN;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,REF(TOWERC,1),5,0),COLORGREEN;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,REF(TOWERC,1),2,0),COLORGREEN;
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,REF(TOWERC,1),0,0),COLORGREEN;
VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DIR1:=ABS(CLOSE-REF(CLOSE,5));
VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);
ER1:=DIR1/VIR1;
CS1:=ER1*(0.8-2/8)+2/8;
CQ1:=CS1*CS1;
DIR2:=ABS(CLOSE-REF(CLOSE,10));
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);
ER2:=DIR2/VIR2;
CS2:=ER2*(0.8-2/24)+2/24;
CQ2:=CS2*CS2;
DRAWICON(CROSS(VAR2,MA(VAR3,6)),EMA(B,17),25);
E1:=BARSCOUNT(C);
AH:=HHV(H,200);
AL:=LLV(L,200);
B0:=(AH-AL)/40;
KB1:=H+B0;
KB2:=L-B0;
DRAWTEXT((E1+0)/34=FLOOR((E1+0)/34),EMA(B,17),'时窗'),COLORWHITE;
特别提示:
选股预警指标编写 ,不同主流行情软件间指标转换。 请联系微信：396950280
一个聚百万原创指标公式圈子
