m1=5 2 1000 m2=10 2 1000 日期全推10 0 100
{操盘趋势}{海底火山}
drawgbk(c, colorrgb(0,20,40) ,colorrgb(0,110,150),1);
nnss:=sysparam(3)-sysparam(2)+1;
hhss:=hhv(c,nnss);
llss:=llv(c,nnss);
最高hh:=hhss[sysparam(3)];
最低ll:=llss[sysparam(3)];
海面:=最低ll+(最高hh-最低ll)*0.1;hhw:=c*0.15;
rsv:=(close - llv(low,18))/(hhv(high,18) - llv(low,18));
k:=ema(rsv,3);
d:=ema(k,3);
j:=3*k-2*d;
hhca:=海面;
山:=(3*k-2*d);
kdj1:=ref(count(j<ref(j,1),5)>=3,1) and ref(j,1)<0.2;
kdj2:=j>ref(j,1);
限制画线时限:=range(barpos,sysparam(3)-120,sysparam(3)+1);
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.90+hhca),coloradba9c;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.77+hhca),color9caa8c;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.74+hhca),color8c9a73;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.70+hhca),color738a63;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.67+hhca),color637552;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.63+hhca),color526542;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.57+hhca),color425531;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.51+hhca),color314521;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.45+hhca),color213010;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.40+hhca),color102000;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.80+hhca),color8ccfa5;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.78+hhca),color7bc79c;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.75+hhca),color5ab684;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.71+hhca),color4aa673;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.68+hhca),color398e63;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.64+hhca),color39825a;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.58+hhca),color317552;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.52+hhca),color29694a;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.46+hhca),color295d42;
fillrgn(datatype>5 and 山>0 and限制画线时限,hhca,山*hhw*0.40+hhca),color215139;
火山:stickline(山<=0 and限制画线时限,hhca,-山*hhw*6.50+hhca,10,0),color8800aa;
stickline(山<=0 and限制画线时限,hhca,-山*hhw*6.45+hhca,10,0),color8811aa;
stickline(山<=0 and限制画线时限,hhca,-山*hhw*5.40+hhca,10,0),color8800bb;
stickline(山<=0 and限制画线时限,hhca,-山*hhw*6.35+hhca,10,0),color8811bb;
stickline(山<=0 and限制画线时限,hhca,-山*hhw*4.30+hhca,10,0),color8800cc;
stickline(山<=0 and限制画线时限,hhca,-山*hhw*4.25+hhca,10,0),color8811cc;
stickline(山<=0 and限制画线时限,hhca,-山*hhw*3.20+hhca,10,0),color8800dd;
stickline(山<=0 and限制画线时限,hhca,-山*hhw*3.15+hhca,10,0),color8811dd;
stickline(山<=0 and限制画线时限,hhca,-山*hhw*2.10+hhca,10,0),color8800ee;
stickline(山<=0 and限制画线时限,hhca,-山*hhw*2.05+hhca,10,0),color8811ee;
stickline(山<=0 and限制画线时限,hhca,-山*hhw*1.50+hhca,10,0),color8800ff;
stickline(山<=0 and限制画线时限,hhca,-山*hhw*1.35+hhca,10,0),color8811ff;
stickline(c>o ,h,l,0.1,0),colorred;
stickline(c>o ,c,o,8.5,1),colorred;
stickline(c<=o ,h,l,0.1,0),colorcyan;
stickline(c<=o ,c,o,8.5,1),colorcyan;
drawtext(限制画线时限 and filter(kdj1 and kdj2,3),hhca*1.1,'△\n△\n△'),align,colorff00ee;
{股票概况}
流通〖亿〗:capital/1000000,linethick0;
5换:sum(100*v/capital,5),linethick0;
10换:sum(100*v/capital,10),linethick0;
20换:sum(100*v/capital,20),linethick0;
压力:ma(ref(hhv(c,30),1),2),color9dffff;
支撑:ma(ref(llv(c,30),1),2),colorabff46;
drawtext((barpos = sysparam(2)),high,('所属板块:' + blkname)+ '\n')align4,colorred;
diff:=ema(close,12)-ema(close,26);
dea:=ema(diff,9);
macd:=2*(diff-dea);
a:=hhv(diff,300);
b:=macd-ref(macd,1);
k1:=sysparam(3)-sysparam(2)+1;
diff1:=hhv(diff,k1);
dea1:=hhv(dea,k1);
macd1:=hhv(macd,k1);
diff2:=llv(diff,k1);
dea2:=llv(dea,k1);
macd2:=llv(macd,k1);
mxa:=max(diff1[datacount],max(dea1[datacount],macd1[datacount]));
mna:=min(diff2[datacount],min(dea2[datacount],macd2[datacount]));
a2:=(mxa+mna)/2;
a3:=mxa-mna;
h1:=hhv(high,k1);
l1:=llv(low,k1);
mxb:=h1[datacount];
mnb:=l1[datacount];
b2:=(mxb+mnb)/2;
b3:=mxb-mnb;
diffa:=(diff-a2)*b3/a3+b2;
deaa:=(dea-a2)*b3/a3+b2;
macda:=(macd-a2)*b3/a3+b2;
b4:=-a2*b3/a3+b2;
低位金叉:=cross(diff,dea) and diff<-0.1;
stickline(低位金叉,b4,b4+b3/20,6,0),colorffff;
drawtext(低位金叉,b4+b3/20,' 低位金叉'),colorffff;
jccount:=count(cross(diff,dea),barslast(dea>=0));
二次金叉:=cross(diff,dea) and dea<0 and count(jccount=2,21)=1;
stickline(二次金叉,b4,b4-b3/40,2,0),colorff00ff;
drawtext(二次金叉,b4-b3/40,' 二次金叉'),align0,colorff00ff;
{操盘线}
maa:=ma(c,3);
mab:=ma(c,8);
fillrgn(maa<mab,maa,mab),colorgreen;
fillrgn(maa>mab,maa,mab),color4440ff;
{立体k线}
stickline(close>open,open,low,0.5,0 ),color0000ff;
stickline(close>open,close,high,0.5 ,0 ),color0000ff;
stickline(open>=close,close,low,0.5 ,0 ),colorcyan;
stickline(open>=close,open,high,0.5 ,0 ),colorcyan;
stickline(open>=close ,close ,open,7,0 ),colorff7700;
stickline(open>=close ,close ,open,6,0 ),colorff9900;
stickline(open>=close ,close ,open,5,0 ),colorffbb00;
stickline(open>=close ,close ,open,4,0 ),colorffcc00;
stickline(open>=close ,close ,open,3,0 ),colorffdd00;
stickline(open>=close ,close ,open,2,0 ),colorffee00;
stickline(open>=close ,close ,open,1,0 ),colorffff00;
stickline(close>open,close,open,7,0) ,color000055;
stickline(close>open,close,open,6,0) ,color000066;
stickline(close>open,close,open,5,0) ,color000077;
stickline(close>open,close,open,4,0) ,color000099;
stickline(close>open,close,open,3,0) ,color0000bb;
stickline(close>open,close,open,2,0) ,color0000dd;
stickline(close>open,close,open,1,0) ,color0000ff;
ma1:ma(close,m1),coloryellow,linethick0;
ma2:ma(close,m2),colorwhite,linethick0;
{加仓}
typ_d:=(high+low+close)/3;
cci_d:=(typ_d-ma(typ_d,14))/(0.015*avedev(typ_d,14));
cci1_d:=ema(ema(ema(cci_d,2),2),2);
cci2_d:=ema(ema(ema(cci_d,3),2),2);
x_d:=(cross(cci1_d,cci2_d) or (cci1_d >=cci2_d))
and cci1_d>=-101 andcci1_d>=ref(cci1_d,1)
and ref(cci1_d,1)<-101 ;
rsv_d:=(close-llv(low,9))/(hhv(high,9)-llv(low,9))*100;
k_d:=sma(rsv_d,3,1);
d_d:=sma(k_d,3,1);
j_d:=3*k_d-2*d_d;
k1_d:= ema(ema(ema(k_d,2),2),2);
d1_d:= ema(ema(ema(d_d,2),2),2);
j1_d:= ema(ema(ema(j_d,2),2),2);
y_d:= j1_d > ref(j1_d,1) ;
加仓:=x_dand y_d;
stickline(加仓,close ,open,8,0),coloraa00bb;
stickline(加仓,close ,open,6,0),colorbb11bb;
stickline(加仓,close ,open,4,0),colorcc22bb;
stickline(加仓,close ,open,3,0),colordd33bb;
stickline(加仓,close ,open,2,0),coloree44bb;
stickline(加仓,close ,open,1,0),colorff55bb;{短线强势}
流通:=(amount / vol);
资金流量:=(close-ref(close,1))*流通;
var111:=sma(资金流量,10,1);
mid1:=ma(var111,26);
upper:=mid1 + 2*std(var111,26);
短线强势:=cross(var111,upper) and c>=o;
stickline(短线强势,close ,open,7,0),coloraaff;
stickline(短线强势,close ,open,5.6,0),colorbbff;
stickline(短线强势,close ,open,4.4,0),colorccff;
stickline(短线强势,close ,open,3.3,0),colorddff;
stickline(短线强势,close ,open,2.2,0),coloreeff;
stickline(短线强势,close ,open,1.1,0),colorffff;
lc:=ref(close,1);
rsi:=((sma(max((close - lc),0),3,1) / sma(abs((close - lc)),3,1)) * 100);
ff:=ema(close,3);
ma15:=ema(close,21);
drawtext(cross(ff,ma15),(low * 0.99),'底背离'),color1880ff;
drawtext(cross(88,rsi),(high * 1.02),'顶背离'),colora6e500;
drawtext(cross("kdj.k#week"(9,3,3),"kdj.d#week"(9,3,3)) ,l,'★k'),coloryellow;
drawtext(cross("macd.dea#week"(12,26,9),"macd.diff#week"(12,26,9)) ,l,'☆m'),coloryellow;
hhv(ema(c,2),2)colorwhite,linethick0;
llv(ema(c,2),1)coloryellow,linethick0;
aa1:=amount/v;
bb1:=l<aa1*0.9;
cc1:=(c-ref(c,1))/ref(c,1)*100>1.2;
dd1:=l<ma(c,5)*0.921;
ee1:=v<ma(v,5)*1.5;
ff1:=bb1 and cc1 and dd1 and ee1;
drawtext(ff1,(low* 0.97),'老鼠仓'),color4080ff;
//sat:=if((amount/c)/(hhv(amount,20)/hhv(c,20))*100>100,100,(amount/c)/(hhv(amount,20)/hhv(c,20))*100);
//drawtextrel(12,5,'量能饱和度:'+numtostrn(sat,0)),linethick3,color8000ff;
x1:=(c+l+h)/3;
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;
ema8:=ema(c,8);
drawtext(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),
ema8,'∠45上升'),colorwhite;
这是我七拼八凑的飞狐主图公式还好发出来希望多造福些人,另请帮我改成大智慧l2,并去掉没用的,谢谢。
点击看大图
上一指标公式:孤岛判势公式 飞狐孤岛指标 源码
下一指标公式:多头进场版公式 飞狐多头进场指标 源码
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文操盘趋势-海底火山公式 飞狐操盘指标 源码仅供学习研究。