以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  编写程序求组  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=96049)

--  作者:唐方一战
--  发布时间:2016/4/11 8:19:56
--  编写程序求组
版主,你好,我这个程序经过改编,依旧无法实现T+1,有些信号是实现了T+1,但有些还是不行,再次麻烦老师帮助修改一下

我是使用的信达证券下载的3.8版本,那里没有3.9.2版本下载

INPUT:M1(0.5,0.1,0.5,0.01),M2(0.5,0.1,0.5,0.01),ss(0,0,100000000,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);//中间变量


上轨:今日开盘价+M1*S;//求上轨
下轨:今日开盘价-M2*S;//求下轨

 

 


手数:=SS;    
       


//条件
开仓条件:=high>=上轨 ;//开多条件
平仓条件:=low<=下轨 ;//平仓条件 


//交易系统
IF TIME>090000  AND HOLDING = 0 THEN BEGIN 
开多:=BUY(开仓条件 ,手数,LIMITR,上轨);
开仓日期:=date;
 END
 rr:=ref(holding,todaybar);
IF    ref(HOLDING,todaybar) > 0   THEN BEGIN    
平仓:=sell(平仓条件 ,rr,LIMITR,下轨);
 
END

 



--  作者:jinzhe
--  发布时间:2016/4/11 8:53:11
--  
请截图说明一下哪些信号是没有满足的