R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
K:=EMA(R,3);
D:=EMA(K,3);
陡峭度:=IF((BARSCOUNT(CLOSE) 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
N:=IF((陡峭度 0.35),6,65);
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))))*((DATE 20070110));
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE 20070110));
获利盘:=(WINNER(CLOSE))*(100);
获利线:=FORCAST(获利盘,7);
线:=(FORCAST(VAR1A,7))*((DATE 20070110));
满仓:=((线 REF(线,1)) AND (线 25) AND (COUNT((线 REF(线,1)),5) = 1) AND IF((N = 6),(获利盘 60),(获利盘 40)) AND (COUNT((获利线 20),20) 0));
DRAWTEXT(满仓,LOW*0.98,'满仓'),COLORRED;
轻仓:=IF((获利盘 = 60) AND (线 REF(线,1)) AND (REF(线,1) 20) AND (线 40) AND (COUNT((线 REF(线,1)),5) = 1) AND (REF(N,1) = 6),1,0);
DRAWTEXT(轻仓,LOW*0.98,'轻仓'),COLORYELLOW;
出击:=CROSS(线,20) AND IF((COUNT(CROSS(K,D),3) = 1) AND (D 40),1,(线 D) OR (K D) AND (D 60)) AND IF((N = 6),(获利盘 70),(获利盘 40)) AND (COUNT((获利线 20),20)
DRAWTEXT(出击,LOW*0.98,'出击'),COLORMAGENTA;
进一:=CROSS(线,D) AND (D 30) AND (D REF(D,1)) AND (D 80);
进二:=CROSS(线,获利线) AND (D 30) AND (获利线 25) AND (D REF(D,1));
低进:=IF(进一 AND (D 获利线),进二,进一);
DRAWTEXT(低进,LOW*0.98,'低进'),COLORRED;
DRAWTEXT(进二,LOW*0.99,'高进'),COLORGRAY;
狂喜:=(CROSS(VAR1,(-2)));
DRAWTEXT(狂喜,(LOW*0.98),'要涨停'),COLORYELLOW;
狂喜过望:=((VAR1 = 0));
恐慌:=(VAR1 -94);
DRAWTEXT(恐慌,(LOW*0.98),'恐慌'),COLORGREEN;
极度恐慌:=(-40)*(VAR1 = (-100));
DRAWTEXT(极度恐慌,(LOW*0.95),'极度恐慌'),COLORWHITE;
半仓:=(CROSS(VAR1,(-94)) AND (COUNT(恐慌,5) 0) AND (N = REF(N,1)) AND IF((N = 6),(获利盘 60),(获利盘 40)) AND (COUNT((获利线 20),20) 0));
DRAWTEXT(半仓,LOW*0.95,'半仓'),COLORWHITE;
加仓:=(CROSS(K,20) AND (COUNT(半仓,5) 0));
DRAWTEXT(加仓,LOW*0.98,'加仓'),COLORRED;
背离:=(COUNT(恐慌,2) 0) AND (CLOSE REF(CLOSE,1)) AND (VAR1 REF(VAR1,1));
DRAWICON(背离,HIGH*1.02,1),COLORGRAY;
