通达信牛三斤主图指标公式源码分享

DRAWBAND(ma(CLOSE,60),RGB(118,38,38),MA(CLOSE,120),RGB(38,88,38)); DRAWBAND(MA(CLOSE,5),RGB(123,23,123),MA(CLOSE,10),RGB(23,123,123)); MA60:MA(CLOSE,60),COLOR0000FF,LINETHICK1,NODRAW; MA120:MA(CLOSE,120),COLOR00FF00,NODRAW; MA5:MA(CLOSE,5),COLORFF00FF; MA10:MA(CLOSE,10),COLORFFFF00; MA20:MA(C,20),COLOR0079FF,LINETHICK1; DRAWKLINE(H,O,L,C); DIF:=(EMA(C,12)-EMA(C,26)); DEA:=EMA(DIF,9); :=2*(DIF-DEA); MJBT:=EXIst((crOSS(DIF,DEA)ANDDIF 0)ORCROSS(DIF,0),5); M5:=MA(V,5); MVOL10:=MA(V,10); MVOL20:=MA(V,20); 量托:=MVOL5 =MVOL20ANDCROSS(MVOL10,MVOL20)ANDREF(MVOL10,1) REF(MVOL20,1); VJBT:=EXIST(CROSS(MVOL5,MVOL10)OR量托,5); T1:=BArslAST(REF(LONGCROSS(MA60,MA120,55),1)); JJC:=CROSS(MA5,MA10)ANDT1 SJBT:=FILTER(MJBTANDJJCANDVJBT,5); STICKLINE(SJBT,C,O,3,0),COLOR000088; STICKLINE(SJBT,C,O,1,0),COLOR0000AA; STICKLINE(SJBT,C,O,0.3,0),COLOR0000CC; STICKLINE(SJBT,C,O,0.0,0),COLOR0000FF; DRAWTEXT(SJBT,L*0.98,'★牛三金'),COLOR0078FF; RSV:=(((C-LLV(L,60))/(HHV(H,60)-LLV(L,60)))*100); K:=SMA(RSV,10,1),COLOR0000FF,LINETHICK1; D:=SMA(SMA(RSV,10,1),3,1),COLORFFFFFF,LINETHICK1; J:=SMA(K,10,1),COLOR00FF00,LINETHICK1; DBU:=(((C/COST(13)) =0.78)*17); BT01:=LONGCROSS(K,16.18,5)ANDD 19.1; BT02:=LONGCROSS(K,D,8)ANDD 16.18; FTBT:=FILTER(COUNT(BT01ORBT02,3)=2,3); STICKLINE(FTBT,C,O,3,0),COLOR880088; STICKLINE(FTBT,C,O,1,0),COLORAA00AA; STICKLINE(FTBT,C,O,0.3,0),COLORCC00CC; STICKLINE(FTBT,C,O,0.0,0),COLORFF00FF; DRAWTEXT(FTBT,L*0.99,'★反弹'),COLORFF00FF; BT03:=FILTER(CROSS(K,D)ANDEXIST(DBU=17,3),3); STICKLINE(BT03,C,O,3,0),COLOR000088; STICKLINE(BT03,C,O,1,0),COLOR0000AA; STICKLINE(BT03,C,O,0.3,0),COLOR0000CC; STICKLINE(BT03,C,O,0.0,0),COLOR0000FF; DRAWTEXT(BT03,L*0.99,'★金底'),COLOR0000FF; ST01:=LONGCROSS(K,80,5)ANDD ST02:=LONGCROSS(D,K,5)ANDD ST:=ST01ORST02; STICKLINE(ST,C,O,3,0),COLOR008800; STICKLINE(ST,C,O,1,0),COLOR00AA00; STICKLINE(ST,C,O,0.3,0),COLOR00CC00; STICKLINE(ST,C,O,0.0,0),COLOR00FF00; DRAWTEXT(ST,H*1.009,'★顶'),COLOR00FF00; LC:=REF(C,1); 5:=SMA(MAX(C-LC,0),5,1)/SMA(Abs(C-LC),5,1)*1000; DC:=RSI5-LLV(RSI5,10); AV:=(MA(DC,3)*5+DC*15)/20; DXRSI:=IF(AV 13,MA(AV,3),AV)/6; MADXRSI:=MA(DXRSI,5),COLORBBBBBB; DXBT:=CROSS(DXRSI,1)ANDDXRSI {bias} ABS34:=MA(-100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),20); BS13:=-100*(HHV(H,13)-C)/(HHV(H,13)-LLV(L,13)); EBS5:=EMA(-100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),5); VBS13:=BS13+100; VABS34:=ABS34+100; VEBS5:=EBS5+100; 底区:=(VABS34 12ANDVEBS5 8AND(VBS13 7.2ORREF(VBS13,1) 5)AND(VEBS5 REF(VEBS5,1) ORVBS13 REF(VBS13,1)))OR(VABS34 8ANDVEBS5 7ANDVBS13 15ANDVBS13 REF(VBS13,1)) OR(VABS34 10ANDVEBS5 7ANDVBS13 低金:=(VABS34 15ANDREF(VABS34,1) 15ANDVEBS5 18ANDVBS13 REF(VBS13,1)AND CROSS(VBS13,VABS34)ANDVBS13 VEBS5AND(REF(VBS13,1) 5ORREF(VBS13,2) 5)AND (VEBS5 =VABS34ORREF(VBS13,1) FZBT:=DXBTAND低金; FZXG:=低金ORFZBT; VARF11:=(C-MA(C,55))/MA(C,55)*100 -30AND(C-MA(C,89))/MA(C,89)*100 -27 ANDCOUNT((C-MA(C,55))/MA(C,55)*100 -30AND(C-MA(C,89))/MA(C,89)*100 -27,2)=1 AND(O-REF(C,1))/REF(C,1) -0.07ANDCOUNT(C=O,6)=0,COLORCCCCCC; VARF21:=(C-DMA(EMA(C,8),SUM(V,9)/2.8/CAPITAL))/DMA(EMA(C,8),SUM(V,9)/2.8/CAPITAL)*100,COLOR00AAAA; VARF31:=REF(VARF21,1) -46ANDVARF21 REF(VARF21,1)ANDREF(VARF21,1) REF(VARF21,2)ANDVARF21-REF(VARF21,1) {-42,1.8} JDBT1:=(VARF11ORVARF31)*10,COLOR0000FF,LINETHICK2; JDBT2:=LONGCROSS(VARF21,-23,3); JDXG:=JDBT1ORJDBT2; W118:=FILTER(FZXGORJDXG,5); STICKLINE(W118,C,O,3,0),COLOR008888; STICKLINE(W118,C,O,1,0),COLOR00AAAA; STICKLINE(W118,C,O,0.3,0),COLOR00CCCC; STICKLINE(W118,C,O,0.0,0),COLOR00FFFF; DRAWTEXT(W118,L*0.99,'★谷底'),COLOR00FFFF; IF(MA60 =MA120,MA60,DRAWNULL),COLOR0000FF; IF(MA120 =MA60,MA120,DRAWNULL),COLORFF9900; IF(MA60 =MA120,MA120,DRAWNULL),COLOR00FFFF; IF(MA120 =MA60,MA60,DRAWNULL),COLOR00FF00; VAR1:=(2*CLOSE+HIGH+LOW+OPEN)/5; A1:=(EMA(VAR1,3)+EMA(VAR1,6)+EMA(VAR1,12)+EMA(VAR1,24))/4; A2:=EMA(A1,2); A3:=EMA(A2,2); A4:=EMA(A3,2); A5:=EMA(A4,2); A6:=EMA(A5,2); A7:=EMA(A6,2); IF(A1 REF(A1,1),A1,DRAWNULL),COLORWHITE; IF(A1 REF(A1,1),A1,DRAWNULL),COLORCYAN; IF(A2 REF(A2,1),A2,DRAWNULL),COLORWHITE; IF(A2 REF(A2,1),A2,DRAWNULL),COLORCYAN; IF(A3 REF(A3,1),A3,DRAWNULL),COLORWHITE; IF(A3 REF(A3,1),A3,DRAWNULL),COLORCYAN; IF(A4 REF(A4,1),A4,DRAWNULL),COLORWHITE; IF(A4 REF(A4,1),A4,DRAWNULL),COLORCYAN; IF(A5 REF(A5,1),A5,DRAWNULL),COLORWHITE; IF(A5 REF(A5,1),A5,DRAWNULL),COLORCYAN; IF(A6 REF(A6,1),A6,DRAWNULL),COLORWHITE; IF(A6 REF(A6,1),A6,DRAWNULL),COLORCYAN; IF(A7 REF(A7,1),A7,DRAWNULL),COLORWHITE; IF(A7 REF(A7,1),A7,DRAWNULL),COLORCYAN; {*100是为了确保小数点后面四舍五入后相等} 十字星:=((H-L)/ABS(C-O) =30ORC=O)ANDC A1ANDL 数字相近1:=INTPART(A1*100)=INTPART(A2*100); 数字相近2:=INTPART(A2*100)=INTPART(A3*100); 数字相近3:=INTPART(A3*100)=INTPART(A4*100); 数字相近4:=INTPART(A4*100)=INTPART(A5*100); 数字相近5:=INTPART(A5*100)=INTPART(A6*100); 数字相近6:=INTPART(A6*100)=INTPART(A7*100); 皈依:十字星AND数字相近1AND数字相近2AND数字相近3AND数字相近4AND数字相近5AND数字相近6,NODRAW; DRAWTEXT(皈依,L*0.96,'↖㊣准备转向'),COLORRED;

[源码注释]通达信公式动态公式解读

画带状线

输出MA60:收盘价的60日简单移动平均,COLOR0000FF,线宽为1,NODRAW

输出MA120:收盘价的120日简单移动平均,COLOR00FF00,NODRAW

输出MA5:收盘价的5日简单移动平均,COLORFF00FF

输出MA10:收盘价的10日简单移动平均,COLORFFFF00

输出MA20:收盘价的20日简单移动平均,COLOR0079FF,线宽为1

K线

DIF赋值:(收盘价的12日指数移动平均-收盘价的26日指数移动平均)

DEA赋值:DIF的9日指数移动平均

MACD赋值:2*(DIF-DEA)

MJBT赋值:最近5日存在(DIF上穿DEAANDDIF 0)ORCROSS(DIF,0)

MVOL5赋值:(手)的5日简单移动平均

MVOL10赋值:成交量(手)的10日简单移动平均

MVOL20赋值:成交量(手)的20日简单移动平均

量托赋值:MVOL5 =MVOL20ANDCROSS(MVOL10,MVOL20)ANDREF(MVOL10,1) 1日前的MVOL20

VJBT赋值:最近5日存在MVOL5上穿MVOL10OR量托

T1赋值:上次1日前的MA60小于MA120保持55个交易日后交叉上穿距今天数

JJC赋值:MA5上穿MA10ANDT1 30

SJBT赋值:MJBTANDJJCANDVJBT的5日过滤

当满足条件SJBT时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR000088

当满足条件SJBT时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR0000AA

当满足条件SJBT时,在收盘价和开盘价位置之间画柱状线,宽度为0.3,0不为0则画空心柱.,COLOR0000CC

当满足条件SJBT时,在收盘价和开盘价位置之间画柱状线,宽度为0.0,0不为0则画空心柱.,COLOR0000FF

当满足条件SJBT时,在最低价*0.98位置书写文字,COLOR0078FF

RSV赋值:(((收盘价-60日内最低价的最低值)/(60日内最高价的最高值-60日内最低价的最低值))*100)

K赋值:RSV的10日[1日权重]移动平均,COLOR0000FF,线宽为1

D赋值:RSV的10日[1日权重]移动平均的3日[1日权重]移动平均,COLORFFFFFF,线宽为1

J赋值:K的10日[1日权重]移动平均,COLOR00FF00,线宽为1

DBU赋值:(((收盘价/获利盘为13%的分布) =0.78)*17)

BT01赋值:K小于16.18保持5个交易日后交叉上穿ANDD 19.1

BT02赋值:K小于D保持8个交易日后交叉上穿ANDD 16.18

FTBT赋值:统计3日中满足BT01ORBT02的天数=2的3日过滤

当满足条件FTBT时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR880088

当满足条件FTBT时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORAA00AA

当满足条件FTBT时,在收盘价和开盘价位置之间画柱状线,宽度为0.3,0不为0则画空心柱.,COLORCC00CC

当满足条件FTBT时,在收盘价和开盘价位置之间画柱状线,宽度为0.0,0不为0则画空心柱.,COLORFF00FF

当满足条件FTBT时,在最低价*0.99位置书写文字,COLORFF00FF

BT03赋值:K上穿DANDEXIST(DBU=17,3)的3日过滤

当满足条件BT03时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR000088

当满足条件BT03时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR0000AA

当满足条件BT03时,在收盘价和开盘价位置之间画柱状线,宽度为0.3,0不为0则画空心柱.,COLOR0000CC

当满足条件BT03时,在收盘价和开盘价位置之间画柱状线,宽度为0.0,0不为0则画空心柱.,COLOR0000FF

当满足条件BT03时,在最低价*0.99位置书写文字,COLOR0000FF

ST01赋值:K小于80保持5个交易日后交叉上穿ANDD 76

ST02赋值:D小于K保持5个交易日后交叉上穿ANDD 70

ST赋值:ST01ORST02

当满足条件ST时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR008800

当满足条件ST时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00AA00

当满足条件ST时,在收盘价和开盘价位置之间画柱状线,宽度为0.3,0不为0则画空心柱.,COLOR00CC00

当满足条件ST时,在收盘价和开盘价位置之间画柱状线,宽度为0.0,0不为0则画空心柱.,COLOR00FF00

当满足条件ST时,在最高价*1.009位置书写文字,COLOR00FF00

LC赋值:1日前的收盘价

RSI5赋值:收盘价-LC和0的较大值的5日[1日权重]移动平均/收盘价-LC的绝对值的5日[1日权重]移动平均*1000

DC赋值:RSI5-10日内RSI5的最低值

AV赋值:(DC的3日简单移动平均*5+DC*15)/20

DXRSI赋值:如果AV 13,返回AV的3日简单移动平均,否则返回AV/6

MADXRSI赋值:DXRSI的5日简单移动平均,COLORBBBBBB

DXBT赋值:DXRSI上穿1ANDDXRSI 30

ABS34赋值:-100*(34日内最高价的最高值-收盘价)/(34日内最高价的最高值-34日内最低价的最低值)的20日简单移动平均

BS13赋值:-100*(13日内最高价的最高值-收盘价)/(13日内最高价的最高值-13日内最低价的最低值)

EBS5赋值:-100*(34日内最高价的最高值-收盘价)/(34日内最高价的最高值-34日内最低价的最低值)的5日指数移动平均

VBS13赋值:BS13+100

VABS34赋值:ABS34+100

VEBS5赋值:EBS5+100

底区赋值:(VABS34 12ANDVEBS5 8AND(VBS13 7.2ORREF(VBS13,1) 5)AND(VEBS5 1日前的VEBS5ORVBS13 1日前的VBS13))OR(VABS34 8ANDVEBS5 7ANDVBS13 15ANDVBS13 1日前的VBS13)OR(VABS34 10ANDVEBS5 7ANDVBS13 1)

低金赋值:(VABS34 15ANDREF(VABS34,1) 15ANDVEBS5 18ANDVBS13 1日前的VBS13ANDVBS13上穿VABS34ANDVBS13 VEBS5AND(1日前的VBS13 5ORREF(VBS13,2) 5)AND(VEBS5 =VABS34ORREF(VBS13,1) 1))

FZBT赋值:DXBTAND低金

FZXG赋值:低金ORFZBT

VARF11赋值:(收盘价-收盘价的55日简单移动平均)/收盘价的55日简单移动平均*100 -30AND(收盘价-收盘价的89日简单移动平均)/收盘价的89日简单移动平均*100 -27ANDCOUNT((收盘价-收盘价的55日简单移动平均)/收盘价的55日简单移动平均*100 -30AND(收盘价-收盘价的89日简单移动平均)/收盘价的89日简单移动平均*100 -27,2)=1AND(开盘价-1日前的收盘价)/1日前的收盘价 -0.07ANDCOUNT(平盘,6)=0,COLORCCCCCC

VARF21赋值:(收盘价-以成交量(手)的9日累和/2.8/当前流通股本(手)为权重收盘价的8日指数移动平均的动态移动平均)/以成交量(手)的9日累和/2.8/当前流通股本(手)为权重收盘价的8日指数移动平均的动态移动平均*100,COLOR00AAAA

VARF31赋值:1日前的VARF21 -46ANDVARF21 1日前的VARF21ANDREF(VARF21,1) 2日前的VARF21ANDVARF21-1日前的VARF21 2.2

JDBT1赋值:(VARF11ORVARF31)*10,COLOR0000FF,线宽为2

JDBT2赋值:VARF21小于-23保持3个交易日后交叉上穿

JDXG赋值:JDBT1ORJDBT2

W118赋值:FZXGORJDXG的5日过滤

当满足条件W118时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR008888

当满足条件W118时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00AAAA

当满足条件W118时,在收盘价和开盘价位置之间画柱状线,宽度为0.3,0不为0则画空心柱.,COLOR00CCCC

当满足条件W118时,在收盘价和开盘价位置之间画柱状线,宽度为0.0,0不为0则画空心柱.,COLOR00FFFF

当满足条件W118时,在最低价*0.99位置书写文字,COLOR00FFFF

如果MA60 =MA120,返回MA60,否则返回无效数,COLOR0000FF

如果MA120 =MA60,返回MA120,否则返回无效数,COLORFF9900

如果MA60 =MA120,返回MA120,否则返回无效数,COLOR00FFFF

如果MA120 =MA60,返回MA60,否则返回无效数,COLOR00FF00

VAR1赋值:(2*收盘价+最高价+最低价+开盘价)/5

A1赋值:(VAR1的3日指数移动平均+VAR1的6日指数移动平均+VAR1的12日指数移动平均+VAR1的24日指数移动平均)/4

A2赋值:A1的2日指数移动平均

A3赋值:A2的2日指数移动平均

A4赋值:A3的2日指数移动平均

A5赋值:A4的2日指数移动平均

A6赋值:A5的2日指数移动平均

A7赋值:A6的2日指数移动平均

如果A1 ,返回?,否则返回?

1日前的A1,A1,无效数),画白色

如果A1 ,返回?,否则返回?

1日前的A1,A1,无效数),画青色

如果A2 ,返回?,否则返回?

1日前的A2,A2,无效数),画白色

