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


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 公式模型编写问题提交 → 海龟

   

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

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

主题：海龟
美女呀，离线，留言给我吧！
sue
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：54 积分：346 威望：0 精华：0 注册：2010/10/25 10:01:45 		海龟  发帖心情 Post By：2011/7/28 16:06:04    Post IP：218.107.195.35[只看该作者]

金字塔自带的海龟无空头，我在论坛上搜索 http://www.weistock.com/bbs/dispbbs.asp?BoardID=4&ID=246 这个帖子里的模型我复制过来后，可是加载后没有信号出现，这是为什么？

 回到顶部
帅哥哟，离线，有人找我吗？
fly
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：5082 积分：17642 威望：0 精华：6 注册：2010/7/15 9:05:58 		  发帖心情 Post By：2011/7/28 16:23:38    Post IP：58.246.57.26[只看该作者]

把里面的下单指令里的STOP改为MARKET

如:BUY(1,HOW,STOP,BUYHHV);------改为-------BUY(1,HOW,MARKET);

金字塔—专业程序化交易量化投资平台

客户服务部

-----------------------------------------------------------

欢迎您参加我公司的技术培训，具体培训需求请发邮件到

service@weistock.com

您的宝贵建议或者投诉，请发往邮箱:weiwei@weistock.com
 回到顶部
美女呀，离线，留言给我吧！
sue
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：54 积分：346 威望：0 精华：0 注册：2010/10/25 10:01:45 		  发帖心情 Post By：2011/7/28 16:31:52    Post IP：218.107.195.35[只看该作者]

还是不行啊~~

 回到顶部
帅哥哟，离线，有人找我吗？
fly
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：5082 积分：17642 威望：0 精华：6 注册：2010/7/15 9:05:58 		  发帖心情 Post By：2011/7/28 16:36:55    Post IP：58.246.57.26[只看该作者]

用的四楼的,只改了里面的"STOP改为MARKET".

 

在IF连续日线上,看的,运行良好

金字塔—专业程序化交易量化投资平台

客户服务部

-----------------------------------------------------------

欢迎您参加我公司的技术培训，具体培训需求请发邮件到

service@weistock.com

您的宝贵建议或者投诉，请发往邮箱:weiwei@weistock.com
 回到顶部
美女呀，离线，留言给我吧！
sue
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：54 积分：346 威望：0 精华：0 注册：2010/10/25 10:01:45 		  发帖心情 Post By：2011/7/28 16:50:29    Post IP：218.107.195.35[只看该作者]

