////////////多项选股合一///////////////////
INPUT:K1(84,0,9999);
J0:=(H+L+C)/3;
J1:=IF(CLOSE>J0,VOL,0);
J2:=IF(CLOSE<J0,VOL,0);
RV:=(j0-LLV(j0,34))/(HHV(j0,34)-LLV(j0,34))*100;
tj:=sum(J1-J2,5);
c1:=EMA(tj,5)-EMA(tj,24);
c2:=WMA(c1,7);
GZ:=CROSS(c1,c2);
KZ:=CROSS(RV,15);
////////////////////////////////////////////////////
VARIABLE:K2=IF(DATACOUNT>K1,DATACOUNT-K1,1),qj[4]=0,I=0;
HH:=HIGH;
LL:=LOW;
qj[4]:=99999;
FOR I=K2 TO DATACOUNT Do Begin
qj[1]:=IF(HH[I]>qj[2],I,qj[1]);
qj[2]:=IF(HH[I]>qj[2],HH[I],qj[2]);
qj[3]:=IF(LL[I]<QJ[4],I,QJ[3]);
qj[4]:=IF(LL[I]<QJ[4],LL[I],QJ[4]);
End;
K2:=MIN(qj[1],qj[3]);
LL[K2]:=-1.618;
qj[1]:=1;
qj[2]:=1;
qj[3]:=ROUND(SQRT(qj[2])*29.5306+K2);
WHILE qj[3]<=DATACOUNT Do Begin
qj[2]:=qj[2]+qj[1];
qj[1]:=qj[2]-qj[1];
LL[qj[3]]:=-0.618;
HH[qj[3]]:=ROUND(SQRT(qj[2])*29.5306+K2);
qj[3]:=HH[qj[3]];
End;
///////////{上面是公共源码}//////////////////////////////////
{分别选股}
底共振:GZ and KZ;
出现“B”的地方:(LL<0 && MOD(COUNT(LL<0,0),2)=0 && ABS(LDAY-15)<=3) OR (LL<0 && MOD(COUNT(LL<0,0),2)=2 && MOD(LDAY,28)<=3);
出现黄色柱:LL<0 && MOD(COUNT(LL<0,0),2)=0;
出现红色柱:LL<0 && MOD(COUNT(LL<0,0),2)=1;
出现红色的小圆点:LL<-1;{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
