大智慧KDJ+ MACD+均線結(jié)合解盤(pán)源碼[大智慧公式]
相關(guān)標(biāo)簽: macd 與均線 、 macd與均線的最佳設(shè)置 、 macd與均線的綜合運(yùn)用 、 macd+kd+20均線ea 、 macd套用均線八法 、 均線 趨勢(shì) 60分macd 、 均線上macd紅縮柱 、 均線發(fā)散macd拐點(diǎn)向上 、 macd均線的漲跌速度 、
大智慧KDJ+ MACD+均線結(jié)合解盤(pán)源碼
Var31:=SARTURN( 10,2 ,20 );
Var32:=ref(HIGH,1)*1.1;
Var33:=HIGH*1.1;
Var34:=(Var33*VOL+Var32*(CAPITAL-VOL))/CAPITAL;
Var35:=ref(LOW,1)*0.9;
Var36:=LOW*0.9;
Var37:=(Var36*VOL+Var35*(CAPITAL-VOL))/CAPITAL;
Var38:=EMA(Var37,20);
Var39:=EMA(Var34,20);
VarA:=Var39-1.5;
VarB:=IF(CLOSE<=Var38,VarA,Var39);
別樣:= VarB;
紅:= VarA;
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.weiqiv.net.cn',CURRENTTIME>180000 and (CXH=3 OR CXH=8));
DRAWTEXTREL(10 ,10 ,' ');
DRAWFLAGTEXT(別樣=紅,C ,'股價(jià)嚴(yán)重超跌,階段底部可擇機(jī)買(mǎi)入');
股價(jià)趨勢(shì):= 3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)
-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
買(mǎi)入:=IF(股價(jià)趨勢(shì)<=10,30,0);
DRAWFLAGTEXT(買(mǎi)入,C,'底部區(qū)域' );
Var8:=LLV(LOW,26);
Var6:=HHV(HIGH,34);
Var7:=EMA((CLOSE-Var8)/(Var6-Var8)*4,4)*25;
派發(fā):=IF((Var7>90),-30,0);
DRAWFLAGTEXT(派發(fā),C,'派發(fā)區(qū)域');
b1:=AMOUNT/VOL/500;
b2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
d3:=SUM(AMOUNT,13)/b1/500;
e4:=DMA(b2,VOL/d3);
A1:=(CLOSE-e4)/e4*500 ;
A2:=(CLOSE-e4)/e4*1000 ;
吸籌:=(CLOSE-MA(CLOSE,60))/MA(CLOSE,60)*500;
DRAWFLAGTEXT((ref(a1,1)<-80 and a1>ref(a1,1)or ref(吸籌,1)<-80 and 吸籌>ref(吸籌,1)), C,'歷史大底全倉(cāng)買(mǎi)入');
Var3o:=ref(CLOSE,1);
Var4o:=SMA(MAX(CLOSE-Var3o,0),6,1)/SMA(ABS(CLOSE-Var3o),6,1)*100;
賣(mài)出:=CROSS(80,Var4o);
DRAWFLAGTEXT(賣(mài)出, C,'高度危險(xiǎn),清倉(cāng)');
生命指數(shù):EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),Color00FFFF;
DRAWFLAGTEXT(IF(生命指數(shù)>92,生命指數(shù),0),生命指數(shù) ,'危險(xiǎn),清倉(cāng)');
DRAWFLAGTEXT((VOL/CAPITAL)>0.075 ,C,
'換手過(guò)大,小心主力出逃,短期頭部');
K:="KD.K"(17,4,4);
D:="KD.D"(17,4,4);
K:="KD.K"(17,4,4);
D:="KD.D"(17,4,4);
DRAWFLAGTEXT(K>80 AND CROSS(D,K)=0,C,'KD指標(biāo)提示該股已經(jīng)處于超買(mǎi)狀態(tài),如果KD指標(biāo)死叉應(yīng)及時(shí)賣(mài)出。');
DRAWFLAGTEXT(K<20 AND CROSS(K,D)=0,C,'KD指標(biāo)提示該股已經(jīng)處于超賣(mài)狀態(tài),如果KD指標(biāo)金叉應(yīng)及時(shí)買(mǎi)入。');
DRAWFLAGTEXT(CROSS(K,D) AND LLV(K,3)<20,C,'KD低位金叉,建議買(mǎi)入。');
DRAWFLAGTEXT(CROSS(D,K) AND HHV(K,3)>80,C,'KD高位死叉,建議賣(mài)出。');
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA :=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
DRAWFLAGTEXT(cross("kdj.k"(9,3,3),"kdj.d"(9,3,3)) and"kdj.k"(9,3,3)<=20,C,'KDJ在20以下金叉,可關(guān)注!');
DRAWFLAGTEXT(cross("kdj.d"(9,3,3),"kdj.k"(9,3,3)) and"kdj.k"(9,3,3)>=80,C,'KDJ在80以上死叉,注意風(fēng)險(xiǎn)!');
DRAWFLAGTEXT("MAcd.MAcd"(12,26,9)>ref("MAcd.MAcd"(12,26,9),1) and "MAcd.MAcd"(12,26,9)>0,C,'MACD的紅柱增長(zhǎng)。');
DRAWFLAGTEXT("MAcd.MAcd"(12,26,9)<ref("MAcd.MAcd"(12,26,9),1) and "MAcd.MAcd"(12,26,9)>0,C,'MACD的紅柱縮短。');
DRAWFLAGTEXT("MAcd.MAcd"(12,26,9)<ref("MAcd.MAcd"(12,26,9),1) and "MAcd.MAcd"(12,26,9)<0,C,'MACD的綠柱增長(zhǎng)。');
DRAWFLAGTEXT("MAcd.MAcd"(12,26,9)>ref("MAcd.MAcd"(12,26,9),1) and "MAcd.MAcd"(12,26,9)<0,C,'MACD的綠柱縮短。');
DRAWFLAGTEXT(cross("MAcd.diff"(12,26,9),"MAcd.dea"(12,26,9)) and "MAcd.MAcd"(12,26,9)<=0,C,'MACD的DIFF與DEA在0軸或0軸下金叉。');
DRAWFLAGTEXT(cross(MA(c,10),MA(c,20)) and MA(c,5)>MA(c,10) and MA(c,10)>MA(c,20),C,'短期均線今日多頭排列。');
DRAWFLAGTEXT(cross(MA(c,20),MA(c,10)) and MA(c,5)<MA(c,10) and MA(c,10)<MA(c,20),C,'短期均線今日空頭排列。');
DRAWFLAGTEXT(MA(c,5)>=ref(MA(c,5),1) and count(ref(MA(c,5),1)<ref(MA(c,5),2),5)=5,C,'5日均線已開(kāi)始走平或勾頭向上,股價(jià)有可能走出低部,密切關(guān)注!');
DRAWFLAGTEXT(cross(c,MA(c,5)),C,'今日股價(jià)站上5日均線!');
DRAWFLAGTEXT(cross(c,MA(c,10)),C,'今日股價(jià)站上10日均線!');
DRAWFLAGTEXT(cross(c,MA(c,20)),C,'今日股價(jià)站上20日均線!');
DRAWFLAGTEXT(cross(c,MA(c,30)),C,'今日股價(jià)站上30日均線!');
DRAWFLAGTEXT(cross(c,MA(c,60)),C,'今日股價(jià)站上60日均線!');
DRAWFLAGTEXT(cross(c,MA(c,120)),C,'今日股價(jià)站上120日均線!');
DRAWFLAGTEXT(cross(c,MA(c,240)),C,'今日股價(jià)站上240日均線!');
DRAWFLAGTEXT(cross(MA(c,5),c),C,'今日股價(jià)下穿5日均線!');
DRAWFLAGTEXT(cross(MA(c,10),c),C,'今日股價(jià)下穿10日均線!');
DRAWFLAGTEXT(cross(MA(c,20),c),C,'今日股價(jià)下穿20日均線!');
DRAWFLAGTEXT(cross(MA(c,30),c),C,'今日股價(jià)下穿30日均線!');
DRAWFLAGTEXT(cross(MA(c,60),c),C,'今日股價(jià)下穿60日均線!');
DRAWFLAGTEXT(cross(MA(c,120),c),C,'今日股價(jià)下穿120日均線!');
DRAWFLAGTEXT(cross(MA(c,240),c),C,'今日股價(jià)下穿240日均線!');
DRAWFLAGTEXT(MA(c,30)>MA(c,20) and MA(c,20)>MA(c,10) and MA(c,10)>MA(c,5) and c<MA(c,5) ,C,'5日、10日、20日、30日均線空頭排列,并且股價(jià)在5日均線之下,持幣觀望!');
DRAWFLAGTEXT(MA(c,5)>MA(c,10) and MA(c,10)>MA(c,20) and MA(c,20)>MA(c,30) and c>MA(c,5) ,C,'5日、10日、20日、30日均線多頭排列,并且股價(jià)在5日均線之上,可繼續(xù)持有!');
c1:=c/ref(eMA(c,30),30);
c2:=indexc/ref(eMA(indexc,30),30);
l1:=c1/c2*10-10;
c3:=c/MA(c,60);
c4:=indexc/MA(indexc,60);
l2:=c3/c4*10-10;
c5:=c/MA(c,120);
c6:=indexc/MA(indexc,120);
l3:=c5/c6*10-10;
L4:=MA(L1+L2+L3,5);
DRAWFLAGTEXT(ref(L4,1)>0 AND ref(L4,1)>ref(L4,2),C,'該股中長(zhǎng)期走勢(shì)強(qiáng)于大盤(pán),且近期繼續(xù)走強(qiáng)。');
DRAWFLAGTEXT(ref(L4,1)>0 AND ref(L4,1)<=ref(L4,2),C,'該股中長(zhǎng)期走勢(shì)強(qiáng)于大盤(pán),但近期有所走弱。');
DRAWFLAGTEXT(ref(L4,1)<=0 AND ref(L4,1)>ref(L4,2),C,'該股中長(zhǎng)期走勢(shì)弱于大盤(pán),但近期有所轉(zhuǎn)強(qiáng)。');
DRAWFLAGTEXT(ref(L4,1)<=0 AND ref(L4,1)<=ref(L4,2),C,'該股中長(zhǎng)期走勢(shì)弱于大盤(pán),且近期繼續(xù)走弱。');
半年線:=EMA(C,148);
年線:=EMA(C,250);
DRAWFLAGTEXT(C>=半年線,C,'股價(jià)在半年線之上');
DRAWFLAGTEXT(C>=年線,C,'股價(jià)在年線之上');
DRAWFLAGTEXT(C<半年線,C,'股價(jià)在半年線之下');
DRAWFLAGTEXT(C<年線,C,'股價(jià)在年線之下');
DRAWFLAGTEXT(半年線>=ref(半年線,1),C,'半年線趨勢(shì)向上'); {內(nèi)容來(lái)至程序化交易網(wǎng) CXH99.COM}
DRAWFLAGTEXT(年線>=ref(年線,1),C,'年線趨勢(shì)向上');
DRAWFLAGTEXT(半年線<ref(半年線,1),C,'半年線趨勢(shì)向下');
DRAWFLAGTEXT(年線<ref(年線,1),C,'年線趨勢(shì)向下');
TYP := (HIGH + LOW + CLOSE)/3;
貨幣比:=SUM(IF(TYP>ref(TYP,1),TYP*VOL,0),14)/SUM(IF(TYP<ref(TYP,1),TYP*VOL,0),14);
MFI:=100-(100/(1+貨幣比));
a1:=count(cross(mfi,80),20);
a2:=count(cross(20,mfi),20);
DRAWFLAGTEXT(mfi<20,C,'mfi指標(biāo)在20以下處于超賣(mài)信號(hào)區(qū),不久將要上漲') ;
DRAWFLAGTEXT(mfi>80,C,'mfi指標(biāo)在80以上處于超買(mǎi)信號(hào)區(qū),股價(jià)將要下跌') ;
DRAWFLAGTEXT(a1,C,'mfi指標(biāo)在兩月前曾發(fā)出超買(mǎi)信號(hào),表明股價(jià)將會(huì)下跌') ;
DRAWFLAGTEXT(a2,C,'mfi指標(biāo)在兩月前曾發(fā)出超賣(mài)信號(hào),表明股價(jià)將會(huì)上漲') ;
{蓋印}
DRAWRECTABS(0,0,30,35,rgb(250,60,80)),color000099;
DRAWRECTABS(0,30,30,45,rgb(250,250,80)),color009999;
DRAWTEXTABS(2,5,'金城'),colorFFFFFF,LINETHICK1;
DRAWTEXTABS(2,18,'特別'),colorFFFFFF,LINETHICK1;
DRAWTEXTABS(2,30,'優(yōu)化'),color0000FF,LINETHICK1; {本文來(lái)至CXH99.COM}
有思路,想編寫(xiě)各種指標(biāo)公式,程序化交易模型,選股公式,預(yù)警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 262069696 進(jìn)行 有償 編寫(xiě)!(不貴!點(diǎn)擊查看價(jià)格!)
相關(guān)文章
-
沒(méi)有相關(guān)內(nèi)容