通达信 牛熊变色主图源码

来函数检测结果如下：
该公式没有未来函数

{牛熊变色主图}




M60:=MA(C,60);

M120:=MA(C,120);

DRAWBAND(M60,RGB(90,0,0),M120,RGB(0,90,0));

变线:=EMA(MA(CLOSE,30),5),LINETHICK0;

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;

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));

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);

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;

MA60:MA(CLOSE,60),COLOR00FF99,LINETHICK2;

MA120:MA(C,120),COLORGRAY;

DRAWTEXT(CROSS(MA60,MA120),MA60,'牛'),COLORYELLOW,LINETHICK4;

DRAWTEXT(CROSS(MA120,MA60),MA60,'熊'),COLORWHITE,LINETHICK2;

原理解析：
{牛熊变色主图}M60赋值:C的60日简单移动平均
M120赋值:C的120日简单移动平均
DRAWBAND(M60,RGB(90,0,0),M120,RGB(0,90,0))
变线赋值:E收盘价的30日简单移动平均,5),LINETHICK0
当满足条件C>=变线 AND C>=O时,在H和L之间画柱状线
当满足条件C>=变线 AND C>=O时,在C和O之间画柱状线
当满足条件C>变线 AND C<=O时,在H和L之间画柱状线
当满足条件C>变线 AND C<=O时,在C和O之间画柱状线
当满足条件C< 变线 AND C<=O时,在H和L之间画柱状线
当满足条件C< 变线 AND C<=O时,在C和O之间画柱状线
当满足条件C< 变线 AND C<=O时,在H和L之间画柱状线
当满足条件C< 变线 AND C>O时,在H和L之间画柱状线
当满足条件C< 变线 AND C>O时,在C和O之间画柱状线
当满足条件C< 变线 AND C<=O时,在C和O之间画柱状线
输出PM:C的5日简单移动平均,COLORGRAY,LINETHICK1
IF(PM< 1日前的PM,PM,DRAWNULL),COLORGRAY,LINETHICK0
IF(PM>=1日前的PM,PM,DRAWNULL),COLORRED, 线宽为2
IF(PM=1日前的PM,PM,DRAWNULL),COLORRED, 线宽为2
A赋值:收盘价的12日简单移动平均+收盘价的12日简单移动平均-REF(收盘价的12日简单移动平均,1的绝对值)
B赋值:收盘价的12日简单移动平均+收盘价的12日简单移动平均-REF(收盘价的12日简单移动平均,1)
分水岭赋值:IF(收盘价的12日简单移动平均< B,B,收盘价的12日简单移动平均)
操作线赋值:分水岭-(C的3日指数移动平均-分水岭)
AA赋值:分水岭上穿操作线
当满足条件AA时,在C和O之间画柱状线
当满足条件AA时,在C和O之间画柱状线
当满足条件AA时,在C和O之间画柱状线
当满足条件AA时,在C和O之间画柱状线
当满足条件AA时,在H和L之间画柱状线
RR赋值:CROSS((成交量的5日简单移动平均),(成交量的10日简单移动平均)) AND C的2日简单移动平均>=C的4日简单移动平均
当满足条件RR时,在C和O之间画柱状线
当满足条件RR时,在C和O之间画柱状线
当满足条件RR时,在C和O之间画柱状线
当满足条件RR时,在C和O之间画柱状线
当满足条件RR时,在H和L之间画柱状线
MA5:收盘价的5日简单移动平均,NODRAW
MA10:收盘价的10日简单移动平均,COLORCC66FF
MA20:收盘价的20日简单移动平均,COLORFFCC66, 线宽为2
MA60:收盘价的60日简单移动平均,COLOR00FF99, 线宽为2
MA120:C的120日简单移动平均,COLORGRAY
DRAWTEXT(MA60上穿MA120,MA60,'牛'),画黄色,LINETHICK4
DRAWTEXT(MA120上穿MA60,MA60,'熊'),画白色, 线宽为2