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

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;

[1] [2] [3]  下一页