對序列模式還是不太理解 [金字塔]
- 咨詢內(nèi)容:
公式:
runmode:1;
m:PEAKBARS(4,5,1),linethick0;
tmp:readtest(m),linethick0;自定義函數(shù):
Function readtest(Formula,M)
'系統(tǒng)會在逐K線模式解釋公式時的每個周期都會調(diào)用此函數(shù)一遍,因此設(shè)計時應(yīng)該注重程序的執(zhí)行效率,不要重復(fù)的執(zhí)行一些沒必要的代碼
DataCount = UBound(M)
If DataCount <> Formula.DataSize-1 Then
Exit Function
End If'定義一個計算返回的數(shù)組
Dim ResultMa
Redim ResultMa(DataCount)
For i = 0 To Formula.DataSize-1
ResultMa(i) = document.GetPrivateProfileInt("aa", M(i),0 , "C:\1.ini")
NEXT
readtest=ResultMa
End Function1.ini 內(nèi)容
[aa]
0=0
1=2
2=4
3=6===============================================
請問:
if 條件為真 then tag:=writetest(M,99); 中的writetest該如何寫呢。也是序列轉(zhuǎn)換嗎?
Function writetest(Formula,m,value)
tag = document.WritePrivateProfileInt("aa",m,value , "C:\1.ini")
End Function
以上我寫的沒成功。不能改1.ini中的數(shù)據(jù)。
- 金字塔客服:
參考http://www.weistock.com/runmode.htm
視頻
金字塔后臺高級編程技巧
http://v.youku.com/v_show/id_XMjkyNjU3Mjc2.html 觀看密碼: bj123456
里面對序列模式和逐K線模式有了很好的介紹
- 用戶回復(fù):
謝謝答復(fù),看了幾遍視頻,
請問能不能幫我做個writetest函數(shù)。我只要結(jié)果,不想浪費太多時間。謝謝客服人員。。
如果以上指標(biāo)公式不適用于您常用的行情軟件
或者您想改編成選股公式,以便快速選出某種形態(tài)個股的話,
- 上一篇:VBA怎樣取到十字光標(biāo)交叉點的坐標(biāo)值?
- 下一篇:沒有了!
相關(guān)文章
-
指定的模型還沒有相關(guān)內(nèi)容!