打印本文
關閉窗口
相關標簽: 葉榮添買入三只股 、 收盤前15分鐘買入技巧 、 買入強烈推薦增持 、 強勢股回調買入法圖解 、 縮量的買入方法 、 一字漲停股票怎么買入 、 最新買入評級股票 、 股權登記日當天買入 、 機構買入最多的次新股 、
大智慧買入無憂指標源碼
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);
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.tumamayizhan.com',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
線:=(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) > 0);
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; {文章來至程序化交易網 cxh99.com}
背離:=(COUNT(恐慌,2) > 0) and (CLOSE < ref(CLOSE,1)) and (VAR1 > ref(VAR1,1));
DRAWICON(背離,HIGH*1.02,1),ColorGRAY;
DD:=FINANCE2( 1);
SS:=FINANCE2( 7);
FF:=FINANCE2(18);
GG:=FINANCE2(33);
HH:=DYNAINFO(39);
IF C>0 AND DISPSTATUS=2 THEN
DRAWTEXTREL(20,30,'總股本:'+NUMTOSTRN(DD,0)+'萬股' +' 流通A股:'+NUMTOSTRN(SS,0)+'萬股'+' 市盈率:'+NUMTOSTRN(HH,2)+'%'+' 每股收益:'+NUMTOSTRN(GG,3)),COLORbbffff;
MA1:=(LOW+HIGH+CLOSE)/3;
MA2:= MA(MA1,2);
箱頂:HHV(MA2,13),coloryelLOW,LINETHICK2;
箱底:LLV(MA2,13),colorwhite,LINETHICK2;
五日均價:MA(C,5),colorred,LINETHICK1;
十日均價:MA(C,10),colorwhite,LINETHICK1;
二十日均價:MA(C,20),colorgreen,LINETHICK1; {內容來至程序化交易網 CXH99.COM}
六十日均價:MA(C,60),coloree66ee,LINETHICK1;
{內容來至程序化交易網 CXH99.COM}
{別忘了將本網告訴您身邊的朋友，向朋友傳達有用資料，也是一種人情，你朋友會感謝你的。}