(完整版)纏精準(zhǔn)筆(源碼)

1、纏精準(zhǔn)筆（通達(dá)信專用，其他軟件可改用，該指標(biāo)是市面上最好用的指標(biāo)，極大方便了投資者對筆的劃分，該源碼必須放在主圖中。）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）；復(fù)底：=IF（包含1,包底1,IF（包含2,包底2,簡底）；復(fù)頂：=IF（包含1,包頂1,IF（包含2,包頂2,簡頂）；底分型：=IF（BARSLAST（CROSS（牛熊線，重心線）3,FILTER（BAC

7、KSET（FILTER（復(fù)底AND重心線牛熊線,3）,2）,1）,0）；頂分型：=IF（BARSLAST（CROSS（重心線，牛熊線）3,FILTER（BACKSET（FILTER（復(fù)頂AND重心線牛熊線,3）,2）,1）,0）；DRAWICON（底分型丄，1）；DRAWICON（頂分型,H,2）；JIL局部低點預(yù)選A：=BACKSET（LLV（L,5）REF（LLV（L,4）,1）,4）；局部低點預(yù)選B：=BACKSET（局部低點預(yù)選A=0ANDREF（局部低點預(yù)選A,1）=1,2）；局部低點預(yù)選C：=IF（局部低點預(yù)選B=1ANDREF（局部低點預(yù)選B,1）=0,-1,0）；局部髙點預(yù)選A

8、：=BACKSET（HHV（H,5）REF（HHV（H,4）,1）,4）；局部髙點預(yù)選B：=BACKSET（局部髙點預(yù)選A=0ANDREF（局部髙點預(yù)選A,1）=1,2）；局部髙點預(yù)選C：=IF（局部髙點預(yù)選B=1ANDREF（局部髙點預(yù)選B,1）=0,1,0）；缺口判斷：=IF（LREF（H,1）,1,IF（HREF（L,1）,-1,0）；距前髙天：=BARSLAST（局部髙點預(yù)選C=1）；距前低天：=BARSLAST（局部低點預(yù)選C=-1）；小值周期：=LOWRANGE（L）；大值周期:二TOPRANGE（H）；低保留AA：=IF（局部低點預(yù)選C=-1ANDREF（距前髙天，1）REF（距

9、前低天，1）ANDLLV（L，距前髙天+1）REF（LLV（L，距前髙天+1）,1）,-1,0）；低保留AB：=IF（局部低點預(yù)選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）；預(yù)判：=IF（距前低天4ANDHHV（缺口判斷，距前低天）！=1）ORREF（低保留S,距前低天）=0,1,0）；判斷：=IF（局部髙點預(yù)選C=1ANDREF（距前

10、低天，1）二REF（距前髙天，1）AND預(yù)判=1AND大值周期REF（小值周期，距前低天+1）AND大值周期REF（小值周期，距前低天）AND大值周期REF（大值周期，距前髙天），1,0）；髙保留A：=IF（局部髙點預(yù)選C=1ANDREF（距前低天,1）REF（距前髙天,1）ANDHHV（H，距前低天+1）REF（HHV（H,距前低天+1）,1）,1,0）；髙保留B：=IF（局部髙點預(yù)選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）；預(yù)判A：=IF（距前髙天4ANDHHV（缺口判斷，距前髙天）！=1）ORREF（髙保留，距前髙天）=0,1,0）；判斷A：=IF（局部低點預(yù)選C=-1ANDREF（距前髙天，1）二REF（距前低天，1）AND預(yù)判A=1AND小值周期REF（大值周期，距前髙天+1）AND小值周期REF（大值周期，距前髙天）AND小值周期REF（小值周期，距前低天），-1,0）；低保留A：=IF（局部低點預(yù)選C=-1ANDREF（距前髙天，1）REF（距前低天,1）ANDLLV（L,距前髙天+1）REF（LLV（L，距前髙天+1）,1）,-1,0）;低保

12、留B：=IF（局部低點預(yù)選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）；預(yù)判X：=IF（距前低天A4ANDHHV（缺口判斷，距前低天A）!=1）ORREF（低保留，距前低天A）=0,1,0）；判斷X：=IF（局部髙點預(yù)選C=1ANDREF（距前低天A,1）=REF（距前髙天A,1）AND預(yù)判X=1AND

13、大值周期REF（小值周期，距前低天A+1）AND大值周期REF（小值周期，距前低天A）AND大值周期REF（大值周期，距前髙天A）,1,0）；髙保留XA：=IF（局部髙點預(yù)選C=1ANDREF（距前低天A,1）REF（距前髙天A,1）ANDHHV（H,距前低天A+1）REF（HHV（H,距前低天A+1）,1）,1,0）；髙保留XB：=IF（局部髙點預(yù)選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）；預(yù)判XA：=IF（距前髙天A4ANDHHV缺口判斷，距前髙天A）!=1）ORREF（高保留XA,距前髙天A）=0,1,0）；判斷XA：=IF（局部低點預(yù)選C=-1ANDREF（距前髙天A,1）=REF（距前低天A,1）AND預(yù)判XA=1AND小值周期REF（大值周期，距前髙天A+1）AND小值周期REF（大值周期，距前髙天A）AND小值周期REF（小值周期，距前低天A）,-1,0）；低保留XA：=IF（局部低點預(yù)選C=-1ANDREF距前髙天A,1）REF（距前低天A,1）ANDLLV（L,距前髙天A+1）REF（LLV（L，距前髙天A+1）,1）,-

15、1,0）；低保留XB：=IF（局部低點預(yù)選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）；預(yù)判YX：=IF（距前低天YA4ANDHHV（缺口判斷，距前低天YA）!=1）ORREF（低保留X,距前低天YA）=0,1,0）；判斷YX：=IF（局部髙點預(yù)選C=1ANDREF（距前低天YA

16、,1）=REF（距前髙天YA,1）AND預(yù)判YX=1AND大值周期REF（小值周期，距前低天YA+1）AND大值周期REF（小值周期，距前低天YA）AND大值周期REF（大值周期，距前髙天YA）,1,0）；髙保留YXA：=IF（局部髙點預(yù)選C=1ANDREF（距前低天YA,1）REF（距前髙天YA,1）ANDHHV（H,距前低天YA+1）REF（HHV（H,距前低天YA+1）,1）,1,O）；髙保留YXB：=IF（局部髙點預(yù)選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）；預(yù)判YXA：=IF（距前髙天YA<4ANDHHV（缺口判斷，距前髙天YA）!=1）ORREF（髙保留YXA,距前髙天YA）=0,l,0）；判斷YXA：=IF（局部低點預(yù)選C=-1ANDREF（距前髙天YA,1）<=REF（距前低天YA,1）AND預(yù)判YXA=1AND小值周期REF（大值周期，距前髙天YA+1）AND小值周期REF（大值周期，距前髙天YA）AND小值周期REF（小值周期，距前低天YA）,-1,0）；低保留

18、YXA：=IF（局部低點預(yù)選C=-1ANDREF（距前髙天YA,1）>REF（距前低天YA,1）ANDLLV（L,距前髙天YA+1）REF（LLV（L，距前髙天YA+1）,1）,-1,O）；低保留YXB：=IF（局部低點預(yù)選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