通达信绝密EXPMA主图选股指标公式源码

通达信绝密EXPMA主图选股指标公式源码

源码正文：

M1:=12{XG51};
M2:=50{XG51};
VAR1:=C>REF(C,1)AND C>REF(C,2){XG51};
VAR2:=REF(VAR1,1)AND C<=REF(C,1)AND C>=REF(C,2){XG51};
VAR3:=REF(VAR2,1)AND C>=REF(C,1)AND C<=REF(C,2){XG51};
VAR4:=REF(VAR3,1)AND C<=REF(C,1)AND C>=REF(C,2){XG51};
VAR5:=REF(VAR4,1)AND C>=REF(C,1)AND C<=REF(C,2){XG51};
VAR6:=REF(VAR5,1)AND C<=REF(C,1)AND C>=REF(C,2){XG51};
VAR7:=REF(VAR6,1)AND C>=REF(C,1)AND C<=REF(C,2){XG51};
VAR8:=REF(VAR7,1)AND C<=REF(C,1)AND C>=REF(C,2){XG51};
VAR9:=REF(VAR8,1)AND C>=REF(C,1)AND C<=REF(C,2){XG51};
VARA:=REF(VAR9,1)AND C<=REF(C,1)AND C>=REF(C,2){XG51};
VARB:=REF(VARA,1)AND C>=REF(C,1)AND C<=REF(C,2){XG51};
VARC:=REF(VARB,1)AND C<=REF(C,1)AND C>=REF(C,2){XG51};
VARD:=C<REF(C,1)AND C<REF(C,2){XG51};
VARE:=REF(VARD,1)AND C>=REF(C,1)AND C<=REF(C,2){XG51};
VARF:=REF(VARE,1)AND C<=REF(C,1)AND C>=REF(C,2){XG51};
VAR10:=REF(VARF,1)AND C>=REF(C,1)AND C<=REF(C,2){XG51};
VAR11:=REF(VAR10,1)AND C<=REF(C,1)AND C>=REF(C,2){XG51};
VAR12:=REF(VAR11,1)AND C>=REF(C,1)AND C<=REF(C,2){XG51};
VAR13:=REF(VAR12,1)AND C<=REF(C,1)AND C>=REF(C,2){XG51};
VAR14:=REF(VAR13,1)AND C>=REF(C,1)AND C<=REF(C,2){XG51};
VAR15:=REF(VAR14,1)AND C<=REF(C,1)AND C>=REF(C,2){XG51};
VAR16:=REF(VAR15,1)AND C>=REF(C,1)AND C<=REF(C,2){XG51};
VAR17:=REF(VAR16,1)AND C<=REF(C,1)AND C>=REF(C,2){XG51};
VAR18:=REF(VAR17,1)AND C>=REF(C,1)AND C<=REF(C,2){XG51};
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1{XG51};
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD{XG51};
BTSTS:=BArslAst(VAR19){XG51};
红:=VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC{XG51};
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,C,REF(C,1),2,1)COLORWHITE{XG51};
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,C,REF(C,1),2.1,0)COLORGREEN{XG51};
STICKLINE(VAR19,REF(C,1),REF(C,2),2.1,1),COLORBLUE{XG51};
STICKLINE(VAR1A,REF(C,1),REF(C,2),2.1,2)COLORGREEN{XG51};
STICKLINE(VAR19,REF(C,1),REF(C,2),2.1,0),COLORBLUE{XG51};
STICKLINE(VAR1A,REF(H,1),REF(C,2),2.1,0)COLORYELLOW;{XG51};
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC AND
(C/REF(C,1)>1.0985 AND C=H),C,REF(C,1),1,0)COLORmaGENTA;;              
N:=120{XG51};
K:=BARSLAST(CURRBARSCOUNT=N){XG51};
GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0)){XG51};
DD:=CONST(IF(ISLASTBAR=1,LLV(L,K),0)){XG51};
KJ:=GD-DD{XG51};
GD4:=IF(CURRBARSCOUNT<=N/2,GD,DRAWNULL){XG51};
高区:IF(CURRBARSCOUNT<=N,GD,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
低区:IF(CURRBARSCOUNT<=N,DD,DRAWNULL),COLOR00FF00,LINETHICK2{XG51};
平衡:=IF(CURRBARSCOUNT<=N,DD+KJ/2,DRAWNULL),COLOR00FFFF,NODRAW{XG51};
低:IF(CURRBARSCOUNT<=N/2,DD,DRAWNULL),COLORFFFF00{XG51};
高:IF(CURRBARSCOUNT<=N/2,GD,DRAWNULL),COLOR00FFFF{XG51};
支撑:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.191,DRAWNULL),COLOR00FFFF{XG51};
强势: IF(CURRBARSCOUNT<=N/2,DD+KJ*0.382,DRAWNULL),COLORFF00FF{XG51};
突破:IF(CURRBARSCOUNT<=N/2,DD+KJ/2,DRAWNULL),COLOR0000FF{XG51};
警示:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.618,DRAWNULL),COLOR00FFFF{XG51};
压力:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.809,DRAWNULL),COLOR00FF00{XG51};
低涨:IF(CURRBARSCOUNT<=N/2,(C/LLV(LOW,K)-1)*100,DRAWNULL),COLOR0000FF,NODRAW{XG51};
天数:BARSLAST(L=DD),COLORGREEN,NODRAW{XG51};
顶点:IF(CURRBARSCOUNT<=N/2, CONST(IF(ISLASTBAR=1,HHV(H, BARSLAST
(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORWHITE,crOSSDOT{XG51};
低点:IF(CURRBARSCOUNT<=N/2, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST
(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORLIMAGENTA,CROSSDOT{XG51};
STICKLINE(cci>=200 AND H>=顶点,O,C,2,0),COLORYELLOW{XG51};
STICKLINE(CCI<=100 AND L<=低点,O,C,2,0),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=N,GD,DD,0,0),COLORCYAN{XG51};
STICKLINE(CURRBARSCOUNT=N/2,GD,DD,0,0),COLOR408080{XG51};
STICKLINE(CURRBARSCOUNT=1,GD,DD,0,0),COLORCYAN{XG51};
STICKLINE(CURRBARSCOUNT<=N/2,支撑,支撑,2,0),COLORFF00FF{XG51};
STICKLINE(CURRBARSCOUNT<=N/2,强势,强势,2,0),COLORFF00FF{XG51};
STICKLINE(CURRBARSCOUNT<=N/2,突破,突破,2,0),COLORABABAB{XG51};
STICKLINE(CURRBARSCOUNT<=N/2,警示,警示,2,0),COLOR00FFFF{XG51};
STICKLINE(CURRBARSCOUNT<=N/2,压力,压力,2,0),COLOR00FFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=10,压力,'压力-0.809'),COLOR00FFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=10,警示,'警示-0.618'),COLOR00FFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=10,突破,'突破-0.500'),COLORFFFFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=10,强势,'强势-0.382'),COLOR00FFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=10,支撑,'支撑-0.191'),COLOR00FFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.09,'【风险区】--高抛避险'),COLOR00FFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.3,'【警示区】--逢高减仓'),COLOR0000FF{XG51};
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.45,'【突破区】--主力拉升'),COLORFFFFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.55,'【拉升区】--强势畜锐'),COLORFFFF80{XG51};
DRAWTEXT(CURRBARSCOUNT=N/4+5,DD+KJ/3,'【关注区】--逢低买入'),COLOR00FFFF{XG51};
DRAWTEXT(CURRBARSCOUNT=N/4+5,DD+KJ/10,'【低吸区】--大胆买入'),COLOR00FF00{XG51};
DRAWTEXT(CURRBARSCOUNT=N/2+40,GD-KJ*0.25,'【拉升区】'),COLORWHITE{XG51};
DRAWTEXT(CURRBARSCOUNT=N/2+40,DD+KJ*0.25,'【持股区】'),COLORBLUE{XG51};
第一防线:REFDATE(低,DATE),POINTDOT,COLORBLUE,LINETHICK4{XG51};
第二防线:REFDATE(支撑,DATE),POINTDOT,COLORRED,LINETHICK4{XG51};
AHC1:=CLOSE*vol{XG51};
AHC22:=ema((expma(AHC1,27)/EXPMA(VOL,27)+EXPMA(AHC1,54)/EXPMA(VOL,54)+EXPMA
(AHC1,108)/EXPMA(VOL,108)+EXPMA(AHC1,316)/EXPMA(VOL,316))/4,34){XG51};
上轨:=1.06*AHC22,COLOR40FF00,LINETHICK1{XG51};
下轨:=AHC22*0.94{XG51};
ZT:=REF(C,1)*1.1-C<0.01 AND H=C{XG51};
启爆:=CROSS(C,上轨) OR CROSS(C,下轨) AND ZT{XG51};
DRAWTEXT(启爆,L,'启爆'),COLORGREEN{XG51};
STICKLINE(启爆,C,O,3,1),COLORRED{XG51};
STICKLINE(启爆,C,O,1,0),COLORWHITE{XG51};
MA1:MA(CLOSE,12)LINETHICK2{XG51};
MA2:MA(CLOSE,50)LINETHICK2{X.G-5_1.C.N.{};