以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  请老师帮忙改写编译通不过  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=171455)
--  作者：周道
--  发布时间：2019/8/5 11:30:37
--  请老师帮忙改写编译通不过
//定义参数
Input:B(30,1,100,1);//均线和标准差参数

手数:=ss;
//中间变量
MA1:=MA(C,A);//5日均线
MA2:=MA(C,B);//30日均线
//交易条件

BuyCond:=CROSS(MA1,MA2);//开多平空条件
SellCond:=CROSS(MA2,MA1);//开空平多条件

//下单语句
if BuyCond then begin
 Sellshort(holding<0,0,market);//市价平空全平
 Buy(holding=0,2,market);//市价开多2手
end
if SellCond then begin
 Sell(holding>0,0,market);//市价平多全平
 BuyShort(holding=0,2,market);//市价开空2手
end
//止盈止损
//止盈
IF C-ENTERPRICE>20*MINDIFF THEN BEGIN
SELL(1,HOLDING,MARKET);//高于20点止盈1手
END
IF C+AVGENTERPRICE<20*MINDIFF THEN BEGIN
SELLSHORT(1,HOLDING,MARKET);//低于20点止盈1手

//止损
IF ENTERPRICE-C>10*MINDIFF THEN BEGIN
SELL(2,HOLDING,MARKET);
IF ENTERPRICE-C>10*MINDIFF THEN BEGIN
SELLSHORT(2,HOLDING,MARKET);
END