通达信自用决策主图指标源码

[复制链接]
查看151 | 回复0 | 2021-8-20 14:51:41 | 显示全部楼层 |阅读模式

以下是通达信自用决策主图指标源码(无源码的请下载附件导入)

DRAWTEXT_FIX(1,0.01,1,0,FGBLOCK),COLORC0C0C0;
 DRAWTEXT_FIX(1,0.1,0.0 ,0,DYBLOCK),COLORWHITE;
 {行业信息}DRAWTEXT_FIX(1,0.15 ,0.0 ,0,HYBLOCK),COLORWHITE;
 DRAWTEXT_FIX(1,0.2 ,0.0 ,0,GNBLOCK),COLORGREEN;

{明日决策主图}
DA:=(3*CLOSE+OPEN+LOW+HIGH)/6,POINTDOT;

 X2:=(20*DA+19*REF(DA,1)+18*REF(DA,2)+17*REF(DA,3)+16*REF(DA,4)
 +15*REF(DA,5)+14*REF(DA,6)+13*REF(DA,7)+12*REF(DA,8)+11*REF(DA,9)+
 10*REF(DA,10)+9*REF(DA,11)+8*REF(DA,12)+7*REF(DA,13)+6*REF(DA,14)+5
 *REF(DA,15)+4*REF(DA,16)+3*REF(DA,17)+2*REF(DA,18)+REF(DA,20))/210,COLORF0F000;
 X3:=MA(X2,5),COLORYELLOW,LINETHICK1;
 X1:=(C+L+H)/3.1;
买:=CROSS(X2,X3);
卖:=CROSS(X3,X2);
 DRAWICON(买,L-0.68,11);

DRAWICON(卖,H*1.038,12);
 E7:EMA(C,7)COLORWHITE;
 E20:EMA(C,20)COLORYELLOW;
 E60:EMA(C,60)COLORGREEN;

毛利率:(1-FINANCE(21)/FINANCE(20))*100,NODRAW;

{黑马启动}
HA1:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,23))/EMA(CLOSE,23));
 HA2:=DMA(((2.15*CLOSE+LOW+HIGH)/4),HA1);
金线王:=EMA(HA2,200)*1.118;
条件:=(C-REF(C,1))/REF(C,1)*100>8;
条件1:=NOT(C/REF(C,1)>1.095 AND C=H);
金K线:=CROSS(C,金线王) AND 条件 AND 条件1;
 DRAWTEXT(金K线,L-0.28,'↖黑马启动'),COLORYELLOW;

止损价:=STICKLINE(ISLASTBAR,HHV(C,3)*0.95,HHV(C,3)*0.95,20,2),COLORWHITE,LINETHICK2;
止盈价:=H*0.95,LINETHICK0,COLORRED;
 {止盈价盘中破掉三十分钟不再站上来,立即止盈出局}
阻力价:=HHV(HIGH,19)NODRAW;
 Y:=(MA(C,5)-MA(C,30))/MA(C,5)*100;
 YY1:=C>MA(C,5) AND OPEN<MA(C,5);{龙出海}
