通达信主力异动价加牛线主图 开源不加密 附图
M5:=5;
M10:=10;
M22:=22;
M120:=120;
ZF:=(C-REF(C,1))/REF(C,1)*100;
EMA5:=EMA(C,M5),;
EMA10:=EMA(C,M10);
EMA22:=EMA(C,M22);
JFH:=EMA5>=EMA10 && EMA10>=EMA22;
FHW:=EMA22>=EMA10 && EMA10>=EMA5;
RSVK:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
XZQ:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
ZLL:=(EMA(XZQ,3)-50)*5,;
K1:=SMA(RSVK,10,1);
D1:=SMA(K1,5,1);
KK:=EMA(K1,2);
DD:=EMA(D1,2);
TFXXS:=KK+DD;
TGLXS:=(TFXXS-REF(TFXXS,1))*10;
TYCFX:=TFXXS+TGLXS;
XS2:=TGLXS>69;
XS3:=COUNT(ZLL>40,2)>0;
XS4:=XS2 AND XS3;
主力异动:=REF(XS4,1)=0 AND XS4 AND C>O;
主力异动1:=CROSS(主力异动,0.9);
STICKLINE(C,REF(C,BARSLAST(主力异动1)),REF(L,BARSLAST(主力异动1)),6,0),COLORC08080;
STICKLINE(C,REF(C,BARSLAST(主力异动)),REF(C,BARSLAST(主力异动)),4,1),COLORRED;
TT0:=BARSLAST(CURRBARSCOUNT=CONST(主力异动));
DRAWTEXT(TT0=0,REF(H,TT0)*1.003,VARCAT(VARCAT('牛线等突破 : ',VAR2STR(REF(H,TT0),2)),'元'))COLORWHITE;
EMA120:EMA(CLOSE,M120);
DRAWKLINE(H,O,L,C);
DRAWICON(CROSS(EMA5,EMA10),L,1);
DRAWICON(CROSS(EMA10,EMA5),H,2);
STICKLINE(JFH>REF(JFH,1),OPEN,CLOSE,2,0),COLOR4080FF;
STICKLINE(主力异动,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(ZF<-9.8,O,C,3,0),COLORGREEN;
STICKLINE(LOW >REF(HIGH,1),LOW,REF(HIGH,1),5,1),COLORRED;
STICKLINE(C<REF(C,1) AND REF(L,1)>H,REF(L,1),H,5,1),COLORMAGENTA;
DRAWTEXT(主力异动,EMA22,'主力异动'),COLORYELLOW,LINETHICK2;
VVAR1:=2*MA(LLV((C+L)/2,8)*1.1,13)-EMA((C+L)/2,3)-((C+L)/2)*0.1;
VVAR2:=IF((EMA((C+L)/2,3)-VVAR1)*5>0,POW((EMA((C+L)/2,3)-VVAR1)*5,2)/10,-1*POW((EMA((C+L)/2,3)-VVAR1)*5,2)/10);
VVAR3:=IF(VVAR2>0,VVAR2-0,0);
STICKLINE(VVAR3>0 AND REF(VVAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),OPEN,CLOSE,2,0),COLORFF00FF;
高不破价:=REF(C,BARSLAST(主力异动));
低不破价:=REF(L,BARSLAST(主力异动));
单阳不破:=CURRBARSCOUNT<100 AND BARSLAST(主力异动)<11 AND (LLV(L,BARSLAST(主力异动))>低不破价 OR LLV(L,BARSLAST(主力异动))=低不破价);
STICKLINE(单阳不破,低不破价-低不破价*0.0005,低不破价,4,0),COLORGREEN;
STICKLINE(单阳不破,高不破价,高不破价,4,0),COLORRED;
XGH:=CROSS(主力异动,0.9);
QF:=BACKSET(XGH=1,主力异动+1);
QFT:=BARSLAST(CROSS(QF=1,0.5));
NOTEXT:IF(QF=1,L,DRAWNULL),COLORGREEN;
STICKLINE(QFT>=0,REF(H,QFT),REF(H,QFT),4,-1),COLORYELLOW;
DRAWTEXT(QFT=0,H*1.03,VARCAT(VARCAT('异动价等突破：',VAR2STR(REF(H,QFT),2)),'元'))COLORYELLOW;
LLT:=LLVBARS(L,60);
LTLT:=BARSLAST(CURRBARSCOUNT=CONST(LLT)+1);
HGT:=FINDHIGHBARS(H,LLT+1,60,1);
牛线:DRAWLINE(CURRBARSCOUNT=CONST(HGT)+1,H,ISLASTBAR,REF(H,HGT),0),COLORFF80FF,LINETHICK2;
牛线1:DRAWLINE(CURRBARSCOUNT=CONST(HGT)+1,H,ISLASTBAR,REF(H,HGT),0),COLORYELLOW,LINETHICK4,POINTDOT;
TGT0:=BARSLAST(CURRBARSCOUNT=CONST(HGT)+1);
DRAWTEXT(TGT0=0,REF(H,TGT0)*1.003,VARCAT(VARCAT('牛等突破 : ',VAR2STR(REF(H,TGT0),2)),'元'))COLORWHITE;
未来函数检测结果如下：
该公式包含未来函数:BACKSET
该公式包含未来函数:DHIGH
解密、编写股票、期货策略请联系QQ或微信同号：88652583
相关股票指标公式
原理解析：
M5赋值:5
M10赋值:10
M22赋值:22
M120赋值:120
ZF赋值:(C-1日前的C)/1日前的C*100
EMA5赋值:C的M5日指数移动平均,
EMA10赋值:C的M10日指数移动平均
EMA22赋值:C的M22日指数移动平均
JFH赋值:EMA5>=EMA10 && EMA10>=EMA22
FHW赋值:EMA22>=EMA10 && EMA10>=EMA5
RSVK赋值:(收盘价-15日内最低价最低值)/(15日内最高价最高值-15日内最低价最低值)*100
XZQ赋值:(收盘价-8日内最低价最低值)/(8日内最高价最高值-8日内最低价最低值)*100
ZLL赋值:(XZQ的3日指数移动平均-50)*5,
RSVK的10日[1日权重]移动平均
K1的5日[1日权重]移动平均
KK赋值:K1的2日指数移动平均
DD赋值:D1的2日指数移动平均
TFXXS赋值:KK+DD
TGLXS赋值:(TFXXS-1日前的TFXXS)*10
TYCFX赋值:TFXXS+TGLXS
XS2赋值:TGLXS>69
XS3赋值:统计2日满足ZLL>40的天数>0
XS4赋值:XS2 AND XS3
主力异动赋值:1日前的XS4=0 AND XS4 AND C>O
主力异动1:=主力异动上穿0.9
STICKLINE(C,REF(C,上次主力异动1距今天数),REF(L,上次主力异动1距今天数),6,0),COLORC08080
STICKLINE(C,REF(C,上次主力异动距今天数),REF(C,上次主力异动距今天数),4,1),画红色
TT0赋值:上次 到最后交易的周期=CONST(主力异动距今天数)
DRAWTEXT(TT0=0,TT0日前的H*1.003,VARCAT(VARCAT('牛线等突破 : ',VAR2STR(TT0日前的H,2)),'元'))画白色
输出EMA120:收盘价的M120日指数移动平均
DRAWKLINE(H,O,L,C)
DRAWICON(EMA5上穿EMA10,L,1)
DRAWICON(EMA10上穿EMA5,H,2)
STICKLINE(JFH>1日前的JFH,开盘价,收盘价,2,0),COLOR4080FF
当满足条件主力异动时,在开盘价和收盘价之间画柱状线
当满足条件ZF<-9.8时,在O和C之间画柱状线
STICKLINE(最低价 >1日前的最高价,最低价,1日前的最高价,5,1),画红色
STICKLINE(C<1日前的C AND 1日前的L>H,1日前的L,H,5,1),画洋红色
当满足条件主力异动时,在EMA22和'主力异动'位置书写文字
VVAR1赋值:2*MA(LLV((C+L)/2,8)*1.1,13)-EMA((C+L)/2,3)-((C+L)/2)*0.1
VVAR2赋值:IF((EMA((C+L)/2,3)-VVAR1)*5>0,POW((EMA((C+L)/2,3)-VVAR1)*5,2)/10,-1*POW((EMA((C+L)/2,3)-VVAR1)*5,2)/10)
如果VVAR2>0返回VVAR2-0否则返回0
STICKLINE(VVAR3>0 AND 1日前的VVAR3=0 AND (C+L)/2>MA((C+L)/2,8),开盘价,收盘价,2,0),COLORFF00FF
高不破价赋值:REF(C,上次主力异动距今天数)
低不破价赋值:REF(L,上次主力异动距今天数)
单阳不破赋值: 到最后交易的周期<100 AND 上次主力异动距今天数<11 AND (LLV(L,上次主力异动距今天数)>低不破价 OR LLV(L,上次主力异动距今天数)=低不破价)
当满足条件单阳不破时,在低不破价-低不破价*0.0005和低不破价之间画柱状线
当满足条件单阳不破时,在高不破价和高不破价之间画柱状线
XGH赋值:主力异动上穿0.9
QF赋值:BACKSET(XGH=1,主力异动+1)
QFT:=上次QF=1上穿0.5距今天数
如果QF=1返回L否则返回DRAWNULL
STICKLINE(QFT>=0,QFT日前的H,QFT日前的H,4,-1),画黄色
DRAWTEXT(QFT=0,H*1.03,VARCAT(VARCAT('异动价等突破：',VAR2STR(QFT日前的H,2)),'元'))画黄色
LLT赋值:LLVBARS(L,60)
LTLT赋值:上次 到最后交易的周期=CONST(LLT距今天数+1)
HGT赋值:FIND最高价BARS(H,LLT+1,60,1)
输出牛线:DRAWLINE( 到最后交易的周期=CONST(HGT)+1,H,ISLASTBAR,HGT日前的H,0),COLORFF80FF, 线宽为2
牛线1:DRAWLINE( 到最后交易的周期=CONST(HGT)+1,H,ISLASTBAR,HGT日前的H,0),画黄色,LINETHICK4,POINTDOT
TGT0赋值:上次 到最后交易的周期=CONST(HGT距今天数+1)
DRAWTEXT(TGT0=0,TGT0日前的H*1.003,VARCAT(VARCAT('牛等突破 : ',VAR2STR(TGT0日前的H,2)),'元'))画白色
