寻找合作完成分析家除权整理程序

lxyang

寻找合作完成分析家除权整理程序

来自：MACD论坛(bbs.shudaoyoufang.com) 作者：lxyang 浏览：3137 回复：7

我用Delphi5写了一个程序，从每天的上海、深圳公告中整理除权数据，已初步完成检索文字部分。我没有更多精力去研究分析家数据文件的二进制格式，想看看哪位朋友可以支持一下，告诉我如何生成.pwr文件，如果不繁琐的话直接添加进Stkinfo.dat当然更好。最好给段源代码，我也可以少走弯路。
程序用法：按“设置路径”，加入类似“C:\SuperStk\NEWS\上证公告\”，“C:\SuperStk\NEWS\深证公告\”路径，“OK”后按“检索”即可。由于公告格式可能不同，如碰到死机，可把标题栏上显示的文件上传让我研究一下。选择“显示原文”可以对比整理前后的文字。

lxyang

附图

wm

不错，支持！！！

nlgfff

不错，支持！！！

9916

不错，支持！！！

xinhen143205

pwr文件格式
文件头（8字节） 32 CB 43 FF DD 83 CC FF    文件标识

数据部分（每只股票一个，其中包括数据头（20字节股票代码及标识），可重复数据部分（20字节，
每次分配为一数据项，依次为时间，送股、配股、配股价、红利，均按每股计算）
数据头部分
启始        偏移量     说明   
0        4           FF FF FF FF          数据标识
4        2           SH（SZ）                SH或SZ标志
6        6           股票代码                六位ASII代码
12        4           00 00 00 00                保留
16        4                                保留（未分析出含义）（估计为编程方便均为20字节）
数据部分
启始        偏移量          说明
0        4                C DATE         格式时间
4        4                float         送股
8        4                float        配股
12        4                float        配股价
16        4                float        红利

今天才看到整理，晚上再写出一段程序，现在要上班

冰天

支持！！！

lxyang

这个文件格式是C语言的吧，Delphi里没有float,我用single存盘，好像结果不对呀。