YY3:=C>MA(C,10) AND OPEN<MA(C,10);
 YY5:=C>MA(C,30) AND OPEN<MA(C,30);
 DRAWTEXT(YY1 AND YY5 AND YY3,H+0.13,'←龙出海'),COLORRED;
 DRAWICON(YY1 AND YY5 AND YY3,H*1.048,26);
 A:=(3*C+L+O+H)/6;
 X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF
 (A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF
 (A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF
 (A,17)+2*REF(A,18)+REF(A,20))/210;
主力成本:=EMA(X,13),COLORLIMAGENTA,LINETHICK1,NODRAW;
 ZZ:=(O+H+L)/2.99;
 YC:=(H+L)/1.99;
 YCHJX:=(EMA(ZZ,4))+(YC-REF(ZZ,3))/5.2;
今日买点:EMA(ZZ,3),COLORYELLOW,NODRAW;
明日买点:YCHJX+0.05,COLORLIRED,NODRAW;
昨测今日买点:=REF(YCHJX,0.98)-0.05,COLORLIMAGENTA;
 N:=(L,8),COLORGREEN,LINETHICK2;
 TS:=BARSLAST(CURRBARSCOUNT=11);
 IF(TS>=0,CONST(REF(C,N)),DRAWNULL);
 IF(TS<0,CONST(REF(C,N)),DRAWNULL);
 DRAWNUMBER(ISLASTBAR,CONST(REF(C,N)),N),COLORYELLOW;
 {近期顶底}
N1:=150;判断高低:=3;
高:=REF(HHV(H,N1),判断高低);
近期顶:REFDATE(高,DATE),COLORRED,LINETHICK1,DOTLINE;
最顶:=REFDATE(近期顶,DATE),NODRAW;
出:=最顶=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;
 STICKLINE(出,C,O,3,0),COLORGREEN;
 STICKLINE(出,C,O,2,0),COLORGREEN;
 DRAWICON(出,H+0.14,9);
低:=REF(LLV(L,N),判断高低);
近期底:REFDATE(低,DATE),COLORLIBLUE,LINETHICK1,DOTLINE;
最底:=REFDATE(近期底,DATE),NODRAW;
进:=最底=L AND ((C+L)<(O+C) OR (O+L)<(C+O)),NODRAW;
 STICKLINE(进,C,O,3,0),COLORRED;
 STICKLINE(进,C,O,2,0),COLORRED;

魔鬼线:MA(CLOSE,321),COLORLIBLUE;

{参考决策主图}
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)));
 DSLX:=(C/INDEXC);
 DSLX1:=MA(DSLX,5);
 TJTS1:=BARSTATUS=2 AND C<200;
 TJTS2:=BARSTATUS=2 AND C>200;
 V1:=MA(V,3);
 V2:=MA(V,8);
 K2:=HHV(H*0.99,BARSLAST(BARSTATUS=1));
 DRAWTEXT_FIX(TJTS1 AND ((CROSS(AVX,1) AND (V1>=V2)) AND (DSLX>=DSLX1)),0.5,0,0,'量能稳定,有走强迹象,根据指数线性关系布局分批介入. '),COLORRED,LINETHICK1;
 DRAWTEXT_FIX(TJTS1 AND ((CROSS(AVX,1) AND (V1<V2)) AND (DSLX>=DSLX1)),0.5,0,0,'走势趋强,量能不足,根据指数线性关系布局分批买入. '),COLORRED,LINETHICK1;
 DRAWTEXT_FIX(TJTS1 AND ((CROSS(AVX,1) AND (V1>V2)) AND (DSLX<DSLX1)),0.5,0,0,'量价配合良好,没有明显走强,根据指数线性关系考虑进入与否. '),COLORYELLOW,LINETHICK1;
 DRAWTEXT_FIX(TJTS1 AND ((CROSS(AVX,1) AND (V1<=V2)) AND (DSLX<DSLX1)),0.5,0,0,'形态尚可,量能不足,未完全走强,根据指数线性关系考虑是否进入. '),COLORGREEN,LINETHICK1;
 DRAWTEXT_FIX(TJTS1 AND ((CROSS(1,AVX) AND (V1>=V2)) AND (DSLX>=DSLX1)),0.5,0,0,'形态变坏,减持或者卖出观望. '),COLORGREEN,LINETHICK2;
 DRAWTEXT_FIX(TJTS1 AND ((CROSS(1,AVX) AND (V1<V2)) AND (DSLX>=DSLX1)),0.5,0,0,'明显缩量走势,根据指数线性关系减持或清仓,等待机会. '),COLORWHITE,LINETHICK1;
 DRAWTEXT_FIX(TJTS1 AND ((CROSS(1,AVX) AND (V1>=V2)) AND (DSLX<DSLX1)),0.5,0,0,'走势偏弱,谨慎操作. '),COLORGREEN,LINETHICK1;
 DRAWTEXT_FIX(TJTS1 AND ((CROSS(1,AVX) AND (V1<V2)) AND (DSLX<DSLX1)),0.5,0,0,'缩量下跌,走势偏弱,离场观望. '),COLORGREEN,LINETHICK1;
 DRAWTEXT_FIX(TJTS1 AND ((((AVX>=1) AND (REF(AVX,1)>0)) AND (V1>=V2)) AND (DSLX>=DSLX1)),0.5,0,0,'强势明显,量能充足,注意前期平台和指数影响. '),COLORRED,LINETHICK1;
 DRAWTEXT_FIX(TJTS1 AND ((((AVX>=1) AND (REF(AVX,1)>0)) AND (V1<V2)) AND (DSLX>=DSLX1)),0.5,0,0,'强势依然,量能转弱,高抛低吸做好布局. '),COLORCYAN,LINETHICK2;
 DRAWTEXT_FIX(TJTS1 AND ((((AVX>=1) AND (REF(AVX,1)>0)) AND (V1>=V2)) AND (DSLX<DSLX1)),0.5,0,0,'具备上涨潜力,根据线性关系操作. '),COLORCYAN,LINETHICK2;
 DRAWTEXT_FIX(TJTS1 AND ((((AVX>=1) AND (REF(AVX,1)>0)) AND (V1<V2)) AND (DSLX<DSLX1)),0.5,0,0,'走势趋弱,量能不足,减持筹码. '),COLORCYAN,LINETHICK2;
 DRAWTEXT_FIX(TJTS1 AND ((((AVX<1) AND (REF(AVX,1)<0)) AND (V1>=V2)) AND (DSLX>=DSLX1)),0.5,0,0,'形态不佳,注意量能变化,跟踪分析确认. '),LINETHICK2;
 DRAWTEXT_FIX(TJTS1 AND ((((AVX<1) AND (REF(AVX,1)<0)) AND (V1<V2)) AND (DSLX>=DSLX1)),0.5,0,0,'走势虽弱,关注线性关系和量能变化,确认业绩、题材. '),COLORYELLOW,LINETHICK2;
 DRAWTEXT_FIX(TJTS1 AND ((((AVX<1) AND (REF(AVX,1)<0)) AND (V1>=V2)) AND (DSLX<DSLX1)),0.5,0,0,'有走强迹象,上涨压力大,根据大盘情况操作. '),COLORYELLOW,LINETHICK2;
 DRAWTEXT_FIX(TJTS1 AND ((((AVX<1) AND (REF(AVX,1)<0)) AND (V1<V2)) AND (DSLX<DSLX1)),0.5,0,0,'走势太弱,整理后关注量能和信号提示. '),LINETHICK2,COLORYELLOW;
 DRAWTEXT_FIX(TJTS2 AND (CROSS(AVX,1) AND (V1>=V2)),0.5,0,0,'量能稳定,有明显走强迹象,可以考虑布局. '),COLORWHITE,LINETHICK2;
 DRAWTEXT_FIX(TJTS2 AND (CROSS(AVX,1) AND (V1>=V2)),0.5,0,0,'如前期经过一轮下跌,此时为最佳买点,但前期有过一段涨幅则介入需谨慎. '),COLORWHITE,LINETHICK2;
 DRAWTEXT_FIX(TJTS2 AND (CROSS(AVX,1) AND (V1<V2)),0.5,0,0,'虽然走势趋强,量能还显不足,根据线性关系操作. '),COLORWHITE,LINETHICK2;
 DRAWTEXT_FIX(TJTS2 AND (CROSS(AVX,1) AND (V1<V2)),0.5,0,0,' 可以谨慎布局,控制仓位,一旦量能放大可以重仓买入. '),COLORWHITE,LINETHICK2;
 DRAWTEXT_FIX(TJTS2 AND (CROSS(1,AVX) AND (V1>=V2)),0.5,0,0,'大盘形态走坏,减仓或者抛光. '),COLORGREEN,LINETHICK2;
 DRAWTEXT_FIX(TJTS2 AND (CROSS(1,AVX) AND (V1<V2)),0.5,0,0,'弱势缩量调整,清仓观望,寻找可布局股票. '),COLORWHITE,LINETHICK2;
 DRAWTEXT_FIX(TJTS2 AND (((AVX>=1) AND (REF(AVX,1)>0)) AND (V1>=V2)),0.5,0,0,'走势良好,量能稳定,可以继续持有强势股. '),COLORWHITE,LINETHICK2;
 DRAWTEXT_FIX(TJTS2 AND (((AVX>=1) AND (REF(AVX,1)>0)) AND (V1<V2)),0.5,0,0,'形态良好,量能稍显不足,线性关系顶部背离,随时准备清仓. '),COLORWHITE,LINETHICK2;
 DRAWTEXT_FIX(TJTS2 AND (((AVX<1) AND (REF(AVX,1)<0)) AND (V1>=V2)),0.5,0,0,'趋势不明,注意量能和线性关系变化,减少操作. '),LINETHICK2,COLORWHITE;
 DRAWTEXT_FIX(TJTS2 AND (((AVX<1) AND (REF(AVX,1)<0)) AND (V1<V2)),0.5,0,0,'趋势向下,量能萎缩,关注线性关系变化,减少操作. '),LINETHICK2,COLORWHITE;
 {穿三线}
