将【新高新低】公式改为飞狐能用的

阅读作者：股海网时间 2019-05-04 公式帮助

编写要求：

www.guhai.com.cn股海网解答：

网友求助：

源码如下：

【新高新低】
新高:c=hhv(c,200),linethick0;
新低:c=llv(c,200),linethick0;
差数:=selfdata('新高数')-selfdata('新低数');
差数,colorstick;
0,dotline,colorwhite;
40,dotline,coloryellow;
ema13:ema(差数,13),colorwhite,linethick1;
ema17:ema(差数,17),colorwhite,linethick1;

fillrgn(ema13,ema17,ema13>ema17,rgb(255,0,0),ema13<ema17,rgb(0,255,255));
drawtextabs(600,10,'新高数：'+selfdata('新高数')),coloryellow;
drawtextabs(600,30,'新低数：'+selfdata('新低数')),colorcyan;

解答如下：

先建一引用公式
{新高新低引用}
新高:c=hhv(c,200),linethick0;
新低:c=llv(c,200),linethick0;

再建一主用指标
{新高新低}
新高:ESTDATA(50),linethick0;
新低:ESTDATA(51),linethick0;
差数:=新高-新低;
差数,colorstick;
0,POINTDOT,colorwhite;
40,POINTDOT,coloryellow;
ema13:ema(差数,13),colorwhite,linethick1;
ema17:ema(差数,17),colorwhite,linethick1;
fillrgn(ema13>ema17,ema13,ema17),colorred;
fillrgn(ema13<ema17,ema13,ema17),colorgreen;
DRAWTEXTEX(CLOSE,1,20,10,'新高数:'+NUMTOSTR(新高[SYSPARAM(1)],0)+'家'),Color0000FF;
DRAWTEXTEX(CLOSE,1,20,100,'新低数:'+NUMTOSTR(新低[SYSPARAM(1)],0)+'家'),Color00FF00;