分享一套非常有用的主图通达信指标:超级BBIboll主图。改指标有以下特点:
主图指标: CV:=CLOSE; BBIBOLL:(MA(CV,3)+MA(CV,6)+MA(CV,12)+MA(CV,24))/4,COLORWHITE,LINETHICK2; UPR:BBIBOLL+M*STD(BBIBOLL,N), COLORB5A642; DWN:BBIBOLL-M*STD(BBIBOLL,N),LINETHICK1, COLOR97694F; 快线:EMA(EMA(EMA(EMA(CLOSE,2),2),2),2),LINETHICK2,COLOR0000FF,NODRAW; 慢线:EMA(REF(快线,1),2),LINETHICK2,COLORFFF8F0,NODRAW; DRAWBAND(慢线,RGB(118,238,0),快线,RGB(500,280,180))NODRAW; 总趋势:EMA(EMA(EMA(EMA(EMA(CLOSE,55),2),2),2),2),LINETHICK1,COLORRED; A3:=V>REF(V,1)*1.5 AND V>MA(V,5); STICKLINE( MA(CLOSE,60)>MA(CLOSE,120),MA(CLOSE,60),MA(CLOSE,120),8,0),RGB(221,160,221); STICKLINE( MA(CLOSE,60)<MA(CLOSE,120),MA(CLOSE,60),MA(CLOSE,120),8,0),RGB(152,251,152); DRAWKLINE(H,O,L,C); DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW*0.978,'★底') ,LINETHICK2,COLORRED; DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.02,'★高'); VAR1:=ZIG(3,13); STICKLINE((REF(VAR1,2) < REF(VAR1,1)) AND (VAR1 < REF(VAR1,1)), CLOSE,OPEN,3,0),COLORBLUE; DRAWICON(CROSS(REF(ZIG(3,12),1),ZIG(3,12)),HIGH*1.02,2); STICKLINE((REF(VAR1,2) > REF(VAR1,1)) AND (VAR1 >REF(VAR1,1)), CLOSE,OPEN,3,0),COLORYELLOW; DRAWICON(CROSS(ZIG(3,10),REF(ZIG(3,10),1)),LOW*0.99,1); 所属板块:=STRCAT('【所属板块】',STRCAT(STRCAT(STRCAT(' [行业]—',HYBLOCK),STRCAT (' [地域]—',DYBLOCK)),STRCAT(' [概念]—',GNBLOCK))); DRAWTEXT_FIX(ISLASTBAR,0.005,0.02,0,所属板块),COLORMAGENTA; L1:=LLV(L,10); 爆发点:=(DCLOSE-REF(C,1))/REF(C,1)*100; XG:=CROSS(爆发点,20) OR CROSS(爆发点,18); L3:IF(XG,O,L1*0.999),COLORLIGRAY NODRAW; STICKLINE(XG,L3,L3,100,0); DRAWTEXT(XG,L3,'起爆点'),COLORMAGENTA; 均价线:=AMOUNT/V/100; C2:=REF(C,1); 涨停:=IF(REF(C,1)*1.1-C<0.01 ,1,0); STICKLINE(涨停,OPEN,CLOSE,4,0),COLORRED; STICKLINE(涨停,OPEN,CLOSE,3,0),COLORYELLOW; STICKLINE(涨停,H,L,0,0),COLORYELLOW; LC:=REF(CLOSE,1); RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100); EE:=EMA(CLOSE,3); MA25:=EMA(CLOSE,21); 日:=150;昨前:=3; 高1:=REF(HHV(H,日),昨前); 低1:=REF(LLV(L,日),昨前); 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; 顶:REFDATE(高1,DATE),COLORRED; FF:=EMA(CLOSE,3); MA15:=EMA(CLOSE,21); TTJ:=CROSS(FF,MA15); DRAWTEXT_FIX(1,0.69,0.01,0,EXTERNSTR(0,4)),COLOR00FFFF; DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'★上'),COLOR00FFFF; DRAWTEXT(CROSS(MA15,FF),(HIGH * 1.02),'●下'),COLORBLUE; DRAWTEXT(CROSS(85,RSI),(HIGH * 1.02),'●S'),COLORGREEN; VAR91:=ZIG(3,13); STICKLINE((REF(VAR91,2) < REF(VAR91,1)) AND (VAR91 < REF(VAR91,1)), CLOSE,OPEN,3,0),COLORBLUE; DRAWICON(CROSS(REF(ZIG(3,12),1),ZIG(3,12)),HIGH*1.02,2); STICKLINE((REF(VAR91,2) > REF(VAR91,1)) AND (VAR91 >REF(VAR91,1)), CLOSE,OPEN,3,0),COLORYELLOW; DRAWICON(CROSS(ZIG(3,10),REF(ZIG(3,10),1)),LOW*0.99,1); 短:MA(CLOSE,13),LINETHICK2,COLORYELLOW,NODRAW; 中:MA(CLOSE,55),COLORMAGENTA,NODRAW; 界:MA(CLOSE,144),COLORGREEN,NODRAW; 长:MA(CLOSE,377),COLORLIMAGENTA,NODRAW; 超:MA(CLOSE,453),COLORRED,LINETHICK2,NODRAW; DRAWTEXT(ISLASTBAR,短,' 短13'),COLORYELLOW; DRAWTEXT(ISLASTBAR,中,' 中55'),COLORMAGENTA; DRAWTEXT(ISLASTBAR,界,' 界144'),COLORGREEN; DRAWTEXT(ISLASTBAR,长,' 长377'),COLORLIMAGENTA; DRAWTEXT(ISLASTBAR,超,' 超453'),COLORRED,LINETHICK2; {牛线等突破} LT:=LLVBARS(L,60); LTT:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1); HT:=FINDHIGHBARS(H,LT+1,60,1); AA1:DRAWLINE(CURRBARSCOUNT=CONST(HT)+1,H,ISLASTBAR,REF(H,HT),0),COLORYELLOW,LINETHICK2; TT:=BARSLAST(CURRBARSCOUNT=CONST(HT)+1); QQ:=CROSS(C,CONST(AA1)); TJAA:=COUNT(QQ,TT+1)=1 AND QQ; TJ1AA:=COUNT(V<MA(V,277),TT+1) ; BL:=TJ1AA/(TT+1)*100; XGT:=BARSLAST(CURRBARSCOUNT=CONST(BARSLAST(XG))+1); ZH:=REF(H,TT); YL:=REF(L,LTT); XC:=REF(C,XGT); YZ:=(XC-YL)/YL*100; ZBL:=YZ/REF(LTT,XGT); XGA:=XG AND ZBL<2.95; DRAWICON(XGA,L*0.95,9); DRAWTEXT(CURRBARSCOUNT=1,AA1*0.999,STRCAT('------------牛线',CON2STR(AA1,2))),COLORYELLOW; DRAWTEXT(TT=0,REF(H,TT)*1.0007,VARCAT(VARCAT('牛线等突破 : ',VAR2STR(REF(H,TT),2)),'元'))COLORWHITE; XG11:=COUNT(CROSS(C>=AA1,0.5),TT+1)=1 AND CROSS(C>=AA1,0.5) AND LT>1.5; DRAWICON(CROSS(C,AA1) AND CURRBARSCOUNT<CONST(TT)+1,L,23); DRAWTEXT(XG11,(H* 0.999),'过牛线'),COLORYELLOW; STICKLINE( XG11,C,O,5,1)COLOR8080FF; STICKLINE( XG11,C,O,0.7,1)COLORYELLOW; ZNOTEXT1:IF(C>=AA1,AA1,DRAWNULL),LINETHICK5,COLOR8000FF; IF(C>=AA1,AA1,DRAWNULL),DOTLINE,COLORFFFFFF; ZNOTEXT2:IF(C<AA1,AA1,DRAWNULL),LINETHICK2,COLORGREEN; IF(C<AA1,AA1,DRAWNULL),DOTLINE,COLORRED; |
|