软件名称：[B]★小注解帮大忙告诉你该怎么处理股票（批注.源码.解释.DZH.TDX）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：2.00 KB
官方主页：Home Page
更新时间：2012-07-11 05:37:30
软件简介:

发七个小注解帮能大忙.告诉你该怎么你的处理股票.及时的提醒你的买卖点.而且你可以只挑选对你有用的.加进你的主图里.因为它们是独立的.可以分别利用.图上的具体位置你自己可变化.在大智慧里用很方便.

{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; 

------------------------------------------------------------------------------------------------------

金老师，看看，我改成了通达信版，也已通过，不知可否？请老师指点！
  小注解.TXT (3.06 KB)} 
{1.RSI}
LC:=REF(C,1);
RSI:((SMA(MAX((C - LC),0),3,1) / SMA(ABS((C - LC)),3,1)) * 100),NODRAW;
DRAWTEXT(CROSS(RSI,80) ,HIGH*1.02,'RSI'),COLOR00FFFF,LINETHICK1;

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

{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,'买'),COLOR00FFFF,LINETHICK2;

{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,NODRAW;
DRAWTEXT(不涨回头再买,(L * 0.98),'买');

{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,NODRAW;
周D:"KDJ.D#WEEK"(9,2,5),COLOR00FF00,NODRAW;
DRAWTEXT(CROSS(周K,周D),L*0.975,'J周金叉'),COLOR0000FF,LINETHICK2;
DRAWTEXT(CROSS(周D,周K),H*1.04,'J周死叉'),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),NODRAW; 
AA10:MA(C,10),NODRAW;   
AA30:MA(C,30),NODRAW;   
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,'清仓'),COLOR00FF00,LINETHICK2;
DRAWTEXT(清仓,H*1.05,'★'),LINETHICK2,,COLOR00FF00;

[url=http://www.70822.com/soft/sort013/sort03/down-50572.html]★小注解帮大忙告诉你该怎么处理股票（批注.源码.解释.DZH.TDX）[/url]