(完整版)缠精准笔(源码)_第1页
(完整版)缠精准笔(源码)_第2页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、缠精准笔(通达信专用,其他软件可改用,该指标是市面上最好用的指标,极大方便了投资者对笔的划分,该源码必须放在主图中。)SHORT:=7;LONG:=19;MA1:MA(CLOSE,5);MA2:MA(CLOSE,10);MA3:MA(CLOSE,20);MA4:MA(CLOSE,60);T:=PERIOD;D:=IF(T=0,30,1FIF(T=1,25,5FIF(T=8,25,多分钟IF(T=2,20,15FIF(T=3,20,30FIF(T=4,20,60FIF(T=5,10,0IF(T=6,10,周IF(T=7,10,月IF(T=9,10,多日IF(T=10,10季,10年);RMA:=

2、EMA(CLOSE,SHORT),COLORLIGRAY;NMA:=EMA(CLOSE,LONG),COLORMAGENTA;RISK:=IF(NMA>RMA,NMA,DRAWNULL),COLORGREEN;DRAWLINE(L=LLV(L,BARSLAST(CROSS(NMA,RMA)+1)ANDL=LLV(L,D)ANDRMA<=NMA,L,H=HHV(H,BARSLAST(CROSS(RMA,NMA)+1)ANDH=HHV(H,D)ANDRMA>=NMA,H,0),COLOR0000FF,LINETHICK2;DRAWLINE(H=HHV(H,BARSLAST(CRO

3、SS(RMA,NMA)+1)ANDH=HHV(H,D)ANDRMA>=NMA,H,L=LLV(L,BARSLAST(CROSS(NMA,RMA)+1)ANDL=LLV(L,D)ANDRMA<=NMA,L,0),COLOR238E23,LINETHICK2;重心线:=(H+L+0+C*3)/6;DRAWGBKLAST(V>1,STRIP(RGB(60,10,0),RGB(10,50,0),0);NX:=(3*CLOSE+LOW+OPEN+HIGH)/6;牛线:=(20*NX+19*REF(NX,l)+18*REF(NX,2)+17*REF(NX,3)+16*REF(NX,4)+

4、15*REF(NX,5)+14*REF(NX,6)+13*REF(NX,7)+12*REF(NX,8)+11*REF(NX,9)+10*REF(NX,10)+9*REF(NX,11)+8*REF(NX,12)+7*REF(NX,13)+6*REF(NX,14)+5*REF(NX,15)+4*REF(NX,16)+3*REF(NX,17)+2*REF(NX,18)+REF(NX,20)/210;牛熊线:MA(牛线,6),C0L0RGREEN,LINETHICK2;牛熊线:二MA(牛线,6);,COLORLIGREEN,LINETHICK1;DRAWBAND(重心线,RGB(168,1&3

5、8),牛熊线,RGB(10,100,200);简底:二HREF(H,1)ANDREF(H,1)REF(H,2)ANDLREF(L,1)ANDREF(L,1)REF(L,2);简顶:=HREF(H,1)ANDREF(H,1)REF(H,2)ANDLREF(L,1)ANDREF(L,1)REF(L,2);包含1:=REF(H,1)=REF(H,2)ANDREF(L,1)=REF(L,2);包含2:=REF(H,1)=REF(H,2)ANDREF(L,1)=REF(L,2);包底1:=HREF(H,2)ANDREF(H,2)REF(H,3)ANDLREF(L,1)ANDREF(L,1)REF(L,3

6、);包底2:=HREF(H,1)ANDREF(H,1)REF(H,3)ANDLREF(L,2)ANDREF(L,2)REF(L,3);包顶1:=HREF(H,1)ANDREF(H,1)REF(H,3)ANDLREF(L,2)ANDREF(L,2)REF(L,3);包顶2:=HREF(H,2)ANDREF(H,2)REF(H,3)ANDLREF(L,1)ANDREF(L,1)REF(L,3);复底:=IF(包含1,包底1,IF(包含2,包底2,简底);复顶:=IF(包含1,包顶1,IF(包含2,包顶2,简顶);底分型:=IF(BARSLAST(CROSS(牛熊线,重心线)3,FILTER(BAC

7、KSET(FILTER(复底AND重心线牛熊线,3),2),1),0);顶分型:=IF(BARSLAST(CROSS(重心线,牛熊线)3,FILTER(BACKSET(FILTER(复顶AND重心线牛熊线,3),2),1),0);DRAWICON(底分型丄,1);DRAWICON(顶分型,H,2);JIL局部低点预选A:=BACKSET(LLV(L,5)REF(LLV(L,4),1),4);局部低点预选B:=BACKSET(局部低点预选A=0ANDREF(局部低点预选A,1)=1,2);局部低点预选C:=IF(局部低点预选B=1ANDREF(局部低点预选B,1)=0,-1,0);局部髙点预选A

8、:=BACKSET(HHV(H,5)REF(HHV(H,4),1),4);局部髙点预选B:=BACKSET(局部髙点预选A=0ANDREF(局部髙点预选A,1)=1,2);局部髙点预选C:=IF(局部髙点预选B=1ANDREF(局部髙点预选B,1)=0,1,0);缺口判断:=IF(LREF(H,1),1,IF(HREF(L,1),-1,0);距前髙天:=BARSLAST(局部髙点预选C=1);距前低天:=BARSLAST(局部低点预选C=-1);小值周期:=LOWRANGE(L);大值周期:二TOPRANGE(H);低保留AA:=IF(局部低点预选C=-1ANDREF(距前髙天,1)REF(距

9、前低天,1)ANDLLV(L,距前髙天+1)REF(LLV(L,距前髙天+1),1),-1,0);低保留AB:=IF(局部低点预选C=-1ANDREF(距前髙天,1)二REF(距前低天,1)AND(距前髙天=4ORLLV(缺口判断,距前髙天)=-1ORLLV(L,距前低天+2)REF(LLV(L,距前低天+1),1),-1,0);低保留S:=IF(低保留AA=-1OR低保留AB=-1)ANDLREF(H,距前髙天+1),-1,0);预判:=IF(距前低天4ANDHHV(缺口判断,距前低天)!=1)ORREF(低保留S,距前低天)=0,1,0);判断:=IF(局部髙点预选C=1ANDREF(距前

10、低天,1)二REF(距前髙天,1)AND预判=1AND大值周期REF(小值周期,距前低天+1)AND大值周期REF(小值周期,距前低天)AND大值周期REF(大值周期,距前髙天),1,0);髙保留A:=IF(局部髙点预选C=1ANDREF(距前低天,1)REF(距前髙天,1)ANDHHV(H,距前低天+1)REF(HHV(H,距前低天+1),1),1,0);髙保留B:=IF(局部髙点预选C=1ANDREF(距前低天,1)二REF(距前髙天,1)ANDREF低保留S,距前低天)=-1AND(距前低天=4ORHHV(缺口判断,距前低天)=1),1,0);髙保留:=IF(髙保留A=1OR髙保留B=1

11、OR判断=1)ANDHREF(L,距前低天+1),1,0);预判A:=IF(距前髙天4ANDHHV(缺口判断,距前髙天)!=1)ORREF(髙保留,距前髙天)=0,1,0);判断A:=IF(局部低点预选C=-1ANDREF(距前髙天,1)二REF(距前低天,1)AND预判A=1AND小值周期REF(大值周期,距前髙天+1)AND小值周期REF(大值周期,距前髙天)AND小值周期REF(小值周期,距前低天),-1,0);低保留A:=IF(局部低点预选C=-1ANDREF(距前髙天,1)REF(距前低天,1)ANDLLV(L,距前髙天+1)REF(LLV(L,距前髙天+1),1),-1,0);低保

12、留B:=IF(局部低点预选C=-1ANDREF(距前髙天,1)二REF(距前低天,1)AND(距前髙天=4ORLLV(缺口判断,距前髙天)=-1OR判断A=-1),-1,0);低保留:=IF(低保留A=-1OR低保留B=-1)ANDLREF(H,距前髙天+1),-1,0);距前髙天A:=BARSLAST(髙保留=1);距前低天A:=BARSLAST(低保留=-1);预判X:=IF(距前低天A4ANDHHV(缺口判断,距前低天A)!=1)ORREF(低保留,距前低天A)=0,1,0);判断X:=IF(局部髙点预选C=1ANDREF(距前低天A,1)=REF(距前髙天A,1)AND预判X=1AND

13、大值周期REF(小值周期,距前低天A+1)AND大值周期REF(小值周期,距前低天A)AND大值周期REF(大值周期,距前髙天A),1,0);髙保留XA:=IF(局部髙点预选C=1ANDREF(距前低天A,1)REF(距前髙天A,1)ANDHHV(H,距前低天A+1)REF(HHV(H,距前低天A+1),1),1,0);髙保留XB:=IF(局部髙点预选C=1ANDREF距前低天A,1)=REF(距前髙天A,1)ANDREF(低保留,距前低天A)=-1AND(距前低天A=4ORHHV(缺口判断,距前低天A)=1),1,0);髙保留X:=IF(髙保留XA=1OR髙保留XB=1OR判断X=1)AND

14、HREF(L,距前低天A+1),1,0);预判XA:=IF(距前髙天A4ANDHHV缺口判断,距前髙天A)!=1)ORREF(高保留XA,距前髙天A)=0,1,0);判断XA:=IF(局部低点预选C=-1ANDREF(距前髙天A,1)=REF(距前低天A,1)AND预判XA=1AND小值周期REF(大值周期,距前髙天A+1)AND小值周期REF(大值周期,距前髙天A)AND小值周期REF(小值周期,距前低天A),-1,0);低保留XA:=IF(局部低点预选C=-1ANDREF距前髙天A,1)REF(距前低天A,1)ANDLLV(L,距前髙天A+1)REF(LLV(L,距前髙天A+1),1),-

15、1,0);低保留XB:=IF(局部低点预选C=-1ANDREF距前髙天A,1)=REF(距前低天A,1)AND(距前髙天A=4ORLLV(缺口判断,距前髙天A)=-1OR判断XA=-1),-1,0);低保留X:=IF(低保留XA=-1OR低保留XB=-1)ANDLREF(H,距前髙天A+1),-1,0);距前髙天YA:=BARSLAST(髙保留X=1);距前低天YA:=BARSLAST(低保留X=-1);预判YX:=IF(距前低天YA4ANDHHV(缺口判断,距前低天YA)!=1)ORREF(低保留X,距前低天YA)=0,1,0);判断YX:=IF(局部髙点预选C=1ANDREF(距前低天YA

16、,1)=REF(距前髙天YA,1)AND预判YX=1AND大值周期REF(小值周期,距前低天YA+1)AND大值周期REF(小值周期,距前低天YA)AND大值周期REF(大值周期,距前髙天YA),1,0);髙保留YXA:=IF(局部髙点预选C=1ANDREF(距前低天YA,1)REF(距前髙天YA,1)ANDHHV(H,距前低天YA+1)REF(HHV(H,距前低天YA+1),1),1,O);髙保留YXB:=IF(局部髙点预选C=1ANDREF(距前低天YA,1)<=REF(距前髙天YA,1)ANDREF(低保留X,距前低天YA)=-1AND(距前低天YA>=4ORHHV(缺口判断

17、,距前低天YA)=1),1,0);髙保留YX:=IF(髙保留YXA=1OR髙保留YXB=1OR判断YX=1)ANDH>REF(L,距前低天YA+1),1,0);预判YXA:=IF(距前髙天YA<4ANDHHV(缺口判断,距前髙天YA)!=1)ORREF(髙保留YXA,距前髙天YA)=0,l,0);判断YXA:=IF(局部低点预选C=-1ANDREF(距前髙天YA,1)<=REF(距前低天YA,1)AND预判YXA=1AND小值周期REF(大值周期,距前髙天YA+1)AND小值周期REF(大值周期,距前髙天YA)AND小值周期REF(小值周期,距前低天YA),-1,0);低保留

18、YXA:=IF(局部低点预选C=-1ANDREF(距前髙天YA,1)>REF(距前低天YA,1)ANDLLV(L,距前髙天YA+1)REF(LLV(L,距前髙天YA+1),1),-1,O);低保留YXB:=IF(局部低点预选C=-1ANDREF(距前髙天YA,1)<=REF(距前低天YA,1)AND(距前髙天YA>=4ORLLV(缺口判断,距前髙天YA)=-1OR判断YXA=-1),-1,O);低保留YX:=IF(低保留YXA=-1OR低保留YXB=-1)ANDL<REF(H,距前髙天YA+1),-1,O);AAAD:=IF(髙保留YX=1AND低保留YX=-1ANDHREF(H,REF距前髙天YA,1)+2),1,IF(髙保留YX=1AND

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论