顾比倒数线主图源码
<K线一定要满足K1>K2>K3形态才能适用>
P:=21;Q1:=IF(L=LLV(L,P),L,DRAWNULL);Q2:=CONST(BARSLAST(Q1!=DRAWNULL));Q3:=CONST(IF(Q2=0,H,REF(H,Q2)));Q4:=CONST(REF(BARSLAST(H>Q3),Q2 1) Q2 1);Q5:=CONST(IF(Q4=0,H,REF(H,Q4)));Q6:=CONST(REF(BARSLAST(H>Q5),Q4 1) Q4 1);进场:IF(CURRBARSCOUNT<=Q2 21,CONST(IF(Q6=0,H,REF(H,Q6))),DRAWNULL),COLORYELLOW;IF(CURRBARSCOUNT<=Q2 1,IF(L=LLV(L,P),L,DRAWNULL),DRAWNULL),CIRCLEDOT,COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=INTPART((Q2 21)*0.618),进场,'进场线'),COLORYELLOW;Y1:=IF(H=HHV(H,P),H,DRAWNULL);Y2:=CONST(BARSLAST(Y1!=DRAWNULL));Y3:=CONST(IF(Y2=0,L,REF(L,Y2)));Y4:=CONST(REF(BARSLAST(L<Y3),Y2 1) Y2 1);Y5:=CONST(IF(Y4=0,L,REF(L,Y4)));Y6:=CONST(REF(BARSLAST(L<Y5),Y4 1) Y4 1);止损:IF(CURRBARSCOUNT<=Y2 21,CONST(IF(Y6=0,L,REF(L,Y6))),DRAWNULL),COLORRED;IF(CURRBARSCOUNT<=Y2 1,IF(H=HHV(H,P),H,DRAWNULL),DRAWNULL),CIRCLEDOT,COLORBLUE;DRAWTEXT(CURRBARSCOUNT=INTPART((Y2 21)*0.618),止损,'止损线'),COLORRED;止盈:IF(CURRBARSCOUNT<=Y2 21,CONST(IF(Y4=0,L,REF(L,Y4))),DRAWNULL),COLORCB21BE;DRAWTEXT(CURRBARSCOUNT=INTPART((Y2 21)*0.618),止盈,'止盈线'),COLORCB21BE;
顾比倒数选股
T1:=BARSLAST(L=LLV(L,10));
H1:=CONST(REF(H,T1));
T2:=REF(BARSLAST(H>H1),T1 1) T1 1;
H2:=CONST(REF(H,T2));
T3:=REF(BARSLAST(H>H2),T2 1) T2 1;
H3:=CONST(REF(H,T3));
A1:=CROSS(H,H3);{最高价上穿顾比倒数线}
A2:=C>MA(C,60);{60日均线}
A3:=C/REF(C,1)>1.03 AND (C-L)/(H-L)>0.6;{涨幅大于3%}
HC:=HHV(H,10);{10日最高价}
LC:=LLV(L,10);{10日最低价}
A4:=HC/LC<1.15;{10日高低价幅度小于15%}
XG:IF(ISLASTBAR,A1 AND A2 AND A3 AND REF(A4,1),0);{当天符合条件有信号};