通达信土造EXPMA主图选股指标公式源码

通达信土造EXPMA主图选股指标公式源码

源码正文：

M1:=9{XG51};
M2:=55{XG51};
EXP1:expma(CLOSE,M1){XG51};
EXP2:EXPma(CLOSE,M2){XG51};
DRAWTEXT(crOSS(zig(3,8),REF(ZIG(3,8),1)),LOW*0.97,'←买吧') ,
LINETHICK2,COLOR00FFFF{XG51};
DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND
(REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.99,1){XG51};
DRAWICON((ZIG(3,5)=REF(ZIG(3,5),2)) AND
(REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),H,2){XG51};
AZ6:=(3 * (SMA((((CLOSE - (LLV(LOW,27))) /
((HHV(HIGH,27)) - (LLV(LOW,27)))) * 100),5,1))) - (2 * (SMA((SMA((((CLOSE -
(LLV(LOW,27))) / ((HHV(HIGH,27)) - (LLV(LOW,27)))) * 100),5,1)),3,1))){XG51};
B7:=(10){XG51};
DRAWTEXT(CROSS(AZ6,B7),L,''),COLOR0000FF{XG51};
VARC:=(ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND
(REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)){XG51};
VARD:=(ZIG(3,5)=REF(ZIG(3,5),2)) AND
(REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)){XG51};
DRAWTEXT((VARC=1),L,'&larr;追呀'),COLOR0000FF{XG51};
DRAWTEXT((VARD=1),H,'&larr;跑吧'),COLOR00FF00{XG51};
DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),COLORE88300,LINETHICK2{X*G-5~1*C*N*{};