分享

隆重推出:建设自己的指标体系之四--主力雷达和主力控盘雷达两个指标源码(通达信版本) - ...

 上海的春天 2010-07-30

隆重推出:建设自己的指标体系之四--主力雷达和主力控盘雷达两个指标源码(通达信版本)

管理提醒: 本帖被 xinma111 设置为精华(2010-03-05)
       记得论坛上曾有一个同花顺的“主力雷达”指标,下面我找了一个通达信版本的“主力雷达”指标奉献给大家,另一个是主力控盘雷达指标,也十分不错!
指标名称:主力雷达
指标说明:指标上均有提示!
指标源码:
LC:=REF(CLOSE,1);

RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
AR:=SUM(HIGH-OPEN,26)/SUM(OPEN-LOW,26)*100;
卖点雷达:=CROSS(85,RSI1)*30,COLOR00FF00,LINETHICK2;
DD:=LLV(L,55);
DRAWTEXT(CROSS(85,RSI1) AND C>=DD*1.30,20,'顶'),COLOR00FF00;
DRAWTEXT(CROSS(85,RSI1) AND C<DD*1.30,20,'洗'),COLORFFFFFF;
STICKLINE(卖点雷达,0,20,3,0),COLOR00FF00;
VARB:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;
VARC:=SMA(MAX(CLOSE-LC,0),13,1)/SMA(ABS(CLOSE-LC),13,1)*100;
VARD:=BARSCOUNT(CLOSE);
买点雷达:(VARB< 20 AND VARC< 25 AND VARD> 50 AND AR<70)*30,LINETHICK2,COLOR0078FF;
BT1:=CROSS(RSI1,25);
DRAWTEXT(BT1,-80,'底'),COLOR0000FF;
STICKLINE(BT1,-100,-80,3,0),COLOR0000FF;
主力:EMA( (CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2)*5,LINETHICK1,COLOR0000FF;
散户:EMA( (CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7)*5,LINETHICK2,COLORC87800;
BT2:=CROSS(主力,散户) AND 主力<-10;  
DRAWICON(CROSS(RSI1,25),主力,26);
DRAWICON(CROSS(主力,散户) AND 主力<-10,主力,23);
BT:=FILTER(COUNT(BT1 OR BT2,3)>=2,3);
STICKLINE(BT,0,50,4,1),COLOR0000FF;
DRAWTEXT(BT,50,'金底'),COLOR0000FF;
STICKLINE(BT2,0,20,3,0),COLORFF00FF;
DRAWTEXT(BT2,20,'超跌'),COLORFF00FF;

指标名称:主力控盘雷达
指标说明:线上表明主力介入,下线表明没有主力介入!
指标源码:
VAR1:=CLOSE-LOW;
VAR2:=HIGH-LOW;
VAR3:=CLOSE-HIGH;
VAR4:=IF(CLOSE>=0,(VAR1/VAR2+VAR3/VAR2)*VOL,(VAR3/VAR2+VAR1/VAR2)*VOL);
主力控盘雷达: SUM(VAR4,10)/10000, VOLSTICK;
增减力度:(MA(CLOSE,34.000) - CLOSE) / MA(CLOSE, 34.000) * 10.000,COLOR6666FF;
STICKLINE(CROSS( 1.700,增减力度), 3,0, 3,0),COLORWHITE;
DRAWTEXT(CROSS( 1.700,增减力度), 8.000,'底'),COLORWHITE;
进仓:STICKLINE(C/REF(C,1)>1.0618, 3,0, 3,0),COLORYELLOW;
DRAWTEXT(C/REF(C,1)>1.0618, 10.000,'进'),COLORYELLOW;
STICKLINE(FILTER(CROSS(0.019100,增减力度),21), 5,0, 3,0),COLORRED;
DRAWTEXT(FILTER(CROSS(0.019100,增减力度),21), 13,'析'),COLORRED;
逢高出局:STICKLINE(FILTER(C/REF(C,1)>1.0918,21), 15,0, 3,0),COLORFFAAFF;
DRAWTEXT(FILTER(C/REF(C,1)>1.0918,21), 30,'出'),COLORFFAAFF;

如果新建公式,具体参见http://www./article-27646.html
描述:主力雷达指标图
图片:1.JPG
描述:主力控盘指标图
图片:2.JPG

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约