通达信参考决策主图选股指标公式源码

通达信参考决策主图选股指标公式源码

源码正文：

AVX:=(((((IF(C>ma(C,5),10,(0-10))+IF(MA(C,5)>MA(C,10),10,(0-10)))+IF(C>MA(C,10),10,(0-10)))+IF(MA(C,5)>MA(C,20),10,(0-10)))+IF((C>MA(C,20)),10,(0-10)))+IF
(MA(C,20)>REF(MA(C,20),1),10,(0-10))){XG51};
DSLX:=(C/INDEXC){XG51};
DSLX1:=MA(DSLX,5){XG51};
TJTS1:=BARstATUS=2 AND C<200{XG51};
TJTS2:=BARSTATUS=2 AND C>200{XG51};
V1:=MA(V,3){XG51};
V2:=MA(V,8){XG51};
K2:=HHV(H*0.99,BArslAST(BARSTATUS=1)){XG51};
DRAWTEXT_FIX(TJTS1 AND ((crOSS(AVX,1) AND (V1>=V2)) AND (DSLX>=DSLX1)),0.5,0,0,'量能稳定,有走强迹象,根据指数线性关系布局分批介入.     '),COLORWHITE,LINETHICK1{XG51};
DRAWTEXT_FIX(TJTS1 AND ((CROSS(AVX,1) AND (V1<V2)) AND (DSLX>=DSLX1)),0.5,0,0,'走势趋强,量能不足,根据指数线性关系布局分批买入.     '),COLORWHITE,LINETHICK1{XG51};
DRAWTEXT_FIX(TJTS1 AND ((CROSS(AVX,1) AND (V1>V2)) AND (DSLX<DSLX1)),0.5,0,0,'量价配合良好,没有明显走强,根据指数线性关系考虑进入与否.     '),COLORBLUE,LINETHICK1{XG51};
DRAWTEXT_FIX(TJTS1 AND ((CROSS(AVX,1) AND (V1<=V2)) AND (DSLX<DSLX1)),0.5,0,0,'形态尚可,量能不足,未完全走强,根据指数线性关系考虑是否进入.     '),COLORCYAN,LINETHICK1{XG51};
DRAWTEXT_FIX(TJTS1 AND ((CROSS(1,AVX) AND (V1>=V2)) AND (DSLX>=DSLX1)),0.5,0,0,'形态变坏,减持或者卖出观望.     '),COLORCYAN,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS1 AND ((CROSS(1,AVX) AND (V1<V2)) AND (DSLX>=DSLX1)),0.5,0,0,'明显缩量走势,根据指数线性关系减持或清仓,等待机会.     '),COLORRED,LINETHICK1{XG51};
DRAWTEXT_FIX(TJTS1 AND ((CROSS(1,AVX) AND (V1>=V2)) AND (DSLX<DSLX1)),0.5,0,0,'走势偏弱,谨慎操作.     '),COLORCYAN,LINETHICK1{XG51};
DRAWTEXT_FIX(TJTS1 AND ((CROSS(1,AVX) AND (V1<V2)) AND (DSLX<DSLX1)),0.5,0,0,'缩量下跌,走势偏弱,离场观望.     '),COLORCYAN,LINETHICK1{XG51};
DRAWTEXT_FIX(TJTS1 AND ((((AVX>=1) AND (REF(AVX,1)>0)) AND (V1>=V2)) AND (DSLX>=DSLX1)),0.5,0,0,'强势明显,量能充足,注意前期平台和指数影响.     '),COLORWHITE,LINETHICK1{XG51};
DRAWTEXT_FIX(TJTS1 AND ((((AVX>=1) AND (REF(AVX,1)>0)) AND (V1<V2)) AND (DSLX>=DSLX1)),0.5,0,0,'强势依然,量能转弱,高抛低吸做好布局.      '),COLORGREEN,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS1 AND ((((AVX>=1) AND (REF(AVX,1)>0)) AND (V1>=V2)) AND (DSLX<DSLX1)),0.5,0,0,'具备上涨潜力,根据线性关系操作.     '),COLORGREEN,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS1 AND ((((AVX>=1) AND (REF(AVX,1)>0)) AND (V1<V2)) AND (DSLX<DSLX1)),0.5,0,0,'走势趋弱,量能不足,减持筹码.     '),COLORGREEN,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS1 AND ((((AVX<1) AND (REF(AVX,1)<0)) AND (V1>=V2)) AND (DSLX>=DSLX1)),0.5,0,0,'形态不佳,注意量能变化,跟踪分析确认.     '),LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS1 AND ((((AVX<1) AND (REF(AVX,1)<0)) AND (V1<V2)) AND (DSLX>=DSLX1)),0.5,0,0,'走势虽弱,关注线性关系和量能变化,确认业绩、题材.     '),COLORBLUE,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS1 AND ((((AVX<1) AND (REF(AVX,1)<0)) AND (V1>=V2)) AND (DSLX<DSLX1)),0.5,0,0,'有走强迹象,上涨压力大,根据大盘情况操作.     '),COLORBLUE,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS1 AND ((((AVX<1) AND (REF(AVX,1)<0)) AND (V1<V2)) AND (DSLX<DSLX1)),0.5,0,0,'走势太弱,整理后关注量能和信号提示.     '),LINETHICK2,COLORBLUE{XG51};
DRAWTEXT_FIX(TJTS2 AND (CROSS(AVX,1) AND (V1>=V2)),0.5,0,0,'量能稳定,有明显走强迹象,可以考虑布局.     '),COLORRED,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS2 AND (CROSS(AVX,1) AND (V1>=V2)),0.5,0,0,'如前期经过一轮下跌，此时为最佳买点，但前期有过一段涨幅则介入需谨慎.     '),COLORRED,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS2 AND (CROSS(AVX,1) AND (V1<V2)),0.5,0,0,'虽然走势趋强,量能还显不足,根据线性关系操作.     '),COLORRED,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS2 AND (CROSS(AVX,1) AND (V1<V2)),0.5,0,0,' 可以谨慎布局,控制仓位,一旦量能放大可以重仓买入.     '),COLORRED,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS2 AND (CROSS(1,AVX) AND (V1>=V2)),0.5,0,0,'大盘形态走坏,减仓或者抛光.     '),COLORCYAN,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS2 AND (CROSS(1,AVX) AND (V1<V2)),0.5,0,0,'弱势缩量调整,清仓观望,寻找可布局股票.     '),COLORRED,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS2 AND (((AVX>=1) AND (REF(AVX,1)>0)) AND (V1>=V2)),0.5,0,0,'走势良好,量能稳定,可以继续持有强势股.     '),COLORRED,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS2 AND (((AVX>=1) AND (REF(AVX,1)>0)) AND (V1<V2)),0.5,0,0,'形态良好,量能稍显不足,线性关系顶部背离,随时准备清仓.     '),COLORRED,LINETHICK2{XG51};
DRAWTEXT_FIX(TJTS2 AND (((AVX<1) AND (REF(AVX,1)<0)) AND (V1>=V2)),0.5,0,0,'趋势不明,注意量能和线性关系变化,减少操作.     '),LINETHICK2,COLORRED{XG51};
DRAWTEXT_FIX(TJTS2 AND (((AVX<1) AND (REF(AVX,1)<0)) AND (V1<V2)),0.5,0,0,'趋势向下,量能萎缩,关注线性关系变化,减少操作.     '),LINETHICK2,COLORRED{XG51};
RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100{XG51};
K1:=SMA(RSV,3,1){XG51};
D1:=SMA(K1,3,1){XG51};
高1:=HHV(H,150);
低1:=LLV(L,150){XG51};
QR:=(H+L+2*C)/4{XG51};
强弱分界线:=ema(QR,55),COLORFFFF00{XG51};
TFXXS:=INTPART(K1)+INTPART(D1){XG51};
TGL:=(TFXXS-REF(TFXXS,1)){XG51};
DRAWTEXT_FIX(ISLASTBAR AND TGL>=0 AND TGL>REF(TGL,1),0.99,0.01,1,'资金状况：流入加快'),COLOR0202FF{XG51};
DRAWTEXT_FIX(ISLASTBAR AND TGL>=0 AND TGL<=REF(TGL,1),0.99,0.01,1,'资金状况：流入减慢'),COLOR1876E9{XG51};
DRAWTEXT_FIX(ISLASTBAR AND TGL<0 AND TGL>REF(TGL,1),0.99,0.01,1,'资金状况：流出减慢'),COLOR13B79A{XG51};
DRAWTEXT_FIX(ISLASTBAR AND TGL<0 AND TGL<=REF(TGL,1),0.99,0.01,1,'资金状况：流出加快'),COLOR00CA00{XG51};
VAR1E:=REF((LOW+OPEN+CLOSE+HIGH)/4,1){XG51};
VAR2E:=SMA(Abs(LOW-VAR1E),13,1)/SMA(MAX(LOW-VAR1E,0),10,1){XG51};
VAR3E:=EMA(VAR2E,10){XG51};
VAR4E:=LLV(LOW,33){XG51};
VAR5E:=EMA(IF(LOW<=VAR4E,VAR3E,0),3){XG51};
VAR21E:=SMA(ABS(HIGH-VAR1E),13,1)/SMA(MIN(HIGH-VAR1E,0),10,1){XG51};
VAR31E:=EMA(VAR21E,10){XG51};
VAR41E:=HHV(HIGH,33){XG51};
VAR51E:=EMA(IF(HIGH>=VAR41E,VAR31E,0),3){XG51};
DRAWTEXT_FIX(ISLASTBAR AND VAR51E<REF(VAR51E,1),0.99,0.08,1,'主力正在拉高'),COLOR0202FF{XG51};
DRAWTEXT_FIX(ISLASTBAR AND VAR5E>REF(VAR5E,1),0.99,0.15,1,'典型吸筹行为'),COLOR1876E9{XG51};
DRAWTEXT_FIX(ISLASTBAR AND VAR5E<REF(VAR5E,1),0.99,0.15,1,'典型洗盘行为'),COLORC08000{XG51};
DRAWTEXT_FIX(ISLASTBAR AND VAR5E=REF(VAR5E,1),0.99,0.15,1,'无特殊行为'),COLORC0C0C0{XG51};
DRAWTEXT_FIX(ISLASTBAR AND VAR51E>REF(VAR51E,1),0.99,0.08,1,'主力正在出货'),COLOR00CA00{XG51};
DRAWTEXT_FIX(ISLASTBAR AND VAR51E=REF(VAR51E,1),0.99,0.08,1,'主力无大动作'),COLORC0C0C0{XG51};
VAR78:=C/expma(C,5){XG51};
A1:=COST(1.91){XG51};
A2:=COST(3.82){XG51};
A3:=COST(5){XG51};
A4:=COST(6.18){XG51};
A5:=COST(8.09){XG51};
COSTT:=(A1+A2+A3+A4+A5)/5{XG51};
COSTT1:=C/COSTT{XG51};
VARD1:=(2*INDEXC+INDEXH+INDEXL)/4{XG51};
VARD2:=LLV(INDEXL,21){XG51};
VARD3:=HHV(INDEXH,8){XG51};
MIJI:=EMA((VARD1-VARD2)/(VARD3-VARD2)*100,9){XG51};
MIJI1:=MIJI-VAR78{XG51};
MIJI2:=MIJI1-REF(MIJI1,1){XG51};
MIJI3:=MIJI-REF(MIJI,1){XG51};
DAPAN:=COSTT1-(MIJI3+0.618*MIJI2)/16.18{XG51};
DRAWTEXT_FIX(ISLASTBAR AND DAPAN<COSTT1,0.99,0.8,1,'受大盘拉动'),COLOR0202FF{XG51};
DRAWTEXT_FIX(ISLASTBAR AND DAPAN>=COSTT1,0.99,0.8,1,'受大盘压制'),COLOR00CA00{XG51};
X1E:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2{XG51};
X2E:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4{XG51};
X3E:=FINANCE(23)/FINANCE(10)*3.3{XG51};
X4E:=FINANCE(19)/FINANCE(15)*0.6{XG51};
X5E:=FINANCE(20)/FINANCE(15)*0.999{XG51};
YaoGU:=X1E+X2E+X3E+X4E+X5E{XG51};
XJF:=CON2STR(FINANCE(25)/FINANCE(15),3){XG51};
YZZ:=CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2){XG51};
DRAWTEXT_FIX(YAOGU<=0,0.99,0.99,1,'拉升潜力：难于登天'),COLOR00FF00{XG51};
DRAWTEXT_FIX(YAOGU>0 AND YAOGU<=1.2,0.99,0.99,1,'拉升潜力：难度较大'),COLOR3A8B5C{XG51};
DRAWTEXT_FIX(YAOGU>1.2 AND YAOGU<=2.6,0.99,0.99,1,'拉升潜力：尚可一试'),COLOR4747B8{XG51};
DRAWTEXT_FIX(YAOGU>2.6 AND YAOGU<=5.8,0.99,0.99,1,'拉升潜力：较为容易'),COLOR2424DB{XG51};
DRAWTEXT_FIX(YAOGU>5.8,0.99,0.99,1,'拉升潜力：轻而易举'),COLOR0000FF{XG51};
DRAWTEXT_FIX(XJF>=1618,0.99,0.86,1,'过于保守'),COLOR4747B8{XG51};
DRAWTEXT_FIX(XJF>=618 AND XJF<1618,0.99,0.86,1,'保守求稳'),COLOR4747B8{XG51};
DRAWTEXT_FIX(XJF>=100 AND XJF<618,0.99,0.86,1,'收支平衡'),,COLOR0000FF{XG51};
DRAWTEXT_FIX(XJF<100,0.99,0.86,1,'负债过多'),COLOR00FF00{XG51};
DRAWTEXT_FIX(YZZ<85,0.99,0.86,1,'资产质地差'),COLOR00FF00{XG51};
快线:=EMA(C,7)-EMA(C,21),LINETHICK2,COLORWHITE{XG51};
慢线:=MA(快线,4),COLORCYAN,LINETHICK2{XG51};
数值:=EMA((0.668*REF(快线,1)+0.333*快线),1),COLORSTICK{XG51};
X1:=V/SUM(V,13){XG51};
X2:=dma(C,X1){XG51};
X3:=(C-X2)/X2*40{XG51};
L2:=MA(AMOUNT/(100*V),13){XG51};
CYS13:= (C-L2)/L2*100{XG51};
做多:=IF(快线>=数值,快线,数值){XG51};
做空:=IF(数值-快线,数值,快线){XG51};
强庄:STICKLINE(cys13>5,L-0.22,L-0.35,2,0),COLORGREEN{XG51};
AAA:=(3*C+H+L+O)/6{XG51};
VAR1:(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36,LINETHICK2,COLORWHITE{XG51};
VAR2:=(HHV(VAR1,2)+HHV(VAR1,4)+HHV(VAR1,8))/0{XG51};
VAR3:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,8))/3{XG51};
VAR4:=(HHV(VAR2,2)+HHV(VAR2,4)+HHV(VAR2,8))/0{XG51};
VAR5:(LLV(VAR3,2)+LLV(VAR3,4)+LLV(VAR3,8))/3,COLORWHITE{XG51};
VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,8))/3{XG51};
IF((VAR1 <= REF(VAR1,1)),VAR1,DRAWNULL),COLORCYAN,LINETHICK3{XG51};
IF((VAR1 >= REF(VAR1,1)),VAR1,DRAWNULL),COLORWHITE,LINETHICK3{XG51};
STICKLINE(VAR4>VAR1,VAR4,VAR1,0,0),COLORYELLOW{XG51};
DRAWKLINE(H,O,L,C){XG51};
DRAWTEXT(REF(VAR5,1)=REF(VAR1,1) AND VAR5<VAR1,L*0.99,'↖买入'),COLORBLUE{XG51};
DRAWTEXT(REF(VAR6,1)=REF(VAR1,1) AND VAR6<VAR1,L*0.98,'↖加仓'),COLORBLUE{XG51};
CC:=((HIGH+LOW+CLOSE)/3-EMA((HIGH+LOW+CLOSE)/3,5))/(0.015*AVEDEV((HIGH+LOW+CLOSE)/3,5)){XG51};
STICKLINE(CC>=0,LOW,HIGH,0.0,0),COLORWHITE;
STICKLINE(CC>=0,CLOSE,OPEN,3,1),COLORWHITE{XG51};
STICKLINE(CC<0,LOW,HIGH,0.0,0),COLORCYAN;
STICKLINE(CC<0,CLOSE,OPEN,3,1),COLORCYAN{XG51};
月DI:="macd.dif#MONTH"{XG51};
月DE:="MacD.DEA#MONTH"{XG51};
周DI:="MACD.DIF#WEEK"{XG51};
周DE:="MACD.DEA#WEEK"{XG51};
日DI:="MACD.DIF"{XG51};
日DE:="MACD.DEA"{XG51};
日金叉:=CROSS(日DI,日DE){XG51};
周金叉:=CROSS(周DI,周DE){XG51};
月金叉:=CROSS(月DI,月DE){XG51};
日穿0:=CROSS(日DI,0){XG51};
周穿0:=CROSS(周DI,0){XG51};
月穿0:=CROSS(月DI,0){XG51};
DRAWTEXT(日穿0,LOW-0.48,'↖日穿0'),COLORGREEN{XG51};
DRAWTEXT(周穿0,L*0.94,'↖周穿0'),COLORGREEN{XG51};
DRAWTEXT(月穿0,L*0.99,'↖月穿0'),COLORGREEN{XG51};
DRAWTEXT(日金叉,LOW-0.3,'↖日金叉'),COLORGREEN{XG51};
DRAWTEXT(周金叉,L*0.92,'↖周金叉'),COLORGREEN{XG51};
DRAWTEXT(月金叉,L*0.90,'↖月金叉'),COLORGREEN{XG51};
MA2:=EMA(C,2){XG51};
MA05:=EMA(C,5){XG51};
MA010:=EMA(C,10){XG51};
MA020:=EMA(C,20){XG51};
MA030:=EMA(C,30){XG51};
YC0X:=MA05>=REF(MA05,1){XG51};
H01:=MAX(MAX(MA05,MA010),MA020){XG51};
L01:=MIN(MIN(MA05,MA010),MA020){XG51};
一穿三线:=H01<C AND O<L01 AND YC0X AND MA2>REF(MA2,1){XG51};
STICKLINE(一穿三线,O,C,0.3,0),COLORBLUE{XG51};
DRAWTEXT(一穿三线,L-0.62, '&larr;穿三线'),COLORCYAN{XG51};
总额:=AMOUNT{XG51};
买A:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L)){XG51};
买%:=买A/AMOUNT*100{XG51};
流入:=AMOUNT*买%/10000000000{XG51};
流出:=AMOUNT/100000000-流入{XG51};
净流:=(流入-流出){XG51};
总额3:=SUM(AMOUNT,3){XG51};
流入3:=SUM(流入,3){XG51};
流出3:=SUM(流出,3){XG51};
净流3:=SUM(流入-流出,3){XG51};
总额5:=SUM(AMOUNT,5){XG51};
流入5:=SUM(流入,5){XG51};
流出5:=SUM(流出,5){XG51};
净流5:=SUM(流入-流出,5){XG51};
总额10:=SUM(AMOUNT,10){XG51};
流入10:=SUM(流入,10){XG51};
流出10:=SUM(流出,10){XG51};
净流10:=SUM(流入-流出,10){XG51};
画:=CONST(FINDHIGH(总额10,0,190,1)){XG51};
DRAWTEXT_FIX(1,0,0.37,0,'净流(亿):'),COLORLIMAGENTA,LINETHICK1{XG51};
DRAWTEXT_FIX(1,0,0.45,0,'1日'),COLORLIMAGENTA,LINETHICK1{XG51};
DRAWTEXT_FIX(1,0,0.55,0,'3日'),COLORLIMAGENTA,LINETHICK1{XG51};
DRAWTEXT_FIX(1,0,0.65,0,'5日'),COLORLIMAGENTA,LINETHICK1{XG51};
DRAWTEXT_FIX(1,0,0.75,0,'10日'),COLORLIMAGENTA,LINETHICK1{XG51};
DRAWNUMBER_FIX(1,0.05,0.45,0,CONST((净流))),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.05,0.55,0,CONST((净流3))),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.05,0.65,0,CONST((净流5))),COLORBLUE{XG51};
DRAWNUMBER_FIX(1,0.05,0.75,0,CONST((净流10))),COLORBLUE{X-G-5+1-C-N-{};