HSP程式交易論壇 >> 程式交易 >> 論壇主區 >> 站務公告 >> HSP系統11月份完整歷史K線資料已可下載!
HSP系統11月份完整歷史K線資料已可下載!
Hunta,2009-11-30 23:45:54
目前已可下載11月份完整歷史K線資料，請至「績效回測」畫面，按「新增歷史資料」鈕即可。
以下是奇狐分筆買賣量 請教 1.如果每筆>30才顯示 如何改 ; 及2.HSP語法如何寫出
謝富雄,2009-12-02 11:40:55
{本公式，僅適用分筆成交分析週期 , Buy & Sell Volume , BSV}
XA:=C-C;
XB:=C/C;
XD:=CLOSE;
<%
VA= FFL.VarData("XA")
VB= FFL.VarData("XB")
VD= FFL.VarData("XD")
LT = UBound( VD )
for k = 1 to LT
if VD(k)>VD(k-1) then
VA( k )=1
else
VA( k )=0
end if
if VA(k-1)=1 and VD(k)=VD(k-1) then
VA( k )=1
else
VA( k )=VA(k)
end if
next
for k = 1 to LT
if VD(k)<VD(k-1) then
VB( k )=1
else
VB( k )=0
end if
if VB(k-1)=1 and VD(k)=VD(k-1) then
VB( k )=1
else
VB( k )=VB(k)
end if
next
FFL.VarData("XA")=VA
FFL.VarData("XB")=VB
%>
STICKLINE(XA=1,0,V,7,0),COLORRED;
STICKLINE(XB=1,0,V,7,0),COLORGREEN;
XE:=XA*VOL;
XF:=XB*VOL;
XG:=SUM(XE,0);
XH:=SUM(XF,0);
{
<%
VG= FFL.VarData("XG")
VH= FFL.VarData("XH")
LT = UBound( VG )
for k = 0 to LT
VG( k )=VG(LT)
VH( k )=VH(LT)
next
FFL.VarData("XG")=VG
FFL.VarData("XH")=VH
%>
}
買方量:XG , Linethick0 ;
賣方量:XH , Linethick0 ;
量:VOL ,Linethick0 ;
Hunta,2009-12-02 20:52:35
FFL.VarData是「與VBS、JS腳本間傳遞數組變量數據」
意思應該是與外部程式結合之做法，也就是引用外部資料來進行處理，
所以就算程式寫得出來，沒有外部配合的資料可能也沒用。
另外，日後PO文最好是主題相關的放在一起比較好，不同主題的話，可發新帖，如此方便日後或其他人索引，謝謝。
97 1 8: 此主題共有3帖 此頁3帖 每頁12帖
[查看完整模式] LeadBBS 5.0 耗時62.5毫秒 請求2次
|