行业信息霸占大牛股买卖主图指标公式源码[大智慧公式]

相关标签:boll主图指标公式源码 、 macd主图指标源码公式 、 主图买卖指标公式源码 、 白金主图指标公式源码 、 大智慧ddx指标源码 、 超宏主图指标公式源码 、 大智慧主图箱体指标 、 大智慧主图指标大全 、 大智慧波段主图指标 、 通达信主图指标源码 、 波浪指标主图指标源码 、 元帅主图指标源码 、 背离主图指标指标源码 、 趋势主图指标源码 、 基本面主图指标源码 、

大智慧霸占大牛股主图源码源码

原理解析：
DRAWGBKLAST(收盘价>0,STRIP(自定色,自定色,0)) VARL13赋值:("平滑异同平均的DIFF[取周线数据]"(26,12,9)) VARL14赋值:("平滑异同平均的DEA[取周线数据]"(26,12,9)) VL赋值:1日前的最低价 VH赋值:1日前的最高价 VAR1赋值:最高价-VH的绝对值的13日[1日权重]移动平均/最高价-VH和0的较大值的13日[1日权重]移动平均*100 VAR2赋值:最低价-VL的绝对值的13日[1日权重]移动平均/最低价-VL和0的较大值的13日[1日权重]移动平均*100 VAR3赋值:VAR1的13日简单移动平均 VAR4赋值:VAR2的13日简单移动平均 VAR5赋值:34日内最低价的最低值 VAR6赋值:34日内最高价的最高值 VAR7赋值:如果最高价>=VAR6,返回VAR3,否则返回0的3日指数移动平均 VAR8赋值:如果最低价<=VAR5,返回VAR4,否则返回0的3日指数移动平均 VAR9赋值:((((收盘价-54日内最低价的最低值)/(54日内最高价的最高值-54日内最低价的最低值))*100)的7日[1日权重]移动平均的5日[1日权重]移动平均) VAR10赋值:((((收盘价-54日内最低价的最低值)/(54日内最高价的最高值-54日内最低价的最低值)*100)的7日[1日权重]移动平均) * 16.18) - (VAR9* 10.9) VAR11赋值:如果VAR10<=VAR9ANDVAR8>1日前的VAR8,返回VAR8*8,否则返回0的55日过滤 VAR21赋值:60日内最低价的最低值 VAR31赋值:60日内最高价的最高值 VAR41赋值:(收盘价-VAR21)/(VAR31-VAR21)*100的13日指数移动平均 VAR51赋值:0.667*1日前的VAR41+0.333*VAR41的21日指数移动平均 VARL2赋值:VAR51上穿VAR41ANDVAR41>84的13日过滤 当满足条件收盘价>OPENORCLOSE=OPENANDCLOSE>1日前的收盘价时,在最低价和最高价位置之间画柱状线,宽度为0.1,0不为0则画空心柱.,画红色 当满足条件收盘价>OPENORCLOSE=OPENANDCLOSE>1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为7,0不为0则画空心柱.,画红色 当满足条件收盘价<OPENORCLOSE=OPENANDCLOSE<=1日前的收盘价时,在最低价和最高价位置之间画柱状线,宽度为0.1,0不为0则画空心柱.,画青色 当满足条件收盘价<OPENORCLOSE=OPENANDCLOSE<=1日前的收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为7,0不为0则画空心柱.,画青色 当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLOR00FF00 当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR008800 当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为7,0不为0则画空心柱.,COLOR009900 当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR00AA00 当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR00BB00 当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR00CC00 当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR00DD00 当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00EE00 当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00FF00 当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为0,0不为0则画空心柱. ,COLORFFBBFF 当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为8,0不为0则画空心柱. ,COLORFF00FF 当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为7,0不为0则画空心柱. ,COLORFF22FF 当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为6,0不为0则画空心柱. ,COLORFF44FF 当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为5,0不为0则画空心柱. ,COLORFF66FF 当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为4,0不为0则画空心柱. ,COLORFF88FF 当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱. ,COLORFF99FF 当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱. ,COLORFFAAFF 当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱. ,COLORFFBBFF DRAWTEXTABS(20,0,STKLABEL+' '+品种名称+' '),COLORFFFF80 输出持股线:收盘价的26日简单移动平均,线宽为2,COLOR6600FF 输出QJJ:(VARL13上穿VARL14ANDVARL14<0ANDCROSS(收盘价,持股线))的90日过滤,线宽为0 输出输出输出DRAWTEXTREL(0,900,'锁定:分批建仓.霸占:满仓待涨.逃跑:遵守纪律'),COLOR989500 输出VAR100赋值:'所属板块:' VAR100赋值:VAR100+' 电力' VAR100赋值:VAR100+' 电脑' VAR100赋值:VAR100+' 电器' VAR100赋值:VAR100+' 电子信息' VAR100赋值:VAR100+' 房地产' VAR100赋值:VAR100+' 纺织服装' VAR100赋值:VAR100+' 钢铁' VAR100赋值:VAR100+' 工程建筑' VAR100赋值:VAR100+' 供水供气' VAR100赋值:VAR100+' 化工' VAR100赋值:VAR100+' 化纤' VAR100赋值:VAR100+' 机械' VAR100赋值:VAR100+' 建材' VAR100赋值:VAR100+' 交通工具' VAR100赋值:VAR100+' 交通设施' VAR100赋值:VAR100+' 教育传媒' VAR100赋值:VAR100+' 金融' VAR100赋值:VAR100+' 旅游酒店' VAR100赋值:VAR100+' 煤炭石油' VAR100赋值:VAR100+' 酿酒食品' VAR100赋值:VAR100+' 农林牧渔' VAR100赋值:VAR100+' 其他行业' VAR100赋值:VAR100+' 汽车' VAR100赋值:VAR100+' 汽配' VAR100赋值:VAR100+' 商业连锁' VAR100赋值:VAR100+' 石化' VAR100赋值:VAR100+' 通信' VAR100赋值:VAR100+' 外贸' VAR100赋值:VAR100+' 医药' VAR100赋值:VAR100+' 仪电仪表' VAR100赋值:VAR100+' 有色金属' VAR100赋值:VAR100+' 运输物流' VAR100赋值:VAR100+' 造纸印刷' VAR100赋值:VAR100+' 安徽' VAR100赋值:VAR100+' 北京' VAR100赋值:VAR100+' 福建' VAR100赋值:VAR100+' 甘肃' VAR100赋值:VAR100+' 广东' VAR100赋值:VAR100+' 广西' VAR100赋值:VAR100+' 贵州' VAR100赋值:VAR100+' 海南' VAR100赋值:VAR100+' 河北' VAR100赋值:VAR100+' 河南' VAR100赋值:VAR100+' 黑龙江' VAR100赋值:VAR100+' 湖北' VAR100赋值:VAR100+' 湖南' VAR100赋值:VAR100+' 吉林' VAR100赋值:VAR100+' 江苏' VAR100赋值:VAR100+' 江西' VAR100赋值:VAR100+' 辽宁' VAR100赋值:VAR100+' 内蒙古' VAR100赋值:VAR100+' 宁夏' VAR100赋值:VAR100+' 青海' VAR100赋值:VAR100+' 山东' VAR100赋值:VAR100+' 山西' VAR100赋值:VAR100+' 陕西' VAR100赋值:VAR100+' 上海' VAR100赋值:VAR100+' 深圳' VAR100赋值:VAR100+' 四川' VAR100赋值:VAR100+' 天津' VAR100赋值:VAR100+' ***' VAR100赋值:VAR100+' 新疆' VAR100赋值:VAR100+' 云南' VAR100赋值:VAR100+' 浙江' VAR100赋值:VAR100+' 重庆' VAR100赋值:VAR100+' 3G' VAR100赋值:VAR100+' H股' VAR100赋值:VAR100+' QFII持股' VAR100赋值:VAR100+' ST' VAR100赋值:VAR100+' 奥运' VAR100赋值:VAR100+' 创投' VAR100赋值:VAR100+' 次新股' VAR100赋值:VAR100+' 大盘' VAR100赋值:VAR100+' 股权改革' VAR100赋值:VAR100+' 股权投资' DD赋值:FINANCE2(35) SS赋值:FINANCE2(37) GG赋值:FINANCE2(3) TH赋值:市盈(动) 输出输出输出输出DRAWTEXTABS(20,20,'总股本:'+NUMTOSTRN(DD,0)+'万股' +' 流通A股:'+NUMTOSTRN(SS,0)+'万股'+'市盈率:'+NUMTOSTRN(TH,2)+' 倍'+' 每股收益:'+NUMTOSTRN(GG,3)+' 元'),COLOR989500 DRAWTEXTABS(20,40,VAR100+' '),COLOR989500 当满足条件VAR11时,在收盘价*0.98位置书写文字,COLORFFFF00 当满足条件QJJ时,在收盘价*1.09位置画1号图标 当满足条件QJJ时,在最低价*0.78位置书写文字,COLOR00FFFF 当满足条件VARL2时,在收盘价*1.04位置书写文字,画绿色 CXH赋值:STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1)) 输出WARNING('HTTP://WWW.CXH99.COM',CURRENTTIME>180000 AND (CXH=1 OR CXH=6)) DRAWTEXTREL(10 ,10 ,'指标公式')

 来源:程序化99（ WWW.CXH99.COM ）

