接力黄金柱
N:=5;
BC:=BARSCOUNT(CLOSE);
V5T:=IF(BC =5,V*BC/SUM(V,BC),V/REF(MA(V,5),1));
V60T:=IF(BC =60,V5T,V/REF(MA(V,60),1));
DING:=MAX(O,C);{www.9m8.cn} ?￥}
DI:=MIN(O,C);{www.9m8.cn} }
SDING:=CURRBARSCOUNT =N AND DING=HHV(DING,N) AND
DING REFX(HHV(DING,N-1),N-1);
XDING:=CURRBARSCOUNT =N
AND H=HHV(H,N) AND
H REFX(HHV(H,N-1),N-1);
SDI:=CURRBARSCOUNT =N
AND DI=LLV(DI,N) AND
DI REFX(LLV(DI,N-1),N-1);
XDI:=CURRBARSCOUNT =N
AND L=LLV(L,N) AND
L REFX(LLV(L,N-1),N-1);
YANG:=(DI =REF(DING,1)) OR (C O AND NOT(DING =REF(DI,1))) OR (C REF(C,1) AND C=O) OR (C=REF(C,1) AND C=O AND REF(DING,1)=C);{www.9m8.cn}????}
YIN:=NOT(YANG);
YANGSHENG:=YANG AND C =REF(DING,BARSLAST(YIN)) AND (V REF(V,BARSLAST(YIN)) OR (BETWEEN(V,REF(V,BARSLAST(YIN))*0.95,REF(V,BARSLAST(YIN))*1.05))),NODRAW;
YINSHENG:=(YIN AND C =REF(DI,BARSLAST(YANG)) AND V REF(V,BARSLAST(YANG)));
LIANGJIABI:=V/C,NODRAW;
MALIANGJIABI:=MA(LIANGJIABI,3),NODRAW;
LIANGJIABIXISHU:=1.5;
BLZ:=V REF(V,1)*1.5 AND V60T
PLZ:=BETWEEN(V,REF(V,1)*0.95,REF(V,1)*1.05) OR BETWEEN(V,REFX(V,1)*0.95,REFX(V,1)*1.05) OR
(BETWEEN(V,REF(V,2)*0.95,REF(V,2)*1.05) AND V REF(V,1)*1.2) OR
(BETWEEN(V,REF(V,3)*0.95,REF(V,3)*1.05) AND V REF(MA(V,2),1)*1.2 AND V REF(HHV(V,2),1)) OR
(BETWEEN(V,REF(V,4)*0.95,REF(V,4)*1.05) AND V REF(MA(V,3),1)*1.2 AND V REF(HHV(V,3),1)) OR
(BETWEEN(V,REF(V,5)*0.95,REF(V,5)*1.05) AND V REF(MA(V,4),1)*1.2 AND V REF(HHV(V,4),1)) OR
(BETWEEN(V,REF(V,6)*0.95,REF(V,6)*1.05) AND V REF(MA(V,5),1)*1.2 AND V REF(HHV(V,5),1)) OR
(BETWEEN(V,REF(V,7)*0.95,REF(V,7)*1.05) AND V REF(MA(V,6),1)*1.2 AND V REF(HHV(V,6),1)) OR
(BETWEEN(V,REF(V,8)*0.95,REF(V,8)*1.05) AND V REF(MA(V,7),1)*1.2 AND V REF(HHV(V,7),1)) OR
(BETWEEN(V,REF(V,9)*0.95,REF(V,9)*1.05) AND V REF(MA(V,8),1)*1.2 AND V REF(HHV(V,8),1)) OR
(BETWEEN(V,REF(V,10)*0.95,REF(V,10)*1.05) AND V REF(MA(V,9),1)*1.2 AND V REF(HHV(V,9),1)) OR
(BETWEEN(V,REF(V,11)*0.95,REF(V,11)*1.05) AND V REF(MA(V,10),1)*1.2 AND V REF(HHV(V,10),1)) OR
(BETWEEN(V,REF(V,12)*0.95,REF(V,12)*1.05) AND V REF(MA(V,11),1)*1.2 AND V REF(HHV(V,11),1));
GLZ:=V=HHV(V,3) AND V=REFX(HHV(V,3),2);
TLZ:=(V*1.1 REFX(V,1) AND REFX(V,1)*1.1 REFX(V,2)) OR (V REF(V,1)*1.1 AND V*1.1 REFX(V,1)) OR (V REF(V,1)*1.1 AND REF(V,1) REF(V,2)*1.1);
JSLS:=C =REFX(C,1) AND REFX(C,1) =REFX(C,2) AND LIANGJIABI REFX(LIANGJIABI,1) AND REFX(LIANGJIABI,1) REFX(LIANGJIABI,2);
JZ:=BLZ OR GLZ OR PLZ OR TLZ,NODRAW;
JJZ:=CURRBARSCOUNT =4 AND YANG AND (YANGSHENG) AND JZ AND REFX(LLV(DI,3),3) =DI AND (REFX(MA(LIANGJIABI,3),3) =LIANGJIABIXISHU*LIANGJIABI OR REFX(JSLS,1)) AND REFX(C,3) =DING,NODRAW;
HJZ1:=JJZ AND REFX(MA(C,3),3) =DING AND REFX(MA(LIANGJIABI,3),3) =LIANGJIABI AND REFX(YANG,3);
HJZ2:=YANG AND YANGSHENG AND JZ AND REFX(DI,1) =DI AND REFX(JJZ,2) AND REFX(C,2) DING AND REFX(LIANGJIABI,1) LIANGJIABI;
HJZ3:=YANG AND YANGSHENG AND JZ AND REFX(LLV(DI,2),2) =DI AND REFX(JJZ,3) AND REFX(C,3) DING AND REFX(MA(LIANGJIABI,2),2) LIANGJIABI;
HJZ4:=JJZ AND REFX(LLV(DI,3),3) =DING AND REFX(MA(LIANGJIABI,3),3) =LIANGJIABI AND REFX(YANG,3) AND (REFX(YANG,1) OR REFX(YANG,2));
WP:=JJZ OR HJZ1 OR HJZ4 OR HJZ2 OR HJZ3;
JJZTJ:=JJZ AND REF(NOT(WP),1);
HJZTJ:=(HJZ1 OR HJZ2 OR HJZ3) AND REF(NOT(WP),1);
A:=HJZTJ OR JJZTJ;
TJ1:=VOL=HHV(VOL,10) AND VOL 1.7*REF(VOL,1) AND C =REF(C,1) AND C =O AND VOL 1.2*REF(MA(V,60),1);
LJL:=FILTER(TJ1,3);
TJ3:=IF(BARSLAST(LJL)=1 AND CLOSE REF(LOW,3),1,0);
ST:=TJ3=1;
CL:=FILTER(ST,3);
HJX:=REF(L,BARSLAST(LJL));
QHJX:=REF(HJX,1);
AT:=BARSLAST(HJZTJ);
QAT:=REF(AT,1);
JTJ:=COUNT(C REF(HJX,1),QAT)=0;
ZF:=(C-REF(C,1))*100/REF(C,1);
ZFTJ:=ZF 5 AND COUNT(ZF 5,QAT+1)=0;
XH:=A AND JTJ AND ZFTJ;
XH;
大家注意上面函数了。你懂的。
=================其实公式简化一下，并且简化后源码可以做选股公式源码：============
BC:=BARSCOUNT(CLOSE);
V5T:=IF(BC =5,V*BC/SUM(V,BC),V/REF(MA(V,5),1));
V60T:=IF(BC =60,V5T,V/REF(MA(V,60),1));
DING:=MAX(O,C);
DI:=MIN(O,C);
YANG:=(DI =REF(DING,1)) OR (C O AND NOT(DING =REF(DI,1))) OR (C REF(C,1) AND C=O) OR (C=REF(C,1) AND C=O AND REF(DING,1)=C);
YIN:=NOT(YANG);
YANGSHENG:=YANG AND C =REF(DING,BARSLAST(YIN)) AND (V REF(V,BARSLAST(YIN)) OR (BETWEEN(V,REF(V,BARSLAST(YIN))*0.95,REF(V,BARSLAST(YIN))*1.05)));
LIANGJIABI:=V/C;
LIANGJIABIXISHU:=1.5;
BLZ:=V REF(V,1)*1.5 AND V60T
PLZ:=BETWEEN(V,REF(V,1)*0.95,REF(V,1)*1.05) OR BETWEEN(V,REFX(V,1)*0.95,REFX(V,1)*1.05) OR (BETWEEN(V,REF(V,2)*0.95,REF(V,2)*1.05) AND V REF(V,1)*1.2) OR (BETWEEN(V,REF(V,3)*0.95,REF(V,3)*1.05) AND V REF(MA(V,2),1)*1.2 AND V REF(HHV(V,2),1)) OR (BETWEEN(V,REF(V,4)*0.95,REF(V,4)*1.05) AND V REF(MA(V,3),1)*1.2 AND V REF(HHV(V,3),1)) OR (BETWEEN(V,REF(V,5)*0.95,REF(V,5)*1.05) AND V REF(MA(V,4),1)*1.2 AND V REF(HHV(V,4),1)) OR (BETWEEN(V,REF(V,6)*0.95,REF(V,6)*1.05) AND V REF(MA(V,5),1)*1.2 AND V REF(HHV(V,5),1)) OR (BETWEEN(V,REF(V,7)*0.95,REF(V,7)*1.05) AND V REF(MA(V,6),1)*1.2 AND V REF(HHV(V,6),1)) OR (BETWEEN(V,REF(V,8)*0.95,REF(V,8)*1.05) AND V REF(MA(V,7),1)*1.2 AND V REF(HHV(V,7),1)) OR (BETWEEN(V,REF(V,9)*0.95,REF(V,9)*1.05) AND V REF(MA(V,8),1)*1.2 AND V REF(HHV(V,8),1)) OR (BETWEEN(V,REF(V,10)*0.95,REF(V,10)*1.05) AND V REF(MA(V,9),1)*1.2 AND V REF(HHV(V,9),1)) OR (BETWEEN(V,REF(V,11)*0.95,REF(V,11)*1.05) AND V REF(MA(V,10),1)*1.2 AND V REF(HHV(V,10),1)) OR (BETWEEN(V,REF(V,12)*0.95,REF(V,12)*1.05) AND V REF(MA(V,11),1)*1.2 AND V REF(HHV(V,11),1));
GLZ:=V=HHV(V,3) AND V=REFX(HHV(V,3),2);
TLZ:=(V*1.1 REFX(V,1) AND REFX(V,1)*1.1 REFX(V,2)) OR (V REF(V,1)*1.1 AND V*1.1 REFX(V,1)) OR (V REF(V,1)*1.1 AND REF(V,1) REF(V,2)*1.1);
JSLS:=C =REFX(C,1) AND REFX(C,1) =REFX(C,2) AND LIANGJIABI REFX(LIANGJIABI,1) AND REFX(LIANGJIABI,1) REFX(LIANGJIABI,2);
JZ:=BLZ OR GLZ OR PLZ OR TLZ;
JJZ:=CURRBARSCOUNT =4 AND YANG AND (YANGSHENG) AND JZ AND REFX(LLV(DI,3),3) =DI AND (REFX(MA(LIANGJIABI,3),3) =LIANGJIABIXISHU*LIANGJIABI OR REFX(JSLS,1)) AND REFX(C,3) =DING;
HJZ1:=JJZ AND REFX(MA(C,3),3) =DING AND REFX(MA(LIANGJIABI,3),3) =LIANGJIABI AND REFX(YANG,3);
HJZ2:=YANG AND YANGSHENG AND JZ AND REFX(DI,1) =DI AND REFX(JJZ,2) AND REFX(C,2) DING AND REFX(LIANGJIABI,1) LIANGJIABI;
HJZ3:=YANG AND YANGSHENG AND JZ AND REFX(LLV(DI,2),2) =DI AND REFX(JJZ,3) AND REFX(C,3) DING AND REFX(MA(LIANGJIABI,2),2) LIANGJIABI;
HJZ4:=JJZ AND REFX(LLV(DI,3),3) =DING AND REFX(MA(LIANGJIABI,3),3) =LIANGJIABI AND REFX(YANG,3) AND (REFX(YANG,1) OR REFX(YANG,2));
WP:=JJZ OR HJZ1 OR HJZ4 OR HJZ2 OR HJZ3;
JJZTJ:=JJZ AND REF(NOT(WP),1);
HJZTJ:=(HJZ1 OR HJZ2 OR HJZ3) AND REF(NOT(WP),1);
A:=HJZTJ OR JJZTJ;
TJ1:=VOL=HHV(VOL,10) AND VOL 1.7*REF(VOL,1) AND C =REF(C,1) AND C =O AND VOL 1.2*REF(MA(V,60),1);
LJL:=FILTER(TJ1,3);
HJX:=REF(L,BARSLAST(LJL));
AT:=BARSLAST(HJZTJ);
QAT:=REF(AT,1);
JTJ:=COUNT(C REF(HJX,1),QAT)=0;
ZF:=(C-REF(C,1))*100/REF(C,1);
ZFTJ:=ZF 5 AND COUNT(ZF 5,QAT+1)=0;
XH:=A AND JTJ AND ZFTJ;
XH;