MA2:=EMA(C,2);
 MA05:=EMA(C,5);
 MA010:=EMA(C,10);
 MA020:=EMA(C,20);
 MA030:=EMA(C,30);
 YC0X:=MA05>=REF(MA05,1);
 H01:=MAX(MAX(MA05,MA010),MA020);
 L01:=MIN(MIN(MA05,MA010),MA020);
一穿三线:=H01<C AND O<L01 AND YC0X AND MA2>REF(MA2,1);
 STICKLINE(一穿三线,O,C,2,0),COLORYELLOW;
 DRAWTEXT(一穿三线,L-0.22, '←穿三线'),COLORGREEN;

{赚了就跑}
M5:=MA(C,5);
 DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
 DEA:=EMA(DIFF,9);
 MACD:=2*(DIFF-DEA);
 QFA:=MACD>REF(MACD,1)AND MACD<0;
 QFB:=MACD<REF(MACD,1)AND MACD<0;
 QFC:=BARSLASTCOUNT(MACD<REF(MACD,1));
 TJ:=DIFF>0 AND DEA>0 AND REF(QFB,1) AND QFA AND REF(QFC,1)>4 AND C>M5 ;
 DRAWICON(TJ,L-0.38,1);
 STICKLINE(TJ,C,O,1.8,0),COLORYELLOW;
 STICKLINE(TJ,L,H,0,0),COLORYELLOW;
 STICKLINE(TJ,C,O,0.5,0),COLORRED;

