量化擒龙战法 布林带战法精确操作点

 
AS:=(C*3+O+H+L)/6;
XJ:=(AS+0.618*REF(AS,1)+0.382*REF(AS,2)+0.236*REF(AS,3)+0.146*REF(AS,4))/2.382;
HLX:=EMA(HHV(XJ,3),15);
LLX:=EMA(LLV(XJ,3),15);
CH:=CROSS(XJ,HLX);
CL:=CROSS(LLX,XJ);
CHH:=BARSLAST(CH);
CLL:=BARSLAST(CL);
YF1:=(CHH<CLL OR CH) AND NOT(CL);
YF2:=(CHH>CLL OR CL) AND NOT(CH);
TF:=IF(YF1,LLX,HLX);
TFB:=(HLX+LLX)/2;
XJK:=SMA(EMA(XJ,3),3,1);
ZWSH:=(HHV(XJ,2)+HHV(XJ,3)+HHV(XJ,4)+HHV(XJ,5))/4;
SH:=EMA(ZWSH,21);
ZWSL:=(LLV(XJ,2)+LLV(XJ,3)+LLV(XJ,4)+LLV(XJ,5))/4;
SL:=EMA(ZWSL,21);
SCH:=CROSS(XJ,SH);
SCL:=CROSS(SL,XJ);
SHH:=BARSLAST(SCH);
SLL:=BARSLAST(SCL);
SF1:=(SHH<SLL OR SCH) AND NOT(SCL);
SF2:=(SHH>SLL OR SCL) AND NOT(SCH);
TFS:=IF(SF1,SL,SH);
TFBS:=(SL+SH)/2;

KX1:=(CLOSE>=OPEN) AND XJ>=TFS;
KX2:=(CLOSE<OPEN) AND XJ>=TFS;
KX3:=(CLOSE>=OPEN) AND XJ<TFS;
KX4:=(CLOSE<OPEN) AND XJ<TFS;
KX5:=((XJ>=TFS AND XJ<TF) OR (XJ<TFS AND XJ>=TF)) AND CLOSE>=OPEN;
KX6:=((XJ>=TFS AND XJ<TF) OR (XJ<TFS AND XJ>=TF)) AND CLOSE<OPEN;

FILLRGN1(XJ>TFS,TFB,TFS),COLOR400040;
FILLRGN1(XJ<TFS,TFB,TFS),COLOR000080;
FILLRGN1(XJ>TF,TFB,TF),COLOR600000;
FILLRGN1(XJ<TF,TFB,TF),COLOR2020FF;



HH1:=IF(H<REF(H,1) AND REF(H,1)<REF(H,2),REF(H,2),0); 
LL1:=IF(L>REF(L,1) AND REF(L,1)>REF(L,2),REF(L,2),0); 
HH2:=VALUEWHEN(HH1>0,HH1); 
LL2:=VALUEWHEN(LL1>0,LL1); 
K1:=IF(CLOSE>HH2,-3,IF(CLOSE<LL2,1,0)); 
K2:=VALUEWHEN(K1<>0,K1); 
G:=IF(K2=1,HH2,LL2); 
G1:=VALUEWHEN(ISLASTBAR,G); 
W1:=K2; 
W2:=OPEN-CLOSE; 

YZ1:=(HIGH+LOW)/2; 
YZ2:=MAX(MAX(HIGH-LOW,ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW)); 
YZ3:=YZ1+MA(YZ2,10)*2; 
YZ4:=YZ1-MA(YZ2,10)*2; 
YZ5:=(CLOSE+LLV(CLOSE,2)); 
YZ6:=(HIGH+LLV(HIGH,2)); 
YZ7:=(LOW+LLV(LOW,2)); 
YZ8:=REF(YZ3,BARSLAST(YZ3<=REF(YZ3,1))); 
YZ9:=LLV(YZ3,15); 
YZ10:=IF(YZ9=REF(YZ9,1) AND YZ8< REF(YZ8,1),YZ8,IF(YZ8=YZ9,YZ8,YZ9)); 
YZ11:=BARSLAST(CROSS(0.5,YZ3=YZ10))+1; 
YZ12:=CROSS(COUNT(CROSS(CLOSE,YZ10) OR CROSS(CLOSE,REF(YZ10,2)) AND YZ3>YZ10,YZ11),0.5); 
YZ13:=BARSLAST(YZ12); 
YZ14:=BARSLAST(CROSS(HHV(YZ4,YZ13+1),CLOSE)); 
YZ15:=CROSS(YZ14,YZ13); 
YZ16:=CROSS(YZ13,YZ14); 
临界点:IF(YZ14>YZ13,HHV(YZ4,BARSLAST(YZ15)+1),LLV(YZ3,BARSLAST(YZ16)+1)),COLOR00FF00,LINETHICK2; 
主力资金:IF(YZ14>YZ13,临界点,NULL),COLORFF00FF,LINETHICK2; 
DRAWTEXT(CROSS(YZ14,YZ13),临界点,'上'); 
DRAWTEXT(CROSS(YZ13,YZ14),临界点,'下'); 
DRAWTEXT(CROSS(K2,0),G,'卖'),RGB(0,128,255),FONTSIZE20,ALIGN2,VALIGN2; 
DRAWTEXT(CROSS(0,K2),G,'买'),COLORMAGENTA,FONTSIZE20,ALIGN2,VALIGN0;

DRAWCOLORKLINE(YZ14>YZ13&&ISUP,COLORRED,1);
DRAWCOLORKLINE(YZ14>YZ13&&ISUP=0,COLORRED,0);
DRAWCOLORKLINE(YZ14<YZ13&&ISUP,COLORGREEN,1);
DRAWCOLORKLINE(YZ14<YZ13&&ISUP=0,COLORGREEN,0);