缠论中枢源代码.docx

本文格式为Word版，下载可任意编辑缠论中枢源代码 MA(CLOSE,5); //福安赚差价的人，设计624544691 //上下点确定是前6天和后6天的最高点和最低点// BD1:=LOW=LOW AND REFX(LOW,2)>=LOW AND REFX(LOW,3)>=LOW AND REFX(LOW,4)>=LOW AND REFX(LOW,5)>=LOW ;//笔高，粗选// BG1:= HIGH>=HHV(HIGH,6) AND REFX(HIGH,1)=3) OR (REFX(BD1,1)=1 AND COUNT(BD1,BARPOS)=0 AND COUNT(BG1,BARPOS)=0) ; BDQ1:=(BDQ AND COUNT(BDQ,BARSLAST(BG1))=1) OR ( BARSSINCE(BDQ)=0); BD2:=(BD1 AND BARSLAST(BG1)>3 AND LOW=3) OR (REFX(BG1,1)=1 AND COUNT(BD1,BARPOS)=0 AND COUNT(BG1,BARPOS)=0); //DRAWTEXT(BGQ ,HIGH,'前')COL OR YELLOW;//测试低点// BGQ1:=(BGQ AND COUNT(BGQ,BARSLAST(BD1))=1) OR ( BARSSINCE(BGQ)=0); //DRAWTEXT(BGQ1 ,HIGH*1.03,'第一前')COL OR CYAN;//测试低点// //新笔高// BG2:=(BG1 AND BARSLAST(BD1)>3 AND HIGH>=HHV(HIGH,BARSLAST(BGQ1)) AND COUNT(BD1,BARSLAST(BGQ1))=0 ) OR (BG1 AND HIGH>=HHV(HIGH,BARSLAST(BGQ1)) AND COUNT(BD1,BARPOS)=0 ); BGDW:=BACKSET(BG2,BARSLAST(BGQ1)); //DRAWTEXT((BGDW AND REFX(BGDW,1)=0),HIGH*1.03,'其次高');// BG3:=(BGDW AND REFX(BGDW,1)=0) OR (BG1 AND BARSLAST(BD1)=HHV(HIGH,BARSLAST(BGQ130)) AND COUNT(BD1,BARSLAST(BGQ130))=0) OR (BG1 AND HIGH>=HHV(HIGH,BARSLAST(BGQ130)) AND COUNT(BD1,BARPOS)=0 ); BGDW30:=BACKSET(BG230,BARSLAST(BGQ130)); BG4:=BGDW30 AND REFX(BGDW30,1)=0; BG5:=BG3 OR (BG4 AND BARSLAST(BD1)=REF(HIGH,BARSLAST(BG5)) ) ;//最低价大于前笔高// BD7:= BD5 AND REFX(HIGH,1)>=REF(HIGH,BARSLAST(BG5)) ;//笔低后面一根最高价大于前高// //DRAWTEXT(BD7,HIGH,'错误低点');// BD:=BD5 AND BD6=0 AND BD7=0; //去掉十足错误高点// BG6:=BG5 AND HIGH=REF(HIGH,JQG+2)) OR (REF(LOW,JQG+1)>=REF(LOW,JQG+2) AND REF(HIGH,JQG+1)=REF(HIGH,JQD+2)) OR (REF(LOW,JQD+1)>=REF(LOW,JQD+2) AND REF(HIGH,JQD+1)=REFX(HIGH,2)) OR (REFX(LOW,1)>=REFX(LOW,2) AND REFX(HIGH,JQG+1)=REF(HIGH,2)) OR (REF(LOW,1)>=REF(LOW,2) AND REF(HIGH,JQG+1)=REFX(HIGH,2)) OR (REFX(LOW,1)>=REFX(LOW,2) AND REFX(HIGH,JQG+1)=REF(HIGH,2)) OR (REF(LOW,1)>=REF(LOW,2) AND REF(HIGH,JQG+1)IFELSE(JKDQDZCA,DQDZC,REF(HIGH,1)) AND REF(HIGH,JQG)>IFELSE(BKDQDYC,DQDYC,REFX(HIGH,1)) AND LOW=REF(HIGH,JQG+1) AND REF(LOW,JQG)=REF(HIGH,JQG-1) AND REF(LOW,JQG)IFELSE(LOW=REFX(HIGH,1) AND LOW=REF(HIGH,1),REFX(HIGH,2),REFX(HIGH,1))) OR (BARSSINCE(BD)=0 AND COUNT(BG ,BARPOS)=0) OR (BARSSINCE(BD)=0 AND COUNT(BG ,BARPOS)=1 AND BARSLAST(BG)>=4 AND LOWREF(CLOSE,JQD+2) AND HIGH>IFELSE(DDBBHH,DZD,REF(HIGH,JQD+1)) AND REF(LOW,JQD)IFELSE(REF(LOW,JQD)REF(HIGH,JQD+1),REF(HIGH,JQD+2),REF(HIGH,JQD+1)) AND HIGH>IFELSE(REF(LOW,JQD)REF(HIGH,JQD-1),REF(HIGH,JQD-2),REF(HIGH,JQD-1)) AND REF(LOW,JQD)=REFX(HIGH,1) AND LOW=REF(HIGH,1) AND LOW=4 AND HIGH>REF(LOW,BARSLAST(BD)) AND HIGH>REF(HIGH,BARSLAST(BD)-1) AND REF(LOW,1)>REF(LOW,BARSLAST(BD)) AND REFX(LOW,1)>REF(LOW,BARSLAST(BD))) ;//当前顶分型,结果一句是包含缺口处境 AND HIGH>REF(HIGH,JQD)// //DRAWTEXT(BDB,LOW*0.98,'低点')COL OR RED;//测试低点// //DRAWTEXT(BGB,HIGH,'高点')COL OR GREEN;//测试高点// //HIGH*1.05;// //合并同向上下点// JQD1:=BARSLAST(BDB);//距前低// JQG1:=BARSLAST(BGB);//距前高// //笔高前一根// BBGQ:=(REFX(BGB,1)=1 AND BARSLAST(BDB)>=3 ) OR (REFX(BGB,1)=1 AND COUNT(BDB,BARPOS)=0 AND COUNT(BGB,BARPOS)=0); //DRAWTEXT(BBGQ ,HIGH,'前')COL OR YELLOW;//测试低点// BBGQ1:=(BBGQ AND COUNT(BBGQ,BARSLAST(BDB))=1) OR ( BARSSINCE(BBGQ)=0); //DRAWTEXT(BBGQ1 ,HIGH*1.05,'第一前')COL OR CYAN;//测试低点// //新笔高////合并高点，只合并到距离前低5根K线片面// GG2:=(BGB AND BARSLAST(BDB)>3 AND HIGH>=HHV(HIGH,BARSLAST(BBGQ1)) AND COUNT(BDB,BARSLAST(BBGQ1))=0); GG:=BACKSET(GG2,BARSLAST(BBGQ1)); //DRAWTEXT(GG,HIGH,'1')COL OR YELLOW;//测试低点// //DRAWTEXT((GG AND REFX(GG,1)=0),HIGH*1.03,'二高');// XZBG1:=BGB AND BARSLAST(BDB)=3) OR (REFX(BDB,1)=1 AND COUNT(BDB,BARPOS)=0 AND COUNT(BGB,BARPOS)=0); BBDQ1:=(BBDQ AND COUNT(BBDQ,BARSLAST(BGB))=1) OR ( BARSSINCE(BBDQ)=0); //DRAWTEXT(BBDQ ,LOW*0.98,'前')COL OR YELLOW;//测试低点// //DRAWTEXT(BBDQ1,LOW*0.96,'第一前')COL OR CYAN;//测试低点// //新BD2// DD2:=(BDB AND BARSLAST(BGB)>3 AND LOW<=LLV(LOW,BARSLAST(BBDQ1)) AND COUNT(BGB,BARSLAST(BBDQ1))=0); DD:=BACKSET(DD2,BARSLAST(BBDQ1)); //DRAWTEXT(DD,HIGH,'1'); //DRAWTEXT((DD AND REFX(DD,1)=0),LOW*0.94,'其次低点');// XZBD1:=BDB AND BARSLAST(BGB)<4;//留存近低// ZDD:=((DD AND REFX(DD,1)=0) OR XZBD1) OR (DD AND ISLASTBAR) (BARSSINCE(BDB)=0 AND COUNT(BGB,BARPOS)=0);//获取特殊低序列// //精选点// //DRAWTEXT(ZGD,HIGH*1.03,'ZGD')COL OR WHITE DRAWABOVE; //DRAWTEXT(ZDD,LOW*0.97,'ZDD')COL OR YELLOW DRAWABOVE; //DRAWTEXT(BDB,LOW,'P低点')COL OR CYAN DRAWABOVE; //DRAWTEXT(BGB,HIGH,'P高点')COL OR RED DRAWABOVE; OR OR — 7 —。