求变动率的方法—求助管理员 [开拓者 TB]
- 咨询内容：
本帖最后由 songa 于 2013-7-15 11:16 编辑
如题，我想计算30秒变动率，采用了数据库读写，写出了以下代码
If(CurrentTime-ti>=0.000030)
{SetTBProfileString2File("c:\\cd.log",TimeToString(CurrentTime),"Close",Text(Close));
ti=CurrentTime;}
n=GetTBProfileString2File("c:\\cd.log",TimeToString(CurrentTime),"Close");
m=GetTBProfileString2File("c:\\cd.log",TimeToString(CurrentTime-0.000030),"Close");
FileAppend("c:\\err.log","n="+n+" "+TimeToString(CurrentTime));
FileAppend("c:\\err.log","m="+m+" "+TimeToString(CurrentTime-0.000030));
J=(Value(m)-Value(n))/Value(n); //求变动率
采用数据库函数SetTBProfileString2File和GetTBProfileString2File会产生大量数据文件，能不能用SetTBProfileString和GetTBProfileString替换呢？我试了如下代码，返回的是无效数据，为什么？
If(CurrentTime-ti>=0.000030)
{SetTBProfileString(TimeToString(CurrentTime),"Close",Text(Close));
ti=CurrentTime;}
n=GetTBProfileString(TimeToString(CurrentTime),"Close");
m=GetTBProfileString(TimeToString(CurrentTime-0.000030),"Close");
FileAppend("c:\\err.log","n="+n+" "+TimeToString(CurrentTime));
FileAppend("c:\\err.log","m="+m+" "+TimeToString(CurrentTime-0.000030));
J=(Value(m)-Value(n))/Value(n); //求变动率
- TB技术人员：
本帖最后由 songa 于 2013-7-15 13:38 编辑
String M;
String N;
Numeric j;
Numeric ti;
Numeric j;
赋值都没问题，不是赋值的问题的 - TB客服：
songa 发表于 2013-7-15 11:19
String M;
String N;
Numeric j;
不知道你代码中的 ti 的初值是怎么赋值的
有思路，想编写各种指标公式，程序化交易模型，选股公式，预警公式的朋友
可联系技术人员 QQ: 1145508240 进行 有偿 编写！（不贵！点击查看价格！）
相关文章
-
没有相关内容
会员登录/注册