input:trn(20,5,30),hn(20,5,30),lown(10,5,20); VARIABLE:dayCount=1,PositionCount=1,SellSign=0,dK=0;//加多空标志，1：多，-1：空 0：空仓 VARIABLE:EntAndExitSign=1,EntPoint=0,ExitPoint=0; VARIABLE:N=0; N:=MA(TR,trn); BUYHHV:=HHV(H,hn); SELLLLV:=LLV(L,lown); sellshortllv:=llv(l,hn); buyshorthhv:=hhv(h,lown); IF BARPOS>=hn THEN BEGIN IF BARPOS=hn THEN IF DayCount=hn/2 OR BARPOS=hn THEN BEGIN{hn/2天调整N值} N:=((hn-1)*N+TR)/hn;{计算N值} DayCount:=2; END DayCount:=DayCount+1; EntPoint:=ENTERBARS+1; IF EntPoint=EntAndExitSign THEN BEGIN{说明STOP指令买进头寸成功} PositionCount:=PositionCount+1;{头寸计数} SellSign:=True;{可以平仓信号，如果达到指定的价格} END IF PositionCount=1 THEN BEGIN{第一头寸} HOW:=CASH(0)*0.01/N;{波动性百分比决定头寸规模} if high=buyhhv then BEGIN dk:=1; 多开1:BUY(1,HOW,market);{在20日新高STOP指令买进} END; if low=sellshortllv then begin dk:=-1; 空开1:buyshort(1,HOW,market);{在20日新低STOP指令空开} end; END IF PositionCount=2 THEN BEGIN{如到第二头寸} HOW:=CASH(0)*0.01/N;{波动性百分比决定头寸规模} if dk=1 then 多开2:BUY(1,HOW,market);{在上头寸(即第一头寸)+0.5个N以STOP指令买进} if dk=-1 then 空开2:buyshort(1,HOW,market); END IF PositionCount=3 THEN BEGIN{如到第三头寸} HOW:=CASH(0)*0.01/N; if dk=1 then 多开3:BUY(1,HOW,market);{在上头寸(即第二头寸)+0.5个N以STOP指令买进} if dk=-1 then 空开3:buyshort(1,HOW,market); END IF PositionCount=4 THEN BEGIN HOW:=CASH(0)*0.01/N; if dk=1 then 多开4:BUY(1,HOW,market); if dk=-1 then 空开4:buyshort(1,HOW,market); END IF SellSign=True THEN BEGIN ExitPoint:=EXITBARS+1; if dk=1 then begin IF ExitPoint=EntAndExitSign THEN BEGIN {说明卖出成功} PositionCount:=1;{头寸计算复原} SellSign:=False; dk:=0; END IF ENTERPRICE-2*N then SELL(1,100%,market);{退出离盈利头寸} ELSE SELL(1,100%,market);{退出亏损头寸} end; if dk=-1 then begin IF ExitPoint=EntAndExitSign THEN BEGIN PositionCount:=1; SellSign:=False; dk:=0; END IF ENTERPRICE+2*N then sellSHORT(1,100%,market); ELSE sellSHORT(1,100%,market); END; END END; 是这样改吧。
[此贴子已经被作者于2011-7-28 16:51:24编辑过]
 回到顶部
美女呀，离线，留言给我吧！
sue
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：54 积分：346 威望：0 精华：0 注册：2010/10/25 10:01:45 		  发帖心情 Post By：2011/7/28 16:51:46    Post IP：218.107.195.35[只看该作者]

为什么 排版会变成这样啊。

 回到顶部
帅哥哟，离线，有人找我吗？
jinzhe
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：罗宾汉 帖子：46311 积分：50819 威望：0 精华：2 注册：2011/3/23 8:50:25 		  发帖心情 Post By：2011/7/28 16:56:34    Post IP：58.246.57.26[只看该作者]

用IE以外的浏览器就会这样了


金字塔—专业程序化交易量化投资平台

客户服务部

----------------------------------------------------------- 欢迎您参加我公司的技术培训，具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉，请发往邮箱:weiwei@weistock.com
 回到顶部
美女呀，离线，留言给我吧！
sue
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：54 积分：346 威望：0 精华：0 注册：2010/10/25 10:01:45 		  发帖心情 Post By：2011/7/29 9:39:52    Post IP：218.107.195.35[只看该作者]

这样还是没有信号~~~

 

 

input:trn(20,5,30),hn(20,5,30),lown(10,5,20);

VARIABLE:dayCount=1,PositionCount=1,SellSign=0,dK=0;//加多空标志，1：多，-1：空 0：空仓
VARIABLE:EntAndExitSign=1,EntPoint=0,ExitPoint=0;
VARIABLE:N=0;

N:=MA(TR,trn);
BUYHHV:=HHV(H,hn);
SELLLLV:=LLV(L,lown);

sellshortllv:=llv(l,hn);
buyshorthhv:=hhv(h,lown);

