分析家公式网,提供股票公式,股票软件用户登录  |  用户 注册
MACD美人眼(新美人眼)
  • 软件大小:17.0 KB
  • 推荐星级:
  • 更新时间:2011-02-26 05:47:06
  • 软件类别: 国产软件 / 大智慧L2公式
  • 软件语言:简体中文
  • 授权方式: 免费版
  • 联系方式:暂无联系方式
  • 官方主页: Home Page
  • 点击大图:  【一键转帖到论坛】
  • 插件情况:
  • 运行环境:Win9X/Win2000/WinXP/Win2003/
  • 相关Tags:MACD美人眼  新美人眼  
  • (6)55%
    (5)45%

软件介绍

{MACD美人眼}
{背景颜色设定}
DRAWRECTREL(0,10,200,1000,rgb(0,0,255)),layer0;
{参数}
short:=12;long:=26;M:=9;
DIFF1:=EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA1:=EMA(DIFF1,M);
MACD:2*(DIFF1-DEA1),linethick0;
DIFF : EMA(CLOSE,SHORT) - EMA(CLOSE,LONG),colorff00ff,linethick0;
DEA  : EMA(DIFF1,M),colorwhite,linethick0;
AH:HHV(DIFF1,55),COLOR6600ff,linethick0,layer0;
PARTLINE(ah,ah),COLORWHITE,POINTDOT,linethick0,layer0;
DRAWICON( ref(aH=diff1,1) and DIFF<REF(DIFF1,1),AH*0.65,8),ALIGN1;
AL:LLV(DIFF1,55),COLOR248a24,linethick0,layer0;
PARTLINE(al,Al),COLORWHITE,POINTDOT,linethick0,layer0;
DRAWICON( ref(al=diff1,1) and DIFF>REF(DIFF1,1),al*0.65,7),ALIGN1;
{美人眼}
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,LINETHICK0,LAYER0;
DN:IF(DIFF<VAR2 AND DEA=VAR2,MIN(HHV(VAR2,10),VAR3),VAR2),COLORaa00bb,LINETHICK0,LAYER0;
美人眼:CROSS(DIFF ,DEA ) AND CROSS( DIFF,DN ) AND DN<0,linethick0;
STICKLINE(美人眼,-0.1,-0.20,6,0),COLORRED;
{美人眼a:美人眼*AL,stick,linethick4,COLOR8080ff;}
DRAWTEXT(美人眼,-0.15,'美人眼'),ALIGN1,COLOR8080FF,linethick2,LAYER1;
{美人瞎眼:=CROSS(DEA ,DIFF ) AND CROSS( UP,DIFF ) AND DIFF<UP;
美人瞎眼a:美人瞎眼*ah,stick,linethick4,COLOR9ca010;
DRAWTEXT(美人瞎眼,dn,'美人瞎眼'),ALIGN1,COLOR9ca010,linethick2,LAYER0;}

