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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件交易策略发布专区 → 人人宽客C18

   

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


  共有8279人关注过本帖树形打印复制链接

主题:人人宽客C18

帅哥哟,离线,有人找我吗?
系统使用者
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:黑侠 帖子:808 积分:667 威望:0 精华:0 注册:2011/4/9 16:17:57
人人宽客C18  发帖心情 Post By:2018/2/2 23:11:20 [只看该作者]

VARIABLE:COUNTT:=0;
IRECTION:=0;
LENGTH:=16;
OFFSET:=1;
TRAILSTARTPCT:=0.8;
PARAM:=1.05;    
N:=1;
PCNT:=1;
Direction:=0;
FUND:=30000;
Lots:=max(1,INTPART(Fund/(O*MULTIPLIER*VOLUNIT*0.1)));

count1:=REF(COUNTT,1);
IF DATE<>REF(DATE,1) THEN //控制单日最大亏损次数为2次
   COUNTT:=0;
   ELSE
 COUNTT:=count1;

MIDLINE:=MA(CLOSE,LENGTH);
BAND:=STD(CLOSE,LENGTH); 
UPLINE:=MIDLINE+OFFSET*BAND;
DOWNLINE:=MIDLINE-OFFSET*BAND; 
RRANGE:=2*OFFSET*BAND/MIDLINE;
AVGRANGE:=MA(RRANGE,LENGTH);
AVGVOL:=MA(V,LENGTH);

SKLow:=llv(l,enterbars);
BKHigh:=hhV(H,enterbars);
if enterprice>0 then 
BEGIN
PP:=MIN((enterprice-SKLow)/enterprice,0.1);
TT:=MIN((BKHigh-enterprice)/enterprice,0.1);
end
PROFITPCNT1:=PP*10;
PROFITPCNT2:=TT*10;
//-----------------------------进仓--------------------------------------
BuyK:=BARPOS>LENGTH AND holding=0 AND COUNTT<=N AND RRANGE>PARAM*AVGRANGE AND V>PARAM*AVGVOL AND H>UPLINE AND REF(H,1)>REF(UPLINE,1) AND H>=ref(h,1) and Direction>=0;
SellK:=BARPOS>LENGTH AND holding=0 and COUNTT<=N AND RRANGE>PARAM*AVGRANGE AND V>PARAM*AVGVOL AND L<DOWNLINE AND REF(L,1)<REF(DOWNLINE,1) AND L<=ref(l,1) and Direction<=0;

//入场
买开:Buy(BuyK,Lots,market); //买开
卖开:buyShort(SellK,Lots,MARKET);//卖开

//-------------------------------止损指令-----------------------------//
IF holding>0 and enterbars>1 THEN 
BEGIN
    PRICESP:=MIN(O,enterprice*(1-PCNT/100));
    多单止损:sell(L<PRICESP,0,limit,PRICESP);  //多单卖平止损
    COUNTT:=COUNTT+1;
END
IF holding<0 and enterbars>1  THEN 
BEGIN
    PRICEBP:=MAX(O,enterprice*(1+PCNT/100));
    空单止损:sellshort(H>PRICEBP,0,limit,PRICEBP);  //空单买平止损
    COUNTT:=COUNTT+1;
END

//---------------------------止盈--------------------------------//
IF holding<0 and enterbars>1 AND SKLOW<=enterprice*(1-TRAILSTARTPCT/100) THEN 
BEGIN
    PRICEBY:=MAX(O,enterprice-(enterprice-SKLOW)*PROFITPCNT1);
    空单止盈:sellshort(H>PRICEBY,0,limit,PRICEBY);  //空单买平止盈
END
 
IF holding>0 and enterbars>1 AND BKHIGH>= enterprice*(1+TRAILSTARTPCT/100) THEN 
BEGIN
    PRICESY:=MIN(O,enterprice+(BKHIGH-enterprice)*PROFITPCNT2);
    多单止盈:sell(L<PRICESY,0,limit,PRICESY);  //多单卖平止盈
END

 回到顶部
帅哥哟,离线,有人找我吗?
aacky111
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:6 积分:0 威望:0 精华:0 注册:2011/5/22 11:18:15
  发帖心情 Post By:2018/4/1 23:44:21 [只看该作者]

支持一下楼主!

 回到顶部
帅哥哟,离线,有人找我吗?
Morzlk
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:19 积分:0 威望:0 精华:0 注册:2018/1/3 16:32:55
  发帖心情 Post By:2018/7/3 10:44:20 [只看该作者]

//-----------------------------进仓--------------------------------------
BuyK:=BARPOS>LENGTH AND holding=0 AND COUNTT<=N AND RRANGE>PARAM****GRANGE AND V>PARAM****GVOL AND H>UPLINE AND REF(H,1)>REF(UPLINE,1) AND H>=ref(h,1) and Direction>=0;
SellK:=BARPOS>LENGTH AND holding=0 and COUNTT<=N AND RRANGE>PARAM****GRANGE AND V>PARAM****GVOL AND L<DOWNLINE AND REF(L,1)<REF(DOWNLINE,1) AND L<=ref(l,1) and Direction<=0;
无法进行对算数表达!楼主是否要检查下

 回到顶部