指标公式第404篇：通达信跨年龙股抓涨停指标

DRAWTEXT_FIX(1,0.005,0,0,'所属风格:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.06,0,0,FGBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.005,0.05,0,'所属概念:'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.06,0.05,0,GNBLOCK),COLORYELLOW;
历低价:LOWRANGE(L),COLORLICYAN NODRAW;
历高价:TOPRANGE(H),COLORMAGENTA,NODRAW;
历低量:LOWRANGE(V),COLORLICYAN NODRAW;
历高量:TOPRANGE(V),COLORMAGENTA,NODRAW;
NHL:=COUNT(BARSLAST(MA(C,250)>REF(MA(C,250),1))>=220,30)>=1 AND BARSLAST(MA(C,250)<=REF(MA(C,250),1))>=1;
NOTEXTQ:IF(MA(C,250)>=REF(MA(C,250),1),MA(C,250),DRAWNULL)COLORRED LINETHICK2;
NOTEXTR:IF(MA(C,250)<REF(MA(C,250),1),MA(C,250),DRAWNULL)COLORLICYAN LINETHICK2;
NOTEXTD:IF(COUNT(BARSLAST(MA(C,250)>REF(MA(C,250),1))>=220,30)>=1 AND BARSLAST(MA(C,250)<=REF(MA(C,250),1))>=1 AND MA(C,20)>MA(C,250),MA(C,250),DRAWNULL)COLORMAGENTA LINETHICK5;
NO2:=REF(IF(REF(V>=REF(V,1)*1.87 AND C>=(REF(C,1),O) AND TOPRANGE(V)>=20,1) AND L>REF(O,1),REF(O,1),REF(IF(L>REF(H,1),REF(H,1),O),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5)))),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5)));
NOD:=REF(IF(REF(L,1)>REF(H,2),REF(H,2),NO2),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5)));
DRAWKLINE(H,O,L,C);
STICKLINE(REF(O,1),REF(IF(REF(L,1)>REF(H,2),REF(H,2),NO2),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5))),REF(IF(REF(L,1)>REF(H,2),REF(H,2),NO2),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5))),2,0),COLOR404080;
STICKLINE(H,REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),1,0),COLORBLUE;
STICKLINE(H,REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),1,0),COLORLIGRAY;
STICKLINE(V>=REF(V,1)*1.87 AND C>=(REF(C,1),O) AND TOPRANGE(V)>=20,O,C,3,0)COLORBLUE;
STICKLINE(V/REF(V,1)>=2.9 AND C>=O AND TOPRANGE(V)>=20,O,C,(-1),0)COLORMAGENTA;
STICKLINE((C-REF(C,1))/REF(C,1)*100<IF(CODELIKE('68'),-9.0,-6.9) AND (C-REF(C,1))/REF(C,1)*100<IF(CODELIKE('30'),-9.0,-6.9),O,C,(-1),0),COLORGREEN;
STICKLINE((C/REF(C,1)-1)*100<IF(CODELIKE('68'),-9.0,-6.9) AND (C-REF(C,1))/REF(C,1)*100<IF(CODELIKE('30'),-9.0,-6.9) AND H<REF(L,1),O,C,(-1),0),COLORBLACK;
STICKLINE((SUM(AMOUNT,1)/SUM(V,1)/100>REF(C,1) AND C<=O) OR (SUM(AMOUNT,1)/SUM(V,1)/100>REF(C,1) AND C>REF(C,1) AND C<O AND C>300) AND NOT((C-REF(C,1))/REF(C,1)*100>=9.71 AND O=C) AND NOT((C-REF(C,1))/REF(C,1)*100<=-9.71 AND O=C) AND NOT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H) OR AMOUNT/V/100<REF(C,1) AND C>O AND C<300 AND SUM(AMOUNT,1)/SUM(V,1)/100<REF(C,1) AND NOT((C-REF(C,1))/REF(C,1)*100>=9.71 AND O=C) AND NOT((C-REF(C,1))/REF(C,1)*100<=-9.71 AND O=C),MIN(O,C),MIN(O,C)+(MAX(O,C)-MIN(O,C))*0.5,1,0)COLORFF80FF;
STICKLINE(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,O,C,(3),0)COLORRED;
STICKLINE((O-C)/O>0.02 AND C<REF(C,1),(C+O)/2,(C+O)/2,2,1)COLORCYAN;
STICKLINE((C-O)/O>0.02 AND C>REF(C,1),(C+O)/2,(C+O)/2,2,1)COLORCYAN;
STICKLINE(TOPRANGE(V)>=88 AND C>O,(MAX(C,O)-MIN(C,O))*0.50+MIN(C,O),C,(-1),0)COLOR4080FF;
DRAWTEXT_FIX(1,0.75,0.92,0,'技术交流：WYKH169 '),COLORYELLOW;
STICKLINE((H-REF(C,1))/REF(C,1)*100>IF(CODELIKE('68'),19.71,9.71) AND (H-REF(C,1))/REF(C,1)*100>IF(CODELIKE('30'),19.71,9.71) AND C<H,MAX(C,O),MAX(C,O)*0.995,(2),0)COLORBLACK;
DRAWICON(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5),H+0.05,9)DRAWABOVE;
DRAWTEXT(REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3)))>0 AND CURRBARSCOUNT=1,REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),' 高量阴') DRAWABOVE COLORFF8000;
DRAWTEXT(REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)))>0 AND CURRBARSCOUNT=1,REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),' 高量 阳') DRAWABOVE COLORLIMAGENTA;
DRAWNUMBER(REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3)))>0 AND CURRBARSCOUNT=1,REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))), REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3)))),COLORBLUE;
DRAWNUMBER(REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)))>0 AND CURRBARSCOUNT=1,REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))), REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)))),COLORLIMAGENTA;
板底:IF(CURRBARSCOUNT<=CONST(REF(BARSLAST(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))),1)+1)+1,CONST(REF(NOD,REF(BARSLAST(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))),1)+0)),DRAWNULL),COLORMAGENTA,LINETHICK2;DRAWGBK(DATE>1231231,RGB(0,255,0),RGB(255,0,0),0,0,0);
高阳:IF(CURRBARSCOUNT<=CONST(REF(BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)),1)+1)+1,CONST(REF(REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),REF(BARSLAST(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1)),1)+1)),DRAWNULL),COLORRED,LINETHICK2;
高阴:IF(CURRBARSCOUNT<=CONST(REF(BARSLAST(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1)),1)+1)+1,CONST(REF(REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),REF(BARSLAST(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1)),1)+1)),DRAWNULL),COLORFF8000 ,LINETHICK2;