如果A2 ,返回?,否则返回?

1日前的A2,A2,无效数),画青色

如果A3 ,返回?,否则返回?

1日前的A3,A3,无效数),画白色

如果A3 ,返回?,否则返回?

1日前的A3,A3,无效数),画青色

如果A4 ,返回?,否则返回?

1日前的A4,A4,无效数),画白色

如果A4 ,返回?,否则返回?

1日前的A4,A4,无效数),画青色

如果A5 ,返回?,否则返回?

1日前的A5,A5,无效数),画白色

如果A5 ,返回?,否则返回?

1日前的A5,A5,无效数),画青色

如果A6 ,返回?,否则返回?

1日前的A6,A6,无效数),画白色

如果A6 ,返回?,否则返回?

1日前的A6,A6,无效数),画青色

如果A7 ,返回?,否则返回?

1日前的A7,A7,无效数),画白色

如果A7 ,返回?,否则返回?

1日前的A7,A7,无效数),画青色

十字星赋值:((最高价-最低价)/收盘价-开盘价的绝对值

=30ORC=开盘价)ANDC

A1ANDL

数字相近1赋值:A1*100的整数部分=A2*100的整数部分

数字相近2赋值:A2*100的整数部分=A3*100的整数部分

数字相近3赋值:A3*100的整数部分=A4*100的整数部分

数字相近4赋值:A4*100的整数部分=A5*100的整数部分

数字相近5赋值:A5*100的整数部分=A6*100的整数部分

数字相近6赋值:A6*100的整数部分=A7*100的整数部分

输出皈依:十字星AND数字相近1AND数字相近2AND数字相近3AND数字相近4AND数字相近5AND数字相近6,NODRAW

当满足条件皈依时,在最低价*0.96位置书写文字,画红色

相关推荐