软件名称：全能股票模块V1.00（测试版）
模块下载：点击下载
http://bbs.eyuyan.com/job.php?action=download&aid=334204
作 者：poleaf
交流方式：回帖为主，或加QQ群69300326（QQ群关注的少，有事@群主，有时间会回复）
编制目的：
1、想把自己积累的东西模块化，主要是自己用的方便；
2、解决易友研究股软数据，但对行情软件数据结构不熟悉的矛盾；
3、加强与同类爱好者交流；
4、为人民币服务；
使用说明：
模块函数名称及使用方法（持续更新，函数默认支持大智慧行情，特殊说明除外）
1、函数：创建自定义数据
2、函数：读单值数值
3、函数：读单值字符串
4、函数：读股票相关序列值
5、函数：读股票无关序列值
6、函数：读1分钟数据 （仅支持通达信）
7、函数：读L2数据
8、函数：写单值数值
9、函数：写单值字符串
10、函数：写股票相关序列值
11、函数：写股票无关序列值
具体功能、调用方法、示例：
1、函数：创建自定义数据
调用格式：<逻辑型> 创建自定义数据 (文本型 大智慧路径,文本型 名称序列)
功能：在大智慧中创建自定义数据名称（含备注、数据类型），成功返回真，否则返回假。
参数1 “行情路径“, 文本型, 大智慧根目录。
参数2 “名称序列”, 文本型, 要写入的数据名称（自动转为大写），每组内包含数据名称、备注、类型3项，以","分隔，每组之间以";"分隔；数据名称最大长度32个字符，备注最大长度25个字符；类型限“股票相关序列值、股票无关序列值、单值数值、单值字符串”四种。
示例：创建自定义数据 (“d:\dzh365”, “l01,,股票相关序列值;l02,,股票相关序列值;s01,,单值字符串;s02,,单值字符串;d01,,单值数值;d02,,单值数值;w01,,股票无关序列值;w02,,股票无关序列值;”)
2、函数：读单值数值
调用格式：<文本型> 读单值数值 (文本型 行情路径,文本型 数据名称)
功能：读取所有股票指定的单值数值，成功返回具体结果，否则返回空。
参数1 “行情路径“, 文本型, 大智慧根目录。
参数2 “数据名称”, 文本型, 要读取的数据名称，多个名称之间以“,”分割。
示例：读单值数值 (“d:\dzh365”, “D01,D02”)
3、函数：读单值字符串
调用格式：<文本型> 读单值字符串 (文本型 行情路径,文本型 数据名称)
功能：读取所有股票指定的单值字符串，成功返回具体结果，否则返回空。
参数1 “行情路径“, 文本型, 大智慧根目录。
参数2 “数据名称”, 文本型, 要读取的数据名称。
示例：读单值字符串 (“d:\dzh365”, “S01”)
4、函数：读股票相关序列值
调用格式：<文本型> 读股票相关序列值 (文本型 行情路径,文本型 股票代码,文本型 数据名称)
功能：读取指定股票指定的股票相关序列值，成功返回具体结果，否则返回空。
参数1 “行情路径“, 文本型, 大智慧根目录。
参数2 “股票代码“, 文本型, 要读取的8位股票代码。
参数3 “数据名称”, 文本型, 要读取的数据名称。
示例：读股票相关序列值 (“d:\dzh365”, “SH600000”, “L01”)
5、函数：读股票无关序列值
调用格式：<文本型> 读股票无关序列值 (文本型 行情路径,文本型 数据名称)
功能：读取所有股票指定的股票无关序列值，成功返回具体结果，否则返回空。
参数1 “行情路径“, 文本型, 大智慧根目录。
参数2 “数据名称”, 文本型, 要读取的数据名称。
示例：读股票无关序列值 (“d:\dzh365”, “W01”)
6、函数：读1分钟数据 （仅支持通达信）
调用格式：<逻辑型> 读1分钟数据 (文本型 行情路径,文本型 股票代码,文本型 保存目录,文本型 数据名称)
功能：读取通达信系统指定股票的1分钟数据，保存在指定目录，子目录为8位股票代码，文件名为8位日期.lc1或8位日期.txt，成功返回真，否则返回假。
参数1 “行情路径“, 文本型, 通达信根目录。
参数2 “股票代码“, 文本型, 8位股票代码；
参数3 “保存目录“, 文本型, 保存目录；
参数4 “保存格式“, 文本型, 可空, 指定数据输出格式，缺省时输出为通达信原格式（.lc1）；该参数为“文本”时，输出为文本格式（.TXT），数据顺序为：日期,时间,开盘,最高,最低,收盘,成交额,成交量；
示例：读1分钟数据 (“d:\zd_xsdzq”, “SH600000”,"c:\test")
读1分钟数据 (“d:\zd_xsdzq”, “SH600000”, “c:\test”, “文本”)
7、函数：读L2数据
调用格式：<逻辑型> 读L2数据 (文本型 行情路径,文本型 股票代码,文本型 保存目录,文本型 数据名称)
功能：读取指定股票的大智慧L2数据，保存在指定路径（文件名为8位股票代码.DAT），或者以文本格式返回，成功返回具体结果，否则返回空。
参数1 “行情路径“, 文本型, 大智慧根目录。
参数2 “股票代码“, 文本型, 8位股票代码；
参数3 “保存目录“, 文本型 , 可空, 保存路径，如果为空，返回读取的L2数据文本（日期,委买总单数,委卖总单数,委买中单比,委买大单比,委买特大比,委卖中单比,委卖大单比,委卖特大比,数据09,数据10,数据11,数据12),每行为一天数据;参数为保存路径时：按大智慧原格式（去掉6位文件头）保存在该目录，文件名为8位股票代码.DAT；
示例：读L2数据 (“d:\dzh365”, “SH600000”, "c:\test")
读L2数据 (“d:\dzh365”, “SH600000”, )
8、函数：写单值数值
调用格式：<逻辑型> 写单值数值 (文本型 行情路径,文本型 数据名称,文本型 待写数据)
功能：将单值数值写入到大智慧自定义数据，使用前，数据名称须提前在大智慧自定义数据表中创建；成功返回真，否则返回假。
参数1 “行情路径“, 文本型, 大智慧根目录。
参数2 “数据名称”, 文本型, 要写入的数据名称，多个名称之间以“,”分隔，数据项数与参数3对应；注意区分大小写；
参数3 “待写文本型数据”, 文本型, 可空, 待写入的文本型单值数值，格式：8位代码,数据1,数据2,...数据N；
示例：aa ＝ “SH600000,0.32,2.56” ＋ #换行符 ＋ “SZ000002,3.45,2.22” ＋ #换行符
写单值数值 (“d:\dzh365”, “D01,D02”,aa)
9、函数：写单值字符串
调用格式：<逻辑型> 写单值字符串 (文本型 行情路径,文本型 数据名称,文本型 待写数据)
功能：将单值字符串写入到大智慧自定义数据，使用前，数据名称须提前在大智慧自定义数据表中创建；成功返回真，否则返回假。
参数1 “行情路径“, 文本型, 大智慧根目录。
参数2 “数据名称”, 文本型, 要写入的数据名称，多个名称之间以“,”分隔；注意区分大小写；数据项数与参数3对应；
参数3 "待写数据", 文本型, 待写入的单值字符串，字符串项数与参数2对应；每行为一支股票的数据，格式为：8位股票代码;字符串1;字符串2; ... 字符串N；
示例：aa ＝ “SH600000;aaaaa1;bbbbb1;ccccc1” ＋ #换行符 ＋ “SZ000002;aaaaa2;bbbbb2;ccccc2” ＋ #换行符
写单值字符串 (“d:\dzh365”, “s01,s02,s03”, aa)
10、函数：写股票相关序列值
调用格式：<逻辑型> 写股票相关序列值 (文本型 行情路径,文本型 股票代码,文本型 数据名称,文本型 待写字节集数据,文本型 待写文本型数据)
功能：将股票相关序列值写入到大智慧自定义数据（参数4、参数5数据合并），使用前，数据名称须提前在大智慧自定义数据表中创建；成功返回真，否则返回假。
参数1 “行情路径“, 文本型, 大智慧根目录。
参数2 “股票代码“, 文本型, 8位股票代码。
参数3 “数据名称”, 文本型, 待写入的数据名称。
参数4 "待写字节集数据", 字节集, 可空, 待写入的字节集型股票相关序列值，格式：8位日期(整数型)+数据(小数型)；
参数5 “待写文本型数据”, 文本型, 可空, 待写入的文本型股票相关序列值，格式：8位日期,数据；每行为1天数据；
示例：cc ＝ 到字节集 (到整数 (20210301)) ＋ 到字节集 (到小数 (0.32)) ＋ 到字节集 (到整数 (20210302)) ＋ 到字节集 (到小数 (0.55)) ＋ 到字节集 (到整数 (20210303)) ＋ 到字节集 (到小数 (3.33))
aa ＝ “20210304,0.88” ＋ #换行符 ＋ “20210305,0.99” ＋ #换行符 ＋ “20210308,3.18” ＋ #换行符
写股票相关序列值 (“d:\dzh365”, “SH600000”, “L01”, cc, aa)
11、函数：写股票无关序列值
调用格式：<逻辑型> 写股票无关序列值 (文本型 行情路径,文本型 数据名称,文本型 待写字节集数据,文本型 待写文本型数据)
功能：将股票无关序列值写入到大智慧自定义数据，使用前，数据名称须提前在大智慧自定义数据表中创建；成功返回真，否则返回假。
参数1 “行情路径“, 文本型, 大智慧根目录。
参数2 “数据名称”, 文本型, 待写入的数据名称。
参数3 "待写字节集数据", 字节集, 可空, 待写入的字节集型股票无关序列值，格式：8位日期(整数型)+数据(小数型)；
参数4 “待写文本型数据”, 文本型, 可空, 待写入的文本型股票无关序列值，格式：8位日期,数据；每行为1天数据；
示例：cc ＝ 到字节集 (到整数 (20210301)) ＋ 到字节集 (到小数 (0.32)) ＋ 到字节集 (到整数 (20210302)) ＋ 到字节集 (到小数 (0.55)) ＋ 到字节集 (到整数 (20210303)) ＋ 到字节集 (到小数 (3.33))
aa ＝ “20210304,0.88” ＋ #换行符 ＋ “20210305,0.99” ＋ #换行符 ＋ “20210308,3.18” ＋ #换行符
写股票无关序列值 (“d:\dzh365”, “W01”, cc, aa)
测试代码：
.版本 2
.子程序 测试程序
.局部变量 aa, 文本型
.局部变量 cc, 字节集
' 示例程序
' 1、函数：创建自定义数据
创建自定义数据 (“d:\dzh365”, “l01,,股票相关序列值;l02,,股票相关序列值;s01,,单值字符串;s02,,单值字符串;d01,,单值数值;d02,,单值数值;w01,,股票无关序列值;w02,,股票无关序列值;”)
' 2 、函数：写单值数值
aa ＝ “SH600000,0.32,2.56” ＋ #换行符 ＋ “SZ000002,3.45,2.22” ＋ #换行符
写单值数值 (“d:\dzh365”, “D01,D02”, aa)
' 3、函数：写单值字符串
aa ＝ “SH600000;aaaaa1;bbbbb1;ccccc1” ＋ #换行符 ＋ “SZ000002;aaaaa2;bbbbb2;ccccc2” ＋ #换行符
写单值字符串 (“d:\dzh365”, “s01,s02,s03”, aa)
' 4、函数：写股票相关序列值
cc ＝ 到字节集 (到整数 (20210301)) ＋ 到字节集 (到小数 (0.32)) ＋ 到字节集 (到整数 (20210302)) ＋ 到字节集 (到小数 (0.55)) ＋ 到字节集 (到整数 (20210303)) ＋ 到字节集 (到小数 (3.33))
aa ＝ “20210304,0.88” ＋ #换行符 ＋ “20210305,0.99” ＋ #换行符 ＋ “20210308,3.18” ＋ #换行符
写股票相关序列值 (“d:\dzh365”, “SH600000”, “L01”, cc, aa)
' 5、函数：写股票无关序列值
cc ＝ 到字节集 (到整数 (20210301)) ＋ 到字节集 (到小数 (0.32)) ＋ 到字节集 (到整数 (20210302)) ＋ 到字节集 (到小数 (0.55)) ＋ 到字节集 (到整数 (20210303)) ＋ 到字节集 (到小数 (3.33))
aa ＝ “20210304,0.88” ＋ #换行符 ＋ “20210305,0.99” ＋ #换行符 ＋ “20210308,3.18” ＋ #换行符
写股票无关序列值 (“d:\dzh365”, “W01”, cc, aa)
' 6、函数：读单值数值
aa ＝ 读单值数值 (“d:\dzh365”, “D01,D02”)
' 7、函数：读单值字符串
aa ＝ 读单值字符串 (“d:\dzh365”, “S01”)
' 8、函数：读股票相关序列值
aa ＝ 读股票相关序列值 (“d:\dzh365”, “SH600000”, “L01”)
' 9、函数：读股票无关序列值
aa ＝ 读股票无关序列值 (“d:\dzh365”, “W01”)
' 10、函数：读1分钟数据
读1分钟数据 (“d:\zd_xsdzq”, “SH600000”, “c:\test”)
读1分钟数据 (“d:\zd_xsdzq”, “SH600000”, “c:\test”, “文本”)
' 11、函数：读L2数据
读L2数据 (“d:\dzh365”, “SH600000”, “c:\test”)
aa ＝ 读L2数据 (“d:\dzh365”, “SH600000”, )
返回 ()