{追击反转}
VAR2:=REF(LOW,1);
 VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;
 VAR4:=EMA(VAR3*10,3);
 VAR5:=LLV(LOW,13);
 VAR6:=HHV(VAR4,13);
 VAR7:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618;
 VAR8:=IF(VAR7>500,500,VAR7);

ZJ:=VAR8>1 AND "KDJ.J">REF("KDJ.J",1) AND REF("KDJ.J",1)<REF("KDJ.J",2);
 ZJM:=VAR8>0.1 AND VAR8<1 AND "KDJ.J">REF("KDJ.J",1) AND REF("KDJ.J",1)<REF("KDJ.J",2);
 DRAWTEXT(ZJ,L-0.38,'←抄底')COLORLIBLUE;
 DRAWTEXT(ZJM,L-0.38,'←买点')COLORYELLOW;

DIFFA:=EMA(CLOSE,3)-EMA(CLOSE,7);
 DEAA:=EMA(DIFFA,3);
 MACD2:=2*(DIFFA-DEAA);
 DRAWICON(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),H+0.68,6);

RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
 K1:=SMA(RSV,3,1);
 D1:=SMA(K1,3,1);
高1:=HHV(H,150);
低1:=LLV(L,150);
 H1:=高1-(高1-低1)*0.191;
 H2:=高1-(高1-低1)*0.382;
 H3:=高1-(高1-低1)*0.5;
 H4:=高1-(高1-低1)*0.618;
 H5:=高1-(高1-低1)*0.809;

