分析家公式网,提供指标公式,股票软件 用户登录  |  用户 注册

软件名称:[B]原创---短线操作(源码 选股/副图 通达信 贴图)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/Win7/
软件语言:简体中文
授权方式:免费版
软件大小:3.00 KB
官方主页:Home Page
更新时间:2016-11-20 01:16:40
软件简介:

今天分享的《My抄底钻石》很快被推荐为精华帖,感谢大家的支持!

      大家的支持就是我的动力。今天再分享一个我的原创指标---《短线操作》的副图和选股指标!!!

      此《短线操作》指标与网上看到的短线操作指标是截然不同的,此指标系本人原创。其原理是根据 牛熊力量和买卖压力而编辑的指标。希望大家喜欢!

{短线操作(DMI+DMK)}

{牛熊力量}

MTR:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);

HD :=HIGH-REF(HIGH,1);

LD :=REF(LOW,1)-LOW;

DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),14);

DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),14);

PDI:=DMP*100/MTR;

MDI:=DMM*100/MTR;

ADX:=EMA(ABS(MDI-PDI)/(MDI+PDI)*100,6);

ADXR:=EMA(ADX,6);

NX:=PDI/(PDI+MDI)*100;

{买卖压力}

MM1:=SUM(IF(H-REF(C,1)>0,(H-REF(C,1))+(C-L),C-L),8);

MM2:=SUM(IF(REF(C,1)-L>0,(REF(C,1)-L)+(H-C),H-C),8);

DMK:=MM1/(MM1+MM2)*100;

BD:=(NX+DMK)/2;

MBD:EMA(BD,5);

{条件选股}

MAL:=MA(L,3);

TJ1:=REF(MBD,4)>REF(MBD,3) AND REF(MBD,3)>REF(MBD,2) AND REF(MBD,2)>REF(MBD,1) AND REF(MBD,1)<MBD AND C>=MA(C,6)*1.004 AND MBD<43;

TJ2:=REF(MBD,5)>REF(MBD,4) AND REF(MBD,4)>REF(MBD,3) AND REF(MBD,3)>REF(MBD,2) AND REF(MBD,2)<REF(MBD,1) AND REF(MBD,1)<MBD AND C>=MA(C,6)*1.004 AND MBD<43;

TJ3:=REF(MBD,6)>REF(MBD,5) AND REF(MBD,5)>REF(MBD,4) AND REF(MBD,4)>REF(MBD,3) AND REF(MBD,3)<REF(MBD,2) AND REF(MBD,2)<REF(MBD,1) AND REF(MBD,1)<MBD AND C>=MA(C,6)*1.004 AND MBD<43;

XG:=FILTER((TJ1 OR TJ2 OR TJ3) AND MAL>REF(MAL,1),5);

{STICKLINE(XG,35,65,0,-1),COLORRED;} {画垂直线};

IF(XG,50,DRAWNULL),POINTDOT,COLORYELLOW,LINETHICK8;{画大圆点}

STICKLINE(C>0,50,50,1,0);

STICKLINE(C>0,75,75,1,0),COLORC6C600;

STICKLINE(C>0,25,25,1,0),COLORGREEN;

(二)选股

{波段操作(DMI+DMK)}

{牛熊力量}

MTR:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);

HD :=HIGH-REF(HIGH,1);

LD :=REF(LOW,1)-LOW;

DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),14);

DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),14);

PDI:=DMP*100/MTR;

MDI:=DMM*100/MTR;

ADX:=EMA(ABS(MDI-PDI)/(MDI+PDI)*100,6);

ADXR:=EMA(ADX,6);

NX:=PDI/(PDI+MDI)*100;

{买卖压力}

MM1:=SUM(IF(H-REF(C,1)>0,(H-REF(C,1))+(C-L),C-L),8);

MM2:=SUM(IF(REF(C,1)-L>0,(REF(C,1)-L)+(H-C),H-C),8);

DMK:=MM1/(MM1+MM2)*100;

BD:=(NX+DMK)/2;

MBD:=EMA(BD,5);

{条件选股}

MAL:=MA(L,3);

TJ1:=REF(MBD,4)>REF(MBD,3) AND REF(MBD,3)>REF(MBD,2) AND REF(MBD,2)>REF(MBD,1) AND REF(MBD,1)<MBD AND C>=MA(C,6)*1.004 AND MBD<43;

TJ2:=REF(MBD,5)>REF(MBD,4) AND REF(MBD,4)>REF(MBD,3) AND REF(MBD,3)>REF(MBD,2) AND REF(MBD,2)<REF(MBD,1) AND REF(MBD,1)<MBD AND C>=MA(C,6)*1.004 AND MBD<43;

TJ3:=REF(MBD,6)>REF(MBD,5) AND REF(MBD,5)>REF(MBD,4) AND REF(MBD,4)>REF(MBD,3) AND REF(MBD,3)<REF(MBD,2) AND REF(MBD,2)<REF(MBD,1) AND REF(MBD,1)<MBD AND C>=MA(C,6)*1.004 AND MBD<43;

XG:FILTER((TJ1 OR TJ2 OR TJ3) AND MAL>REF(MAL,1),5);

通达信公式


[url=http://www.70822.com/soft/sort013/sort05/down-105121.html]原创---短线操作(源码 选股/副图 通达信 贴图)[/url]

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