以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  模型编写问题  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=144856)
--  作者：zengxing
--  发布时间：2016/12/16 12:27:00
--  模型编写问题
老师您好，我想请教一下，这个模型怎么编写

K线收盘价大于MA5;MA10;MA20;MA40;MA60

并且  MA5大于 MA10;MA20;MA40;MA60

对手价做多。

K线收盘价小于MA5;MA10;MA20;MA40;MA60

并且  MA5小于 MA10;MA20;MA40;MA60

对手价做空。

带止盈止损

如果，满足反向开单条件时，还没有触发止盈止损，就反手。
--  作者：jinzhe
--  发布时间：2016/12/16 13:23:20
--  

ma5:=ma(c,5);
ma10:=ma(c,10);
ma20:=ma(c,20);
ma40:=ma(c,40);
ma60:=ma(c,60);

if c>ma5 and c>ma10 and c>ma20 and c>ma40 and c>ma60 and ma5>ma10 and ma5>ma20 and ma5>ma40 and ma5>ma60 then begin
 sellshort(1,0,marketr);
 buy(holding=0,1,thisclose);
end


if c<ma5 and c<ma10 and c<ma20 and c<ma40 and c<ma60 and ma5<ma10 and ma5<ma20 and ma5<ma40 and ma5<ma60 then begin
 sell(1,0,marketr);
 buyshort(holding=0,1,thisclose);
end

if holding>0 and c-enterprice>20*mindiff then sell(1,0,marketr);
if holding<0 and enterprice-c>20*mindiff then sellshort(1,0,marketr);

if holding>0 and enterprice-c>10*mindiff then sell(1,0,marketr);
if holding<0 and c-enterprice>10*mindiff then sellshort(1,0,marketr);