【风口起爆】主、副、选股指标源码及tn6格式分享


{风口起爆主图}
DRAWGBK(C>1,RGB(0,0,0),RGB(0,0,2),0,0,0);DMAA:=LLV(L,10);
DMAB:=(DCLOSE-REF(C,1))/REF(C,1)*100;
DMAC:=CROSS(DMAB,20) OR CROSS(DMAB,18);
DMAD:=IF(DMAC,O,DMAA*0.999)LINETHICK5,COLORYELLOW;
STICKLINE(DMAC,DMAD,DMAD,40,0),COLOR00FFFF,LINETHICK6;
DMAE:=MA(C,5);DMAF:=MA(C,10);
DMAG:=MA(C,60),COLORGREEN;DRAWTEXT(CROSS(DMAE,DMAF),DMAE,’●准备’),LINETHICK2,COLORRED;
DRAWTEXT(CROSS(DMAF,DMAE),DMAF,’◎’),LINETHICK2,COLORBLUE;
DRAWTEXT(CROSS(DMAE,DMAG),DMAG,’●注意’),LINETHICK2,COLORYELLOW;
DMBA:=MA(REF(HHV((C+L+O+H)/4,8),1),3);
DMBB:=MA(REF(HHV((C+L+O+H)/4,13),1),3),COLORWHITE;
DMBC:=MA(REF(HHV((C+L+O+H)/4,21),1),3),COLOR00AAFF;
DMBD:=MA(REF(HHV((C+L+O+H)/4,34),1),3);DMBE:=MA(CCI,3);DMBF:=MA(CCI,7);DMBG:=CROSS(DMBE,CCI) AND (CCI>130);STICKLINE(DMBG,H*1.005,H*1.01,4,0),COLOR00FF00;DMBH:=(DMBG AN),COLOR00FF00;STICKLINE(DMBH,H*1.016,H*1.025,4,0),COLORRED;DRAWTEXT(DMBH,H*1.038,’下探’),COLORRED;DRAWICON(DMBH,H*1,15);DMBI:=MA(C,163),COLORGREEN;DMBJ:=DATE<1870508;DMBK:EMA(EMA(C,10),10),COLORRED,LINETHICK3;DMBL:=DMBK>REF(DMBK,1);IF(DMBL-1,DMBK,DRAWNULL)COLORBLUE,LINETHICK3;DMCA:=EMA(C,5) > EMA(C,20);DMCB:=EMA(C,5) < EMA(C,20);DMCC:=EMA(C,5) > EMA(C,10);DMCD:=EMA(C,5) < EMA(C,10);DMCE:=C<O;STICKLINE(DMCA AND DMBJ,H,L,0,0),COLORRED;STICKLINE(DMCA AND DMBJ,O,C,3,1),COLORRED;STICKLINE(DMCA AND DMBJ AND DMCE,O,C,3,0),COLORRED;STICKLINE(DMCB AND DMBJ,H,L,0,0),COLORGREEN;STICKLINE(DMCB AND DMBJ,O,C,3,1),COLORGREEN;STICKLINE(DMCB AND DMBJ AND DMCE,O,C,3,0),COLORGREEN;STICKLINE(DMCB AND DMBJ AND DMCC,H,L,0,1),COLORWHITE;STICKLINE(DMCB AND DMBJ AND DMCC,O,C,3,1),COLORWHITE;STICKLINE(DMCB AND DMBJ AND DMCC AND DMCE,O,C,3,0),COLORWHITE;STICKLINE(DMCA AND DMBJ AND DMCD,H,L,0,0),COLORWHITE;STICKLINE(DMCA AND DMBJ AND DMCD,O,C,3,1),COLORWHITE;STICKLINE(DMCA AND DMBJ AND DMCD AND DMCE,O,C,3,0),COLORWHITE;DMCF:=MA(REF(HHV((C+L+O+H)/4,30),1),3);DMCG:=MA((C+L+O+H)/4,13);DMCH:=EMA((C+L+O+H)/4,21);STICKLINE(C<DMCH AND C<O,H,L,0,0),COLOR007700;STICKLINE(C<DMCH AND C<O,C,O,3,0),COLOR005500;STICKLINE(C<DMCH AND C<O,C,O,2,0),COLOR006600;STICKLINE(C<DMCH AND C<O,C,O,1,0),COLOR007700;STICKLINE(C>DMCH AND C>O,H,L,0,0),COLOR00EEFF;STICKLINE(C>DMCH AND C>O,C,O,3,0),COLOR00AAFF;STICKLINE(C>DMCH AND C>O,C,O,2,0),COLOR00CCFF;STICKLINE(C>DMCH AND C>O,C,O,1,0),COLOR00EEFF;STICKLINE(C>DMCF AND C>O,H,L,0,0),COLOR0000DD;STICKLINE(C>DMCF AND C>O,C,O,3,0),COLOR000099;STICKLINE(C>DMCF AND C>O,C,O,2,0),COLOR0000BB;STICKLINE(C>DMCF AND C>O,C,O,1,0),COLOR0000DD;DMCI:=150;DMCJ:=3;DMCK:=REF(C,1);DMCL:=IF((C-DMCK)*100/DMCK>=(10-0.01*100/DMCK),1,0);DRAWICON(DMCL,H*0.97,23);DMCM:=CURRBARSCOUNT>4;DMCN:=CONST(LLVBARS(L,10));DMCO:=CONST(REF(H,DMCN));DMCP:=CONST(CURRBARSCOUNT);DMCQ:=CONST(BARSLAST((CURRBARSCOUNT >(DMCP+DMCN)) AND (H>DMCO)));DMCR:=CONST(REF(H,DMCQ));DMCS:=CONST(BARSLAST((CURRBARSCOUNT >(DMCP+DMCQ)) AND (H>DMCR)));DMCT:=CONST(REF(H,DMCS));DMCU:=IF(MA(C,5)>MA(C,10),20,0);DMCV:=IF(MA(C,20)>MA(C,60),10,0);DMCW:=IF(KDJ.J>KDJ.K,10,0);DMCX:=IF(MACD.DIF>MACD.DEA,10,0);DMCY:=IF(MACD.MACD>0,10,0);DMCZ:=IF(V>MA(V,60),10,0);DMDA:=IF(C/REF(C,1)>1.03,10,0);DMDB:=DMCU+DMCV+DMCW+DMCX+DMCY+DMCZ+DMDA;DRAWTEXT_FIX(V>O,0.01,0.10,0,STRCAT(‘【量化评分】:’,STRCAT(CON2STR(DMDB,2),’ ‘))),COLOR0000FF;STICKLINE(REF(COUNT(C<DMBA,5)=5,1) AND C>DMBA AND C>O,C,O,3,0),COLORWHITE;STICKLINE(REF(COUNT(C<DMBC,5)=5,1) AND C>DMBC AND C>O,C,O,3,0),COLORYELLOW;STICKLINE(REF(COUNT(C<DMBD,5)=5,1) AND C>DMBD AND C>O,C,O,3,0),COLORMAGENTA;DMDC:=REF(C,1);DMDD:=((SMA(MAX((C-DMDC),0),3,1)/SMA(ABS((C-DMDC)),3,1))*100);DMDE:=EMA(C,3);DMDF:=EMA(C,21);DMDG:=MA(C,10000);DRAWTEXT(CROSS(DMDE,DMDF),(L*0.99),’(上探)’),COLOR00FFFF;DRAWTEXT(CROSS(DMDF,DMDE),(H*1.02),’(下拐)’),COLOR00FF00;DMDH:=MA(C,9),LINETHICK2;DMDI:=MA(C,20);DMDJ:=CROSS(DMDH,DMDI);DMDK:=CROSS(DMDI,DMDH);DRAWTEXT(DMDJ,L-0.1,’建仓’)COLORYELLOW;DRAWTEXT(DMDK,H+0.1,’空仓’);DMDL:=EMA(C,12)-EMA(C,26);DMDM:=EMA(DMDL,9);DMDN:=(DMDL-DMDM)*2;DMDO:=(DMDL-DMDM)*2*60;DMDP:=CROSS(DMDO-REF(DMDO,1),15);STICKLINE(DMDP,O,C,2.5,0),COLORYELLOW;DRAWTEXT(DMDP,(O+H)/2,'{爆涨}’),COLORGRAY,LINETHICK2;DMDQ:=REF(V,1);DMDR:=DVOL;DMDS:=DMDR/DMDQ;DMDT:=DMDS-REF(DMDS,1);DMDU:=REF(C,1);DMDV:=DCLOSE;DMDW:=(DMDV-DMDU)/DMDU*100;DMDX:=DMDW-REF(DMDW,1);DMDY:=CROSS(DMDT,500) AND CROSS(DMDX,10);DRAWTEXT(DMDY=1,L*0.955,'{–启动点}’),COLORMAGENTA;DRAWICON(DMDY=1,L*0.993,25);启爆线:DRAWLINE(CURRBARSCOUNT=DMCS+1, DMCT, ISLASTBAR, DMCT, 1),LINETHICK2,COLORFF0099;DMDZ:=NAMEINCLUDE(‘S’);DNBA:=C>=ZTPRICE(REF(C,1),IF(DMDZ,0.05,0.099)),NODRAW,COLORRED;DNBB:=DNBA AND COUNT(DNBA,2)=1;DNBC:=REF(DNBB,1) AND DNBA;DNBD:=REF(DNBC,1) AND DNBA;DNBE:=REF(DNBD,1) AND DNBA;DNBF:=REF(DNBE,1) AND DNBA;DNBG:=REF(DNBF,1) AND DNBA;DNBH:=REF(DNBG,1) AND DNBA;DNBI:=REF(DNBH,1) AND DNBA;DNBJ:=REF(DNBI,1) AND DNBA;DRAWTEXT(DNBB,0.1+(C+O)/2,’1′),COLORWHITE;DRAWTEXT(DNBC,0.1+(C+O)/2,’2′),COLORYELLOW;DRAWTEXT(DNBD,0.1+(C+O)/2,’3′),COLOR00CC99;DRAWTEXT(DNBE,0.1+(C+O)/2,’4′),COLORGREEN;DRAWTEXT(DNBF,0.1+(C+O)/2,’5′),COLORLIGRAY;DRAWTEXT(DNBG,0.1+(C+O)/2,’6′),COLORLIRED;DRAWTEXT(DNBH,0.1+(C+O)/2,’7′),COLORLIBLUE;DRAWTEXT(DNBI,0.1+(C+O)/2,’8′),COLORBLUE;DRAWTEXT(DNBJ,0.1+(C+O)/2,’9′),COLORWHITE;DRAWTEXT(REF(DNBJ,1) AND DNBA,0.1+(C+O)/2,’10’),COLORYELLOW;DNBK:=9;DNBL:=3;DNBM:=3;DNBN:=(C-LLV(L,DNBK))/(HHV(H,DNBK)-LLV(L,DNBK))*100;DNBO:=SMA(DNBN,DNBL,1);DNBP:=SMA(DNBO,DNBM,1);DNBQ:=3*DNBO-2*DNBP;DNBR:=KDJ.K>KDJ.D AND KDJ.J>KDJ.D AND KDJ.J>KDJ.K;DNBS:=CAPITAL*C/1000000;DNBT:=(C-REF(C,1))/REF(C,1)*100;DNBU:=C;DNBV:=NOT(NAMELIKE(‘ST’) OR NAMELIKE(‘*ST’) OR NAMELIKE(‘S’) OR DYNAINFO(4)=0 OR INBLOCK(‘创业板’) OR INBLOCK(‘科创板’)) OR BARSCOUNT(C)>1;DNBW:=DNBS>0 AND DNBS<80;DNBX:=DNBT>9.8 AND DNBT<10.07 AND C=H;DNBY:=DNBU>2 AND DNBU<22;DNBZ:=COUNT(DNBX,2)=1;DNCA:=DNBR AND DNBV AND DNBW AND DNBX AND DNBY AND DNBZ;STICKLINE(DNCA,H,L,0,0),COLOR0000FF;STICKLINE(DNCA,C,O,3,0),COLOR000099;STICKLINE(DNCA,C,O,2,0),COLOR0000BB;STICKLINE(DNCA,C,O,1,0),COLOR0000DD;STICKLINE(DNCA,C,O,0.3,0),COLOR0000FF;DRAWTEXT(DNCA,L*0.99,’风口启动’),COLORYELLOW;DRAWTEXT(DMAC,DMAD,’【起爆】’),COLORRED,LINETHICK5;DRAWTEXT(REF(COUNT(C<DMBA,5)=5,1) AND C>DMBA AND C>O,L*0.9999,’试盘’),COLORWHITE;DRAWTEXT(REF(COUNT(C<DMBD,5)=5,1) AND C>DMBD AND C>O,C*0.999,’拉升’),COLORMAGENTA;DRAWTEXT(REF(COUNT(C<DMBC,5)=5,1) AND C>DMBC AND C>O,C*0.999,’突破’),COLORYELLOW;DRAWTEXT(REF(COUNT(C<DMBB,5)=5,1) AND C>DMBB AND C>O,C*0.9999,’攻击’),COLORLIRED;DRAWICON(CROSS(C,启爆线),启爆线*1,11);
{启动点F}
DNCB := 0.04;DNCC := V / ((H – L) * 2 – ABS(C – O));DNCD := IF(C > O, DNCC * (H – L), V / 2);DNCE := MA(DNCD, 35);DNCF := (L + H + C + O) / 3.82;DNCG := HHV(MA(DNCF, 6), 15);DNCH := MA(C, 30);DNCI := DNCH + 2 * STD(C, 30);DNCJ := EMA(C, 5);DNCK := C > DNCI AND C >= O;DNCL := BUYVOL > DNCB * CAPITAL;DNCM := 100 * V / (FINANCE(7) / 100) > 4 OR V / REF(V, 1) >= 2;DNCN := DNCD > DNCE AND CROSS(C, DNCG) AND DNCK AND DNCM;DNCO := COUNT(DNCN, 10) >= 1;DNCP := COUNT(DNCD > DNCE, 30) >= 15;DNCQ := REF(C, 1) / LLV(L, 15) <= 1.4 AND REF(COUNT(C / REF(C, 1) >= 1.092, 10), 3) < 2;DNCR := MA(L, 20) * 1.2;DNCS := MA(L, 8) * 1.1;DNCT := DNCR > REF(DNCR, 1) AND C / REF(C, 1) >= 1.09 AND DNCD > DNCE AND DNCQ;DNCU := CROSS(C, DNCR) OR CROSS(C, DNCS) AND DNCT AND DNCP AND DNCO AND DNCL;DNCV := FILTER(DNCU, 6);DNCW := DNCN AND DNCO;IF(DNCW, 2, 0), COLORRED, LINETHICK4;IF(DNCW, 1, 0), COLORBLACK, LINETHICK3;DRAWTEXT(DNCW, 0.9, ‘★启动点’), COLORYELLOW;
{主力吸筹XG}
DNCB := 0.04;DNCC := V / ((H – L) * 2 – ABS(C – O));DNCD := IF(C > O, DNCC * (H – L), V / 2);DNCE := MA(DNCD, 35);DNCF := (L + H + C + O) / 3.82;DNCG := HHV(MA(DNCF, 6), 15);DNCH := MA(C, 30);DNCI := DNCH + 2 * STD(C, 30);DNCJ := EMA(C, 5);DNCK := C > DNCI AND C >= O;DNCL := BUYVOL > DNCB * CAPITAL;DNCM := 100 * V / (FINANCE(7) / 100) > 4 OR V / REF(V, 1) >= 2;DNCN := DNCD > DNCE AND CROSS(C, DNCG) AND DNCK AND DNCM;DNCO := COUNT(DNCN, 10) >= 1;DNCP := COUNT(DNCD > DNCE, 30) >= 15;DNCQ := REF(C, 1) / LLV(L, 15) <= 1.4 AND REF(COUNT(C / REF(C, 1) >= 1.092, 10), 3) < 2;DNCR := MA(L, 20) * 1.2;DNCS := MA(L, 8) * 1.1;DNCT := DNCR > REF(DNCR, 1) AND C / REF(C, 1) >= 1.09 AND DNCD > DNCE AND DNCQ;DNCU := CROSS(C, DNCR) OR CROSS(C, DNCS) AND DNCT AND DNCP AND DNCO AND DNCL;DNCV := FILTER(DNCU, 6);DNCW : DNCN AND DNCO;
有朋友反应经常粘贴源码会出现错误,安装不成功,为了便于大家安装成功,我将tn6格式指标打包到下面bai度网盘,点击链接保存下载即可。
通过网盘分享的文件:合集1.tn6
链接: https://pan.baidu.com/s/1y1awZrRfJihztsFae8JJ7A?pwd=ywp4 提取码: ywp4

请关注+点赞+推荐=支持作者,才有动力更新分享!!!


夜雨聆风