源码：

DRAWGBKLAST(CLOSE>0,STRIP(RGB(95,95,95),RGB(0,0,0),0));
varl13:=("macd.diff#WEEK"(26,12,9));
varl14:=("macd.dea#WEEK"(26,12,9));
VL:=REF(LOW,1); VH:=REF(H,1);
Var1:=SMA(ABS(H-Vh),13,1)/SMA(MAX(H-Vh,0),13,1)*100;
Var2:=SMA(ABS(L-VL),13,1)/SMA(MAX(L-VL,0),13,1)*100;
Var3:=MA(Var1,13);
Var4:=MA(Var2,13);
Var5:=LLV(L,34);
Var6:=HHV(H,34);
Var7:=EMA(IF(H>=Var6,Var3,0),3);
Var8:=EMA(IF(L<=Var5,Var4,0),3);
var9:=(SMA(SMA((((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54))) * 100),7,1),5,1));
var10:=((SMA(((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54)) * 100),7,1)) * 16.18) - (var9* 10.9);
Var11:=FILTER(IF(var10<=var9 AND Var8>REF(Var8,1),Var8*8,0),55);
Var21:=LLV(LOW,60);
Var31:=HHV(HIGH,60);
Var41:=EMA((CLOSE-Var21)/(Var31-Var21)*100,13);
Var51:=EMA(0.667*REF(Var41,1)+0.333*Var41,21);
varl2:=FILTER(CROSS(Var51,Var41) AND Var41>84,13);
{K线}
STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),LOW,HIGH,0.1,0),colorred;
STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),OPEN,CLOSE,7,0),colorred;
STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),LOW,HIGH,0.1,0),colorcyan;
STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),OPEN,CLOSE,7,0),colorcyan;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR008800;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLORFFBBFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLORFF00FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLORFF22FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLORFF44FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLORFF66FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLORFF88FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLORFF99FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLORFFAAFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLORFFBBFF;
DRAWTEXTABS(20,0,STKLABEL+' '+STKNAME+' '),ColorFFFF80;
持股线:MA(C,26),LINETHICK2,COLOR6600FF;
qjj:FILTER((CROSS(varl13,varl14) and varl14<0 and CROSS(c,持股线)),90),LINETHICK0;
DRAWTEXTREL(0,900,'锁定:分批建仓.霸占:满仓待涨.逃跑:遵守纪律'),Color989500;
var100:='所属板块:';
if inblock('电力')=1 then var100:=var100+' 电力';
if inblock('电脑')=1 then var100:=var100+' 电脑';
if inblock('电器')=1 then var100:=var100+' 电器';
if inblock('电子信息')=1 then var100:=var100+' 电子信息';
if inblock('房地产')=1 then var100:=var100+' 房地产';
if inblock('纺织服装')=1 then var100:=var100+' 纺织服装';
if inblock('钢铁')=1 then var100:=var100+' 钢铁';
if inblock('工程建筑')=1 then var100:=var100+' 工程建筑';
if inblock('供水供气')=1 then var100:=var100+' 供水供气';
if inblock('化工')=1 then var100:=var100+' 化工';
if inblock('化纤')=1 then var100:=var100+' 化纤';
if inblock('机械')=1 then var100:=var100+' 机械';
if inblock('建材')=1 then var100:=var100+' 建材';
if inblock('交通工具')=1 then var100:=var100+' 交通工具';
if inblock('交通设施')=1 then var100:=var100+' 交通设施';
if inblock('教育传媒')=1 then var100:=var100+' 教育传媒';
if inblock('金融')=1 then var100:=var100+' 金融';
if inblock('旅游酒店')=1 then var100:=var100+' 旅游酒店';
if inblock('煤炭石油')=1 then var100:=var100+' 煤炭石油';
if inblock('酿酒食品')=1 then var100:=var100+' 酿酒食品';
if inblock('农林牧渔')=1 then var100:=var100+' 农林牧渔';
if inblock('其他行业')=1 then var100:=var100+' 其他行业';
if inblock('汽车')=1 then var100:=var100+' 汽车';
if inblock('汽配')=1 then var100:=var100+' 汽配';
if inblock('商业连锁')=1 then var100:=var100+' 商业连锁';
if inblock('石化')=1 then var100:=var100+' 石化';
if inblock('通信')=1 then var100:=var100+' 通信';
if inblock('外贸')=1 then var100:=var100+' 外贸';
if inblock('医药')=1 then var100:=var100+' 医药';
if inblock('仪电仪表')=1 then var100:=var100+' 仪电仪表';
if inblock('有色金属')=1 then var100:=var100+' 有色金属';
if inblock('运输物流')=1 then var100:=var100+' 运输物流';
if inblock('造纸印刷')=1 then var100:=var100+' 造纸印刷';
if inblock('安徽')=1 then var100:=var100+' 安徽';
if inblock('北京')=1 then var100:=var100+' 北京';
if inblock('福建')=1 then var100:=var100+' 福建';
if inblock('甘肃')=1 then var100:=var100+' 甘肃';
if inblock('广东')=1 then var100:=var100+' 广东';
if inblock('广西')=1 then var100:=var100+' 广西';
if inblock('贵州')=1 then var100:=var100+' 贵州';
if inblock('海南')=1 then var100:=var100+' 海南';
if inblock('河北')=1 then var100:=var100+' 河北';
if inblock('河南')=1 then var100:=var100+' 河南';
if inblock('黑龙江')=1 then var100:=var100+' 黑龙江';
if inblock('湖北')=1 then var100:=var100+' 湖北';
if inblock('湖南')=1 then var100:=var100+' 湖南';
if inblock('吉林')=1 then var100:=var100+' 吉林';
if inblock('江苏')=1 then var100:=var100+' 江苏';
if inblock('江西')=1 then var100:=var100+' 江西';
if inblock('辽宁')=1 then var100:=var100+' 辽宁';
if inblock('内蒙古')=1 then var100:=var100+' 内蒙古';
if inblock('宁夏')=1 then var100:=var100+' 宁夏';
if inblock('青海')=1 then var100:=var100+' 青海';
if inblock('山东')=1 then var100:=var100+' 山东';
if inblock('山西')=1 then var100:=var100+' 山西';
if inblock('陕西')=1 then var100:=var100+' 陕西';
if inblock('上海')=1 then var100:=var100+' 上海';
if inblock('深圳')=1 then var100:=var100+' 深圳';
if inblock('四川')=1 then var100:=var100+' 四川';
if inblock('天津')=1 then var100:=var100+' 天津';
if inblock('***')=1 then var100:=var100+' ***';
if inblock('新疆')=1 then var100:=var100+' 新疆';
if inblock('云南')=1 then var100:=var100+' 云南';
if inblock('浙江')=1 then var100:=var100+' 浙江';
if inblock('重庆')=1 then var100:=var100+' 重庆';
if inblock('3G')=1 then var100:=var100+' 3G';
if inblock('H股')=1 then var100:=var100+' H股';
if inblock('QFII持股')=1 then var100:=var100+' QFII持股';
if inblock('ST')=1 then var100:=var100+' ST';
if inblock('奥运')=1 then var100:=var100+' 奥运';
if inblock('创投')=1 then var100:=var100+' 创投';
if inblock('次新股')=1 then var100:=var100+' 次新股';
if inblock('大盘')=1 then var100:=var100+' 大盘';
if inblock('股权改革')=1 then var100:=var100+' 股权改革';
if inblock('股权投资')=1 then var100:=var100+' 股权投资';
DD:=FINANCE2(35);
SS:=FINANCE2(37);
GG:=FINANCE2(3);
TH:=DYNAINFO(39);
DRAWTEXTABS(20,20,'总股本:'+NUMTOSTRn(DD,0)+'万股' +' 流通A股:'+NUMTOSTRn(SS,0)+'万股'+'市盈率:'+NUMTOSTRn(TH,2)+' 倍'+' 每股收益:'+NUMTOSTRn(GG,3)+' 元'),Color989500;
DRAWTEXTABS(20,40,var100+' '),Color989500;
DRAWTEXT(var11,C*0.98,'锁定'),ColorFFFF00;
DRAWICON(qjj,C*1.09,1);
DRAWTEXT(qjj,l*0.78,'霸占大牛股'),COLOR00FFFF;
DRAWTEXT(varl2,C*1.04,'逃跑'),Colorgreen;CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.cxh99.com',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指标公式');

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】