以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  新手请教老师问题  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=76470)
--  作者：唐方一战
--  发布时间：2015/3/15 8:24:17
--  新手请教老师问题
金字塔老师，我是初学者，刚刚学习的金字塔程序编辑，现在学着编辑了一个简单的突破类程序，但加载后里面没发现开仓平仓的箭头，显示的只有突破轨道线，请老师帮忙看看是怎么回事？十分感谢！


INPUT:N1(5,1,21,,1),N2(21,5,34,1),M1(0.3,0.1,0.5,0.01),M2(0.3,0.1,0.5,0.01)，ss(1,1,100,1);//参数值


昨高:=CALLSTOCK(STKLABEL,VTHIGH,6,-1);//昨高
昨低:=CALLSTOCK(STKLABEL,VTLOW,6,-1);//昨低
昨收:=CALLSTOCK(STKLABEL,VTCLOSE,6,-1);//昨收
今日开盘价：=Valuewhen(date<>ref(date,1),open);

S1:=max(昨收-昨低，昨高-昨收）；//中间变量
S:=max(昨收*0.008，S1）；//中间变量

上轨:max(HHV(HIGH,3),今日开盘价+M1*S);//求上轨
下轨:min(LLV(LOW,3),今日开盘价-M2*S);//求下轨

短期均线:ma(CLOSE,N1);//求短期均线
长期均线:ma(CLOSE,N2);//求长期均线

手数:=SS;
        

//条件
开仓条件:=C>上轨 and  短期均线 >  长期均线；//开多条件
平仓条件:=C< 下轨  and 短期均线 <  长期均线;//平仓条件

//交易系统
IF TIME>090000  AND HOLDING = 0 THEN BEGIN 
开多:BUY(开仓条件 ,手数,上轨);
 开仓日期:=date;
 END
IF   CURRENTDATE  >  开仓日期 AND HOLDING > 0    THEN BEGIN    
平仓:BUYSHORT(平仓条件 ,手数,下轨);
 
END
--  作者：唐方一战
--  发布时间：2015/3/16 5:57:35
--  
金字塔老师，还有2个问题无法解决，

第一个问题，我在程序里面设定了第二天以及第二天以上才可以发出平仓信号的，但现在无法实现，我自己的表达如下：


IF   CURRENTDATE  >  开仓日期   AND HOLDING > 0    THEN BEGIN    
平仓:=sell(平仓条件 ,手数,THISCLOSE);


第二个问题：我如何设定开仓手数，才可以在测试的时候满仓进出，现在我设定的是只开一手。

请老师帮我修改一下，谢谢了！
--  作者：jinzhe
--  发布时间：2015/3/16 9:29:34
--  

1.平仓条件改成date>valuewhen(开仓条件,date)

2.开仓手数写0，就是满仓开