DLL公式的开发，源码版

joqnpoirim

本文来自：理想论坛 作者：仁宝2008

一直喜欢大庆老杨的公式的简洁，我最先用的公式就是大庆老杨的公式部分。后来在公式上越陷越深，经过巨亏后，现在很少看股票了，以下的留给论坛的朋友去研究吧。我把我原来收集的相关资料都发上来，剩下的就看你们了，有相当一部分是易语言写的，到现在这种资料在网上都很难找到的。
题目上已经写了撒手不管的，请要下资料，学习这块的，还是自已去研究好了。我现在对这方面不感兴趣了，再说我也有一年多没做这个了，看不懂的，就各人好好学习吧。
编写公式的朋友，最怕好公式被别个解密，用DLL实现，就很难再解密了。。。
.版本 2
.支持库 spec

变量1 ＝ 1
内容 ＝ 指针到字节集 (取变量数据地址 (参数), 113)
' 文件号 ＝ 打开文件 (“c:tt”, 5, )
' 写出字节集 (文件号, 内容)
' 关闭文件 (文件号)
代码 ＝ 取文本左边 (指针到文本 (取字节集数据 (内容, #整数型, 13)), 6)
大盘 ＝ 取字节集数据 (内容, #逻辑型, 17)
数据数量 ＝ 取字节集数据 (内容, #整数型, 21)
数据类型 ＝ 取字节集数据 (内容, #整数型, 57)
.判断开始 (数据数量 ＞ 0) ' 常规数据
变量地址 ＝ 取字节集数据 (内容, #整数型, 25)
临时数据集 ＝ 指针到字节集 (变量地址, 数据数量 × 32)
重定义数组 (时间, 假, 数据数量)
重定义数组 (开盘, 假, 数据数量)
重定义数组 (最高, 假, 数据数量)
重定义数组 (最低, 假, 数据数量)
重定义数组 (收盘, 假, 数据数量)
重定义数组 (成交量, 假, 数据数量)
重定义数组 (成交额, 假, 数据数量)
变量 ＝ 1
.计次循环首 (数据数量, 变量)
变量1 ＝ (变量 － 1) × 32
时间 [变量] ＝ 取字节集数据 (临时数据集, #日期时间型, 变量1 ＋ 1)
开盘 [变量] ＝ 取字节集数据 (临时数据集, #小数型, 变量1 ＋ 5)
最高 [变量] ＝ 取字节集数据 (临时数据集, #小数型, 变量1 ＋ 9)
最低 [变量] ＝ 取字节集数据 (临时数据集, #小数型, 变量1 ＋ 13)
收盘 [变量] ＝ 取字节集数据 (临时数据集, #小数型, 变量1 ＋ 17)
成交量 [变量] ＝ 取字节集数据 (临时数据集, #小数型, 变量1 ＋ 21)
成交额 [变量] ＝ 取字节集数据 (临时数据集, #小数型, 变量1 ＋ 25)
.判断开始 (大盘)
上涨家数 [变量] ＝ 取字节集数据 (临时数据集, #短整数型, 变量1 ＋ 29)
下跌家数 [变量] ＝ 取字节集数据 (临时数据集, #短整数型, 变量1 ＋ 31)
.默认

.判断结束

.计次循环尾 ()


飞狐dll调用说明
飞狐的DLL调用接口信息数据结构以分析家格式的为基础，并进行了扩展，使扩展程序调用的参数不限数量，且每个参数都可为数值或序列
/////////////////////////////////////////////////////////////////////////////
//调用接口信息数据结构
typedef struct tagCALCINFO
{
DWORDm_dwSize;//结构大小
DWORDm_dwVersion;//调用软件版本
DWORDm_dwSerial;//调用软件序列号
char*m_strStkLabel;//股票代码
BOOLm_bIndex;//大盘
intm_nNumData;//数据数量(pData,pDataEx,pResultBuf数据数量)
STKDATA*m_pData;//常规数据,注意:当m_nNumData==0时可能为 NULL
STKDATAEx*m_pDataEx;//扩展数据,分笔成交买卖盘,注意:可能为 NULL
intm_nParam1Start;//参数1有效位置
float*m_pfParam1;//调用参数1
float*m_pfParam2;//调用参数2
float*m_pfParam3;//调用参数3
float*m_pfParam4;//调用参数3
float*m_pResultBuf;//结果缓冲区
intm_dataType;//数据类型
float*m_pfFinData;//财务数据
//以上与分析家兼容，所以沿用其结构和名称
//以下为 FoxTrader 扩展
DWORDm_dwReserved;// 保留，将来用于设置标志
intm_nNumParam;// 调用参数数量
CALCPARAM* m_pCalcParam;// 调用参数数组
} CALCINFO;

我知道答案 本帖寻求最佳答案回答被采纳后将获得系统奖励10 股币 , 目前已有0人回答