发一个很实用的附图指标源代码:
1 m 缺省0.7最小0.3最大 0.9
2 n 缺省3.3最小3.1最大3.6
vol=amount;
var1:=vol/((high-low)*2-abs(close-open));
var2:=dynainfo(7)=close and dynainfo(10)=amount;
{if(dynainfo(7)=close and dynainfo(10)=amount,var1,var3),colorgreen;}
主买:if(close>open,var1*(high-low),if(close<open,var1*((high-open)+(close-low)),vol/2)),colorred,pointdot;
主卖:if(close>open,var1*((high-close)+(open-low)),if(close<open,var1*(high-low),vol/2)),color00ff00,pointdot;
主买盘:=if(close>open,var1*(high-low),if(close<open,var1*((high-open)+(close-low)),vol/2));
主卖盘:=if(close>open,var1*((high-close)+(open-low)),if(close<open,var1*(high-low),vol/2));
stickline(主买盘>0,0,主买盘,1,0),colorred;
stickline(主卖盘<0,vol,主买盘,1,0),color00ff00;
额:=amount/10000000;
资金进:ma(主买盘/10000,4),colorred;
资金出:ma((主卖盘/10000),4),color00ff00;
bb:=(主买盘+主卖盘);
stickline(资金进>资金出,资金进,资金出,6,0),colorred;
stickline(资金进<资金出,资金出,资金进,6,0),colorgreen;
stickline(资金进>资金出,资金进,资金出,6,0),colorred;
stickline(资金进<资金出,资金出,资金进,6,0),colorgreen;
aa:=vol/((high-low)*2-abs(close-open));
换手率:=vol/capital*100;
主力吸筹:换手率>3 and 换手率<=5,colormagenta;
加快吸筹:换手率>5 and 换手率<=7,color99ff;
stickline(主力吸筹,0,vol,9,0),colormagenta;
stickline(加快吸筹,0,vol,9,0),color99ff;
var1:=dynainfo(17)*ref(ma(vol,5),1);
var2:=dynainfo(7)=close and dynainfo(10)=amount;
预测v1:=if(dynainfo(7)=close and dynainfo(10)=amount,var1,var2);
预测v:if(vol>=预测v1,vol,预测v1),linethick0;
比:=预测v/vol;
wj:=(high+low+close)/3;
v1:=if(high=low,1,high-max(open,close));
v2:=if(high=low,1,max(close,open)-wj);
v3:=if(high=low,1,min(open,close)-low);
v4:=if(high=low,1,wj-min(close,open));
v5:=vol/if(high=low,4,high-low);
v6:=(v1*v5);
v7:=(v2*v5);
v8:=(v3*v5);
v9:=(v4*v5);
买盘1:=dynainfo(23)*比;
卖盘1:=dynainfo(22)*比;
买盘2:=(v9+v8)*比;
卖盘2:=(v6+v7)*比;
买盘:=if(stktype<>0 and barstatus=2 and datatype=6,买盘1,买盘2);
卖盘:=if(stktype<>0 and barstatus=2 and datatype=6,卖盘1,卖盘2);
var1:=vol/((high-low)*2-abs(close-open));
成交:vol,pointdot,colore4c1ee;
主买:=if(close>open,var1*(high-low),if(close<open,var1*((high-open)+(close-low)),vol/2)),colorred,pointdot;
主卖:=if(close>open,var1*((high-close)+(open-low)),if(close<open,var1*(high-low),vol/2)),color00ff00,pointdot;
volume:=vol;
var1:=vol/((high-low)*2-abs(close-open));
volume:=vol;
var2:=ma(volume,5);
var3:=ma(volume,10);
var4:=ma(volume,20);
var5:=ma(volume,60);
前量比:=vol/ref(vol,1); 五量比:=vol/var2; 六量比:=vol/var5;
partline(ma(vol,5)>=ref(ma(vol,5),1),ma(vol,5)),colorred,linethick3;
partline(ma(vol,5)<=ref(ma(vol,5),1),ma(vol,5)),color00c700,linethick3;
variable:wday[7]='星期六';wday[1]:='星期日';wday[2]:='星期一';
wday[3]:='星期二';wday[4]:='星期三';wday[5]:='星期四';wday[6]:='星期五';
fy:=year;fm:=month;fd:=day;wd:=weekday;p:=sysparam(1);bb:=barpos;
str1:=''+numtostr(fy[p],0)+'年'+numtostr(fm[p],0)+'月'+numtostr(fd[p],0)+'日 '+wday[wd[p]+1];
sj:=openminutes(currenttime)>1 and openminutes(currenttime)<239;
lj0:=vol/if(high=low,4,high-low);jj:=(high+low+close)/3;
特大:if(capital=0,lj0*(jj-min(close,open)),lj0*if(high=low,1,(min(open,close)-low))),precision0,color0000ff,linethick;
大户:if(capital=0,lj0*(min(open,close)-low),lj0*if(high=low,1,(jj-min(close,open)))),precision0,colorff00ff,linethick;
中户:if(capital=0,lj0*(high-max(open,close)),lj0*if(high=low,1,(high-max(open,close)))),precision0,color00ff00,linethick;
小股民:if(capital=0,lj0*(max(close,open)-jj),lj0*if(high=low,1,(max(close,open)-jj))),precision0,colorff6600,linethick;
总1:=(特大+大户)-(中户+小股民);总:=vol;
ww:=sysparam(2);n1:=sysparam(3);nn:=n1-ww+1;hh:=hhv(总,nn);ll:=llv(总,nn);
zg:=hh[n1];zd:=ll[n1];中0:=zd+(zg-zd)*0.5;中:=中0*0.05;cm:=sum(总1,25);
zj:=ref(总1,1);zsb:=(总1-ref(总1,1))/总*100;
zsa:=cm/if(stktype=0,sum(vol,25),if(stktype=13,sum(vol,10),capital));
cc:=ref(close,barslast(fm>ref(fm,1)));主力成本:=(cc*(特大+大户)*100)/(特大+大户)/100;
df1:=ema(close,12)-ema(close,26);da1:=ema(df1,9);
lj6:=df1>da1 and da1<0;lj7:="kdj.k">"kdj.d" and "kdj.d"<30;
lj8:=df1<da1;lj9:="kdj.k"<"kdj.d" and "kdj.k">80;
w1:=sum(大户,5)+sum(特大,5);w2:=sum(小股民,5)+sum(中户,5);
量振1:=特大>大户 and 大户>小股民;量振2:=特大<小股民 and 大户<小股民;
标振1:=lj6 and lj7;标振2:=lj8 and lj9;
a:=w1-w2;a0:=if(a>0,a,0);b0:=if(a<0,a,0);
stickline(bb=ww,中*0.2,中*9.2,(小股民[p]/总*200)*1.02,1),colorwhite,linethick2;
stickline(bb=ww,中*0.8,中*8.6,小股民[p]/总*200,0),colorff8800;
stickline(bb=ww,中*10.2,中*19.2,(中户[p]/总*200)*1.02,1),colorwhite,linethick2;
stickline(bb=ww,中*10.8,中*18.6,中户[p]/总*200,0),colorff00ff;
stickline(bb=ww,中*20.2,中*29.2,(大户[p]/总*200)*1.02,1),colorwhite,linethick2;
stickline(bb=ww,中*20.8,中*28.6,大户[p]/总*200,0),color0088ff;
stickline(bb=ww,中*30.2,中*39.2,(特大[p]/总*200)*1.02,1),colorwhite,linethick2;
stickline(bb=ww,中*30.8,中*38.6,特大[p]/总*200,0),color0000ff;
drawtextex(close,1,420,0,str1),colorffff00;
drawtextex(close,1,200,0,stklabel+' '+stkname+''),colorffff00;
drawtext(bb=ww,中*36,'特大:'+numtostr(特大[p]/总*100,2)+' %'),color00eeff;
drawtext(bb=ww,中*26,'大户:'+numtostr(大户[p]/总*100,2)+' %'),color00eeff;
drawtext(bb=ww,中*16,'中户:'+numtostr(中户[p]/总*100,2)+' %'),color00eeff;
drawtext(bb=ww,中*6,'小股民:'+numtostr(小股民[p]/总*100,2)+' %'),color00eeff;
diff:=ema(close,12)-ema(close,26);
dea:=ema(diff,9);
macd1:=2*(diff-dea);
cs1:=100;
cs2:=hhv(abs(macd1),cs1);
cs3:=abs(100/cs2);
macd:(macd1*cs3+100)/2,linethick5,color00ff00;
cs:=macd;
日红:=cs>=ref(cs,1);
日转红:=日红 and ref(日红,1)=0;
aa:=0;
v1:=llv(low,10);
v2:=hhv(high,25);
价位线:=ema((close-v1)/(v2-v1)*4,4);
drawtextex(close,1,200,130,'主力成本:'+numtostr(主力成本[p],2)),color00ff00;
drawtextex(close,1,350,130,'主力筹码占流通:'+numtostr(if(zsa>0,zsa[p]*100,0),2)+' %'),color00ff00;
drawtextex(close,1,560,130,'较昨日增减:'+numtostr(zsb[p],2)+' %'),color00ff00;
drawtextex(close and 总1[p]<0,1,720,0,'小股民主买主力主卖'),colorffee00;
drawtextex(close and 总1[p]>0,1,720,0,'主力主买小股民主卖'),color0000ff;
vol=amount;
var1:=vol/((high-low)*2-abs(close-open));
var2:=dynainfo(7)=close and dynainfo(10)=amount;
{if(dynainfo(7)=close and dynainfo(10)=amount,var1,var3),colorgreen;}
主买盘:=if(close>open,var1*(high-low),if(close<open,var1*((high-open)+(close-low)),vol/2));
主卖盘:=if(close>open,var1*((high-close)+(open-low)),if(close<open,var1*(high-low),vol/2));
stickline(主买盘>0,0,主买盘,1,0),colorred;
stickline(主卖盘<0,vol,主买盘,1,0),color00ff00;
换手:=vol/capital*100;
stickline(换手>0 ,0, 主买盘,0,0),coloryellow;
stickline(换手>0,vol, 主买盘, 0,0) ,colorred;
bb:=(主买盘+主卖盘);
stickline(资金进>资金出,资金进,资金出,6,0),colorred;
stickline(资金进<资金出,资金出,资金进,6,0),colorgreen;
stickline(资金进>资金出,资金进,资金出,6,0),colorred;
stickline(资金进<资金出,资金出,资金进,6,0),colorgreen;
aa:=vol/((high-low)*2-abs(close-open));
stickline(主买>0,0,主买,6,0 ),color6666cc;
stickline(主买>0,0,主买,5,0 ),color7777dd;
stickline(主买>0,0,主买,6.4 ,0 ),color8888ee;
stickline(主买>0,0,主买,4.1 ,0 ),color9999ff;
stickline( 主卖>0,0 ,主卖,6,0 ),coloraaaaaa;
stickline(主卖>0 ,0 ,主卖,5,0 ),colorbbbbbb;
stickline(主卖>0 ,0 ,主卖,6.4,0 ),colorcccccc;
stickline(主卖>0 ,0 ,主卖,6.1,0 ),colorff8800;
wj:=(high+low+close)/3;
vd1:=if(high=low,1,high-max(open,close));
vd2:=if(high=low,1,max(close,open)-wj);
vd3:=if(high=low,1,min(open,close)-low);
vd4:=if(high=low,1,wj-min(close,open));
vd5:=vol/if(high=low,4,high-low);
vd6:=(vd1*vd5);
vd7:=(vd2*vd5);
vd8:=(vd3*vd5);
vd9:=(vd4*vd5);
买入量:=(vd9+vd8);
卖出量:=(vd6+vd7);
买入资金:=买入量*close/100;
卖出资金:=卖出量*close/100;
资金进出:=买入资金-卖出资金;
买卖资金比:=买入资金/卖出资金;
drawtextex(close,1,250,100,' ┃买入资金累计万元: '+numtostr(买入资金,2))colorred,linethick1;
drawtextex(close,1,250,200,' ┃卖出资金累计万元: '+numtostr(卖出资金,2))color00ff00,linethick1;
drawtextex(close,1,250,300,' ┃资金进出万元: '+numtostr(资金进出,2))coloryellow,linethick1;
上一指标公式:实用的箱体加公式 飞狐源码指标 源码
下一指标公式:量坑拐点公式 飞狐拐点源码指标 源码
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文超赢主力散户-附图公式 飞狐附图源码指标 源码仅供学习研究。