分析家公式网,提供股票公式,股票软件用户登录  |  用户 注册
缺口公式----飞狐 Foxtrader V5.0.Renzm 功能应用与扩展-1
  • 软件大小:3.00 KB
  • 推荐星级:
  • 更新时间:2019-02-09 00:24:23
  • 软件类别: 国产软件 / 飞狐公式
  • 软件语言:简体中文
  • 授权方式: 免费版
  • 联系方式:暂无联系方式
  • 官方主页: Home Page
  • 点击大图:  【一键转帖到论坛】
  • 插件情况:
  • 运行环境:Win9X/Win2000/WinXP/Win2003/Win7/
  • 相关Tags:缺口  
  • (0)0%
    (0)0%

软件介绍

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

地址


·上一软件:业绩预报(大智慧软件适用)
·下一软件:多空追踪

软件评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论

说明

* 使用方法:点击上面蓝色块,打开新页面按照提示进行

* 本网站提供的各种股票软件,例如大智慧软件,通达信软件,同花顺软件,东方财富通等等,和各种股票公式指标,例如大智慧公式,通达信公式,同花顺公式,文华公式,博易大师公式,股票价格计算公式等等公式指标等,都来源网上公开来源收集

本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!

* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。

* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程

* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明:本站所有股票公式软件资料均网上公开收集,如侵权请联系删帖。站内所有广告,均与本站无关!
Copyright © 2003-2022 fxjgsw.Com. All Rights Reserved .
页面执行时间:8,203.12500 毫秒