求變動率的方法—求助管理員 [開拓者 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 進行 有償 編寫！（不貴！點擊查看價格！）
相關文章
-
沒有相關內容
會員登錄/注冊