求變動率的方法—求助管理員

作者：開拓者 TB 來源：cxh99.com 發布時間：2013年08月06日

咨詢內容： 本帖最后由 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 的初值是怎么賦值的