通达信传说中的小牛带熊指标公式

[复制链接]
查看26 | 回复0 | 2022-7-24 06:32:56 | 显示全部楼层 |阅读模式

M60:=MA(C,5);
 M120:=MA(C,20);
 DRAWBAND(M60,RGB(90,0,0),M120,RGB(0,90,0));

{牛熊变线}
变线:=EMA(MA(CLOSE,30),5),LINETHICK0;{20 或 30 或 35}

STICKLINE(C>=变线 AND C>=O,H,L,0,0),COLORRED;
 STICKLINE(C>=变线 AND C>=O,C,O,2.7,1),COLORRED;

STICKLINE(C>变线 AND C<=O,H,L,0,1),COLORCYAN;
 STICKLINE(C>变线 AND C<=O,C,O,3,0),COLORCYAN;
 STICKLINE(C<变线 AND C<=O,H,L,0,1),COLORCYAN;
 STICKLINE(C<变线 AND C<=O,C,O,3,0),COLORCYAN;

STICKLINE(C<变线 AND C<=O,H,L,0,1),COLORGRAY;
 STICKLINE(C<变线 AND C>O,H,L,0,1),COLORGRAY;
 STICKLINE(C<变线 AND C>O,C,O,3,1),COLORGRAY;
 STICKLINE(C<变线 AND C<=O,C,O,3,1),COLORGRAY;

{分水岭操作线}
PM:MA(C,5),COLORGRAY,LINETHICK1;{可用13}
 IF(PM<REF(PM,1),PM,DRAWNULL),COLORGRAY,LINETHICK0;
 IF(PM>=REF(PM,1),PM,DRAWNULL),COLORRED,LINETHICK2;
 IF(PM=REF(PM,1),PM,DRAWNULL),COLORRED,LINETHICK2;
 A:=MA(CLOSE,12)+ABS(MA(CLOSE,12)-REF(MA(CLOSE,12),1));{原公式为17,最终确定为12}
 B:=MA(CLOSE,12)+MA(CLOSE,12)-REF(MA(CLOSE,12),1);
分水岭:=IF(MA(CLOSE,12)<B,B,MA(CLOSE,12));
操作线:=分水岭-(EMA(C,3)-分水岭);
AA:=CROSS(分水岭,操作线);
STICKLINE(AA,C,O,3,0),COLOR0000AA;
 STICKLINE(AA,C,O,2,0),COLOR0033CC;
 STICKLINE(AA,C,O,1,0),COLOR0055EE;
 STICKLINE(AA,C,O,0.3,0),COLOR0099FF;
 STICKLINE(AA,H,L,0,1),COLOR0099FF;
 RR:=CROSS((MA(VOL,5)),(MA(VOL,10))) AND MA(C,2)>=MA(C,4); {AND VOL>=REF(VOL,1)}
 STICKLINE(RR,C,O,3,0),COLOR0000AA;
 STICKLINE(RR,C,O,2,0),COLOR0033CC;
 STICKLINE(RR,C,O,1,0),COLOR0055EE;
 STICKLINE(RR,C,O,0.3,0),COLOR0099EE;
 STICKLINE(RR,H,L,0,1),COLOR0099FF;
 MA5:MA(CLOSE,5),NODRAW;
 MA10:MA(CLOSE,10),COLORCC66FF;
 MA20:MA(CLOSE,20),COLORFFCC66,LINETHICK2;
 DRAWTEXT(CROSS(MA5,MA20),MA5,'牛'),COLORYELLOW,LINETHICK4;
 DRAWTEXT(CROSS(MA20,MA5),MA5,'熊'),COLORWHITE,LINETHICK2;

54699353.gif

54699353.gif

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则