帮忙看看这个模型 - 公式模型编写问题提交 - 金字塔客服中心 - 专业程序化交易软件提供商

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。

金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 公式模型编写问题提交 → 帮忙看看这个模型

共有5269人关注过本帖树形打印复制链接主题：帮忙看看这个模型

汪新博

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：新手上路帖子：8 积分：50 威望：0 精华：0 注册：2012/9/4 9:53:03

Post By：2012/9/12 15:00:51 Post IP：58.216.181.82[显示全部帖子]

思路：穿越前期高点，做多（有多仓不加仓，有空仓，先平空，再做多），反之同理

汪新博

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：新手上路帖子：8 积分：50 威望：0 精华：0 注册：2012/9/4 9:53:03

Post By：2012/9/12 15:03:18 Post IP：58.216.181.82[显示全部帖子]

A:=HHV(H,5); //5周期高点
B:=LLV(L,5); //5周期低点
MA1:=MA(CLOSE,5);//没用
KD:=CROSS(CLOSE,REF(A,1));//收盘价（最新价）向上穿越5周期高点
KK:=CROSS(REF(B,1),CLOSE);//收盘价（最新价）向下穿越5周期低点
IF(KD=1) THEN
BEGIN
if HOLDING = 0 then
BEGIN
   buy(1,3,MARKET);
   MSGOUT(1,'开多');
end
if holding < 0 THEN
begin
   sellshort(1,HOLDING,MARKET);
   buy(1,3,MARKET);
   MSGOUT(1,'平空开多');
end
End

if (KK=1) then
begin
if HOLDING = 0 then
begin
  buyshort(1,3,MARKET);
  MSGOUT(1,'开空');
end;
if holding > 0 THEN
begin
  SELL(1,HOLDING,MARKET);
  buyshort(1,3,MARKET);
  MSGOUT(1,'平多开空');
end
end;