公式模型编写问题提交-代码修改成金字塔日内交易策略金字塔客服中心 - 专业程序化交易软件提供商

以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  代码修改成金字塔日内交易策略  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=166104)

--  作者：可米
--  发布时间：2018/10/25 12:34:33
--  代码修改成金字塔日内交易策略

N:=BARSLAST(DATE<>REF(DATE,1))+1;
OO:=VALUEWHEN(DATE<>REF(DATE,1),O);
HH1:=REF(HHV(H,N*M),N);
LL1:=REF(LLV(L,N*M),N);
HC1:=REF(HHV(C,N*M),N);
LC1:=REF(LLV(C,N*M),N);
HH2:=REF(HHV(H,N*M1),N);
LL2:=REF(LLV(L,N*M1),N);
HC2:=REF(HHV(C,N*M1),N);
LC2:=REF(LLV(C,N*M1),N);
SELLR:=IF((HH1-LC1)>=(HC1-LL1),HH1-LC1,HC1-LL1);
BUYR:=IF((HH2-LC2)>=(HC2-LL2),HH2-LC2,HC2-LL2);
BT:=K1*BUYR;
ST:=K2*SELLR;
BUYP:=OO+BT;
SELLP:=OO-ST;
H>=BUYP&&C>=MAX(O,BUYP),BPK;
L<=SELLP&&C<=MIN(O,SELLP),SPK;
AUTOFILTER;
老师帮忙改成金字塔日内交易策略，9点30以后开仓，15点以前无条件平仓

--  作者：wenarm
--  发布时间：2018/10/25 13:13:57
--
OO:=VALUEWHEN(TODAYBAR=1,O);
HH1:=REF(HHV(H,N*M),N);
LL1:=REF(LLV(L,N*M),N);
HC1:=REF(HHV(C,N*M),N);
LC1:=REF(LLV(C,N*M),N);
HH2:=REF(HHV(H,N*M1),N);
LL2:=REF(LLV(L,N*M1),N);
HC2:=REF(HHV(C,N*M1),N);
LC2:=REF(LLV(C,N*M1),N);
SELLR:=IF((HH1-LC1)>=(HC1-LL1),HH1-LC1,HC1-LL1);
BUYR:=IF((HH2-LC2)>=(HC2-LL2),HH2-LC2,HC2-LL2);
BT:=K1*BUYR;
ST:=K2*SELLR;
BUYP:=OO+BT;
SELLP:=OO-ST;
if H>=BUYP and C>=MAX(O,BUYP) then BEGIN
SELLSHORT(1,1,MARKET);
buy(HOLDING=0,1,MARKET);
end
if L<=SELLP&&C<=MIN(O,SELLP) then BEGIN
SELL(1,1,MARKET);
buyshort(HOLDING=0,1,MARKET);
end
//每天15点平仓。金字塔时间的话是190000.（北京时间加4小时）
if time=150000 then begin
SELL(1,1,MARKET);
SELLSHORT(1,1,MARKET);
end