老师，帮忙写个模型 - 策略编写求助区 - 金字塔客服中心 - 专业程序化交易软件提供商

金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 策略编写求助区 → 老师，帮忙写个模型

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。

共有6055人关注过本帖树形打印复制链接主题：老师，帮忙写个模型

fly

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：5082 积分：17642 威望：0 精华：6 注册：2010/7/15 9:05:58

Post By：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，第二天就不再开仓了