wx:=ma(c,0);
m1:ma(close,p1);
m2:ma(close,p2)*if(n<2,wx,1);
m3:ma(close,p3)*if(n<3,wx,1);
m4:ma(close,p4)*if(n<4,wx,1);
m5:ma(close,p5)*if(n<5,wx,1);
m6:ma(close,p6)*if(n<6,wx,1);
m7:ma(close,p7)*if(n<7,wx,1);
m8:ma(close,p8)*if(n<8,wx,1);
急速超跌:=(c-ma(c,34))/ma(c,34)*100<-14;{34日乖离率}
筹码平衡线:refx(ref(hhv(h,20),1),date),colorred;
a:=barslast((vol=hhv(vol,21)));
a1:=a=0;
b:=sumbars(a1,1);
stickline(b<=1,ref(open,b-1)*1,ref(close,b-1),1,0),coloryellow;
stickline(b<=1,ref(high,b-1)*1,ref(low,b-1),0.5,0),coloryellow;
异动:=b<=1 and ref(high,b-1)*1 and ref(low,b-1);
partline(barslast(异动),ref(high,barslast(异动))),colorcyan,linethick1;
partline(barslast(异动),ref(low,barslast(异动))),colorgreen,linethick1;
fh:=high;
fl:=low;
sell:=0*fh;
buy:=sell;
signal:=sell;
boxh:sell,linethick0;
boxl:sell,linethick0;
variable:hc=0,lc=0,bt=fh[1],bb=fh[1];
for i=1 to datacount do begin
if hc>1 then begin
if lc>2 and bt<=fh then begin
buy:=1;
for j=i-1 downto i-hc do begin
boxh[j]:=fh[i-hc];
boxl[j]:=fl[i-lc];
end;
hc:=0;lc:=0;
end;
if bt>fh then begin
if lc>2 then begin
if bb>=fl then begin
sell:=1;
for j=i-1 downto i-hc do begin
boxh[j]:=fh[i-hc];
boxl[j]:=fl[i-lc];
end;
hc:=-1;lc:=0;
end else begin
boxh:=fh[i-hc];
boxl:=fl[i-lc];
end;
end;
hc:=hc+1;
if lc>1 then begin
if bb<fl then begin
lc:=lc+1;
if lc=3 then begin
signal[i-hc+1]:=1;
for j=i downto i-hc+1 do begin
boxh[j]:=fh[i-hc+1];
boxl[j]:=fl[i-lc+1];
end;
end;
end else lc:=0;
end else
if lc=1 then begin
if bb<fl then begin
lc:=lc+1;
end else lc:=0;
end;
if lc=0 and hc>1 then begin
bb:=fl;
lc:=lc+1;
end;
end else begin hc:=0; lc:=0; end;
end else
if hc=1 then begin
if bt>fh then
hc:=hc+1
else begin hc:=0;lc:=0; end;
end;
if hc=0 then begin
bt:=fh;
hc:=hc+1;
end;
end;
partline(boxh and boxh=ref(boxh,1),boxh),linedot,coloryellow;
partline(boxl and boxl=ref(boxl,1),boxl),linedot,coloryellow;
stickline((signal||refx(buy||sell,1))&&boxh,boxh,boxl,0.1,0),linedot,coloryellow;
drawicon(buy,low*0.98,4);
drawicon(sell,high*1.02,5);
drawnumber(refx(buy||sell,1)&&boxh,boxh,100*(boxh-boxl)/boxl,2) colorgreen;
drawnumber(refx(buy||sell,1)&&boxh,boxl,boxh-boxl ,2) colorwhite;
a1:=boxh and boxh=ref(boxh,1);
a2:=refx(ref(a1=0,1) and a1=1,1);
a3:=refx(ref(a1=1,1) and a1=0,1);
drawline(a2,boxl,a3,boxh,0),colorff9900;
drawline(a2,boxh,a3,boxl,0),colorgreen;
partline(boxh and boxh=ref(boxh,1),(boxh-boxl)/2+boxl),colorff9900;
stickline((signal||refx(buy||sell,1))&&boxh,boxh,boxl,0.1,0),linedot,coloryellow;
zz:=backset(refx(buy||sell,1),barslast(signal)/2);zx:=refx(ref(zz=0,1) and zz=1,1);
drawline(signal,boxh,zx,boxl,0),linedot,colorgreen;
drawline(signal,boxh,refx(buy||sell,1),(boxh-boxl)/2+boxl,0),linedot,colorgreen;
drawline(signal,boxl,zx,boxh,0),linedot,colorff9900;
drawline(signal,boxl,refx(buy||sell,1),(boxh-boxl)/2+boxl,0),linedot,colorff9900;
drawline(signal,boxh,islastbar and boxh>boxl,boxl,0),colorgreen;
drawline(signal,boxh,islastbar and boxh>boxl,(boxh-boxl)/2+boxl,0),linedot,colorgreen;
drawline(signal,boxl,islastbar and boxh>boxl,boxh,0),colorff9900;
drawline(signal,boxl,islastbar and boxh>boxl,(boxh-boxl)/2+boxl,0),linedot,colorff9900;
za:=backset(islastbar and boxh>boxl,barslast(signal)/2);zb:=refx(ref(za=0,1) and za=1,1);
drawline(signal,boxh,zb,boxl,0),linedot,colorgreen;
drawline(signal,boxl,zb,boxh,0),linedot,colorff9900;
var3:=llv(high,240);
var4:=100*(close-var3)/var3;
var5:=(close-llv(low,528))/(hhv(high,528)-llv(low,528))*100;
var6:=(close-llv(close,530))/(hhv(close,530)-llv(close,530))*100;
var7:=0;
var8:=sma(max(close-ref(close,1),0),34,1)/sma(abs(close-ref(close,1)),7,1)*100;
var9:=sma(max(close-ref(close,1),0),13,1)/sma(abs(close-ref(close,1)),13,1)*100;
var10:=if(troughbars(3,16,1)=0 and high>low+0.04,4,0);
var11:=zig(3,6)>ref(zig(3,6),1) and ref(zig(3,6),1)<=ref(zig(3,6),2) and ref(zig(3,6),2)<=ref(zig(3,6),3);
var12:=zig(3,6)<ref(zig(3,6),1) and ref(zig(3,6),1)>=ref(zig(3,6),2) and ref(zig(3,6),2)>=ref(zig(3,6),3);
var13:=zig(3,22)>ref(zig(3,22),1) and ref(zig(3,22),1)<=ref(zig(3,22),2) and ref(zig(3,22),2)<=ref(zig(3,22),3);
var14:=zig(3,22)<ref(zig(3,22),1) and ref(zig(3,22),1)>=ref(zig(3,22),2) and ref(zig(3,22),2)>=ref(zig(3,22),3);
var15:=zig(3,51)>ref(zig(3,51),1) and ref(zig(3,51),1)<=ref(zig(3,51),2) and ref(zig(3,51),2)<=ref(zig(3,51),3);
var16:=zig(3,51)<ref(zig(3,51),1) and ref(zig(3,51),1)>=ref(zig(3,51),2) and ref(zig(3,51),2)>=ref(zig(3,51),3);
var17:=zig(3,72)>ref(zig(3,72),1) and ref(zig(3,72),1)<=ref(zig(3,72),2) and ref(zig(3,72),2)<=ref(zig(3,72),3);
var18:=zig(3,72)<ref(zig(3,72),1) and ref(zig(3,72),1)>=ref(zig(3,72),2) and ref(zig(3,72),2)>=ref(zig(3,72),3);
var19:=ema(close,2)-ema(close,150);
买1:=var10;
买2:=(var11+var13+var15+var17);
卖1:=(var12+var14+var16+var18);
b:drawicon(买1>0 or 买2>0,low*0.99,14),crossdot,linethick3,coloryellow;
drawtext(买1>0 or 买2>0,low*0.99,'买入'),colorred;
s:drawicon(卖1>0,high*1.01,14),crossdot,linethick3,colorgreen;
drawtext(卖1>0,high*1.02,'卖出'),colorgreen;
{股灵吧决策}
var100:=(100 - ((90 * (hhv(high,20) - close)) / (hhv(high,20) - llv(low,20))));
var200:=(100 - ((90 * (hhv(high,20) - close)) / (hhv(high,20) - llv(low,20))));
var300:=(100 - ma(((100 * (hhv(high,5) - close)) / (hhv(high,5) - llv(low,5))),34));
f:drawicon(cross(var200,ma(var300,5)),low * 0.98,14),crossdot,linethick3,coloree00ee;
年:ma(close,22),linethick2,colorwhite;
当前月:=fracpart(round(当前日期/100)/100)*100;
月:=month;日:=day;
drawtext(sysparam(2)=barpos and numtostr(当前月,0)='1',c,numtostr(当前月,0)+'月时间之窗:5(小寒)、6、15、20(大寒)、21、*25\n \n \n \n '),color00ffff,align5;
drawtext(sysparam(2)=barpos and numtostr(当前月,0)='2',c,numtostr(当前月,0)+'月时间之窗:4(立春)、6、15、18(雨水)21\n \n \n \n \n \n '),color00ffff,align5;
drawtext(sysparam(2)=barpos and numtostr(当前月,0)='3',c,numtostr(当前月,0)+'月时间之窗:5(惊蛰)、6、15、*20(春分)、21\n \n \n \n \n '),color00ffff,align5;
drawtext(sysparam(2)=barpos and numtostr(当前月,0)='4',c,numtostr(当前月,0)+'月时间之窗:4(清明)、6、15、20(谷雨)21\n \n \n \n \n \n '),color00ffff,align5;
drawtext(sysparam(2)=barpos and numtostr(当前月,0)='5',c,numtostr(当前月,0)+'月时间之窗:5(立夏)、6、*12、15、21(小满)\n \n \n \n \n'),color00ffff,align5;
drawtext(sysparam(2)=barpos and numtostr(当前月,0)='6',c,numtostr(当前月,0)+'月时间之窗:5(芒种)、6、*14、21(夏至)\n \n \n \n \n '),color00ffff,align5;
drawtext(sysparam(2)=barpos and numtostr(当前月,0)='7',c,numtostr(当前月,0)+'月时间之窗:7(小暑)、8、15、*19、23(大暑)\n \n \n \n \n '),color00ffff,align5;
drawtext(sysparam(2)=barpos and numtostr(当前月,0)='8',c,numtostr(当前月,0)+'月时间之窗:*6、7(立秋)、8、18、23(处暑)\n \n \n \n \n \n '),color00ffff,align5;
drawtext(sysparam(2)=barpos and numtostr(当前月,0)='9',c,numtostr(当前月,0)+'月时间之窗:7(白露)、8、15、*18、23(秋分)\n \n \n \n \n '),color00ffff,align5;
drawtext(sysparam(2)=barpos and numtostr(当前月,0)='10',c,numtostr(当前月,0)+'月时间之窗:8(寒露)、15、23(霜降)、*31\n \n \n \n \n '),color00ffff,align5;
drawtext(sysparam(2)=barpos and numtostr(当前月,0)='11',c,numtostr(当前月,0)+'月时间之窗:7(立冬)、8、15、22(小雪)23、*28\n \n \n \n \n \n '),color00ffff,align5;
drawtext(sysparam(2)=barpos and numtostr(当前月,0)='12',c,numtostr(当前月,0)+'月时间之窗:7(大雪)、8、15、22(冬至)23、*31\n \n \n \n \n \n '),color00ffff,align5;
drawtextex(c,1,1,10,'板块:'+blkname),coloryellow;
drawtextex(c,1,1,60,'总股本:'+numtostr(finance(1)/10000 ,2 )+'亿'+' 流通a股:'+ numtostr(finance(7)/10000,2)+'亿'),coloryellow;
drawtextex(c,1,1,110,
'每股收益:'+ numtostr(finance(33),2)+' 市盈率:'+numtostr(dynainfo(39),2)+' 净资产:'+numtostr(finance(34),2)+' 净资产收益率:'+numtostr(finance(37),2)),coloryellow;
drawtextex(c,1,1,160,'上涨家数:'+numtostr(indexadv,0)+' 下跌家数:'+numtostr(indexdec,0)),coloryellow;
{drawtextex(c,1,1,160,'主营业务增长率:'+numtostr(finance(53),2 )+'%'+' 税后利润增长率:'+numtostr(finance(54),2 )+'%'+' 净资产增长率:'+numtostr(finance(55),2 )+'%'),color808080;}
drawtextex(c,1,1,210,'五日换手:'+numtostr(sum(((vol/capital)*100),5),2)+' 五日涨跌:'+numtostr((c-ref(c,5))/ref(c,5)*100,2)+'%'),coloryellow;
drawtextex(c,1,1,260,'获利比率:'+numtostr(winner(c)*100,2)+'%'+' 20华泰对强度:'+numtostr(c/ref(c,20)/(indexc/ref(indexc,20)),2)),coloryellow;
drawtextex(c,1,1,350,'阻力2:'+numtostr(((ref(h,1)+ref(l,1)+ref(o,1)+ref(c,1))/4+(ref(h,1)-ref(l,1))),2)
+' ('+numtostr(ref(c,1)+(ref(h,1)-ref(l,1)),2)+')'),coloryellow;
drawtextex(c,1,1,400,'阻力1:'+numtostr(((ref(h,1)+ref(l,1)+ref(o,1)+ref(c,1))/4*2-ref(l,1)),2)+' (昨最高价:'+numtostr(ref(h,1),2)+')'),coloryellow;
drawtextex(c,1,1,450,'支撑1:'+numtostr(((ref(h,1)+ref(l,1)+ref(o,1)+ref(c,1))/4*2-ref(h,1)),2)+' (昨最低价:'+numtostr(ref(l,1),2)+')'),coloryellow;
drawtextex(c,1,1,500,'支撑2:'+numtostr(((ref(h,1)+ref(l,1)+ref(o,1)+ref(c,1))/4-(ref(h,1)-ref(l,1))),2)
+' ('+numtostr(ref(c,1)-(ref(h,1)-ref(l,1)),2)+')'),coloryellow;
指导线: ema((ema(close,4)+ema(close,6)+ema(close,12)+ema(close,24))/4,2),linethick1,colorffffff;
界: ma(close,27),linethick1,color00ffff;
drawtext(cross(指导线,界),界,'↑★'),align1,colorred;//,valign0
drawtext(cross(界,指导线),界,'↓★'),align1,colorcyn;
drawtext(cross(zig(3,10),ref(zig(3,10),1)),low*0.99,'←b') , colorred;
drawtext(cross(ref(zig(3,10),1),zig(3,10)),high*1.008,'←s')colorred;
wr1:=100*(hhv(high,10)-close)/(hhv(high,10)-llv(low,10));
wr2:=100*(hhv(high,6)-close)/(hhv(high,6)-llv(low,6));
drawtext(wr1>90 and wr1=wr2,l,'威廉');
drawicon(cross(ma(c,1),ma(c,5)),l,1);
半分位:=ref((high+low)/2,1),coloryellow;
stickline(半分位,半分位,半分位,4,1),coloryellow,linethick1;
//drawtext((islastbar = 1),半分位,(' ▲半:' + numtostr(半分位,2))),align1,colorgreen;
上一指标公式:绝无仅有的macd买入点公式主图版下载 飞狐仅有的绝无指标 源码
下一指标公式:持股线主图公式附详细说明下载 飞狐源码贴图指标 源码
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文自用的组合MA公式下载 飞狐组合指标 源码仅供学习研究。