大智慧L2幾疊加在主圖中的公式

游四方 2012-07-12

展開全文

發(fā)七個小注解幫能大忙.告訴你該怎么你的處理股票.及時的提醒你的買賣點.而且你可以只挑選對你有用的.加進你的主圖里.因為它們是獨立的.可以分別利用.圖上的具體位置你自己可變化.在大智慧里用很方便.

{1.RSI}
LC:=REF(C,1);
RSI:((SMA(MAX((C - LC),0),3,1) / SMA(ABS((C - LC)),3,1)) * 100),LINETHICK0;
DRAWTEXT(CROSS(RSI,80) ,high*1.02,'RSI.'+NUMTOSTRN(RSI,0)+''),COLOR00ffFF,ALIGN1,LINETHICK1;

{2.J合力}
J9:EMA("KDJ.J"(9,3,3),5) ,COLOR0000FF,LINETHICK0;
J18:EMA("KDJ.J"(18,3,3),5) ,COLOR00FFFF,DOTLINE,LINETHICK0;
J27:EMA("KDJ.J"(27,3,3),5) ,COLOR00FF00,DOTLINE,LINETHICK0;
J36:EMA("KDJ.J"(36,3,3),5) ,COLOR0077FF,DOTLINE,LINETHICK0;
J45:EMA("KDJ.J"(45,3,3),5) ,COLORFF9900,LINETHICK0;
J合力:(3*J9+2*J18+J27+J36+J45)/8,COLOR00FFCC,LINETHICK0;
合力頂:=J合力>85 ;
合力低:=J合力<15;
DRAWTEXT(CROSS(合力頂,0) ,H*1.015,'【J:'+NUMTOSTRN(J合力,0)+'】'),ALIGN1,COLOR00FFFF,LINETHICK3,LAYER0;
DRAWTEXT(CROSS(合力頂,0) ,H*1.005,'◆'),ALIGN1,COLOR0077FF,LINETHICK3,LAYER0;
DRAWTEXT(CROSS(0,合力低) ,L*0.985,'◆'),ALIGN1,COLOR0077FF,LINETHICK3,LAYER0;
DRAWTEXT(CROSS(0,合力低) ,L*0.98,'【J:'+NUMTOSTRN(J合力,0)+'】'),ALIGN1,COLOR00FFFF,LINETHICK3,LAYER0;
DRAWTEXT(DISPSTATUS=2, H*1.03,'【J:'+NUMTOSTRN(J合力,0)+'】'),COLORFF00FF,LINETHICK3,ALIGN1;

{3.低部買}
DIBU:= "KDJ.K"(9,3,3)<15 AND "KDJ.D"(9,3,3)<15 AND "KDJ.K"(18,3,3)<15 AND "KDJ.D"(18,3,3)<15
AND "KDJ.K"(27,3,3)<20 AND "KDJ.D"(27,3,3)<20 AND "KDJ.D"(36,3,3)<20 AND "KDJ.D"(54,3,3)<20;
DRAWTEXT(CROSS(0,DIBU) ,L*0.98,'買'),ALIGN1,COLOR00ffff,LINETHICK2,LAYER3;

{4.不漲回頭再買}
R:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
MAR1:=MA(R,3);
F1:=100*(C-REF(C,1))/REF(C,1);
HHH1:=EMA(R,25)+6;
不漲回頭再買:REF(R,2)>REF(R,3) AND REF(R,2)>REF(R,1) AND R>REF(R,1)
AND MAR1>REF(MAR1,1)+1 AND REF(MAR1,2)-REF(MAR1,1)>-1
AND REF(R,1)<REF(MAR1,1) AND REF(R,2)-REF(MAR1,2)>-3
AND REF(R,1)<38 AND R<HHH1 AND F1<8,COLOR007A00,LINETHICK0;
DRAWTEXT(不漲回頭再買,(L * 0.98),'買'),ALIGN1;

{5.買賣}
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
賣:=HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX);
DRAWTEXT(FILTER(賣=1,1),HIGH*1.02,'★賣'),COLORGREEN;
買:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2));
DRAWTEXT(FILTER(買=1,5),LOW-0.03,'★買'),COLORRED;

{6.KDJ周金叉死叉}
周K:"KDJ.K#WEEK"(9,2,5),COLOR0000FF,LINETHICK0,LAYER3;
周D:"KDJ.D#WEEK"(9,2,5),COLOR00FF00,LINETHICK0;
DRAWTEXT(CROSS(周K,周D),L*0.975,'J周金叉'),ALIGN1,color0000FF,LINETHICK2;
DRAWTEXT(CROSS(周D,周K),H*1.04,'J周死叉'),ALIGN1,COLOR00FFFF,LINETHICK2;

KDB:=BARSLAST(REF(CROSS(周K,周D),1));
KDDB:=REF(WMA(C,5),KDB+1)>WMA(C,5) AND REF(周K,KDB+1)<周K AND CROSS(周K,周D);
K底背:=IF(FILTER(KDDB>0,5),1,0);
DRAWTEXT(K底背=1,L,'底背離'),COLOR0000FF,LINETHICK2;
KDD:=BARSLAST(REF(CROSS(周D,周K),1));
K頂背:=REF(WMA(C,5),KDD+1)<WMA(C,5) AND REF(周K,KDD+1)>周K AND CROSS(周D,周K);
DRAWTEXT(FILTER(K頂背>0,5),H,'頂背離'),COLOR00FFFF,LINETHICK2;

{7.清倉,強勢}
AA05:MA(C,5),linethick0;
AA10:MA(C,10),linethick0;
AA30:MA(C,30),linethick0;
MM30:=(C-AA30)/AA30*100;
清倉:=filter(L>AA30 and AA05<ref(aa05,1) and AA10<ref(AA10,1) and MM30<ref(MM30,1) ,10);

DRAWTEXT(清倉,h*1.03,'清倉'),align1,Color00FF00,linethick2;
DRAWTEXT(清倉,h*1.05,'★'),linethick2,ALIGN1,COLOR00ff00;

{ 原文鏈接：http://www./soft/sort013/sort03/down-50572.html }