股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[大智慧L2]短线实战主副图


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2020-1-2 19:29:38
{N:1,10,5;}
MA5:MA(CLOSE,5),PRECIS2,COLORFF9933;
MA10:MA(CLOSE,10),PRECIS2;
MA20:=MA(CLOSE,20);
MA30:MA(CLOSE,30),PRECIS2,colorffff00;
MA120:=MA(CLOSE,120);
MA250:=MA(CLOSE,250);
底:llv(l,N),color009900,linethick1,PRECIS2,DOTLINE;
DTPL:=MA10>MA30 AND MA20>MA30 AND  MA30>REF(MA30,1);
突破线:MIN(MA20*1.05,MA30*1.1),COLORred,POINTDOT,LINETHICK3,PRECIS2;
差幅:=C/MIN(MA20*1.05,MA30*1.1)-1;
均线流:=(DTPL AND MA5>MA30 AND MA5<MA10)*-0.1;
偏离率:=(C<MIN(MA20*1.05,MA30*1.1) AND C>MA30)*0.1;
BDGD:=C=HHV(C,20);
GDSJ:=BARSLAST(BDGD);
REF(C,GDSJ),COLOR00FF00,POINTDOT,LINETHICK2,PRECIS2;
{C/REF(C,GDSJ)-1,COLOR00FF00,POINTDOT;}
目标:=IF(均线流=-0.1 AND 偏离率=0.1 AND GDSJ>=N,0.8,0);
MBSJ:=BARSLAST(目标=0.8);
TP1:=CROSS(C,MIN(MA20*1.05,MA30*1.1)) AND REF(GDSJ,1)>=N;
TP2:=偏离率=0 AND REF(COUNT(偏离率=0.1,N)=N,1) AND C>REF(C,1);
突破:=(TP1 OR TP2)*1;
QSXS1:=MA5>REF(MA5,1);
LYHT:=DTPL AND MA5>MA10 AND NOT(QSXS1) AND REF(QSXS1,1);
MAV5:=EMA(V,5);
MAV10:=EMA(V,10);
LNMACD:=((V-MAV5)/MAV5*2+(V-MAV10)/MAV10)*10;
量坑:=LNMACD<=-10;
优选:=目标 AND COUNT(量坑,3)>=1;
{以下设置主图显示方式}
DRAWTEXT(目标=0.8,l,'='),colorFFFFFF,LINETHICK3,ALIGN1;
DRAWTEXT(突破,l,'★'),coloryellow;
DRAWTEXT(LYHT,(MA10+MA20)/2, '¤'),COLORFF00FF;
DRAWICON(优选,L,1);
GX:=MAX(MA5,MAX(MA10,MA20));
DX:=MIN(MA5,MIN(MA10,MA20));
QSXS:=DX>MA30 AND MA30>REF(MA30,1);
均线粘合:=IF(ABS(GX/DX-1)*100<=3,1,0);
FL:=V>REF(V,1) OR V>MA(V,5);
SZ:=(CROSS(C,MA(C,3)) OR CROSS(C,MA(C,5))) AND C>=O;
放量上涨:=IF(FL AND SZ,1,0);
果断出击:=FILTER(COUNT(均线粘合,2) AND COUNT(放量上涨,2) AND C>O AND QSXS,2)*100;
{以下设置果断出击后的涨幅跟踪,不需要的可以删除}
MRSJ:=BARSLAST(果断出击);
涨:=(C/REF(C,MRSJ)-1)*100*(MRSJ<=20);
ZZ:=MRSJ<20 AND CROSS(H,REF(C,MRSJ)*1.09999);
知足:=ZZ AND COUNT(ZZ,MRSJ)=1;
DB:=MRSJ<20 AND CROSS(H,REF(C,MRSJ)*1.05);
达标:=DB AND COUNT(DB,MRSJ)=1;
DRAWTEXT(知足,H*1.02,'+10%'),COLORFFFFFF;
DRAWTEXT(果断出击,L,'♂'),COLORFFFF33,ALIGN1,LINETHICK3;
DRAWTEXT(达标,H*1.02,'+5%'),COLORFF9933,ALIGN1;
MTM:=C-REF(C,1);
DX1:=100*EMA(EMA(MTM,N),N)/EMA(EMA(ABS(MTM),N),N);
买1:=IF(LLV(DX1,2)=LLV(DX1,7) AND COUNT(DX1<0,2) AND CROSS(DX1,MA(DX1,2)),1,0);
卖1:=IF(HHV(DX1,2)=HHV(DX1,7) AND COUNT(DX1>50,2) AND CROSS(MA(DX1,2),DX1),1,0);
DRAWTEXT(filter(卖1=1,5),high*1.02, '▼'),color00ff00,ALIGN1;
DRAWTEXT(filter(买1=1,5),low-0.03, '▲'),colorRED,ALIGN1;
主筹估算:=EMA(WINNER(c)*70,3);
散筹估算:=EMA((WINNER((c)*1.1)-WINNER((c)*0.9))*70,3);
筹码锁定:=散筹估算-主筹估算 ;
动态底部:=EMA(IF(L<= LLV(l,60),SMA(ABS(L-REF(L,1)),60,1)/SMA(MAX(L-REF(l,1),0),99,1),0)*5,3);
涨:=CROSS(主筹估算,筹码锁定);
强:=CROSS(主筹估算,散筹估算);
STICKLINE(涨,O,C,4,0),COLORYELLOW;
STICKLINE(涨,O,H,0,0),COLORYELLOW;
STICKLINE(涨,L,C,0,0),COLORYELLOW;
STICKLINE(强, O,C,4,0),colormagenta;
STICKLINE(强,O,H,0,0),colormagenta;
STICKLINE(强,L,C,0,0),colormagenta;
STICKLINE(筹码锁定<-50,O,C,4,0),COLORred;
STICKLINE(筹码锁定<-50,O,H,0,0),COLORred;
STICKLINE(筹码锁定<-50,L,C,0,0),COLORred;
gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100);
明日阻力:=l+(gj-l)+(c-l);
明日支撑:=l+(c-gj);
今日阻力:=REF(明日阻力 , 1);
今日支撑:=REF(明日支撑 , 1);
STICKLINE(DISPSTATUS=2  and c>=今日阻力,今日阻力,今日阻力,20,0),ColorRED;
STICKLINE(DISPSTATUS=2  and c<今日阻力,今日阻力,今日阻力,20,0),Color00FFFF;
STICKLINE(DISPSTATUS=2  and c>=今日支撑,今日支撑,今日支撑,20,0),ColorFF00FF;
STICKLINE(DISPSTATUS=2  and c<今日支撑,今日支撑,今日支撑,20,0),Color00ADFF;
DRAWTEXTREL(610,40,'今日支撑:'+NUMTOSTRN(今日支撑 ,2 )),Colorred;
DRAWTEXTREL(610,5,'今日阻力:'+NUMTOSTRN(今日阻力 ,2 )),Color00FFFF;
买入:=STRFIND(Extrastring('评级'),'买入',1)>0;
增持:=STRFIND(Extrastring('评级'),'增持',1)>0;
持有:=STRFIND(Extrastring('评级'),'持有',1)>0;
DRAWTEXTREL(5,970,'评级:'+Extrastring('评级')),colora9a9a9;
{DRAWTEXTABS(5,360,'板块:'+BKNAME),colora9a9a9;}
流通:=FINANCE2(37)/10000;
市盈率:=DYNAINFO(39);
F:=COST(5 );J:=COST(95 );
M:=COST(15 );B:=COST(85 );
F1:=(J-F)/(F+J)*100;M1:=(B-M)/(B+M)*100;
集中度90:=F1;
集中度70:=M1;
获利盘:=WINNER(CLOSE)*100;
套牢盘:=100*(1-WINNER(C));
最新收益:=FINANCE2(3);
浮筹比:=(winner(c*1.1)-winner(c*0.9))/winner(hhv(h,0))*100;
DRAWTEXTABS(5,50,'浮筹比:'+浮筹比+'% '),LINETHICK1,Colora9a9a9;
DRAWTEXTABS(300,5,'流通:'+流通+' '),LINETHICK1,Colora9a9a9;
DRAWTEXTABS(5,65,'市盈率:'+市盈率+' '),LINETHICK1,Colora9a9a9;
DRAWTEXTABS(5,5,'集中度90:'+集中度90+' '),LINETHICK1,Color00FF00;
DRAWTEXTABS(100,5,'集中度70:'+集中度70+' '),LINETHICK1,ColorYELLOW;
DRAWTEXTABS(5,20,'获利盘:'+获利盘+'% '),LINETHICK1,Colora9a9a9;
DRAWTEXTABS(5,35,'套牢盘:'+套牢盘+'% '),LINETHICK1,Colora9a9a9;
DRAWTEXTABS(200,5,'最新收益:'+最新收益+'元 '),LINETHICK1,COLORa9a9a9;

