通达信财源滚滚主图未加密选股指标公式源码

源码正文：

ma1:expma(C,5),COLORBLUE,LINETHICK1 NODRAW{XG51};
KK:=MA1<REF(MA1,1){XG51};
IF(KK,MA1,DRAWNULL),COLORYELLOW,LINETHICK1 NODRAW{XG51};
DD1:=MA1>REF(MA1,1){XG51};
IF(DD1,MA1,DRAWNULL),COLORWHITE,LINETHICK1 NODRAW{XG51};
ZDQ:CONst(LLV(L,60)),COLORYELLOW,LINETHICK2{XG51};
KKQ:=ZDQ<REF(ZDQ,1){XG51};
DD1Q:=ZDQ>REF(ZDQ,1){XG51};
IF(DD1,ZDQ,DRAWNULL),COLORWHITE,LINETHICK2{X_G!5^1_C_N_{};

源码正文：

NOTEXT1:=HHV(ema(C,17),2){XG51};
NOTEXT2:Ema(C,17),LINETHICK3,COLORWHITE{XG51};
NOTEXT3:IF(((NOTEXT1 = NOTEXT2) AND UPNDAY(NOTEXT1,3)),NOTEXT1,DRAWNULL),LINETHICK3,COLORWHITE{XG51};
NOTEXT4:IF((REF(NOTEXT1,2) > NOTEXT2),NOTEXT2,DRAWNULL),LINETHICK3,COLORCYAN{XG51};
LC:=REF(CLOSE,1){XG51};
RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100){XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=((3 * K) - (2 * D)){XG51};
rsi:=((SMA(MAX((CLOSE - LC),0),9,1) / SMA(Abs((CLOSE - LC)),9,1)) * 100){XG51};
DBTJ1:=(RSI >= 75){XG51};
DBTJ2:=(J >= 95){XG51};
B1:=(EMA(CLOSE,12) - EMA(CLOSE,26)){XG51};
B2:=EMA(B1,3){XG51};
ZF:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100){XG51};
RSI1:=((SMA(MAX((CLOSE - LC),0),9,1) / SMA(ABS((CLOSE - LC)),9,1)) * 100){XG51};
TDSZ:=(((((((B1 > B2) OR (B1 = B2)) AND (ZF > 9)) AND (ZF < 11)) AND (40 < RSI1)) AND (RSI1 < 60)) AND (C = H)){XG51};
RSV13:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100){XG51};
B11:=SMA(RSV13,4,1){XG51};
B22:=SMA(B11,3,1){XG51};
CDTJ:=(((C >= O) AND crOSS(B11,B22)) AND (B22 <= 50)){XG51};
topB:=IF(((DBTJ1 OR DBTJ2) AND (((C + NOTEXT2) / 2) < NOTEXT2)),(((3 * NOTEXT2) - C) / 2),((C + NOTEXT2) / 2)){XG51};
BOTB:=IF(((CDTJ OR TDSZ) AND (((C + NOTEXT2) / 2) > NOTEXT2)),(((3 * NOTEXT2) - C) / 2),((C + NOTEXT2) / 2)){XG51};
stICKLINE((((NOT(DBTJ1) AND NOT(DBTJ2)) AND NOT(CDTJ)) AND NOT(TDSZ)),NOTEXT2,(NOTEXT2 * 1.009),2.3,0),COLORA4A4A4{XG51};
STICKLINE((((NOT(DBTJ1) AND NOT(DBTJ2)) AND NOT(CDTJ)) AND NOT(TDSZ)),NOTEXT2,(NOTEXT2 * 1.009),2,0),COLORB6B6B6{XG51};
STICKLINE((((NOT(DBTJ1) AND NOT(DBTJ2)) AND NOT(CDTJ)) AND NOT(TDSZ)),NOTEXT2,(NOTEXT2 * 1.009),1.7,0),COLORB8B8B8{XG51};
STICKLINE((((NOT(DBTJ1) AND NOT(DBTJ2)) AND NOT(CDTJ)) AND NOT(TDSZ)),NOTEXT2,(NOTEXT2 * 1.009),1.4,0),COLORCacACA{XG51};
STICKLINE((((NOT(DBTJ1) AND NOT(DBTJ2)) AND NOT(CDTJ)) AND NOT(TDSZ)),NOTEXT2,(NOTEXT2 * 1.009),1.1,0),COLORF4F4F4{XG51};
STICKLINE((((NOT(DBTJ1) AND NOT(DBTJ2)) AND NOT(CDTJ)) AND NOT(TDSZ)),NOTEXT2,(NOTEXT2 * 1.009),0.8,0),COLORF6F6F6{XG51};
STICKLINE((RSI >= 75),NOTEXT2,TOPB,2.3,0),COLOR000057{XG51};
STICKLINE((RSI >= 75),NOTEXT2,TOPB,2,0),COLOR00007D{XG51};
STICKLINE((RSI >= 75),NOTEXT2,TOPB,1.7,0),COLOR00008C{XG51};
STICKLINE((RSI >= 75),NOTEXT2,TOPB,1.4,0),COLOR0000A1{XG51};
STICKLINE((RSI >= 75),NOTEXT2,TOPB,1.1,0),COLOR0000B5{XG51};
STICKLINE((RSI >= 75),NOTEXT2,TOPB,0.8,0),COLOR0000CC{XG51};
STICKLINE((J >= 95),NOTEXT2,TOPB,2.3,0),COLOR570057{XG51};
STICKLINE((J >= 95),NOTEXT2,TOPB,2,0),COLOR660066{XG51};
STICKLINE((J >= 95),NOTEXT2,TOPB,1.7,0),COLOR7D007D{XG51};
STICKLINE((J >= 95),NOTEXT2,TOPB,1.4,0),COLOR990099{XG51};
STICKLINE((J >= 95),NOTEXT2,TOPB,1.1,0),COLORBD00BD{XG51};
STICKLINE((J >= 95),NOTEXT2,TOPB,0.8,0),COLORLIMAGENTA{XG51};
STICKLINE(CDTJ,NOTEXT2,BOTB,2.3,0),COLOR004040{XG51};
STICKLINE(CDTJ,NOTEXT2,BOTB,2,0),COLOR006464{XG51};
STICKLINE(CDTJ,NOTEXT2,BOTB,1.7,0),COLOR00A8A8{XG51};
STICKLINE(CDTJ,NOTEXT2,BOTB,1.4,0),COLOR00DBDB{XG51};
STICKLINE(CDTJ,NOTEXT2,BOTB,1.1,0),COLOR15FFFF{XG51};
STICKLINE(CDTJ,NOTEXT2,BOTB,0.8,0),COLOR4DFFFF{XG51};
STICKLINE(TDSZ,NOTEXT2,(BOTB * 0.98),2,0),COLORGREEN{XG51};
STICKLINE(TDSZ,NOTEXT2,(BOTB * 0.98),1.5,0),COLOR990000{XG51};
STICKLINE(TDSZ,NOTEXT2,(BOTB * 0.98),1.8,0),COLORCC0000{XG51};
STICKLINE(TDSZ,NOTEXT2,(BOTB * 0.98),0.3,0),COLORFF4400{XG51};
STICKLINE(TDSZ,NOTEXT2,(BOTB * 0.98),2,0),COLORFF8800{XG51};
STICKLINE(TDSZ,NOTEXT2,(BOTB * 0.98),1.5,0),COLORFFCC00{XG51};
STICKLINE(TDSZ,NOTEXT2,(BOTB * 0.98),0.8,0),COLORGREEN{XG51};
起爆1:=NOTEXT2=REF(NOTEXT2,1){XG51};
STICKLINE(起爆1,NOTEXT2,(REF(NOTEXT2,1) * 1.01),0.8,0),COLORCYAN{XG51};
起爆:=NOTEXT2-REF(NOTEXT2,1){XG51};
起爆2:=起爆>-0.001 AND 起爆<0.001{XG51};
STICKLINE(起爆2,NOTEXT2,(REF(NOTEXT2,1) * 1.1),0.8,0),COLORCYAN{XG51};
DRAWTEXT_FIX(1,0.01,0.05,0,'【注释】')COLOR00FF00{XG51};
DRAWTEXT_FIX(1,0.1,0.05,0,'1、由向下的黄柱、蓝柱，向上的紫柱、红柱组成，专门用来提示资金异动，把握短期市场变化。'),COLOR00FF00,LINETHICK2{XG51};
DRAWTEXT_FIX(1,0.01,0.15,0,'【建仓】')COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.1,0.15,0,'2、黄柱说明市场有资金介入，随后收阳才有可能短期走强。'),COLOR00FFFF,LINETHICK2{XG51};
DRAWTEXT_FIX(1,0.01,0.25,0,'【加仓】')COLORGREEN{XG51};
DRAWTEXT_FIX(1,0.1,0.25,0,'3、蓝柱说明资金大幅流入，随后高开收阳，就有望快速上扬。'),COLORGREEN,LINETHICK2{XG51};
DRAWTEXT_FIX(1,0.01,0.35,0,'【异动】')COLORFF00FF{XG51};
DRAWTEXT_FIX(1,0.1,0.35,0,'4、紫柱说明资金交易异常活跃，一旦紫柱变成正常白柱，那么价格通常会有所震荡。'),COLORFF00FF,LINETHICK2{XG51};
DRAWTEXT_FIX(1,0.01,0.45,0,'【活跃】')COLOR0000FF{XG51};
DRAWTEXT_FIX(1,0.1,0.45,0,'5、红柱说明资金交易活跃，一旦红柱变成正常白柱，那么价格通常会结束快速上扬。'),COLOR0000FF,LINETHICK2{XG51};
DRAWTEXT_FIX(1,0.01,0.55,0,'【起爆】')COLOR00FF00{XG51};
DRAWTEXT_FIX(1,0.1,0.55,0,'6、绿柱说明资金与昨日相同，随后放量可能会起爆。'),COLOR00FF00,LINETHICK2{X!G=5+1!C!N!{};