CTA2:=(HIGH - LOW);
CTA3:=ABS((OPEN - CLOSE));
CTA4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN));
CTA5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW);
CTA6:=((CTA3 / CTA2) * VOL);
CTA7:=((CTA4 / CTA2) * VOL);
CTA8:=((CTA5 / CTA2) * VOL);
CTA9:=CTA6 >= CTA7 AND CTA6 >= CTA8 AND CLOSE < OPEN;
CTA10:=CLOSE < EMA(CLOSE,5) AND CTA9;
指标:CLOSE >= EMA(CLOSE,5) AND CTA9;
CTA12:=CTA6 >= CTA7 AND CTA6 >= CTA8 AND CLOSE > OPEN;
抓牛:CTA8 > CTA6 AND CTA8 > CTA7;
CTA13:CTA7 > CTA6 AND CTA7 > CTA8;
CDP:=REF(H+L+C,1)/3;
PT:=REF(H,1)-REF(L,1);
AH:=CDP+PT;
NH:=CDP*2-REF(L,1);
平衡:REF(H+L+C,1)/3,NODRAW;
阻力二:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH),NODRAW;
阻力一:IF(NH>阻力二,(阻力二-CDP)*0.618+CDP,NH),NODRAW;
支撑一:CDP*2-REF(H,1),NODRAW;
支撑二:CDP-REF(H-L,1),NODRAW;
MA5:MA(VOL,5),COLORWHITE,LINETHICK2;
实量:V,VOLSTICK;
STICKLINE(CTA12=1,0,实量*0.9,0.6,0),COLORYELLOW;
STICKLINE(CTA13=1,0,实量*0.9,0.6,0),COLORMAGENTA;
STICKLINE(抓牛=1,0,实量*0.9,0.6,0),COLORWHITE;
STICKLINE(指标=1,0,实量*0.9,0.6,0),COLORGREEN;
STICKLINE(CTA10=1,0,实量*0.9,0.6,0),COLORBLUE;
DRAWTEXT_FIX(1,0.01,0.05,0,'【加仓】')COLOR00FFFF;
DRAWTEXT_FIX(1,0.1,0.05,0,'黄芯，庄家进货强，俺也进货等起航'),COLOR00FFFF,LINETHICK2;
DRAWTEXT_FIX(1,0.01,0.15,0,'【高抛】')COLOR00FFFF;
DRAWTEXT_FIX(1,0.1,0.15,0,'粉芯，庄家忙，高抛低吸，俺也去逐浪'),COLORFF00FF,LINETHICK2;
DRAWTEXT_FIX(1,0.01,0.25,0,'【洗盘】')COLOR00FFFF;
DRAWTEXT_FIX(1,0.1,0.25,0,'白芯，庄家找底在洗盘，俺也伺机建点仓'),COLORFFFFFF,LINETHICK2;
DRAWTEXT_FIX(1,0.01,0.35,0,'【莫痒】')COLOR00FFFF;
DRAWTEXT_FIX(1,0.1,0.35,0,'绿芯，趋势破，离场急，比耐力，等止跌，莫手痒!'),COLORGREEN,LINETHICK2;
DRAWTEXT_FIX(1,0.01,0.45,0,'【减仓】')COLOR00FFFF;
DRAWTEXT_FIX(1,0.1,0.45,0,'蓝芯，巨量绿尾，庄家出逃慌，俺也赶快去减仓!'),COLORFF9900,LINETHICK2;
DRAWTEXT_FIX(1,0.01,0.55,0,'【注意】')COLOR00FFFF;
DRAWTEXT_FIX(1,0.1,0.55,0,'巨量下部有蓝色(大单流出)时，说明有主力出逃!'),COLOR00FF00,LINETHICK2;
CBA2:=(H-L);
CBA3:=ABS((O-C));
CBA4:=(H-IF((C>O),C,O));
CBA5:=(IF((C>O),O,C)-L);
CBA6:=((CBA3/CBA2)*V);
CBA7:=((CBA4/CBA2)*V);
CBA8:=((CBA5/CBA2)*V);
CBA9:=IF(((V/CAPITAL)>0.001),1,EXP(ABS(LOG(((V/CAPITAL)*100)))));
VA:=(((C-MA(C,5))/MA(C,5))*100);
VB:=(((MA(C,5)>MA(C,10)) AND (MA(C,10)>MA(C,30))) AND (MA(C,30)>MA(C,60)));
VC:=((MA(C,5)<MA(C,10)) AND (MA(C,10)<MA(C,30)));
逢高出货:DRAWTEXT(((((((((CBA7>CBA6) AND (VA>2)) AND (CBA9>CBA8)) AND (C>MA(C,5))) AND (C>MA(C,30))) AND (H>MA(C,60))) AND (V>MA(V,5))) AND (CBA7 >= MA(V,5))),V,'▼逢高出货'),COLORF00FF0;
逢低跟进:DRAWTEXT(((((((CBA8>CBA6) AND (CBA8>CBA7)) AND (VA<(0-2))) AND (C<MA(C,30))) AND (CBA8<(MA(V,5)/2))) AND (MA(V,5)<MA(V,10))),V,'▼低进'),COLORFF00FF;
强势参与:DRAWTEXT((((((CBA6>(MA(V,5)*2)) AND (CBA6 >= CBA7)) AND (CBA6 >= CBA8)) AND (C>O)) OR ((V>(MA(V,5)*3)) AND VB)),V,'▼强势参与'),COLORCC99CC;
空头释放:DRAWTEXT(((((((CBA6 >= CBA7) AND (CBA6 >= CBA8)) AND (C<O)) AND ((CBA6/V)>0.7)) AND VC) AND (CBA6>MA(V,5))),(CBA6*2),'▼空头释放'),COLORF00FF0;

FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5);