
{精品布林}
n:=20;
drawgbk(currbarscount=1, rgb(110,108,108),rgb(88,30,0),0,'',0);
boll:ma(close,n),colorgreen,linethick2;
if(boll>ref(boll,1),boll,drawnull),colorred,linethick2;
upper:boll+2*std(close,n),colorcyan;
lower:boll-2*std(close,n),color0088ff;
{量能平台}
n1:=30;
t1:=const(hhvbars(v,n1));
t0:if(currbarscount<=n1+7,const(if(t1=0,c,ref(c,t1))),drawnull),linethick3;
if(currbarscount=t1+1,t0,drawnull),circledot;
drawtext(islastbar,t0,' 量能平台');
stickline(islastbar,hhv(c,5)*0.95-0.01,hhv(c,5)*0.95,100,0),colorwhite,linethick3;
drawnumber(islastbar,hhv(c,5)*0.95-0.01,hhv(c,5)*0.95),linethick3;
止损点:=(islastbar,hhv(c,5)*0.95-0.01,hhv(c,5)*0.95),linethick3;
drawtext(islastbar ,止损点,' 止损点'),linethick3;
{压力一}
ty:=c;
a1:=ref(ty,10)=hhv(ty,2*10+1); b1:=filter(a1,10); c1:=backset(b1,10+1); hd:=filter(c1,10);
a2:=ref(ty,10)=llv(ty,2*10+1); b2:=filter(a2,10); c2:=backset(b2,10+1); ld:=filter(c2,10);
前期高位:ref(c,barslast(hd)),color00ff00,pointdot;
stickline(c,前期高位,前期高位,8,0),coloryellow;
ma18:=ma(c,18);
var1:=c=hhv(c,4) and ref(c,1)=llv(c,4);
var2:=c=llv(c,4) and (ref(c,1)<ref(c,2) or ref(c,1)<ref(c,3)) or ref(c,1)=llv(c,4) and c<ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)=hhv(c,4) and c<ref(c,1) or ref(c,3)=llv(c,4) and c<ref(c,1) and c<ref(c,2);
var3:=ref(c,1)=llv(c,4) and c>=ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<=ref(c,3) and ref(c,2)<ref(c,4) and c>=ref(c,1);
a:=(3*c+l+o+h)/6;
var4:=(20*a+19*ref(a,1)+18*ref(a,2)+17*ref(a,3)+16*ref(a,4)+15*ref(a,5)+
14*ref(a,6)+13*ref(a,7)+12*ref(a,8)+11*ref(a,9)+10*ref(a,10)+9*ref(a,11)+8*ref(a,12)
+7*ref(a,13)+6*ref(a,14)+5*ref(a,15)+4*ref(a,16)+3*ref(a,17)+2*ref(a,18)+ref(a,20))/210;
mtm:=c-ref(c,1);
dx:=100*ema(ema(mtm,6),6)/ema(ema(abs(mtm),6),6);
cb:=ema(var4,13);
{红}
stickline(close>=open,close,open,3,0),color0000ff;
stickline(close>=open,close,open,0.5,0),colorcc66ff;
{蓝}
stickline(close<open,close,open,3,0),colorff9900;
stickline(close<open,close,open,0.5,0),colorffcc00;
{粉}
stickline(var1,c,(o+c)/2,3,0),colorff11ff;
stickline(var1,c,(o+c)/2,0.5,0),colorffddff;
{灰}
stickline(var2,c,(o+c)/2,3,0),color999999;
stickline(var2,c,(o+c)/2,0.5,0),colorffbbff;
{绿}
stickline(var3,o,(o+c)/2,3,0),color00bb00;
stickline(var3,o,(o+c)/2,0.5,0),color00ff00;
卖:=hhv(dx,2)=hhv(dx,7) and count(dx>50,2) and cross(ma(dx,2),dx);
drawtext(filter(卖=1,1),high*1.02,'卖'),colorgreen;
买:=llv(dx,2)=llv(dx,7) and count(dx<0,2) and cross(dx,ma(dx,2));
drawtext(filter(买=1,5),low-0.03,'买'),colorred;
加仓:=sma(ema((c-ref(c,1))/ref(c,1),5)*100,3,1)*10;
drawtext(filter((cross(加仓,0) or cross(close,cb)) and 买=1,3),low-0.03,'加'),colorwhite;
跟:=ma18>=ref(ma18,3) and cross(close,ma18);
drawtext(跟,low*0.96,'跟'),colorcc66ff;
jrh:=hhv(c,2);
jrl:=llv(c,2);
var01:=(close>ref(close,1) and close>ref(close,2));
var02:=(ref(var01,1) and close<=ref(close,1) and close>=ref(close,2));
var03:=(ref(var02,1) and close>=ref(close,1) and close<=ref(close,2));
var04:=(ref(var03,1) and close<=ref(close,1) and close>=ref(close,2));
var05:=(ref(var04,1) and close>=ref(close,1) and close<=ref(close,2));
var06:=(ref(var05,1) and close<=ref(close,1) and close>=ref(close,2));
var07:=(ref(var06,1) and close>=ref(close,1) and close<=ref(close,2));
var08:=(ref(var07,1) and close<=ref(close,1) and close>=ref(close,2));
var09:=(ref(var08,1) and close>=ref(close,1) and close<=ref(close,2));
vara:=(ref(var09,1) and close<=ref(close,1) and close>=ref(close,2));
varb:=(ref(vara,1) and close>=ref(close,1) and close<=ref(close,2));
varc:=(ref(varb,1) and close<=ref(close,1) and close>=ref(close,2));
vard:=(close<ref(close,1) and close<ref(close,2)); {gupiaoff.com}
vare:=(ref(vard,1) and close>=ref(close,1) and close<=ref(close,2));
varf:=(ref(vare,1) and close<=ref(close,1) and close>=ref(close,2));
var010:=(ref(varf,1) and close>=ref(close,1) and close<=ref(close,2));
var011:=(ref(var010,1) and close<=ref(close,1) and close>=ref(close,2));
var012:=(ref(var011,1) and close>=ref(close,1) and close<=ref(close,2));
var013:=(ref(var012,1) and close<=ref(close,1) and close>=ref(close,2));
var014:=(ref(var013,1) and close>=ref(close,1) and close<=ref(close,2));
var015:=(ref(var014,1) and close<=ref(close,1) and close>=ref(close,2));
var016:=(ref(var015,1) and close>=ref(close,1) and close<=ref(close,2));
var017:=(ref(var016,1) and close<=ref(close,1) and close>=ref(close,2));
var018:=(ref(var017,1) and close>=ref(close,1) and close<=ref(close,2));
var019:=((ref(vard or vare or varf or var010 or var011 or var012 or var013 or var014 or var015 or var016 or var017 or var018,1)) and var01);
var1a:=((ref(var01 or var02 or var03 or var04 or var05 or var06 or var07 or var08 or var09 or vara or varb or varc,1)) and vard);
红色持股:=var01 or var02 or var03 or var04 or var05 or var06 or var07 or var08 or var09 or vara or varb or varc,color0000ff,nodraw;
离场:=if(红色持股,jrl,drawnull);
明离场价:=离场,colorff99ff,nodraw;
青色观望:=vard or vare or varf or var010 or var011 or var012 or var013 or var014 or var015 or var016 or var017 or var018,colorffff00,nodraw;
进:=if(青色观望,jrh,drawnull);
{分析家公式http://www.goodgongshi.com}
今离场价:ref(离场,1),color0000ff,nodraw;
明进场价:=进,color33aacc,nodraw;
今进场价:ref(明进场价,1),colorgreen,nodraw;
tj1:=l< ref(l,1) or ref(l,1)<ref(l,2);
tj2:=ref(c,1)<ref(o,1);
tj3:=c>o;
xg:=tj1 and tj2 and tj3;
drawtext(xg,ref(c,2),'-------------------'),colorred;
上涨家数:indexadv,color0080ff,nodraw;
下跌家数:indexdec,colorgreen,nodraw;
自动c:=indexc;
自动o:=indexo;
自动h:=indexh;
自动l:=indexl;
大盘低:=const(llv(自动l,120));
大盘高:=const(hhv(自动h,120));
大盘差:=大盘高-大盘低;
当前低:=const(llv(l,120));
当前高:=const(hhv(h,120));
当前差:=当前高-当前低;
比:=当前差*1.2/大盘差;
变c:=当前低+(自动c-大盘低)*比;
变h:=当前低+(自动h-大盘低)*比;
变l:=当前低+(自动l-大盘低)*比;
变o:=当前低+(自动o-大盘低)*比;
stickline(currbarscount<10 and 变c<变o,变h,变l,0,0),colorgreen;
stickline(currbarscount<10 and 变c>=变o,变h,变l,0,0),colormagenta;
stickline(currbarscount<10 and 变c<变o,变o,变c,2,0),colorgreen;
stickline(currbarscount<10 and 变c>=变o,变o,变c,2,0),colormagenta;
drawkline(h,o,l,c);
drawtext_fix(1,0.00,0,0,'所属行业:')colorcyan;
drawtext_fix(1,0.06,0,0,hyblock),colorwhite;
drawtext_fix(1,0.14,0,0,'所属地区:')colorcyan;
drawtext_fix(1,0.20,0,0,dyblock),colorwhite;
;
drawtext_fix(1,0.00,0.05,0,'主营业务:')colorcyan;
drawtext_fix(1,0.06,0.05,0,externstr(0,3)),colorred;
;
drawtext_fix(1,0.00,0.15,0,'莸利比例:'),coloryellow;
drawnumber_fix(1,0.06,0.15,0,const(winner(c )*100)),colorwhite;
drawtext_fix(1,0.22,0.15,0,'市值:'),coloryellow;
drawnumber_fix(1,0.26,0.15,0,finance(40)/100000000),colorwhite;
drawtext_fix (1,0.31,0.15,0,'公积金(股):'),coloryellow;
drawnumber_fix(1,0.38,0.15,0,finance(18)),colorwhite;
drawtext_fix (1,0.43,0.15,0,'收益:'),coloryellow;
drawnumber_fix(1,0.47,0.15,0,finance(33)),colorwhite;
var111:=zig(3,13);
stickline((ref(var111,2) < ref(var111,1)) and (var111 < ref(var111,1)),close,open,3,0),color66ff00;
drawtext_fix(stickline((ref(var111,2) < ref(var111,1)) and (var111 < ref(var111,1)),close,open,5,0),0.00,0.11,0,''),color00ff00,linethick1;
dif:=ema(close,12)-ema(close,26);
dea:=ema(dif,9);
macd:=(dif-dea)*2;
var113:=hhv(high,60);
var114:=llv(low,30);
var115:=(close-ma(close,32))/ma(close,32)*100;
var116:=(var113+var114+var115)/3;
var117:=ema(var116,5);
k01:=ema(var117,5)*2, colorff00ff;
d01:=ema(k01,5), colorwhite;
j01:=k01*3-d01*2, coloryellow;
enterlong:=cross(k01,d01);
exitlong:=cross(d01,k01);
b01:=(drawicon((zig(3,5)>ref(zig(3,5),1)) and (ref(zig(3,5),1)<=ref(zig(3,5),2))
and (ref(zig(3,5),2)<=ref(zig(3,5),3)),l*0.98,1))*d01*2/3;
b02:=if(troughbars(3,15,1)=1 and high>low+0.01,20,0);
必卖:=if(peakbars(3,15,1)=1,80,100),colorgreen,linethick1;
qq:=必卖=80;
b03:=((zig(3,5)>ref(zig(3,5),1)) and (ref(zig(3,5),1)<=ref(zig(3,5),2)) and (ref(zig(3,5),2)<=ref(zig(3,5),3)));
v1:=ema(close,60)-ema(close,300);
v2:=ema(v1,300);
v3:=(close-(low,8))/((high,8)-llv(low,8))*100;
v4:=sma(v3,2,1),nodraw;
v5:=sma(v4,2,1),nodraw;
v6:=close/ref(close,3)>=1.1;
v7:=backset(v6,3);
大涨:=(v7 and count(v7,3)=1);
总股本:=strcat(strcat('总股本: ',con2str(totalcapital/1000000,2)),'亿');
流通盘:=strcat(strcat(' 流通盘: ',con2str(capital/1000000,2)),'亿');
全流通:=strcat(' 全流通: ',con2str((capital/1000000)/(totalcapital/1000000),2));
市值:=strcat(strcat(' 流通市值: ',con2str((capital/1000000)*c,2)),'亿');
上市日期:=strcat(' 上市天数: ',con2str(finance(42),0));
股本市值:=strcat('股本市值: ',strcat(strcat(strcat(strcat(总股本,流通盘),全流通),市值),上市日期));
{}
市盈率:=strcat('市盈率: ',con2str(c/finance(33),2));
市销率:=strcat(' 市销率: ',con2str(c/(finance(20)/finance(1)),2));
市净率:=strcat(' 市净率: ',con2str(c/finance(34),2));
净资收益率:=strcat(' 净资收益率: ',con2str(finance(33)/finance(34)*100,2));
毛利率:=strcat(' 毛利率: ',con2str((finance(20)-finance(21))/finance(20)*100,2));
净利润率:=strcat(' 净利润率 ',con2str(finance(30)/finance(20)*100,2));
主营利润率:=strcat(' 主营利润率 ',con2str(finance(23)/finance(20)*100,2));
利润同比:=strcat(' 利润同比: ',con2str(finance(43),2));
收入同比:=strcat(' 收入同比: ',con2str(finance(44),2));
当前业绩:=strcat('当前业绩: ',strcat(strcat(strcat(strcat(strcat(strcat(strcat(strcat(市盈率,市销率),市净率),净资收益率),毛利率),净利润率),主营利润率), 利润同比), 收入同比));
{}
x1:=(finance(11)-finance(15))/finance(10)*1.2;
x2:=(finance(31)+finance(17))/finance(10)*1.4;{盈余公积用资本公积金代替};
x3:=finance(23)/finance(10)*3.3;
x4:=finance(19)/finance(15)*0.6;{缺长期负债或负债总额}
x5:=finance(20)/finance(15)*0.999;
z值:=x1+x2+x3+x4+x5;
预警:=if(z值<1.2,'重警',if(z值>=1.2 and z值<2.6,'轻警','无警'));
财务预警:=strcat('财务预警: ',strcat(预警,strcat('-z值: ',con2str(z值,3))));
优质资产率:=strcat(' 优质资产率: ',con2str((finance(19)-finance(22)-finance(27))/finance(19),2));{理论上越大越好但不同行业有不同标准};
现金负债比:=strcat(' 现金负债比: ',con2str(finance(25)/finance(15),3));{缺长期负债或负债总额,理论上越大越好但不同行业有不同标准};
财务系数:=strcat('风险系数: ',strcat(strcat(财务预警,优质资产率),现金负债比));
{}
drawtext_fix(islastbar,0.005,0.01,0,财务系数),colorcyan;
drawtext_fix(islastbar,0.005,0.06,0,当前业绩),colorlimagenta;
drawtext_fix(islastbar,0.005,0.115,0,股本市值),coloryellow;




上一指标公式:超级MACD 通达信MACD
下一指标公式:超强选股 副图/选股 有未来 通达信未来源码
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文精品布林 主图 通达信精品布林仅供学习研究。