QR:=(H+L+2*C)/4;
强弱分界线:=EMA(QR,55),COLORFFFF00;
 TFXXS:=INTPART(K1)+INTPART(D1);
 TGL:=(TFXXS-REF(TFXXS,1));
 DRAWTEXT_FIX(ISLASTBAR AND TGL>=0 AND TGL>REF(TGL,1),0.99,0.01,1,'资金状况:流入加快'),COLOR0202FF;
 DRAWTEXT_FIX(ISLASTBAR AND TGL>=0 AND TGL<=REF(TGL,1),0.99,0.01,1,'资金状况:流入减慢'),COLOR1876E9;
 DRAWTEXT_FIX(ISLASTBAR AND TGL<0 AND TGL>REF(TGL,1),0.99,0.01,1,'资金状况:流出减慢'),COLOR13B79A;
 DRAWTEXT_FIX(ISLASTBAR AND TGL<0 AND TGL<=REF(TGL,1),0.99,0.01,1,'资金状况:流出加快'),COLOR00CA00;
 VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
 VAR2E:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1);
 VAR3E:=EMA(VAR2E,10);
 VAR4E:=LLV(LOW,33);
 VAR5E:=EMA(IF(LOW<=VAR4E,VAR3E,0),3);
 VAR21:=SMA(ABS(HIGH-VAR1),13,1)/SMA(MIN(HIGH-VAR1,0),10,1);
 VAR31:=EMA(VAR21,10);
 VAR41:=HHV(HIGH,33);
 VAR51:=EMA(IF(HIGH>=VAR41,VAR31,0),3);
 DRAWTEXT_FIX(ISLASTBAR AND VAR51<REF(VAR51,1),0.99,0.08,1,'主力正在拉高'),COLOR0202FF;
 DRAWTEXT_FIX(ISLASTBAR AND VAR5>REF(VAR5,1),0.99,0.15,1,'典型吸筹行为'),COLOR1876E9;
 DRAWTEXT_FIX(ISLASTBAR AND VAR5<REF(VAR5,1),0.99,0.15,1,'典型洗盘行为'),COLORC08000;
 DRAWTEXT_FIX(ISLASTBAR AND VAR5=REF(VAR5,1),0.99,0.15,1,'无特殊行为'),COLORC0C0C0;
 DRAWTEXT_FIX(ISLASTBAR AND VAR51>REF(VAR51,1),0.99,0.08,1,'主力正在出货'),COLOR00CA00;
 DRAWTEXT_FIX(ISLASTBAR AND VAR51=REF(VAR51,1),0.99,0.08,1,'主力无大动作'),COLORC0C0C0;
 VAR78:=C/EXPMA(C,5);
 A1:=COST(1.91);
 A2:=COST(3.82);
 A3:=COST(5);
 A4:=COST(6.18);
 A5:=COST(8.09);
 COSTT:=(A1+A2+A3+A4+A5)/5;
 COSTT1:=C/COSTT;
 VARD1:=(2*INDEXC+INDEXH+INDEXL)/4;
 VARD2:=LLV(INDEXL,21);
 VARD3:=HHV(INDEXH,8);
 MIJI:=EMA((VARD1-VARD2)/(VARD3-VARD2)*100,9);
 MIJI1:=MIJI-VAR78;
 MIJI2:=MIJI1-REF(MIJI1,1);
 MIJI3:=MIJI-REF(MIJI,1);
 DAPAN:=COSTT1-(MIJI3+0.618*MIJI2)/16.18;
 DRAWTEXT_FIX(ISLASTBAR AND DAPAN<COSTT1,0.99,0.22,1,'受大盘拉动'),COLOR0202FF;
 DRAWTEXT_FIX(ISLASTBAR AND DAPAN>=COSTT1,0.99,0.22,1,'受大盘压制'),COLOR00CA00;
 X1E:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;
 X2E:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;
 X3E:=FINANCE(23)/FINANCE(10)*3.3;
 X4E:=FINANCE(19)/FINANCE(15)*0.6;
 X5E:=FINANCE(20)/FINANCE(15)*0.999;
 YAOGU:=X1E+X2E+X3E+X4E+X5E;
 XJF:=CON2STR(FINANCE(25)/FINANCE(15),3);
 YZZ:=CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2);
 DRAWTEXT_FIX(YAOGU<=0,0.99,0.99,1,'拉升潜力:难于登天'),COLOR00FF00;
 DRAWTEXT_FIX(YAOGU>0 AND YAOGU<=1.2,0.99,0.99,1,'拉升潜力:难度较大'),COLOR3A8B5C;
 DRAWTEXT_FIX(YAOGU>1.2 AND YAOGU<=2.6,0.99,0.99,1,'拉升潜力:尚可一试'),COLOR4747B8;
 DRAWTEXT_FIX(YAOGU>2.6 AND YAOGU<=5.8,0.99,0.99,1,'拉升潜力:较为容易'),COLOR2424DB;
 DRAWTEXT_FIX(YAOGU>5.8,0.99,0.99,1,'拉升潜力:轻而易举'),COLOR0000FF;
 DRAWTEXT_FIX(XJF>=1618,0.99,0.90,1,'过于保守'),COLOR4747B8;
 DRAWTEXT_FIX(XJF>=618 AND XJF<1618,0.99,0.90,1,'保守求稳'),COLOR4747B8;
 DRAWTEXT_FIX(XJF>=100 AND XJF<618,0.99,0.90,1,'收支平衡'),,COLOR0000FF;
 DRAWTEXT_FIX(XJF<100,0.99,0.90,1,'负债过多'),COLOR00FF00;
 DRAWTEXT_FIX(YZZ<85,0.99,0.82,1,'资产质地差'),COLOR00FF00;
 {伏击优选㊣}
