软件名称：[B]玩股美人眼MACD-清晰的金叉、背离[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：6.00 KB
官方主页：Home Page
更新时间：2011-01-05 05:01:31
软件简介:

{玩股美人眼MACD} LONG:= 26; M:=9; SHORT:=12; DIFF1:=EMA(CLOSE,SHORT) - EMA(CLOSE,LONG); DEA1:=EMA(DIFF1,M); MACD:=2*(DIFF1-DEA1); DIFF:EMA(CLOSE,SHORT) - EMA(CLOSE,LONG),COLORFF00FF,LINETHICK2; DEA:EMA(DIFF1,M),COLORWHITE,LINETHICK2; AH:HHV(DIFF1,55),COLOR6600FF,LINETHICK2; IF(AH,AH,DRAWNULL),COLORWHITE,POINTDOT,LINETHICK2; DRAWICON(REF(AH=DIFF1,1) AND DIFF<REF(DIFF1,1),AH,8); AL:LLV(DIFF1,55),COLOR248A24,LINETHICK2; IF(AL,AL,DRAWNULL),COLORWHITE,POINTDOT,LINETHICK2; DRAWICON( REF(AL=DIFF1,1) AND DIFF>REF(DIFF1,1),AL,7); {●60零上金叉:IF(CROSS(DIFF,DEA) AND DIFF>0,0.3,0),COLOR6600FF,POINTDOT; STICKLINE(●60零上金叉,DIFF,AH,4,0),COLOR6600FF;} ■零下金叉:IF(CROSS(DIFF,DEA) AND DIFF<-0.001,0.3,0),COLORWHITE,POINTDOT; STICKLINE(■零下金叉,0.1,0.15,6,0),COLORWHITE; JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0)); ■二次金叉:IF(CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1,0.2,0),COLOR3C86CC,POINTDOT; STICKLINE(■二次金叉,0.15,0.2,6,0),COLOR3C86CC; A3:=CROSS(DIFF,DEA) AND DEA<0; ■零下二次金叉:IF(FILTER(COUNT(A3,21)=2,10) AND DEA<0,0.05,0),COLORF58F98,POINTDOT; STICKLINE(■零下二次金叉,0.25,0.3,6,0),COLORF58F98; A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)); ■底背离:IF(REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA),0.1,0),COLORFFFF00; 底背离1:STICKLINE(REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA),0,AL,4,0),COLOR00FF00; STICKLINE(■底背离,0.2,0.25,6,0),COLORFFFF00; {DRAWLINE(A1=0,DEA,■底背离,DEA,0),COLORYELLOW}; {A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)); 顶背离:STICKLINE(REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF),0,DIFF,4,0),COLORBLACK; DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORGREEN;} DD:=C=HHV(C,100); EE:=DEA1< REF(DEA1,1) AND REF(DEA1< REF(DEA1,1),1)=1; CC:=C> REF(C,1) AND REF(C> REF(C,1),1)=1; 上升背离:(CC AND EE)*AH,STICK,LINETHICK2,COLORFF00FF; 顶背离:(DD AND EE AND DEA1< HHV(DEA1,100))*AH,STICK,LINETHICK2,COLORYELLOW; DRAWTEXT(顶背离,DEA1/2,'顶背离'),COLORYELLOW; FF:=C=LLV(C,100); GG:= DEA1> REF(DEA1,1) AND REF(DEA1> REF(DEA1,1),1)=1; LL:=C< REF(C,1) AND REF(C< REF(C,1),1)=1; 下降背离:(LL AND GG)*AL,STICK,LINETHICK2,COLORWHITE; 底背离:(FF AND GG AND DEA1> LLV(DEA1,100))*AL,STICK,LINETHICK2,COLOR6600FF; DRAWTEXT(底背离,DEA1/2,'底背离'),COLOR6600FF; IF(DIFF<0,DIFF,0),COLORFF00FF,LINETHICK2; IF(DIFF<0,0,DIFF),COLORYELLOW,LINETHICK2; IF(DIFF<DEA,DIFF,DEA),COLORFFFF00,LINETHICK2; IF(DIFF>DEA,DEA,DEA),COLORWHITE,LINETHICK2; STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,4,0 ),COLOR00CC00; STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,3,0 ),COLOR00DD00; STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2,0 ),COLOR00EE00; STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1,0 ),COLOR00FF00; STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,3,0 ),COLOR0000DD; STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2,0 ),COLOR0000EE; STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1,0 ),COLOR0000FF; STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,3,0 ),COLOR33DFDD; STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,2,0 ),COLOR33EFDD; STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1,0 ),COLOR33FFDD; STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,3,0 ),COLORFFAA00; STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,2,0 ),COLORFFBB00; STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1,0 ),COLORFFCC00; VAR1:=HHV(DEA,53); VAR2:=LLV(DEA,30); VAR3:=DEA-(DIFF-DEA); UP:IF(DIFF>VAR1 AND DEA=VAR1,MAX(LLV(VAR1,10),VAR3),VAR1),COLORBB9A00,LINETHICK2; DN:IF(DIFF<VAR2 AND DEA=VAR2,MIN(HHV(VAR2,10),VAR3),VAR2),COLORAA00BB,LINETHICK2; 美人开眼:=CROSS(DIFF ,DEA ) AND CROSS( DIFF,DN ) AND DN<0; 美人开眼A:美人开眼*AL,STICK,LINETHICK4,COLOR8080FF; DRAWTEXT(美人开眼,DN,'美人开眼'),COLOR8080FF,LINETHICK2; 美人收眼:=CROSS(DEA ,DIFF ) AND CROSS( UP,DIFF ) AND DIFF<UP; 美人收眼A:美人收眼*AH,STICK,LINETHICK4,COLOR9CA010; DRAWTEXT(美人收眼,DN,'美人收眼'),COLOR9CA010,LINETHICK2; {用于大智慧时删除以下源码} AL,COLOR248A24,LINETHICK2; DRAWBAND(MA(DIFF,2),RGB(0,58,224),DIFF,RGB(255,0,46)); DIFF,COLORFF00FF,LINETHICK1; DEA,COLORWHITE,LINETHICK3;

[url=http://www.70822.com/soft/sort013/sort05/down-28899.html]玩股美人眼MACD-清晰的金叉、背离[/url]