通达信海阔龙脉战法主图 短线趋势两相宜 源码

[复制链接]
查看211 | 回复0 | 2021-8-28 00:28:22 | 显示全部楼层 |阅读模式

以下是通达信海阔龙脉战法主图 短线趋势两相宜 源码(无源码的请下载附件导入)

龙脉战法 2021震撼登场!整合经典!阻击龙头起爆点!跟随市场总龙头!强者恒强 !短线趋势两相宜
 申明:指标不是万能的,但能结合盘面预判走势。
 本指标,自己珍藏多年,已浮现市场总龙头、趋势龙、分支龙无数!!!
 万事万物皆周期,每个市场龙头、妖股孕育成龙、最终能否成为市场总龙头,建立自己的周期王朝,成王称帝,必然在股价运行中留下痕迹,本战法最重要的是龙脉线运用。
1、孕龙、青龙、火龙和龙脉线依次向上必须呈多头排列形式。
2、股价上穿或回踩龙脉线反身向上均为买点。
3、股价不破龙脉线可以一路持有。
4、结合板块、个股基本面、热点确定仓位。
5、本战法短线、趋势两相宜。
DF:=(C-REF(C,1))/REF(C,1)*100<-5 OR O/C>1.05;
神龙潜浮线:DRAWLINE(DF,O,REF(DF,1),REF(O,1),1),DOTLINE,COLORWHITE;

 

龙脉:EMA(CLOSE,17),COLORYELLOW,LINETHICK2;
火龙:EMA(CLOSE,50),COLORRED,LINETHICK2;
青龙:EMA(CLOSE,99),COLORGREEN;
孕龙:MA(CLOSE,181),COLORBLUE;
牛:=EMA(CLOSE,144)>=REF(EMA(CLOSE,144),1);
DRAWTEXT((龙脉>=REF(龙脉,1) AND L<龙脉 AND C>龙脉) ,L, '★龙脉'),COLORYELLOW;
DRAWTEXT((青龙>=REF(青龙,1) AND 牛 AND L<青龙 AND H>青龙) AND ((CLOSE<REF(CLOSE,1) OR O>C)),L*0.98 , '●青龙'),COLORGREEN;
DRAWTEXT((火龙>=REF(火龙,1) AND 牛 AND L<火龙 AND H>火龙) {AND ((CLOSE<REF(CLOSE,1) OR O>C))},L*0.96  , '◆火龙'),COLORRED;
DRAWTEXT( (孕龙>=REF(孕龙,1) AND 牛 AND  L<孕龙 AND H>孕龙)AND ((CLOSE<REF(CLOSE,1) OR O>C)),L*0.94  , '●龙苗'),COLORBLUE;

DRAWTEXT_FIX(1,0.00,0.00,0,'主题概念:')COLORWHITE;
DRAWTEXT_FIX(1,0.08,0.00,0,EXTERNSTR(0,1))COLORWHITE;
DRAWTEXT_FIX(1,0.00,0.06,0,'主营业务:')COLORWHITE;
DRAWTEXT_FIX(1,0.08,0.06,0,EXTERNSTR(0,2))COLORWHITE;

总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
流通市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿');
全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));
市值Z:=STRCAT(STRCAT(' 流通市值Z: ',CON2STR(FINANCE(46)*C/100000000,2)),'亿');
股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(总股本,流通市值),全流通),市值Z));
{业绩}
净资收益率:=STRCAT(' 净资收益率: ',CON2STR(FINANCE(29)/FINANCE(19)*100,2));
毛利率:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));
主营利润率:=STRCAT(' 主营利润率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
当前业绩:=STRCAT('当前业绩: ',STRCAT(STRCAT(净资收益率,毛利率),主营利润率));
DRAWTEXT_FIX(ISLASTBAR,0.00,0.12,0,股本市值),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.18,0,当前业绩),COLORWHITE;

DRAWTEXT_FIX(ISLASTBAR,0.450,0.18,0,STRCAT('利润同比: ',CON2STR(FINANCE(43),2))),COLORCYAN;

{流通市值}
DRAWTEXT_FIX(1,0.710,0.96,0,STRCAT(STRCAT('流通市值Z:',CON2STR(FINANCE(46)*C/100000000,2)),'亿元'))COLORCYAN;

2056500841.jpg

2056500841.jpg

205722305.jpg

205722305.jpg

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则