VAR2X:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
 VAR3X:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));

伏击:CROSS(VAR2X,MA(VAR3X,6));
 DRAWTEXT(伏击,L-1.08,'↖伏击');

{猛牛}
MAV:=(C*2+H+L)/4;
 SK := EMA(MAV,1) - EMA(MAV,40);
 SD := EMA(SK,5);
 B:=(SK-SD)*100;
猛牛拉升:=IF(B<-20,-20,IF(B>100,100,B));
强:= 40;
 DRAWICON(CROSS(猛牛拉升,强) AND REF(猛牛拉升=-20,1),H+0.38, 24);
 DRAWTEXT(CROSS(猛牛拉升,强) AND REF(猛牛拉升=-20,1),L-1.88,'↖猛牛');

W1:=C=HHV(C,20);
 W2:=BARSLAST(W1);
 W3:=IF(W2>0,REF(C,W2),REF(C,W2));
 W4:=CROSS(C,REF(W3,1));
突破盘整:W4 AND COUNT(W4,5)=1;
 DRAWICON(突破盘整,L-0.10,34);
 DRAWTEXT(突破盘整,L-0.66,'↖突破盘整')COLORYELLOW;

M:=10;
 CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
 DD:=DMA(CLOSE,CC);
下轨通道2:=(1-M/100)*DD;
 ARSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:=SMA(ARSV,2,1);
 D:=SMA(K,2,1);
 J:=3*K-2*D;
 MJ:=CROSS(J,0);
 XG:=CROSS(L,下轨通道2) AND MJ AND REF(C<下轨通道2,1) ;
 DRAWTEXT(XG,L-0.66,'↖千钧一击'),COLORYELLOW;
 {资金监控}
总额:=AMOUNT;
买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));
买%:=买A/AMOUNT*100;
流入:=AMOUNT*买%/10000000000;
流出:=AMOUNT/100000000-流入;
净流:=(流入-流出);
总额3:=SUM(AMOUNT,3);
流入3:=SUM(流入,3);
流出3:=SUM(流出,3);
净流3:=SUM(流入-流出,3);
总额5:=SUM(AMOUNT,5);
流入5:=SUM(流入,5);
流出5:=SUM(流出,5);
净流5:=SUM(流入-流出,5);
总额10:=SUM(AMOUNT,10);
流入10:=SUM(流入,10);
流出10:=SUM(流出,10);
净流10:=SUM(流入-流出,10);
画:=CONST(FINDHIGH(总额10,0,190,1));
 DRAWTEXT_FIX(1,0,0,0,'净流(亿):'),COLORMAGENTA,LINETHICK1;
 DRAWTEXT_FIX(1,0,0.05,0,'1日'),COLORMAGENTA,LINETHICK1;
 DRAWTEXT_FIX(1,0,0.15,0,'3日'),COLORMAGENTA,LINETHICK1;
 DRAWTEXT_FIX(1,0,0.25,0,'5日'),COLORMAGENTA,LINETHICK1;
 DRAWTEXT_FIX(1,0,0.35,0,'10日'),COLORMAGENTA,LINETHICK1;
 DRAWNUMBER_FIX(1,0.05,0.05,0,CONST((净流))),COLORYELLOW;
 DRAWNUMBER_FIX(1,0.05,0.15,0,CONST((净流3))),COLORYELLOW;
 DRAWNUMBER_FIX(1,0.05,0.25,0,CONST((净流5))),COLORYELLOW;
 DRAWNUMBER_FIX(1,0.05,0.35,0,CONST((净流10))),COLORYELLOW;

713311103.jpg

713311103.jpg

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则