{●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,LINETHICK0;
STICKLINE(■零下金叉,0.1,0.20,6,0),COLORffffff;
drawtext(■零下金叉,0.15,'零下金叉'),ALIGN1,color6600FF,layer1;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
■二次金叉:IF(CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1,0.2,0),COLORred,POINTDOT,LINETHICK0;
STICKLINE(■二次金叉,0.20,0.3,6,0),COLORred;
drawtext(■二次金叉,0.25,'二次金叉'),ALIGN1,colorffffFF,layer1;
A3:=CROSS(DIFF,DEA) AND DEA<0;
■零下二次金叉:IF(FILTER(COUNT(A3,21)=2,10) AND DEA<0,0.05,0),COLORblue,POINTDOT,LINETHICK0;
STICKLINE(■零下二次金叉,0.3,0.4,6,0),COLORblue;
drawtext(■零下二次金叉,0.35,'零下二次金叉'),ALIGN1,colorYELLOW,layer1;
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;}
中线:0,LINETHICK2,COLORYELLOW,LAYER1;
{绿色}
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,8,0 ),COLOr008800;
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,7,0 ),COLOR009900;
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,6,0 ),COLOR00aa00;
STICKLINE(MACD<ref(MACD,1)and MACD>0,0,MACD,5,0 ),COLOR00bb00;
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,8,0 ),COLOR000088;
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,7,0 ),COLOR000099;
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,6,0 ),COLOR0000aa;
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,5,0 ),COLOR0000bb;
STICKLINE(MACD>=ref(MACD,1)and MACD>0,0,MACD,4,0 ),COLOR0000cc;
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;
{黄s}
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,8,0 ),COLOR338fdd;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,7,0 ),COLOR339fdd;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,6,0 ),COLOR33afdd;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,5,0 ),COLOR33bfdd;
STICKLINE(MACD>ref(MACD,1)and MACD<0,0,MACD,4,0 ),COLOR33cfdd;
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,8,0 ),COLORFF4400;
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,7,0 ),COLORFF6600;
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,6,0 ),COLORFF7700;
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,5,0 ),COLORFF8800;
STICKLINE(MACD<=ref(MACD,1)and MACD<0,0,MACD,4,0 ),COLORFF9900;
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;
{当日及时行情}
DRAWTEXTREL(5,70,'今  美 人 眼:'+NUMTOSTRN(美人眼,0)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,250,'日  零下金叉:'+NUMTOSTRN(■零下金叉,0)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,430,'行  二次金叉:'+NUMTOSTRN(■二次金叉,0)),COLORFFFFFF,linethick1,layer0;
DRAWTEXTREL(5,610,'情  零下二次金叉:'+NUMTOSTRN(■零下二次金叉,0)),COLORffffff,linethick1,layer0;
DRAWTEXTREL(5,790,'表  趋 势:'),COLORffffff,linethick1,layer0;
MRY1:=美人眼=1;
MRY2:=美人眼=0 AND ( ■零下金叉>0 OR ■二次金叉>0 OR ■零下二次金叉>0 );
MRY3:=美人眼=0 AND ■零下金叉=0 AND ■二次金叉=0 AND ■零下二次金叉=0 ;
IF BARSTATUS=2 AND MRY1 THEN BEGIN
DRAWTEXTREL(25,70,'                ● 对你抛媚眼!'),colorRED,layer0;
END
ELSE
IF BARSTATUS=2 AND MRY2 THEN BEGIN
DRAWTEXTREL(25,70,'                ● 不理你!'),colorgreen,layer0;
END
ELSE
IF BARSTATUS=2 AND MRY3 THEN BEGIN
DRAWTEXTREL(25,70,'                ● 看 !'),colorgreen,layer0;
END;
LXJC1:=■零下金叉>0;
LXJC2:=■零下金叉=0 AND (■二次金叉>0 OR ■零下二次金叉>0);
LXJC3:=■零下金叉=0 AND ■二次金叉=0 AND ■零下二次金叉=0 AND 美人眼=0 ;
IF BARSTATUS=2 AND LXJC1 THEN BEGIN
DRAWTEXTREL(25,250,'                ● 好消息!'),colorRED,layer0;
END
ELSE
IF BARSTATUS=2 AND LXJC2 THEN BEGIN
DRAWTEXTREL(25,250,'                ● 闲闲没事 !'),colorgreen,layer0;
END
ELSE
IF BARSTATUS=2 AND LXJC3 THEN BEGIN
DRAWTEXTREL(25,250,'                ●   趋 !'),colorgreen,layer0;
END 
ECJC1:=■二次金叉>0;
ECJC2:=■二次金叉=0 AND ( ■零下金叉>0 OR ■零下二次金叉>0 );
ECJC3:=■二次金叉=0 AND ■零下金叉=0 AND ■零下二次金叉=0  A

地址


·上一软件:散户操盘
·下一软件:新发动机(副图 源码 图)

软件评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论

说明

* 使用方法:点击上面蓝色块,打开新页面按照提示进行

* 本网站提供的各种股票软件,例如大智慧软件,通达信软件,同花顺软件,东方财富通等等,和各种股票公式指标,例如大智慧公式,通达信公式,同花顺公式,文华公式,博易大师公式,股票价格计算公式等等公式指标等,都来源网上公开来源收集

本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!

* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。

* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程

* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明:本站所有股票公式软件资料均网上公开收集,如侵权请联系删帖。站内所有广告,均与本站无关!
Copyright © 2003-2022 fxjgsw.Com. All Rights Reserved .
页面执行时间:5,125.00000 毫秒