牛熊争霸主图和谐源码分享通达信公式 副图 源码附图

VAR1:=(2*CLOSE+HIGH+LOW+OPEN)/5;

A1:(EMA(VAR1,2)+EMA(VAR1,5)+EMA(VAR1,8)+EMA(VAR1,12))/4;

A2:EMA(A1,2);

A3:EMA(A2,2);

A4:EMA(A3,2);

多空线:EMA(CLOSE,24),COLOR3399FF,POINTDOT,LINETHICK6;

牛熊线:EMA(CLOSE,144),COLORFF00FF,POINTDOT,LINETHICK6;

MA1:EMA(C,55),COLOR3399FF;

MA2:EMA(C,65),COLORFF6600;

MA3:EMA(C,75),COLOR339933;

TJ:=IF(多空线>=REF(多空线,1),多空线,DRAWNULL);

TJ1:=IF(多空线<REF(多空线,1),多空线,DRAWNULL);

DRAWBAND(TJ,RGB(255,0,0),TJ,0);

DRAWBAND(TJ1,RGB(0,201,87),TJ1,0);

TJJ:=IF(牛熊线>REF(牛熊线,1),牛熊线,DRAWNULL),COLOR3366FF;

TJJ1:=IF(牛熊线<REF(牛熊线,1),牛熊线,DRAWNULL),COLOR006633;

DRAWBAND(TJJ,RGB(255,0,0),TJJ,0);

DRAWBAND(TJJ1,RGB(0,201,87),TJJ1,0);

DRAWBAND(A1,RGB(200,0,200),A4,RGB(34,139,34));

WW1:=FILTER(O<REF(L,1) AND C>O AND VOL>REF(V,1),13);

JH:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;

SZ:=FILTER(CROSS(JH,35),13);

SX:=FILTER(CROSS(JH,30),7);

SQ:=FILTER(CROSS(71,JH),74);

SD:=FILTER(CROSS(80,JH),74);

AA:=IF(CAPITAL<1,SZ,SX);

BB:=IF(CAPITAL<1,SQ,SD);

CC:=REF(HHV(CLOSE,120),1);DD:=REF(LLV(CLOSE,120),1);

WW:=((100 * (CLOSE - DD)) / (CC - DD));EE:=AMOUNT;

FF:=(EMA(EE,5) / REF(EMA(EE,5),5));

霸占:=FILTER(((((((FF >= 2)) AND (WW < 35))) AND (BARSCOUNT(CLOSE) > 30)) OR (((((FF >= 2)) AND (WW < 100))) AND (BARSCOUNT(CLOSE) < 50))),90);

STICKLINE(C>REF(C,1),C,O,3.2,0),COLOR0000AA;

STICKLINE(C>REF(C,1),C,O,2.7,0),COLOR0000DD;

STICKLINE(C>REF(C,1),C,O,2.1,0),COLOR0022FF;

STICKLINE(C>REF(C,1),C,O,1.5,0),COLOR0066FF;

STICKLINE(C>REF(C,1),C,O,0.9,0),COLOR0099FF;

{STICKLINE(C>REF(C,1),C,O,0.3,0),COLOR00DDFF;}

STICKLINE(C<REF(C,1),C,O,3.2,0),COLOR990000;

STICKLINE(C<REF(C,1),C,O,2.7,0),COLORCC0000;

STICKLINE(C<REF(C,1),C,O,2.1,0),COLORFF4400;

STICKLINE(C<REF(C,1),C,O,1.5,0),COLORFF8800;

STICKLINE(C<REF(C,1),C,O,0.9,0),COLORFFCC00;

{STICKLINE(C<REF(C,1),C,O,0.3,0),COLORFFDD00;}

STICKLINE(C=REF(C,1),C,O,3.2,0),COLOR555555;

STICKLINE(C=REF(C,1),C,O,2.7,0),COLOR777777; 

STICKLINE(C=REF(C,1),C,O,2.1,0),COLOR999999;

STICKLINE(C=REF(C,1),C,O,1.5,0),COLORBBBBBB;

STICKLINE(C=REF(C,1),C,O,0.9,0),COLORDDDDDD;

