缠精准笔(源码)

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,日IF(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(NMARMA,NMA,DRAWNULL),COLORGREEN;DRAWLINE(L=LLV(L,BARSLAST(CROSS(NMA,RMA)+1) AND L=LLV(L,D) AND RMA=NMA,H,0),COLOR0000FF,LINETHICK2;DRAWLINE(H=HHV(H,BARSLAST(CROSS(RMA,NMA)+1) AND H=HHV(H,D) AND RMA=NMA,H,L=LLV(L,BARSLAST(CROSS(

3、NMA,RMA)+1) AND L=LLV(L,D) AND RMA1,STRIP(RGB(60,10,0),RGB(10,50,0),0);NX:=(3*CLOSE+LOW+OPEN+HIGH)/6; 牛线:=(20*NX+19*REF(NX,1)+18*REF(NX,2)+17*REF(NX,3)+16*REF(NX,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

4、*REF(NX,15)+4*REF(NX,16)+3*REF(NX,17) +2*REF(NX,18)+REF(NX,20)/210;牛熊线:MA(牛线,6),COLORGREEN,LINETHICK2;牛熊线:=MA(牛线,6);,COLORLIGREEN,LINETHICK1;DRAWBAND(重心线,RGB(168,18,38),牛熊线,RGB(10,100,200);简底:=HREF(H,1) AND REF(H,1)REF(L,1) AND REF(L,1)REF(L,2);简顶:=HREF(H,2) AND LREF(L,2);包含1:=REF(H,1)=REF(H,2) AND

5、REF(L,1)=REF(L,2);包含2:=REF(H,1)=REF(L,2);包底1:=HREF(H,2) AND REF(H,2)REF(L,1) AND REF(L,1)REF(H,1) AND REF(H,1)REF(L,2) AND REF(L,2)REF(L,3);包顶1:=HREF(H,3) AND LREF(L,3);包顶2:=HREF(H,3) AND LREF(L,3);复底:=IF(包含1,包底1,IF(包含2,包底2,简底);复顶:=IF(包含1,包顶1,IF(包含2,包顶2,简顶);底分型:=IF(BARSLAST(CROSS(牛熊线,重心线)3,FILTER(BA

6、CKSET(FILTER(复底 AND 重心线3,FILTER(BACKSET(FILTER(复顶 AND 重心线牛熊线,3),2),1),0);DRAWICON(底分型,L,1);DRAWICON(顶分型,H,2);*局部低点预选A:=BACKSET(LLV(L,5)REF(HHV(H,4),1),4);局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2);局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);缺口判断:=IF(LREF(H,1),1,IF(HREF(距前低天,1) AND LLV(L,

7、距前高天+1)REF(LLV(L,距前高天+1),1),-1,0);低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)REF(LLV(L,距前低天+1),1),-1,0);低保留S:=IF(低保留AA=-1 OR 低保留AB=-1) AND LREF(H,距前高天+1),-1,0);预判:=IF(距前低天4 AND HHV(缺口判断,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0);判断:=IF(局部高点预选C=1 AND REF(距前低天,1)REF(小值周期,距前低天+

8、1) AND 大值周期REF(小值周期,距前低天) AND 大值周期REF(大值周期,距前高天),1,0);高保留A:=IF(局部高点预选C=1 AND REF(距前低天,1)REF(距前高天,1) AND HHV(H,距前低天+1)REF(HHV(H,距前低天+1),1),1,0);高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)=4 OR HHV(缺口判断,距前低天)=1),1,0);高保留:=IF(高保留A=1 OR 高保留B=1 OR 判断=1) AND HREF(L,距前低天+1),1,0);预判A:=IF(距前高天4 AND HHV(缺口判断,距前高天)!=1)

9、 OR REF(高保留,距前高天)=0,1,0);判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)REF(大值周期,距前高天+1) AND 小值周期REF(大值周期,距前高天) AND 小值周期REF(小值周期,距前低天),-1,0);低保留A:=IF(局部低点预选C=-1 AND REF(距前高天,1)REF(距前低天,1) AND LLV(L,距前高天+1)REF(LLV(L,距前高天+1),1),-1,0);低保留B:=IF(局部低点预选C=-1 AND REF(距前高天,1)=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0);低保留:=

10、IF(低保留A=-1 OR 低保留B=-1) AND LREF(H,距前高天+1),-1,0);距前高天A:=BARSLAST(高保留=1);距前低天A:=BARSLAST(低保留=-1);预判X:=IF(距前低天A4 AND HHV(缺口判断,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0);判断X:=IF(局部高点预选C=1 AND REF(距前低天A,1)REF(小值周期,距前低天A+1) AND 大值周期REF(小值周期,距前低天A) AND 大值周期REF(大值周期,距前高天A),1,0);高保留XA:=IF(局部高点预选C=1 AND REF(距前低天A,1)

11、REF(距前高天A,1) AND HHV(H,距前低天A+1)REF(HHV(H,距前低天A+1),1),1,0);高保留XB:=IF(局部高点预选C=1 AND REF(距前低天A,1)=4 OR HHV(缺口判断,距前低天A)=1),1,0);高保留X:=IF(高保留XA=1 OR 高保留XB=1 OR 判断X=1) AND HREF(L,距前低天A+1),1,0);预判XA:=IF(距前高天A4 AND HHV(缺口判断,距前高天A)!=1) OR REF(高保留XA,距前高天A)=0,1,0);判断XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)REF(大值周期,距

12、前高天A+1) AND 小值周期REF(大值周期,距前高天A) AND 小值周期REF(小值周期,距前低天A),-1,0);低保留XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)REF(距前低天A,1) AND LLV(L,距前高天A+1)REF(LLV(L,距前高天A+1),1),-1,0);低保留XB:=IF(局部低点预选C=-1 AND REF(距前高天A,1)=4 OR LLV(缺口判断,距前高天A)=-1 OR 判断XA=-1),-1,0);低保留X:=IF(低保留XA=-1 OR 低保留XB=-1) AND LREF(H,距前高天A+1),-1,0);距前高天Y

