先建一个引用指标
{aaa引入}
var1:=1/winner(close);
var2:=(close-ma(close,13))/ma(close,13)*100;
var3:=100-abs(var2);
var4:=3*sma((close-llv(low,75))/(hhv(high,75)-llv(low,75))*100,20,1)-2*sma(sma((close-llv(low,75))/(hhv(high,75)-llv(low,75))*100,20,1),15,1);
var5:=3*sma((open-llv(low,75))/(hhv(high,75)-llv(low,75))*100,20,1)-2*sma(sma((open-llv(low,75))/(hhv(high,75)-llv(low,75))*100,20,1),15,1);
var6:=100-var5;
var7:=100-var4;
var8:=ma(winner(close*0.95)*100,3);
var9:=if(var1>5,if(var1<100,var1,var3-10),0);
vara:=(close-llv(low,9))/(hhv(high,9)-llv(low,9))*100;
varb:=sma(vara,3,1);
varc:=sma(varb,3,1);
vare:=(-1)*(ema(var7,12)-50)+50;
探索者:ema(3*varb-2*varc,3),colorwhite;
zs:ma(探索者,3),colorred;
zm:ma(ma(探索者,3),3),colorbrown;
{周期全息主图}
aaat:=stkindi('','aaa引入.探索者',0,0);
zst:=stkindi('','aaa引入.zs',0,0);
aaa1:=stkindi('','aaa引入.探索者',0,1);
zs1:=stkindi('','aaa引入.zs',0,1);
aaa5:=stkindi('','aaa引入.探索者',0,2);
zs5:=stkindi('','aaa引入.zs',0,2);
aaa15:=stkindi('','aaa引入.探索者',0,3);
zs15:=stkindi('','aaa引入.zs',0,3);
aaa30:=stkindi('','aaa引入.探索者',0,4);
zs30:=stkindi('','aaa引入.zs',0,4);
aaa60:=stkindi('','aaa引入.探索者',0,5);
zs60:=stkindi('','aaa引入.zs',0,5);
aaah:=stkindi('','aaa引入.探索者',0,11);
zsh:=stkindi('','aaa引入.zs',0,11);
aaad:=stkindi('','aaa引入.探索者',0,6);
zsd:=stkindi('','aaa引入.zs',0,6);
aaaw:=stkindi('','aaa引入.探索者',0,7);
zsw:=stkindi('','aaa引入.zs',0,7);
aaam:=stkindi('','aaa引入.探索者',0,8);
zsm:=stkindi('','aaa引入.zs',0,8);
aaay:=stkindi('','aaa引入.探索者',0,9);
zsy:=stkindi('','aaa引入.zs',0,9);
cct:=aaat;
zdt:=cct[sysparam(3)];
cdt:=max(1,abs(intpart(10*zdt/100)));
hxt:='_________________________________________________________';
if zdt>=0 then begin
drawtextex(1,0,250,38,strleft(hxt,cdt)),colorcf;
drawtextex(1,0,250,39,strleft(hxt,cdt)),coloref;
drawtextex(1,0,250,40,strleft(hxt,cdt)),color60ff;
drawtextex(1,0,250,41,strleft(hxt,cdt)),colora1ff;
drawtextex(1,0,250,42,strleft(hxt,cdt)),colorcaff;
drawtextex(1,0,250,43,strleft(hxt,cdt)),color60ffff;
drawtextex(1,0,250,44,strleft(hxt,cdt)),colord5ff;
drawtextex(1,0,250,45,strleft(hxt,cdt)),colorc4ff;
drawtextex(1,0,250,46,strleft(hxt,cdt)),colora0ff;
drawtextex(1,0,250,47,strleft(hxt,cdt)),color7fff;
drawtextex(1,0,250,48,strleft(hxt,cdt)),color50ff;
drawtextex(1,0,250,49,strleft(hxt,cdt)),coloref;
drawtextex(1,0,250,50,strleft(hxt,cdt)),colorcf;
end;
else begin
drawtextex(1,0,250,38,strleft(hxt,cdt)),color7e00;
drawtextex(1,0,250,39,strleft(hxt,cdt)),color8e00;
drawtextex(1,0,250,40,strleft(hxt,cdt)),colorae00;
drawtextex(1,0,250,41,strleft(hxt,cdt)),colorbe00;
drawtextex(1,0,250,42,strleft(hxt,cdt)),colorce00;
drawtextex(1,0,250,43,strleft(hxt,cdt)),colorde00;
drawtextex(1,0,250,44,strleft(hxt,cdt)),colorff60;
drawtextex(1,0,250,45,strleft(hxt,cdt)),colorde30;
drawtextex(1,0,250,46,strleft(hxt,cdt)),colorce00;
drawtextex(1,0,250,47,strleft(hxt,cdt)),colorbe00;
drawtextex(1,0,250,48,strleft(hxt,cdt)),colorae00;
drawtextex(1,0,250,49,strleft(hxt,cdt)),color9e00;
drawtextex(1,0,250,50,strleft(hxt,cdt)),color8e00;
drawtextex(1,0,250,51,strleft(hxt,cdt)),color7e00;
drawtextex(1,0,250,52,strleft(hxt,cdt)),color7e00;
end;
cc1:=aaa1;
zd1:=cc1[sysparam(3)];
cd1:=max(1,abs(intpart(10*zd1/100)));
hx1:='_________________________________________________________';
if zd1>=0 then begin
drawtextex(1,0,250,53,strleft(hx1,cd1)),colorcf;
drawtextex(1,0,250,54,strleft(hx1,cd1)),coloref;
drawtextex(1,0,250,55,strleft(hx1,cd1)),color60ff;
drawtextex(1,0,250,56,strleft(hx1,cd1)),colora1ff;
drawtextex(1,0,250,57,strleft(hx1,cd1)),colorcaff;
drawtextex(1,0,250,58,strleft(hx1,cd1)),color60ffff;
drawtextex(1,0,250,59,strleft(hx1,cd1)),colord5ff;
drawtextex(1,0,250,60,strleft(hx1,cd1)),colorc4ff;
drawtextex(1,0,250,61,strleft(hx1,cd1)),colora0ff;
drawtextex(1,0,250,62,strleft(hx1,cd1)),color7fff;
drawtextex(1,0,250,63,strleft(hx1,cd1)),color50ff;
drawtextex(1,0,250,64,strleft(hx1,cd1)),coloref;
drawtextex(1,0,250,65,strleft(hx1,cd1)),colorcf;
end;
else begin
drawtextex(1,0,250,53,strleft(hx1,cd1)),color7e00;
drawtextex(1,0,250,54,strleft(hx1,cd1)),color8e00;
drawtextex(1,0,250,55,strleft(hx1,cd1)),colorae00;
drawtextex(1,0,250,56,strleft(hx1,cd1)),colorbe00;
drawtextex(1,0,250,57,strleft(hx1,cd1)),colorce00;
drawtextex(1,0,250,58,strleft(hx1,cd1)),colorde00;
drawtextex(1,0,250,59,strleft(hx1,cd1)),colorff60;
drawtextex(1,0,250,60,strleft(hx1,cd1)),colorde30;
drawtextex(1,0,250,61,strleft(hx1,cd1)),colorce00;
drawtextex(1,0,250,62,strleft(hx1,cd1)),colorbe00;
drawtextex(1,0,250,63,strleft(hx1,cd1)),colorae00;
drawtextex(1,0,250,64,strleft(hx1,cd1)),color9e00;
drawtextex(1,0,250,65,strleft(hx1,cd1)),color8e00;
drawtextex(1,0,250,66,strleft(hx1,cd1)),color7e00;
drawtextex(1,0,250,67,strleft(hx1,cd1)),color7e00;
end;
cc5:=aaa5;
zd5:=cc5[sysparam(3)];
cd5:=max(1,abs(intpart(10*zd5/100)));
hx5:='_________________________________________________________';
if zd5>=0 then begin
drawtextex(1,0,250,68,strleft(hx5,cd5)),colorcf;
drawtextex(1,0,250,69,strleft(hx5,cd5)),coloref;
drawtextex(1,0,250,70,strleft(hx5,cd5)),color60ff;
drawtextex(1,0,250,71,strleft(hx5,cd5)),colora1ff;
drawtextex(1,0,250,72,strleft(hx5,cd5)),colorcaff;
drawtextex(1,0,250,73,strleft(hx5,cd5)),color60ffff;
drawtextex(1,0,250,74,strleft(hx5,cd5)),colord5ff;
drawtextex(1,0,250,75,strleft(hx5,cd5)),colorc4ff;
drawtextex(1,0,250,76,strleft(hx5,cd5)),colora0ff;
drawtextex(1,0,250,77,strleft(hx5,cd5)),color7fff;
drawtextex(1,0,250,78,strleft(hx5,cd5)),color50ff;
drawtextex(1,0,250,79,strleft(hx5,cd5)),coloref;
drawtextex(1,0,250,80,strleft(hx5,cd5)),colorcf;
end;
else begin
drawtextex(1,0,250,69,strleft(hx5,cd5)),color7e00;
drawtextex(1,0,250,70,strleft(hx5,cd5)),color8e00;
drawtextex(1,0,250,71,strleft(hx5,cd5)),colorae00;
drawtextex(1,0,250,72,strleft(hx5,cd5)),colorbe00;
drawtextex(1,0,250,73,strleft(hx5,cd5)),colorce00;
drawtextex(1,0,250,74,strleft(hx5,cd5)),colorde00;
drawtextex(1,0,250,75,strleft(hx5,cd5)),colorff60;
drawtextex(1,0,250,76,strleft(hx5,cd5)),colorde30;
drawtextex(1,0,250,77,strleft(hx5,cd5)),colorce00;
drawtextex(1,0,250,78,strleft(hx5,cd5)),colorbe00;
drawtextex(1,0,250,79,strleft(hx5,cd5)),colorae00;
drawtextex(1,0,250,80,strleft(hx5,cd5)),color9e00;
drawtextex(1,0,250,81,strleft(hx5,cd5)),color8e00;
drawtextex(1,0,250,82,strleft(hx5,cd5)),color7e00;
drawtextex(1,0,250,83,strleft(hx5,cd5)),color7e00;
end;
cc15:=aaa15;
zd15:=cc15[sysparam(3)];
cd15:=max(1,abs(intpart(10*zd15/100)));
hx15:='_________________________________________________________';
if zd15>=0 then begin
drawtextex(1,0,250,84,strleft(hx15,cd15)),colorcf;
drawtextex(1,0,250,85,strleft(hx15,cd15)),coloref;
drawtextex(1,0,250,86,strleft(hx15,cd15)),color60ff;
drawtextex(1,0,250,87,strleft(hx15,cd15)),colora1ff;
drawtextex(1,0,250,88,strleft(hx15,cd15)),colorcaff;
drawtextex(1,0,250,89,strleft(hx15,cd15)),color60ffff;
drawtextex(1,0,250,90,strleft(hx15,cd15)),colord5ff;
drawtextex(1,0,250,91,strleft(hx15,cd15)),colorc4ff;
drawtextex(1,0,250,92,strleft(hx15,cd15)),colora0ff;
drawtextex(1,0,250,93,strleft(hx15,cd15)),color7fff;
drawtextex(1,0,250,94,strleft(hx15,cd15)),color50ff;
drawtextex(1,0,250,95,strleft(hx15,cd15)),coloref;
drawtextex(1,0,250,96,strleft(hx15,cd15)),colorcf;
end;
else begin
drawtextex(1,0,250,84,strleft(hx15,cd15)),color7e00;
drawtextex(1,0,250,85,strleft(hx15,cd15)),color8e00;
drawtextex(1,0,250,86,strleft(hx15,cd15)),colorae00;
drawtextex(1,0,250,87,strleft(hx15,cd15)),colorbe00;
drawtextex(1,0,250,88,strleft(hx15,cd15)),colorce00;
drawtextex(1,0,250,89,strleft(hx15,cd15)),colorde00;
drawtextex(1,0,250,90,strleft(hx15,cd15)),colorff60;
drawtextex(1,0,250,91,strleft(hx15,cd15)),colorde30;
drawtextex(1,0,250,92,strleft(hx15,cd15)),colorce00;
drawtextex(1,0,250,93,strleft(hx15,cd15)),colorbe00;
drawtextex(1,0,250,94,strleft(hx15,cd15)),colorae00;
drawtextex(1,0,250,95,strleft(hx15,cd15)),color9e00;
drawtextex(1,0,250,96,strleft(hx15,cd15)),color8e00;
drawtextex(1,0,250,97,strleft(hx15,cd15)),color7e00;
drawtextex(1,0,250,98,strleft(hx15,cd15)),color7e00;
end;
cc30:=aaa30;
zd30:=cc30[sysparam(3)];
cd30:=max(1,abs(intpart(10*zd30/100)));
hx30:='_________________________________________________________';
if zd30>=0 then begin
drawtextex(1,0,250,99,strleft(hx30,cd30)),colorcf;
drawtextex(1,0,250,100,strleft(hx30,cd30)),coloref;
drawtextex(1,0,250,101,strleft(hx30,cd30)),color60ff;
drawtextex(1,0,250,102,strleft(hx30,cd30)),colora1ff;
drawtextex(1,0,250,103,strleft(hx30,cd30)),colorcaff;
drawtextex(1,0,250,104,strleft(hx30,cd30)),color60ffff;
drawtextex(1,0,250,105,strleft(hx30,cd30)),colord5ff;
drawtextex(1,0,250,106,strleft(hx30,cd30)),colorc4ff;
drawtextex(1,0,250,107,strleft(hx30,cd30)),colora0ff;
drawtextex(1,0,250,108,strleft(hx30,cd30)),color7fff;
drawtextex(1,0,250,109,strleft(hx30,cd30)),color50ff;
drawtextex(1,0,250,110,strleft(hx30,cd30)),coloref;
drawtextex(1,0,250,111,strleft(hx30,cd30)),colorcf;
end;
else begin
drawtextex(1,0,250,99,strleft(hx30,cd30)),color7e00;
drawtextex(1,0,250,100,strleft(hx30,cd30)),color8e00;
drawtextex(1,0,250,101,strleft(hx30,cd30)),colorae00;
drawtextex(1,0,250,102,strleft(hx30,cd30)),colorbe00;
drawtextex(1,0,250,103,strleft(hx30,cd30)),colorce00;
drawtextex(1,0,250,104,strleft(hx30,cd30)),colorde00;
drawtextex(1,0,250,105,strleft(hx30,cd30)),colorff60;
drawtextex(1,0,250,106,strleft(hx30,cd30)),colorde30;
drawtextex(1,0,250,107,strleft(hx30,cd30)),colorce00;
drawtextex(1,0,250,108,strleft(hx30,cd30)),colorbe00;
drawtextex(1,0,250,109,strleft(hx30,cd30)),colorae00;
drawtextex(1,0,250,110,strleft(hx30,cd30)),color9e00;
drawtextex(1,0,250,111,strleft(hx30,cd30)),color8e00;
drawtextex(1,0,250,112,strleft(hx30,cd30)),color7e00;
drawtextex(1,0,250,113,strleft(hx30,cd30)),color7e00;
end;
cc60:=aaa60;
zd60:=cc60[sysparam(3)];
cd60:=max(1,abs(intpart(10*zd60/100)));
hx60:='_________________________________________________________';
if zd60>=0 then begin
drawtextex(1,0,250,115,strleft(hx60,cd60)),colorcf;
drawtextex(1,0,250,116,strleft(hx60,cd60)),coloref;
drawtextex(1,0,250,117,strleft(hx60,cd60)),color60ff;
drawtextex(1,0,250,118,strleft(hx60,cd60)),colora1ff;
drawtextex(1,0,250,119,strleft(hx60,cd60)),colorcaff;
drawtextex(1,0,250,120,strleft(hx60,cd60)),color60ffff;
drawtextex(1,0,250,121,strleft(hx60,cd60)),colord5ff;
drawtextex(1,0,250,122,strleft(hx60,cd60)),colorc4ff;
drawtextex(1,0,250,123,strleft(hx60,cd60)),colora0ff;
drawtextex(1,0,250,124,strleft(hx60,cd60)),color7fff;
drawtextex(1,0,250,125,strleft(hx60,cd60)),color50ff;
drawtextex(1,0,250,126,strleft(hx60,cd60)),coloref;
drawtextex(1,0,250,127,strleft(hx60,cd60)),colorcf;
end;
else begin
drawtextex(1,0,250,115,strleft(hx60,cd60)),color7e00;
drawtextex(1,0,250,116,strleft(hx60,cd60)),color8e00;
drawtextex(1,0,250,117,strleft(hx60,cd60)),colorae00;
drawtextex(1,0,250,118,strleft(hx60,cd60)),colorbe00;
drawtextex(1,0,250,119,strleft(hx60,cd60)),colorce00;
drawtextex(1,0,250,120,strleft(hx60,cd60)),colorde00;
drawtextex(1,0,250,121,strleft(hx60,cd60)),colorff60;
drawtextex(1,0,250,122,strleft(hx60,cd60)),colorde30;
drawtextex(1,0,250,123,strleft(hx60,cd60)),colorce00;
drawtextex(1,0,250,124,strleft(hx60,cd60)),colorbe00;
drawtextex(1,0,250,125,strleft(hx60,cd60)),colorae00;
drawtextex(1,0,250,126,strleft(hx60,cd60)),color9e00;
drawtextex(1,0,250,127,strleft(hx60,cd60)),color8e00;
drawtextex(1,0,250,128,strleft(hx60,cd60)),color7e00;
drawtextex(1,0,250,129,strleft(hx60,cd60)),color7e00;
end;
cch:=aaah;
zdh:=cch[sysparam(3)];
cdh:=max(1,abs(intpart(10*zdh/100)));
hxh:='_________________________________________________________';
if zdh>=0 then begin
drawtextex(1,0,250,130,strleft(hxh,cdh)),colorcf;
drawtextex(1,0,250,131,strleft(hxh,cdh)),coloref;
drawtextex(1,0,250,132,strleft(hxh,cdh)),color60ff;
drawtextex(1,0,250,133,strleft(hxh,cdh)),colora1ff;
drawtextex(1,0,250,134,strleft(hxh,cdh)),colorcaff;
drawtextex(1,0,250,135,strleft(hxh,cdh)),color60ffff;
drawtextex(1,0,250,136,strleft(hxh,cdh)),colord5ff;
drawtextex(1,0,250,137,strleft(hxh,cdh)),colorc4ff;
drawtextex(1,0,250,138,strleft(hxh,cdh)),colora0ff;
drawtextex(1,0,250,139,strleft(hxh,cdh)),color7fff;
drawtextex(1,0,250,140,strleft(hxh,cdh)),color50ff;
drawtextex(1,0,250,141,strleft(hxh,cdh)),coloref;
drawtextex(1,0,250,142,strleft(hxh,cdh)),colorcf;
end;
else begin
drawtextex(1,0,250,131,strleft(hxh,cdh)),color7e00;
drawtextex(1,0,250,132,strleft(hxh,cdh)),color8e00;
drawtextex(1,0,250,133,strleft(hxh,cdh)),colorae00;
drawtextex(1,0,250,134,strleft(hxh,cdh)),colorbe00;
drawtextex(1,0,250,135,strleft(hxh,cdh)),colorce00;
drawtextex(1,0,250,136,strleft(hxh,cdh)),colorde00;
drawtextex(1,0,250,137,strleft(hxh,cdh)),colorff60;
drawtextex(1,0,250,138,strleft(hxh,cdh)),colorde30;
drawtextex(1,0,250,139,strleft(hxh,cdh)),colorce00;
drawtextex(1,0,250,140,strleft(hxh,cdh)),colorbe00;
drawtextex(1,0,250,141,strleft(hxh,cdh)),colorae00;
drawtextex(1,0,250,142,strleft(hxh,cdh)),color9e00;
drawtextex(1,0,250,143,strleft(hxh,cdh)),color8e00;
drawtextex(1,0,250,144,strleft(hxh,cdh)),color7e00;
drawtextex(1,0,250,145,strleft(hxh,cdh)),color7e00;
end;
上一指标公式:宝塔布林以防丢失公式下载 飞狐公式以防指标 源码
下一指标公式:价值低估选股公式下载 飞狐选股价值指标 源码
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文周期全息主图好欣赏版面公式下载 飞狐全息源码指标 源码仅供学习研究。