IF BARPOS>=hn THEN
BEGIN
 IF BARPOS=hn THEN
 IF DayCount=hn/2 OR BARPOS=hn  THEN
  BEGIN{hn/2天调整N值}
      N:=((hn-1)*N+TR)/hn;{计算N值}
      DayCount:=2;
  END
 
 DayCount:=DayCount+1;
 EntPoint:=ENTERBARS+1;
 
 IF EntPoint=EntAndExitSign THEN
     BEGIN{说明STOP指令买进头寸成功}
  PositionCount:=PositionCount+1;{头寸计数}
  SellSign:=True;{可以平仓信号，如果达到指定的价格}
   END
  
 IF PositionCount=1 THEN BEGIN{第一头寸}
  HOW:=CASH(0)*0.01/N;{波动性百分比决定头寸规模}
  if high=buyhhv then
   BEGIN
   dk:=1;
   多开1:BUY(1,HOW,market);{在20日新高STOP指令买进}
   END;
  
  if low=sellshortllv then
   begin
   dk:=-1;
   空开1:buyshort(1,HOW,market);{在20日新低STOP指令空开}
   end;
 END

 IF PositionCount=2 THEN BEGIN{如到第二头寸}
  HOW:=CASH(0)*0.01/N;{波动性百分比决定头寸规模}
  if dk=1 then 多开2:BUY(1,HOW,market);{在上头寸(即第一头寸)+0.5个N以STOP指令买进}
  if dk=-1 then 空开2:buyshort(1,HOW,market);
 END

 IF PositionCount=3 THEN BEGIN{如到第三头寸}
  HOW:=CASH(0)*0.01/N;
  if dk=1 then 多开3:BUY(1,HOW,market);{在上头寸(即第二头寸)+0.5个N以STOP指令买进}
  if dk=-1 then 空开3:buyshort(1,HOW,market);
 END

 IF PositionCount=4 THEN BEGIN
  HOW:=CASH(0)*0.01/N;
  if dk=1 then 多开4:BUY(1,HOW,market);
  if dk=-1 then 空开4:buyshort(1,HOW,market); 
 END

 IF SellSign=True THEN
  BEGIN
      ExitPoint:=EXITBARS+1;
      if dk=1 then
       begin
        IF ExitPoint=EntAndExitSign THEN
        BEGIN {说明卖出成功}
           PositionCount:=1;{头寸计算复原}
           SellSign:=False;
           dk:=0;
        END
    
        IF ENTERPRICE-2*N then
         SELL(1,100%,market);{退出离盈利头寸}
        ELSE
         SELL(1,100%,market);{退出亏损头寸}
       end;
      
      if dk=-1 then
        begin
       IF ExitPoint=EntAndExitSign THEN
        BEGIN
           PositionCount:=1;
           SellSign:=False;
           dk:=0;
        END
    
       IF ENTERPRICE+2*N then
        sellSHORT(1,100%,market);
       ELSE
        sellSHORT(1,100%,market);
      
       END;
     END
    
END;

 


 

 

 

 
 回到顶部
帅哥哟，离线，有人找我吗？
fly
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：5082 积分：17642 威望：0 精华：6 注册：2010/7/15 9:05:58 		  发帖心情 Post By：2011/7/29 9:54:05    Post IP：58.246.57.26[只看该作者]

在IF日线上,运行良好

input:trn(20,5,30),hn(20,5,30),lown(10,5,20);

VARIABLE:dayCount=1,PositionCount=1,SellSign=0,dK=0;//加多空标志，1：多，-1：空 0：空仓
VARIABLE:EntAndExitSign=1,EntPoint=0,ExitPoint=0;
VARIABLE:N=0;

N:=MA(TR,trn);
BUYHHV:=HHV(H,hn);
SELLLLV:=LLV(L,lown);

SELLSHORTLLV:=llv(l,hn);
BUYSHORTHHV:=hhv(h,lown);