13、A:=BARSLAST(高保留X=1);距前低天YA:=BARSLAST(低保留X=-1);预判YX:=IF(距前低天YA4 AND HHV(缺口判断,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0);判断YX:=IF(局部高点预选C=1 AND REF(距前低天YA,1)REF(小值周期,距前低天YA+1) AND 大值周期REF(小值周期,距前低天YA) AND 大值周期REF(大值周期,距前高天YA),1,0);高保留YXA:=IF(局部高点预选C=1 AND REF(距前低天YA,1)REF(距前高天YA,1) AND HHV(H,距前低天YA+1)REF(

14、HHV(H,距前低天YA+1),1),1,0);高保留YXB:=IF(局部高点预选C=1 AND REF(距前低天YA,1)=4 OR HHV(缺口判断,距前低天YA)=1),1,0);高保留YX:=IF(高保留YXA=1 OR 高保留YXB=1 OR 判断YX=1) AND HREF(L,距前低天YA+1),1,0);预判YXA:=IF(距前高天YA4 AND HHV(缺口判断,距前高天YA)!=1) OR REF(高保留YXA,距前高天YA)=0,1,0);判断YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)REF(大值周期,距前高天YA+1) AND 小值周期RE

15、F(大值周期,距前高天YA) AND 小值周期REF(小值周期,距前低天YA),-1,0);低保留YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)REF(距前低天YA,1) AND LLV(L,距前高天YA+1)REF(LLV(L,距前高天YA+1),1),-1,0);低保留YXB:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)=4 OR LLV(缺口判断,距前高天YA)=-1 OR 判断YXA=-1),-1,0);低保留YX:=IF(低保留YXA=-1 OR 低保留YXB=-1) AND LREF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND LREF(L,REF(距前低天YA,1)+2),-1,0);极点保留:=IF(