缺口公式---来自飞狐 Foxtrader V5.0.Renzm 功能应用和运用扩展-1公式下载 飞狐缺口公式指标 源码

指标公式详细说明

缺口公式---来自飞狐 foxtrader v5.0.renzm 功能应用和运用扩展-1

飞狐 foxtrader v5.0.renzm 功能应用与扩展-1

新年好!飞狐功能相当丰富和完全并实用，为飞狐继续发扬光大，愿与广大的飞狐爱好者开展交流，扩展更多的功能，望支持！

飞狐软件没有缺口绘图功能，今源码送上，复制可自建公式。公式特点采用了函数variable-变量及数组声明，把序列数的复杂计算变为简单并便于编程。

缺口编程源码：

//缺口公式

input:n1(300,1,1000);

if datatype>=1 then begin

variable:qkd[80]=0,qkh[80]=0,qkl[80]=0,kg[80]=0;

variable:vhd=high,vld=low;

ne:= ubound(vhd);

nb:= if(ne<n1,1,ne-n1);

n:=0;

for i = nb to ne do begin

if vld[i] > vhd[i-1] then begin

n:= n+1;

kg[n]:= 1;

qkd[n]:= i;

qkh[n]:= vld[i];

qkl[n]:= vhd[i-1];

end;

if vhd[i] < vld[i-1] then begin

n:= n+1;

kg[n]:= 2;

qkd[n]:= i;

qkh[n]:= vld[i-1];

qkl[n]:= vhd[i];

end;

end;

for i = 1 to n do begin

if kg[i] = 1 then begin

for j = qkd[i] to ne do begin

if vld[j] < qkh[i] then begin

if vld[j] > qkl[i] then begin

qkh[i]:= vld[j];

end;

if vld[j] <= qkl[i] then begin

qkh[i]:= vld[j];

qkl[i]:= vld[j];

break;

end;

end;

end;

end;

if kg[i] = 2 then begin

for j = qkd[i] to ne do begin

if vhd[j] > qkl[i] then begin

if vhd[j] < qkh[i] then begin

qkl[i]:= vhd[j];

end;

end;

if vhd[j] >= qkh[i] then begin

qkh[i]:= vld[j];

qkl[i]:= vld[j];

break;

end;

end;

end;

end;

na:= 0;

for i = n downto 1 do begin

if qkh[i] <> qkl[i] then begin

na:= na+1;

if(na = 1) then begin

w1:= qkd[i]-1;

d1:= qkh[i];

d2:= qkl[i];

end;

if(na = 2) then begin

w2:= qkd[i]-1;

d3:= qkh[i];

d4:= qkl[i];

end;

if(na = 3) then begin

w3:= qkd[i]-1;

d5:= qkh[i];

d6:= qkl[i];

end;

if(na = 4) then begin

w4:= qkd[i]-1;

d7:= qkh[i];

d8:= qkl[i];

end;

if(na = 5) then begin

w5:= qkd[i]-1;

d9:= qkh[i];

d0:= qkl[i];

end;

end;

end;

if w1 <> 0 then begin

drawline(w1=barpos,d1,barstatus=2,d1,0),colorffaa00;

drawline(w1=barpos,d2,barstatus=2,d2,0),colorffaa00;

fillrgn(barpos>w1,d1,d2),colorffaa00;

drawtext(barstatus=2,d1,' '+numtostr(d1,2)),colorwhite;

end;

if w2 <> 0 then begin

drawline(w2=barpos,d3,barstatus=2,d3,0),colorffaa00;

drawline(w2=barpos,d4,barstatus=2,d4,0),colorffaa00;

fillrgn(barpos>w2,d3,d4),colorffaa00;

drawtext(barstatus=2,d3,' '+numtostr(d3,2)),colorwhite;

end;

if w3 <> 0 then begin

drawline(w3=barpos,d5,barstatus=2,d5,0),colorffaa00;

drawline(w3=barpos,d6,barstatus=2,d6,0),colorffaa00;

fillrgn(barpos>w3,d5,d6),colorffaa00;

drawtext(barstatus=2,d5,' '+numtostr(d5,2)),colorwhite;

end;

if w4 <> 0 then begin

drawline(w4=barpos,d7,barstatus=2,d7,0),colorffaa00;

drawline(w4=barpos,d8,barstatus=2,d8,0),colorffaa00;

fillrgn(barpos>w4,d7,d8),colorffaa00;

drawtext(barstatus=2,d7,' '+numtostr(d7,2)),colorwhite;

end;

if w5 <> 0 then begin

drawline(w5=barpos,d9,barstatus=2,d9,0),colorffaa00;

drawline(w5=barpos,d0,barstatus=2,d0,0),colorffaa00;

fillrgn(barpos>w5,d9,d0),colorffaa00;

drawtext(barstatus=2,d9,' '+numtostr(d9,2)),colorwhite;

end;

end;

指标公式下载地址

好公式网提供全网最全的指标公式软件，感谢您的支持！鼠标双击图片可看大图！
下载请点击右侧“立即下载”，如只有源码，请点击本页面右侧的导入方法按图导入！
本站指标基于网友分享，仅供研究自学，勿作他用，本站对下载使用不承担任何责任！

上一指标公式：金魔方软件的强势线弱势线公式下载 飞狐魔方指标 源码

下一指标公式：缠论MACD面积公式（直观判断背驰）下载 飞狐直观公式指标 源码

相关飞狐公式推荐

指标公式下载注意

☉ 好公式网发布的指标公式主要用于软件技术面分析，仅供参考，勿用于实际操作，据此操作风险自负！

☉ 解压密码：www.goodgongshi.com 就是好公式网域名，希望大家看清楚，切勿输错。

☉ tnc和tni格式指标公式，仅可以用通达信软件引入使用，例如可以用通达信软件引入使用指标公式；

☉ tne格式指标公式，仅可以用通达信软件公式编辑器5.0版导入，高版本兼容低版本；

☉ fnc格式指标公式，可以用大智慧软件新一代高速行情分析系统股票软件使用，少部分可以用分析家软件引入使用；

☉ alg格式指标公式，仅仅可以用飞狐交易师软件引入使用；exp格式指标公式，仅可以用大智慧经典版软件引入使用；

☉ hxf格式指标公式，仅可以用同花顺软件引入使用。

☉ 如果您发现下载软件链接错误，请联系管理员报告错误。

☉ 好公式网欢迎各位网友帮忙宣传转发本站网址，有您的支持，我们会做得更好！

☉ 本文缺口公式---来自飞狐 Foxtrader V5.0.Renzm 功能应用和运用扩展-1公式下载 飞狐缺口公式指标 源码仅供学习研究。