IF BARPOS>=hn THEN
 BEGIN
  IF BARPOS=hn THEN
  IF DayCount=hn/2 OR BARPOS=hn  THEN {hn/2天调整N值}
    BEGIN
     N:=((hn-1)*N+TR)/hn;{计算N值}
     DayCount:=2;
    END
  
  DayCount:=DayCount+1;
  EntPoint:=ENTERBARS+1;
  
  IF EntPoint=EntAndExitSign THEN
     BEGIN{说明STOP指令买进头寸成功}
    PositionCount:=PositionCount+1;{头寸计数}
    SellSign:=True;{可以平仓信号，如果达到指定的价格}
     END
    
  IF PositionCount=1 THEN  {第一头寸}
   BEGIN
    HOW:=CASH(0)*0.01/N;{波动性百分比决定头寸规模}
    if H>=BUYHHV then
      BEGIN
      dk:=1;
      多开1:BUY(1,HOW,MARKET);{在20日新高STOP指令买进}
      END;
     
    if L<=SELLSHORTLLV then
      begin
      dk:=-1;
      空开1:buyshort(1,HOW,MARKET);{在20日新低STOP指令空开}
      end;
   END
 
  IF PositionCount=2 THEN {如到第二头寸}
   BEGIN
    HOW:=CASH(0)*0.01/N;{波动性百分比决定头寸规模}
    if dk=1 then 多开2:BUY(H>=ENTERPRICE+0.5*N,HOW,MARKET);{在上头寸(即第一头寸)+0.5个N以STOP指令买进}
    if dk=-1 then 空开2:buyshort(L<=ENTERPRICE-0.5*N,HOW,MARKET);
   END
 
  IF PositionCount=3 THEN {如到第三头寸}
   BEGIN
    HOW:=CASH(0)*0.01/N;
    if dk=1 then 多开3:BUY(H>=ENTERPRICE+0.5*N,HOW,MARKET);{在上头寸(即第二头寸)+0.5个N以STOP指令买进}
    if dk=-1 then 空开3:buyshort(L<=ENTERPRICE-0.5*N,HOW,MARKET);
   END
 
  IF PositionCount=4 THEN
   BEGIN
    HOW:=CASH(0)*0.01/N;
    if dk=1 then 多开4:BUY(H>=ENTERPRICE+0.5*N,HOW,MARKET);
    if dk=-1 then 空开4:buyshort(L<=ENTERPRICE-0.5*N,HOW,MARKET); 
   END
 
  IF SellSign=True THEN
    BEGIN
        ExitPoint:=EXITBARS+1;
        if dk=1 then
          begin
          IF ExitPoint=EntAndExitSign THEN
           BEGIN {说明卖出成功}
              PositionCount:=1;{头寸计算复原}
              SellSign:=False;
              dk:=0;
           END
        
          IF ENTERPRICE-2*N then
             SELL(L<=SELLLLV,100%,MARKET);{退出离盈利头寸}
          ELSE
             SELL(L<=ENTERPRICE-2*N,100%,MARKET);{退出亏损头寸}
          end;
         
        if dk=-1 then
          begin
          IF ExitPoint=EntAndExitSign THEN
           BEGIN
              PositionCount:=1;
              SellSign:=False;
              dk:=0;
           END
        
          IF ENTERPRICE+2*N then
           sellSHORT(H>=BUYSHORTHHV,100%,MARKET);
          ELSE
           sellSHORT(H>=ENTERPRICE+2*N,100%,MARKET);         
          END;
     END
      
 END;

金字塔—专业程序化交易量化投资平台

客户服务部

-----------------------------------------------------------

欢迎您参加我公司的技术培训，具体培训需求请发邮件到

service@weistock.com

您的宝贵建议或者投诉，请发往邮箱:weiwei@weistock.com
 回到顶部
美女呀，离线，留言给我吧！
sue
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：54 积分：346 威望：0 精华：0 注册：2010/10/25 10:01:45 		  发帖心情 Post By：2011/7/29 10:12:27    Post IP：218.107.195.35[只看该作者]

谢谢，我知道错在哪里了。

 回到顶部
总数 13 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 03.60547 秒, 6 次数据查询