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));
獲利盤(pán):=(WINNER(CLOSE))*(100);
獲利線(xiàn):=FORCAST(獲利盤(pán),7);
{www.gUPang.com 概念股網(wǎng)_最新股票指標(biāo)公式}
線(xiàn):=(FORCAST(VAR1A,7))*((DATE < 20070110));
滿(mǎn)倉(cāng):=((線(xiàn) > REF(線(xiàn),1)) AND (線(xiàn) < 25) AND (COUNT((線(xiàn) > REF(線(xiàn),1)),5) = 1) AND IF((N = 6),(獲利盤(pán) < 60),(獲利盤(pán) < 40)) AND (COUNT((獲利線(xiàn) > 20),20) > 0));
DRAWTEXT(滿(mǎn)倉(cāng),LOW*0.98,’滿(mǎn)倉(cāng)’),COLORRED;
輕倉(cāng):=IF((獲利盤(pán) >= 60) AND (線(xiàn) > REF(線(xiàn),1)) AND (REF(線(xiàn),1) < 20) AND (線(xiàn) < 40) AND (COUNT((線(xiàn) > REF(線(xiàn),1)),5) = 1) AND (REF(N,1) = 6),1,0);
DRAWTEXT(輕倉(cāng),LOW*0.98,’輕倉(cāng)’),COLORYELLOW;
出擊:=CROSS(線(xiàn),20) AND IF((COUNT(CROSS(K,D),3) = 1) AND (D < 40),1,(線(xiàn) > D) OR (K > D) AND (D < 60)) AND IF((N = 6),(獲利盤(pán) < 70),(獲利盤(pán) < 40)) AND (COUNT((獲利線(xiàn) > 20),20) > 0);
DRAWTEXT(出擊,LOW*0.98,’出擊’),COLORMAGENTA;
進(jìn)一:=CROSS(線(xiàn),D) AND (D > 30) AND (D > REF(D,1)) AND (D < 80);
進(jìn)二:=CROSS(線(xiàn),獲利線(xiàn)) AND (D > 30) AND (獲利線(xiàn) > 25) AND (D > REF(D,1));
低進(jìn):=IF(進(jìn)一 AND (D > 獲利線(xiàn)),進(jìn)二,進(jìn)一);
DRAWTEXT(低進(jìn),LOW*0.98,’低進(jìn)’),COLORRED;
DRAWTEXT(進(jìn)二,LOW*0.99,’高進(jìn)’),COLORGRAY;
狂喜:=(CROSS(VAR1,(-2)));
DRAWTEXT(狂喜,(LOW*0.98),’要漲停’),COLORYELLOW;
狂喜過(guò)望:=((VAR1 = 0));
恐慌:=(VAR1 < -94);
DRAWTEXT(恐慌,(LOW*0.98),’恐慌’),COLORGREEN;
極度恐慌:=(-40)*(VAR1 = (-100));
DRAWTEXT(極度恐慌,(LOW*0.95),’極度恐慌’),COLORWHITE;
半倉(cāng):=(CROSS(VAR1,(-94)) AND (COUNT(恐慌,5) > 0) AND (N = REF(N,1)) AND IF((N = 6),(獲利盤(pán) < 60),(獲利盤(pán) < 40)) AND (COUNT((獲利線(xiàn) > 20),20) > 0));
DRAWTEXT(半倉(cāng),LOW*0.95,’半倉(cāng)’),COLORWHITE;
加倉(cāng):=(CROSS(K,20) AND (COUNT(半倉(cāng),5) > 0));
DRAWTEXT(加倉(cāng),LOW*0.98,’加倉(cāng)’),COLORRED;
背離:=(COUNT(恐慌,2) > 0) AND (CLOSE < REF(CLOSE,1)) AND (VAR1 > REF(VAR1,1));
DRAWICON(背離,HIGH*1.02,1),COLORGRAY;