剑书主图公式 源码

源码

V5:=MA(VOL,5);
 V10:=MA(VOL,10);
 V20:=MA(VOL,20);
 LDAY1:=BARSLAST(CROSS(V5,V10));
 LDAY2:=BARSLAST(CROSS(V5,V20));
 LDAY3:=BARSLAST(CROSS(V10,V20));
 LTJ1:=(LDAY1>LDAY2 OR LDAY1=LDAY2) {AND COUNT(CROSS(V5,V20),LDAY1)=1} AND LDAY2=0 AND V10  LTJ2:=(C>O AND REF(C,1)REF(O,2) AND C>REF(C,2));
 LTJ:=LTJ1 AND LTJ2;
 LTJ0:=LTJ1 AND V10>REF(V10,1);
 MA5:MA(C,5),COLORWHITE;
 MA10:MA(C,10),COLORCYAN;
 MA20:MA(C,20),COLORRED;
 MA40:MA(C,40),COLORBLUE;
 MA60:MA(C,60),COLORGREEN;
 PDAY1 := BARSLAST(CROSS(MA5,MA60));{5日均线上穿60日均线}
PDAY2 := BARSLAST(CROSS(MA10,MA60));{10日均线上穿60日均线，至此形成鸭颈部}
PDAY3 := BARSLAST(REF(HIGH=HHV(HIGH,PDAY2),1));{形成头部，要下跌}
PDAY4 := BARSLAST(CROSS(MA10,MA5){ OR (REF(MA10,1) PDAY5 := BARSLAST(CROSS(MA5,MA10){ OR (REF(MA5,1)=REF(MA10,1) AND MA5>MA10)});{回落不久，5日均线和10日均线形成金叉，形成部}
A1:= PDAY1>PDAY2 AND PDAY2>PDAY3 AND PDAY3>PDAY4 AND PDAY4>PDAY5 AND PDAY5<5;
 A2:= COUNT(CROSS(MA10,MA5),PDAY2)=1;
 A3:=MA5>MA60 AND MA10>MA60;

 {JT:=CROSS(MA20,MA60) AND C>O AND REF(C,1)REF(O,2);
 CSFR:=CROSS(C,MA20) AND CROSS(C,MA40) AND CROSS(C,MA60);
 STICKLINE(JT,H,L,1,0),COLORYELLOW;
 STICKLINE(JT,O,C,8,0),COLORYELLOW;
 STICKLINE(CSFR,H,L,1,0),COLORWHITE;
 STICKLINE(CSFR,O,C,8,0),COLORWHITE;
 DRAWTEXT(CSFR,H,'出水芙蓉'),COLORYELLOW;
 DRAWTEXT(JT ,L, '价托'),COLORRED;}
 CSFR:=CROSS(C,MA20) AND CROSS(C,MA40) AND CROSS(C,MA60);
 YDAY1:=BARSLAST(CROSS(MA5,MA10));
 YDAY2:=BARSLAST(CROSS(MA5,MA20));
 YDAY3:=BARSLAST(CROSS(MA10,MA20));
 YJZZ:=(YDAY1=YDAY2  AND YDAY2=YDAY3 OR (YDAY1-YDAY2=1 OR YDAY2-YDAY3=1)) AND REF(MA5,2)MA10 AND MA10>MA20 ;
 YJZZ1:=YDAY1=YDAY2  AND YDAY2=YDAY3  AND MA5>MA10 AND MA10>MA20 AND YDAY1=1;
 YJT:=YDAY1>=YDAY2 AND YDAY2=0 AND MA10  DAY1:=BARSLAST(CROSS(MA20,MA40));
 DAY2:=BARSLAST(CROSS(MA20,MA60));
 DAY3:=BARSLAST(CROSS(MA40,MA60));
 TJ0:=DAY1>=DAY2 AND DAY3<5;
短顶:MA(REF(HHV(H,40),1),1);
头顶:MA(REF(HHV(H,60),1),1);
年顶:MA(REF(HHV(H,0),1),1),LINETHICK2,POINTDOT,COLORWHITE;
 JZZ:=DAY1=DAY2  AND DAY2=DAY3 AND REF(MA20,1)MA40 AND MA40>MA60;
 TJ1:=DAY1>=DAY2 AND COUNT(CROSS(MA20,MA60),DAY1)=1{AND (DAY1-DAY2)<10};
 TJ2:=C>O AND CROSS(C,头顶);
TJ21:=C>O AND CROSS(C,短顶);
 {TJ22:=C>O