当前位置: 财富池  >  炒股软件  >  飞狐 Foxtrader V5.0.Renzm 功能应用与扩展

飞狐 Foxtrader V5.0.Renzm 功能应用与扩展

软件分类:其它软件收费模式:免费版0 收藏 | 2,846浏览

发布时间:2019-05-31

软件只通过初级审核,免费提供下载,无法对软件使用情况有保证,请大家自行甄别。建议使用谷歌或者火狐浏览器下载,如果是360浏览器,需要在设置里关掉云加速

软件说明

飞狐 Foxtrader V5.0.Renzm 功能应用与扩展

飞狐 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;

更多精彩内容,请关注财富池订阅号

其他说明
1、在下载过程遇到问题,请您 联系客服,我们会在第一时间修复和反馈。

2、如果您发现财富池网站有不足之处,请点击  建议反馈  谢谢!

3、如果您发现下载的软件有违规操作,请点击  举报投诉  谢谢!

4、该下载资源由网站作者发布,仅供学习和研究使用,不得用于商业或者非法用途。本站对于提供下载的指标、软件、图书等不拥有任何权利,其版权归该下载资源的合法拥有者所有,如有侵犯您的版权,请查看《财富池的侵权处理流程》和点击 举报投诉联系我们,本站将于两个工作日内移除相关内容,同时要求用户在23小时内删除从本站下载的文件。

上一篇: 通达信十档盘口设计 面板文件提供

下一篇: 飞狐 Foxtrader V5.0.Renzm (理想.千钧)证券数量无限制版

评论

(飞狐 Foxtrader V5.0.Renzm 功能应用与扩展)
表情
图片

(您最多只能上传8张照片)

150

  • 软件评论(0)
  • 按时间

    按热度

软件来源

不断努力

 已认证

发布作品:

公式7456 文章16915 粉丝数772

主页

主流软件介绍

  • /uploadfiles/2020-01/202001191604505945.png

    通达信 1.92W个指标

    人气:4.84W

    最新更新:2024-03-28

  • /uploadfiles/2017-03/20170311165845741.png

    益盟操盘手 120个指标

    人气:3.67W

    最新更新:2024-03-25

  • /uploadfiles/2020-01/202001191608687477.png

    东方财富 33个指标

    人气:2.48W

    最新更新:2023-12-20

  • /uploadfiles/2017-03/201703111655914498.png

    大智慧 111个指标

    人气:2.02W

    最新更新:2024-03-06

  • /uploadfiles/2020-01/202001191606335861.png

    同花顺 702个指标

    人气:1.85W

    最新更新:2024-02-28

最新指标公式下载

成为创作作者