副图:

{LONG:21,1,100:SHORT:13,1,100:M:7,1,100:N:8,1,10:}
DIF:=EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA:=EMA(DIF,M);
MACD:=2*(DIF-DEA);
Q:2*(DEA-DIF),COLOR00ff00,linethick1;
if(dif<0,dif,0),coloryellow,linethick2;
if(dif<0,0,dif),colorred,linethick2;
if(dif<dea,dif,dea),COLORa9a9a9,linethick2;
if(dif>dea,dea,dea),COLORFF9933{colorff00ff},linethick2;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA20:=MA(CLOSE,20);
MA30:=MA(CLOSE,30);
MACD超跌:=COUNT((DIF<DEA),10)=10;
Q1:MACD超跌 * "MACD.MACD"(LONG,SHORT,M)*(-1),COLOR00adff,LINETHICK2;
{本行中,大智慧版本选择*(-1);飞弧版本选择*(1)}
MACD金叉:=CROSS(DIF,DEA);
DTPL:=MA10>MA30 AND MA20>MA30 AND  MA30>REF(MA30,1);
关注:=(MACD金叉 AND REF(Q1,1) < 0)*-0.1;
均线:(DTPL AND MA5>MA30 AND MA5<MA10)*-0.1,color00ff00,LINETHICK0;
偏离:(C<MIN(MA20*1.05,MA30*1.1) AND C>MA30)*0.1,COLORFF00FF,POINTDOT,LINETHICK0;
BDGD:=C=HHV(C,20);
GDSJ:=BARSLAST(BDGD);
C/REF(C,GDSJ)-1,COLOR00FF00,POINTDOT,LINETHICK0;
目标:IF(均线=-0.1 AND 偏离=0.1 AND GDSJ>=N,0.8,0),COLORffff00,DOTLINE;
MBSJ:=BARSLAST(目标=0.8);
TP1:=CROSS(C,MIN(MA20*1.05,MA30*1.1)) AND REF(GDSJ,1)>=N;
TP2:=偏离=0 AND REF(COUNT(偏离=0.1,N)=N,1) AND C>REF(C,1);
突破:=(TP1 OR TP2)*1;
MAV5:=EMA(V,5);
MAV10:=EMA(V,10);
LNMACD:=((V-MAV5)/MAV5*2+(V-MAV10)/MAV10)*10;
量坑:=LNMACD<=-10;
优选:=目标 AND COUNT(量坑,3)>=1;
{以下设置副图显示方式}
DRAWTEXT(关注=-0.1,-0.01,'关●注'),color00ff00;
STICKLINE(均线=-0.1,0,-0.1,1,0),color00FF00;
STICKLINE(偏离=0.1,0,0.1,1,0),colorFF00FF;
{DRAWTEXT(突破,1,'★'),colorred;}
DRAWICON(优选,-0.2,12);
HH:=MA(CLOSE,10);
GG:=MA(CLOSE,12);
上:=ema((MA(HIGH,3) * 1.05),30);
下:=ema((MA(LOW,3) * 0.96),30);
决战:STICKLINE((((CROSS(DIF,DEA) AND ((下 - REF(下,1)) > 0)) AND (MACD >= REF(MACD,1))) AND (DIF < 0)),DIF,0.3,3,0),colorffb6c1;
DRAWTEXT((((CROSS(DIF,DEA) AND ((下 - REF(下,1)) > 0)) AND (MACD >= REF(MACD,1))) AND (DIF <= 0)),0.3,'DIF金叉'),colorFFff00,ALIGN1;
STICKLINE(FILTER(((((MACD >= REF(MACD,5)) AND ((下 - REF(下,1)) > 0)) AND (MACD <= 0)) AND ((GG - REF(GG,1)) >= 0)),3),0,0.3,2,0),color00FF00;
VAR26:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100);
VAR27:=((EMA(CLOSE,SHORT) - EMA(CLOSE,LONG)) * 100);
VAR28:=EMA(VAR27,M);
VAR29:=(2 * (VAR27 - VAR28));
STICKLINE(((VAR27 < (0 - 50)) AND (VAR26 > 7)),0,(0 - 0.1),2,0),color0000FF;
DRAWTEXT((((VAR27 < (0 - 50)) AND (VAR26 > 7)) AND (VAR27 < VAR28)),(0 - 0.09),'D'),colorred,LINETHICK3,ALIGN1;
DRAWTEXT((((VAR27 < (0 - 50)) AND (VAR26 > 7)) AND (VAR27 >= VAR28)),(0 - 0.1),'追'),colorFFFFFF;
BB:(0.3 * ((((((CROSS(DIF,DEA) AND (CLOSE < 上)) AND ((下 - REF(下,1)) > 0)) AND CROSS(MACD,0)) AND (MACD >= 0)) AND (DIF > 0)) AND (((HH - REF(HH,1)) > 0) AND (VOL > REF(VOL,1))))),colorCC99FF;
DRAWTEXT((((BB >= 0.3) AND (CLOSE < 上)) AND ((下 - REF(下,1)) > 0)),0.3,'。量价完美'),colorCC99FF,ALIGN1;
N15HIGH:=REF(HIGH,15);
N1LOW:=REF(LOW,1);
FF:=(((N15HIGH - N1LOW) / N1LOW) > 0.15);
DRAWICON((((((CROSS(MA(CLOSE,19),MA(CLOSE,120)) > 0) AND (((N15HIGH - N1LOW) / N1LOW) < 0.15)) AND (OPEN >= MA(CLOSE,19))) AND (CLOSE >= MA(CLOSE,19))) AND (LOW <= MA(CLOSE,19))),0.5,1);
DRAWTEXT((((((CROSS(MA(CLOSE,19),MA(CLOSE,120)) > 0) AND (((N15HIGH - N1LOW) / N1LOW) < 0.15)) AND (OPEN >= MA(CLOSE,19))) AND (CLOSE >= MA(CLOSE,19))) AND (LOW <= MA(CLOSE,19))),0.5,'★^回头望月'),color0099CC;
A4:=BARSLAST(ref(cross(dif,dea),1));
B1:=ref(c,A4+1)>c and ref(dif,A4+1)<dif and cross(dif,dea);
DRAWTEXT(FILTER(B1>0,5),dif+0.2,'背●离'),COLORyellow,ALIGN1;
低位金叉:=CROSS(DIF,DEA) AND DIF<-0.1;
STICKLINE(低位金叉,0,0.08,6,0),COLORwhite;
DRAWTEXT(低位金叉,低位金叉-1.3,' 低位▲金叉'),COLORWHITE,ALIGN1;
JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,0,0.06,6,0),ColorFF00FF;
DRAWICON(二次金叉,dea*1.04,1) ;
DRAWTEXT(二次金叉,0.4,' 二次▲金叉'),ColorYELLOW,ALIGN1;
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA);
STICKLINE(底背离,0,0.03,4,0),Color00FF00;
DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORRED,linethick1;
DRAWTEXT(底背离,0.12,' 底↑背'),ColorFF00FF,ALIGN1;
A2:=BARSLAST(REF(CROSS(DEA,DIF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF);
DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLOR0099cc,linethick1;
DRAWTEXT(顶背离,0.2,' 顶↓背'),ColorYELLOW,ALIGN1;
STICKLINE(((CROSS(MACD,DIF) AND (MACD >= (0 - 0.05))) AND (MACD <= 0.02)),MACD,0.23,0,0),LINETHICK2,color00FFFF;
DRAWTEXT(((CROSS(MACD,DIF) AND (MACD >= (0 - 0.05))) AND (MACD <= 0.02)),0.23,'金'),LINETHICK3,colorFFFFFF;
DRAWTEXT(((CROSS(MACD,DIF) AND (MACD >= (0 - 0.05))) AND (MACD <= 0.02)),0.23,'@MACD'),color7070FF;
操盘:STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,4,0),COLORRED{COLOR6058FF};
减仓:STICKLINE(MACD>=0 AND MACD< REF(MACD,1),0,MACD,4,0),COLORblue{COLOR6058FF};
反弹:STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,4,0),COLORYELLOW{COLORFFFF00};
寻底:STICKLINE(MACD<0 AND MACD< REF(MACD,1),0,MACD,4,0),COLORFFFF00;
空仓:0,COLORWHITE;





20081017_5076bb0c992cf3131836TymXNIns0nWx.png


回复

举报

GMT+8, 2025-2-22 17:40

快速回复 返回顶部 返回列表