{STICKLINE(C=REF(C,1),C,O,0.3,0),COLORFFFFFF;}

STICKLINE(霸占,C,O,3,2),COLOR000055;

STICKLINE(霸占,C,O,2.7,0),COLOR000077;

STICKLINE(霸占,C,O,2.1,0),COLOR000099;

STICKLINE(霸占,C,O,1.5,0),COLOR0000BB;

STICKLINE(霸占,C,O,0.9,0),COLOR0000DD;

{STICKLINE(霸占,C,O,0.3,0),COLOR0000FF;}

STICKLINE(WW1,CLOSE,OPEN,3.2,0),COLORBB00FF;

STICKLINE(WW1,CLOSE,OPEN,2.7,0),COLORFF33FF;

STICKLINE(WW1,CLOSE,OPEN,2.1,0), COLORFF66FF;

STICKLINE(WW1,CLOSE,OPEN,1.5,0),COLORFF99FF;

STICKLINE(WW1,CLOSE,OPEN,0.9,0),COLORFFBBFF;

{STICKLINE(WW1,CLOSE,OPEN,0.3,0),COLORFFDDFF;}

STICKLINE(AA,CLOSE,OPEN,3.2,0),COLOR0088FF;

STICKLINE(AA,CLOSE,OPEN,2.7,0),COLOR00AAFF;

STICKLINE(AA,CLOSE,OPEN,2.1,0),COLOR00CCFF;

STICKLINE(AA,CLOSE,OPEN,1.5,0),COLOR22FFFF;

STICKLINE(AA,CLOSE,OPEN,0.9,0),COLOR66FFFF;

{STICKLINE(AA,CLOSE,OPEN,0.3,0),COLOR99FFFF;}

STICKLINE(BB,CLOSE,OPEN,3.2,0),COLOR005500;

STICKLINE(BB,CLOSE,OPEN,2.7,0),COLOR007700;

STICKLINE(BB,CLOSE,OPEN,2.1,0),COLOR009900;

STICKLINE(BB,CLOSE,OPEN,1.5,0),COLOR00BB00;

STICKLINE(BB,CLOSE,OPEN,0.9,0),COLOR00DD00;

{STICKLINE(BB,CLOSE,OPEN,0.3,0),COLOR00FF00;};

 

