以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  [原创]  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=96519)
--  作者：苦麻菜真好吃
--  发布时间：2016/4/20 9:39:33
--  [原创]
如何取macd上红绿柱状的值？
 当macd红色柱状体的值出现四根逐渐递增时，买入开仓，
当macd绿色柱状体的值出现四根逐渐增大时，卖出开仓，

                                                                  若没有出现四根逐渐递增则从新计算
--  作者：jinzhe
--  发布时间：2016/4/20 9:45:11
--  

if all(macd>0,4) and all(macd>ref(macd,1),4) then begin

   sellshort(1,0,marketr);

   buy(holding=0,1,marketr);

end

 

if all(macd<0,4) and all(macd<ref(macd,1),4) then begein

   sell(1,0,marketr);

   buyshort(holding=0,1,marketr);

end
--  作者：苦麻菜真好吃
--  发布时间：2016/4/20 10:16:40
--  
 HH:HHV(H,ENTERBARS ）;//开仓后的最高价
LL:LLV(L,ENTERBARS ）;//开仓后的最低价

开仓后的最高最低价是这样写吗？
--  作者：jinzhe
--  发布时间：2016/4/20 10:23:20
--  
 HH:HHV(H,ENTERBARS+1 ）;//开仓后的最高价
LL:LLV(L,ENTERBARS+1 ）;//开仓后的最低价
避免enterbars为0时产生的意外结果
--  作者：苦麻菜真好吃
--  发布时间：2016/4/20 10:44:25
--  
请问保本止损怎么设置、有例子吗？
--  作者：jinzhe
--  发布时间：2016/4/20 10:48:23
--  

参考系统自带的 移动止损（止盈）范例
--  作者：苦麻菜真好吃
--  发布时间：2016/4/20 10:58:58
--  
IF hh1>=ENTERPRICE+10*MINDIFF THEN 
  多头保本止损价:=ENTERPRICE+2*MINDIFF;
  
  IF hh1>=ENTERPRICE+10*MINDIFF  THEN BEGIN
  SELL(1,HOLDING,LIMIT);//二级止损
  END


我这样写对吗？
--  作者：jinzhe
--  发布时间：2016/4/20 11:05:58
--  


//定义参数
INPUT:N1(5,1,100,10),N2(10,1,120,10),N3(20,1,200,20),N4(60,1,200,20);

//绘制四条均线
MA1:MA(C,N1);
MA2:MA(C,N2);
MA3:MA(C,N3);
MA4:MA(C,N4);

//下单条件
COND1:=CROSS(MA2,MA1);
COND2:=CROSS(MA1,MA2);

//移动止损部分************************
//求出持仓以来的最高价或最低价，通过与当前价做比较，判断资金回落的幅度
DTYDZS:=(HHV(H,ENTERBARS)-CLOSE)/AVGENTERPRICE>=0.1;
KTYDZS:=(CLOSE-LLV(L,ENTERBARS))/AVGENTERPRICE>=0.1;
SELL(DTYDZS,0,MARKET);
SELLSHORT(KTYDZS,0,MARKET);
//*************************************

//下单
SELL(COND2,0,MARKET);
SELLSHORT(COND1,0,MARKET);

BUY(COND1,30%,MARKET);
BUYSHORT(COND2,30%,MARKET);

 

系统自带的范例，用户可以参考一下
--  作者：苦麻菜真好吃
--  发布时间：2016/4/20 11:18:32
--  
商品期货日内平仓   下午15:00平仓   和夜盘23：30收盘平仓       螺纹次日1:00收盘平仓怎么写
--  作者：jinzhe
--  发布时间：2016/4/20 11:23:18
--  

nn:=STRLEN(stklabel);
ss:=strleft(stklabel,nn-2);

if stricmp(ss,\'rb\')=0 and time=050000 then begin

   sell;

   sellshort;

end

 

if stricmp(ss,\'rb\')<>0 and time=033000 then begin

   sell;

   sellshort;

end

 

if time=190000 then begin

   sell;

   sellshort;

end