纏精準筆(源碼)

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(