粘合度N:=360;
N1:=5;
N2:=14;
N3:=34;
N4:=55;
N5:=99;
N6:=144;
距离:=22;
N0:=3;
SHORT:=12;
LONG:=29;
MID:=9;
{机构增仓}
JA1:=(vol/C)/2;
A2YT:=SUM(IF(JA1 100 AND REF(CLOSE,1) REF(CLOSE,2),JA1,0),0);
A3Y:=SUM(IF(JA1 100 AND REF(CLOSE,1) REF(CLOSE,2),JA1,0),0);
A4Y:=SUM(IF(JA1 100 AND REF(CLOSE,1) REF(CLOSE,2),JA1,0),0);
A5Y:=SUM(IF(JA1 100 AND REF(CLOSE,1) REF(CLOSE,2),JA1,0),0);
A6Y:=A2YT+A3Y+A4Y+A5Y;
机买:=(A2YT/A6Y)*100;
机卖:=(A3Y/A6Y)*100;
主力差:=机买-机卖;
机构加仓:=(主力差 REF(主力差,1)+1.2) AND 机买
XXBB:= EMA((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*4,5)*100;
追拉升:=REF(XXBB,1) 50 AND XXBB-REF(XXBB,1)
机构追买:=机构加仓 AND 追拉升;
{何氏妖股}
月DIF:= macd.DIF#MONTH
月DEA:= MacD.DEA#MONTH
周DIF:= MACD.DIF#WEEK
周DEA:= MACD.DEA#WEEK
日DIF:= MACD.DIF
日DEA:= MACD.DEA
日金叉:=crOSS(日DIF,日DEA);
周金叉:=CROSS(周DIF,周DEA);
月金叉:=CROSS(月DIF,月DEA);
WIW:=((日DIF 日DEA AND 周DIF 周DEA AND 月金叉) OR (周DIF 周DEA AND 月DIF 月DEA AND 日金叉)OR (日DIF 日DEA AND 月DIF 月DEA AND 周金叉)OR (日金叉 AND 周金叉 AND 月金叉)OR (日DIF 日DEA AND 周DIF 周DEA AND 月DIF 月DEA));
月K:= kdj.K#MONTH
月D:= kdJ.D#MONTH
周K:= KDJ.K#WEEK
周D:= KDJ.D#WEEK
日K:= KD.K
日D:= KD.D
日金叉1:=IF(CROSS(日K,日D),15,0);
周金叉1:=IF(CROSS(周K,周D),25,0);
月金叉1:=IF(CROSS(月K,月D),35,0);
日周月:=IF(日金叉1=15 AND 周金叉1=25 AND 月金叉1=35,1,0);
日周月赚:=日周月=1;
日周:=IF(日金叉1=15 AND 周金叉1=25,2,0);
日周赚:=日周=2;
周月:=IF(周金叉1=25 OR 月金叉1=35,4,0);
日月:=IF(日金叉1=15 AND 月金叉1=35,5,0);
日月赚:=日月=4;
周月赚:=周月=3;
S1:=日K S2:=周K S3:=月K
WHW:=((S1 AND S2 AND 周金叉1 AND 日金叉1)OR(S1 AND S2 AND 周金叉1 AND 月金叉1)OR(S1 AND S3 AND 周金叉1 AND 月金叉1)OR(日金叉1 AND 周金叉1 AND 月金叉1)OR(S2 AND S3 AND 周金叉1 AND 月金叉1)OR(日金叉1 AND 周金叉1 AND S2 AND S3)OR(S1 AND S3 AND S2)OR(日月赚 AND 日周月赚 AND 周月赚)OR(日月赚 AND 日周赚 AND 日周月赚)OR(日周赚 AND 日周月赚 AND 周月赚)OR(日月赚 AND 日周赚 AND 周月赚));
涨停1:=(H/REF(C,1) 1.099 AND C=H) OR (H/L 1.11 AND C/L 1.06);
Y1Y:=COUNT(WIW,18) 0 OR COUNT(WIW,48) 0 OR WIW;
Y2Y:=COUNT(WHW,18) 0 OR COUNT(WHW,48) 0 OR WHW;
Y3Y:=COUNT(机构加仓 OR 机构追买,18) 0 OR COUNT(机构加仓 OR 机构追买,48) 0 OR (机构加仓 OR 机构追买);
A1T:=Abs(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,20))/EMA(CLOSE,20));
A2T:=DMA(((2.15*CLOSE+LOW+HIGH)/4),A1T);
金线王:=C =EMA(A2T,144);
JXWS:= C 金线王#MIN30 OR C 金线王#MIN60 OR C
天神捉妖:Y1Y AND Y2Y AND Y3Y AND JXWS;