牛态已成选股源码

{牛态已成}
{条件选股} {其他类型}
N:=7;
A1:=(REF(H,N) = HHV(H,((2 * N) + 1)));
B1:=FILTER(A1,N);
C1:=BACKSET(B1,(N + 1));
D1:=FILTER(C1,N);
A2:=(REF(L,N) = LLV(L,((2 * N) + 1)));
B2:=FILTER(A2,N);
C2:=BACKSET(B2,(N + 1));
D2:=FILTER(C2,N);
E1:=((REF(LLV(L,(2 * N)),1) + REF(HHV(H,(2 * N)),1)) / 2);
E2:=((H + L) / 2);
H1:=(((D1 AND NOT((D2 AND (E1 >= E2)))) OR ISLASTBAR) OR (BARSCOUNT© = 1));
L1:=(D2 AND NOT((D1 AND (E1 < E2))));
H2:=(D1 AND NOT((D2 AND (E1 >=E2))));
X1:=(REF(BARSLAST(H1),1) + 1);
F1:=BACKSET((H1 AND (COUNT(L1,X1) > 0)),LLVBARS(IF(L1,L,10000),X1));
G1:=(F1 > REF(F1,1));
I1:=BACKSET(G1,2);
LD:=(I1 > REF(I1,1));
L2:=((LD OR ISLASTBAR) OR (BARSCOUNT© = 1));
X2:=(REF(BARSLAST(L2),1) + 1);
F2:=BACKSET((L2 AND (COUNT(H2,X2) > 0)),HHVBARS(IF(H2,H,0),X2));
G2:=(F2 > REF(F2,1));
2:=BACKSET(G2,2);
HD:=(I2 > REF(I2,1));
R1:=BACKSET(ISLASTBAR,(BARSLAST(HD) + 1));
S1:=(R1 > REF(R1,1));
R2:=BACKSET(S1,(REF(BARSLAST(HD),1) + 2));
S2:=(R2 > REF(R2,1));
R3:=BACKSET(S2,(REF(BARSLAST(HD),1) + 2));
S3:=(R3 > REF(R3,1));
R4:=BACKSET(S3,(REF(BARSLAST(HD),1) + 2));
S4:=(R4 > REF(R4,1));
HIGHN:=30;
LOWN:=30;
BB:=(REF(H,HIGHN) = HHV(H,((2 * HIGHN) + 1)));
QY:=BACKSET(BB,(HIGHN + 1));
CC:=(FILTER(QY,HIGHN) AND (H =HHV(H,(HIGHN + 1))));
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBU:=IF(DDD,REF(H,DDD),H);
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DINGBU1:=REF(DINGBU,(DDD + 1));
GDCS1:=CONST(DINGBUTS);
DINGBUTS1:=REF(DINGBUTS,(DDD + 1));
GDCS2:=CONST(DINGBUTS1);
DINGBU2:=REF(DINGBU1,(DDD + 1));
DD1:=DRAWLINE((CURRBARSCOUNT = GDCS2),H,(CURRBARSCOUNT = GDCS1),H,1);
BBP:=(REF(C,HIGHN) = HHV(C,((2 * HIGHN) + 1)));
QYP:=BACKSET(BBP,(HIGHN + 1));
CCP:=(FILTER(QYP,HIGHN) AND (C = HHV(C,(HIGHN + 1))));
DDDP:=BARSLAST(CCP);
GDTSP:=IF(CCP,CURRBARSCOUNT,0);
DINGBUP:=IF(DDDP,REF(C,DDDP),C);
DINGBUTSP:=IF(DDDP,REF(GDTSP,DDDP),GDTSP);
DINGBU1P:=REF(DINGBUP,(DDDP + 1));
GDCS1P:=CONST(DINGBUTSP);
DINGBUTS1P:=REF(DINGBUTSP,(DDDP + 1));
GDCS2P:=CONST(DINGBUTS1P);
DINGBU2P:=REF(DINGBU1P,(DDDP + 1));
DXYL:=DRAWLINE(S2,H,S1,H,1);
ZXYL:=DRAWLINE(S3,H,S2,H,1);
CXYL:=DRAWLINE(S4,H,S3,H,1);
DD:=DRAWLINE((CURRBARSCOUNT = GDCS2P),C,(CURRBARSCOUNT = GDCS1P),C,1);
F:=3;
XA1:=(REF(H,F) = HHV(H,((2 * F) + 1)));
XB1:=FILTER(XA1,F);
XC1:=BACKSET(XB1,(F + 1));
XD1:=FILTER(XC1,F);
XR11:=BACKSET(ISLASTBAR,(BARSLAST(XD1) + 1));
XS11:=(XR11 > REF(XR11,1));
SSX:=DRAWLINE(XD1,H,XS11,H,1);
FX:=8;
FXA1:=(REF(H,FX) = HHV(H,((2 * FX) + 1)));
FXB1:=FILTER(FXA1,FX);
FXC1:=BACKSET(FXB1,(FX + 1));
FXD1:=FILTER(FXC1,FX);
FXR11:=BACKSET(ISLASTBAR,(BARSLAST(FXD1) + 1));
FXS11:=(FXR11 > REF(FXR11,1));
ST:=DRAWLINE(FXD1,H,FXS11,H,1);
PPP:=(((REF(CROSS(H,DD),1) OR REF(CROSS(H,DD),2)) AND (C > DD)) AND (DD > REF(DD,1)));
PPP1:=(((REF(CROSS(H,DD1),1) OR REF(CROSS(H,DD1),2)) AND (C > DD1)) AND (DD1 > REF(DD1,1)));
PPP2:=(((REF(CROSS(H,SSX),1) OR REF(CROSS(H,SSX),2)) AND (C > SSX)) AND (SSX > REF(SSX,1)));
PPP3:=(((REF(CROSS(H,ST),1) OR REF(CROSS(H,ST),2)) AND (C > ST)) AND (ST > REF(ST,1)));
压力:=((((((PPP2 OR PPP3) OR PPP) OR PPP1) OR (((REF(CROSS(H,DXYL),1) OR REF(CROSS(H,DXYL),2)) AND (C > DXYL)) AND (DXYL > REF(DXYL,1)))) OR (((REF(CROSS(H,CXYL),1) OR REF(CROSS(H,CXYL),2)) AND (C > CXYL)) AND (CXYL > REF(CXYL,1)))) OR (((REF(CROSS(H,ZXYL),1) OR REF(CROSS(H,ZXYL),2)) AND (C > ZXYL)) AND (ZXYL > REF(ZXYL,1))));
牛态已成:(压力 AND ((C / O) > 1.03));