天极的部分公式（通达信版）

刚帮别人把以前发的“天极指标系统”改成了通达信版，放着也没有，发出来吧，借用论坛一句俗语：好用的用，不好用的扔，有钱的给捧个“钱场”没钱的捧个“人场”一楼发源码

{MJS天极选股系统}
Z180:=100*(WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9));
T170:=HHV(CLOSE,176)*0.93;
Z184:=100*WINNER(CLOSE)-Z180;
M112攻:IF(Z184>38 AND CLOSE>T170,1,0);
M100:=FORCAST(CLOSE,9)*0.98;
M102:=IF(M100>=REF(M100,1),1,0);
M103:=IF(REF(M102,1)=0 AND M102=1,1.2,0);
M200:=FORCAST(CLOSE,3);
M201:=EMA(EMA(M200,19),8);
M202:=EMA(EMA(M200,78),21);
M203:=EMA(EMA(M200,256),55);
波段:IF(CLOSE>M203 AND CLOSE>M202 AND CLOSE<M201 AND M103>1,1,0);
S100:=VOL/CAPITAL*100;
M190:=COST(90);
马:IF(CLOSE>M190 AND S100<4,1,0);
踏:(CLOSE-LLV(CLOSE,250))/(HHV(CLOSE,250)-LLV(CLOSE,250))*300;
飞:(CLOSE-LLV(CLOSE,21))/LLV(CLOSE,21)*300;
涨幅A:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
燕:IF(涨幅A>2.85 AND 涨幅A<7,涨幅A*3,0);
M188:=COST(88);
金线:IF(CLOSE>M188,1,0);
T171:=IF(T170<REF(T170,1) OR T170<REF(T170,2) OR T170<REF(T170,3),2,T170);
T900:=IF(T170>REF(T170,1),1,0);
T901:=BARSLAST(T900=1);
T902:=BARSLAST(T900=0);
T903:=IF(T901>50,2,0);
马踏:IF(REF(T901,1)>50 AND T902=1,1.2,0),COLOR00FFFF;