原理解析：
VAR1赋值:(2*收盘价+最高价+最低价+开盘价)/5
输出A1:(VAR1的2日指数移动平均+VAR1的5日指数移动平均+VAR1的8日指数移动平均+VAR1的12日指数移动平均)/4
输出A2:A1的2日指数移动平均
输出A3:A2的2日指数移动平均
输出A4:A3的2日指数移动平均
输出多空线:收盘价的24日指数移动平均,COLOR3399FF,POINTDOT,LINETHICK6
输出牛熊线:收盘价的144日指数移动平均,COLORFF00FF,POINTDOT,LINETHICK6
M输出A1:C的55日指数移动平均,COLOR3399FF
M输出A2:C的65日指数移动平均,COLORFF6600
M输出A3:C的75日指数移动平均,COLOR339933
TJ赋值:IF(多空线>=1日前的多空线,多空线,DRAWNULL)
TJ1:=IF(多空线<1日前的多空线,多空线,DRAWNULL)
DRAWBAND(TJ,RGB(255,0,0),TJ,0)
DRAWBAND(TJ1,RGB(0,201,87),TJ1,0)
TJJ:=IF(牛熊线>1日前的牛熊线,牛熊线,DRAWNULL),COLOR3366FF
TJJ1:=IF(牛熊线<1日前的牛熊线,牛熊线,DRAWNULL),COLOR006633
DRAWBAND(TJJ,RGB(255,0,0),TJJ,0)
DRAWBAND(TJJ1,RGB(0,201,87),TJJ1,0)
DRAWBAND(A1,RGB(200,0,200),A4,RGB(34,139,34))
WW1赋值:FILTER(O<1日前的L AND C>O AND 成交量>1日前的V,13)
JH赋值:SMA(C-1日前的C和0较大值,6,1)/SMA(C-1日前的C的绝对值,6,1)*100
SZ赋值:FILTER(JH上穿35,13)
SX赋值:FILTER(JH上穿30,7)
SQ赋值:FILTER(71上穿JH,74)
SD赋值:FILTER(80上穿JH,74)
如果当前流通股本<1返回SZ否则返回SX
如果当前流通股本<1返回SQ否则返回SD
CC赋值:REF(120日内收盘价最高值,1)
DD赋值:REF(120日内收盘价最低值,1)
WW赋值:((100 * (收盘价 - DD)) / (CC - DD))
EE赋值:成交额
FF赋值:(EE的5日指数移动平均 / 5日前的EE的5日指数移动平均)
霸占赋值:FILTER(((((((FF >= 2)) AND (WW < 35))) AND (收盘价的有效数据周期数 > 30)) OR (((((FF >= 2)) AND (WW < 100))) AND (收盘价的有效数据周期数 < 50))),90)
STICKLINE(C>1日前的C,C,O,3.2,0),COLOR0000AA
STICKLINE(C>1日前的C,C,O,2.7,0),COLOR0000DD
STICKLINE(C>1日前的C,C,O,2.1,0),COLOR0022FF
STICKLINE(C>1日前的C,C,O,1.5,0),COLOR0066FF
STICKLINE(C>1日前的C,C,O,0.9,0),COLOR0099FF
{STICKLINE(C>1日前的C,C,O,0.3,0),COLOR00DDFF
}
STICKLINE(C<1日前的C,C,O,3.2,0),COLOR990000
STICKLINE(C<1日前的C,C,O,2.7,0),COLORCC0000
STICKLINE(C<1日前的C,C,O,2.1,0),COLORFF4400
STICKLINE(C<1日前的C,C,O,1.5,0),COLORFF8800
STICKLINE(C<1日前的C,C,O,0.9,0),COLORFFCC00
{STICKLINE(C<1日前的C,C,O,0.3,0),COLORFFDD00
}
STICKLINE(C=1日前的C,C,O,3.2,0),COLOR555555
STICKLINE(C=1日前的C,C,O,2.7,0),COLOR777777
 
STICKLINE(C=1日前的C,C,O,2.1,0),COLOR999999
STICKLINE(C=1日前的C,C,O,1.5,0),COLORBBBBBB
STICKLINE(C=1日前的C,C,O,0.9,0),COLORDDDDDD
{STICKLINE(C=1日前的C,C,O,0.3,0),COLORFFFFFF
当满足条件霸占时,在C和O之间画柱状线
当满足条件霸占时,在C和O之间画柱状线
当满足条件霸占时,在C和O之间画柱状线
当满足条件霸占时,在C和O之间画柱状线
当满足条件霸占时,在C和O之间画柱状线
当满足条件霸占时,在C和O之间画柱状线
当满足条件WW1时,在收盘价和开盘价之间画柱状线
当满足条件WW1时,在收盘价和开盘价之间画柱状线
当满足条件WW1时,在收盘价和开盘价之间画柱状线
当满足条件WW1时,在收盘价和开盘价之间画柱状线
当满足条件WW1时,在收盘价和开盘价之间画柱状线
当满足条件WW1时,在收盘价和开盘价之间画柱状线
当满足条件AA时,在收盘价和开盘价之间画柱状线
当满足条件AA时,在收盘价和开盘价之间画柱状线
当满足条件AA时,在收盘价和开盘价之间画柱状线
当满足条件AA时,在收盘价和开盘价之间画柱状线
当满足条件AA时,在收盘价和开盘价之间画柱状线
当满足条件AA时,在收盘价和开盘价之间画柱状线
当满足条件BB时,在收盘价和开盘价之间画柱状线
当满足条件BB时,在收盘价和开盘价之间画柱状线
当满足条件BB时,在收盘价和开盘价之间画柱状线
当满足条件BB时,在收盘价和开盘价之间画柱状线
当满足条件BB时,在收盘价和开盘价之间画柱状线
当满足条件BB时,在收盘价和开盘价之间画柱状线
}