以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  策略编写求助区  (http://222.73.7.161/bbs/list.asp?boardid=11)
----  老师,帮忙写个模型  (http://222.73.7.161/bbs/dispbbs.asp?boardid=11&id=29615)

--  作者:漫步金字塔
--  发布时间:2012/10/3 23:46:46
--  老师,帮忙写个模型

每天从当天最高价下降A点做空,B点止损,D点止盈,从最低价上升A点做空,B点止损,D点止盈。

盈利一次后结束当天交易。麻烦老师编写下。谢谢


--  作者:RogarZ
--  发布时间:2012/10/4 13:01:45
--  
A B D 分别怎么定义?
--  作者:漫步金字塔
--  发布时间:2012/10/5 17:47:44
--  
ABD就是一个参数啊!老师
--  作者:jinzhe
--  发布时间:2012/10/8 11:20:07
--  
当天最高价在实际行情中是变化的,你这么搞会有未来的
--  作者:漫步金字塔
--  发布时间:2012/10/8 22:31:02
--  

错了,老师,是当前!呵呵


--  作者:fly
--  发布时间:2012/10/9 14:24:13
--  

variable:flag=0;// 全局变量,平仓时判断一下是盈利/亏损,若盈利则当天不再开仓

 

n:=barslast(date<>ref(date,1))+1;

 

//当天最高价.最低价
h1:=hhv(h,n);
l1:=llv(l,n);

 

//从当天最高价下降50最小变动价位开空仓
if l<h1-50*mindiff and h<>h1 and holding=0 and flag=0 then buyshort(1,1,thisclose);

 

//从当天最低价上升50最小变动价位开空仓
if h>l1+50*mindiff and l<>l1 and holding=0 and flag=0 then buyshort(1,1,thisclose);

 

//比开仓价高20个最小变动价位止损
if holding<0 and h>ENTERPRICE+20*MINDIFF and ENTERBARS>1 then
 BEGIN
 空损:SELLSHORT(1,1,THISCLOSE);
 END

 

//比开仓价低40个最小变动价位止赢 
if holding<0 and l<ENTERPRICE-40*MINDIFF and ENTERBARS>1 then
 BEGIN
 空盈:SELLSHORT(1,1,THISCLOSE);
 flag:=1;
 END
 
if time=CLOSETIME(0) then flag:=0;// 收盘的同时,flag赋值为0;收盘flag不赋值为0,第二天就不再开仓了


--  作者:fly
--  发布时间:2012/10/9 14:25:45
--  

运行在1分钟周期下