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


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

   

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


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

主题:文华改金字塔

帅哥哟,离线,有人找我吗?
dck886
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:11 积分:0 威望:0 精华:0 注册:2020/2/18 20:57:47
文华改金字塔  发帖心情 Post By:2020/12/28 15:26:25    Post IP:122.238.151.60[只看该作者]

老师求把以外文华海龟改成金字塔的,一根k只能有一个信号,收盘价模型,要是跟我在文化信号一样我就在金字塔做了!

TR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));//真实波幅 ATR:=MA(TR,26); //求26个周期内真实波幅的简单移动平均 TC..INTPART((MONEYTOT*0.01/(UNIT*ATR)));//根据权益的1%计算下单手数 MTC..4*TC; //总的持仓头寸 HH:=HV(H,20); LL:=LV(L,20); CROSSUP(C,HH)&&ISLASTBK=0&&ISLASTSK=0&&BARPOS>=26,BK(TC);//最新价超过20周期的最高值,首次买入开仓,手数为TC手 CROSSDOWN(C,LL)&&ISLASTBK=0&&ISLASTSK=0,SK(TC); //最新价跌破20周期的最低值,首次卖出开仓,手数为TC手 C>=BKPRICE+0.5*ATR&&BKVOL<MTC&&ISLASTBK,BK(TC);//价格在上次开仓的基础上上涨0.5倍ATR,在手数不超过4倍TC的时候,买入加仓TC手 C<=SKPRICE-0.5*ATR&&SKVOL<MTC&&ISLASTSK,SK(TC);//价格在上次开仓的基础上下跌0.5倍ATR,在手数不超过4倍TC的时候,卖出加仓TC手 C<=(BKPRICE-2*ATR)&&BKVOL>0,SP(BKVOL);//最新价小于开仓价减去2倍的ATR,止损平仓 C>=(SKPRICE+2*ATR)&&SKVOL>0,BP(SKVOL); //最新价大于开仓价加上2倍的ATR,止损平仓 CROSSUP(H,HV(H,10))&&SKVOL>0,BP(SKVOL);//最高价上穿10周期最高价,平仓 CROSSDOWN(L,LV(L,10))&&BKVOL>0,SP(BKVOL); //最低价下穿10周期的最低价,平仓 TRADE_AGAIN(10);


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


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2020/12/28 15:32:12    Post IP:58.246.57.26[只看该作者]

 麻烦把代码按行复制下来,你这样搞,注释和代码混杂在一起。我分不清的。


命数如织,当如磐石。
 回到顶部
帅哥哟,离线,有人找我吗?
dck886
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:11 积分:0 威望:0 精华:0 注册:2020/2/18 20:57:47
  发帖心情 Post By:2020/12/28 15:41:35    Post IP:122.238.151.60[只看该作者]

TR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR:=MA(TR,26); 
TC..INTPART((MONEYTOT*0.01/(UNIT*ATR)));
MTC..4*TC; 
HH:=HV(H,20);
LL:=LV(L,20);
CROSSUP(C,HH)&&ISLASTBK=0&&ISLASTSK=0&&BARPOS>=26,BK(TC);
CROSSDOWN(C,LL)&&ISLASTBK=0&&ISLASTSK=0,SK(TC); 
C>=BKPRICE+0.5*ATR&&BKVOL<MTC&&ISLASTBK,BK(TC);
C<=SKPRICE-0.5*ATR&&SKVOL<MTC&&ISLASTSK,SK(TC);
C<=(BKPRICE-2*ATR)&&BKVOL>0,SP(BKVOL);
C>=(SKPRICE+2*ATR)&&SKVOL>0,BP(SKVOL); 
CROSSUP(H,HV(H,10))&&SKVOL>0,BP(SKVOL);
CROSSDOWN(L,LV(L,10))&&BKVOL>0,SP(BKVOL); 
TRADE_AGAIN(10);


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


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2020/12/28 16:28:32    Post IP:58.246.57.26[只看该作者]

TRX:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR:=MA(TRX,26);
TC:=INTPART((ASSET*0.01/(MULTIPLIER*ATR)));
MTC:=4*TC;
HH:=REF(HHV(H,20),1);
LL:=ref(LlV(L,20),1);

IF CROSS(C,HH) and holding=0 and  BARPOS>=26 THEN BUY(1,tc,market);
if CROSS(LL,C) AND  holding=0 then buyshort(1,TC,market);
if C>=ENTERPRICE+0.5*ATR AND ABS(holding)<MTC AND holding>0 then BUY(1,tc,market);
IF C<=ENTERPRICE-0.5*ATR AND ABS(holding) AND holding<0 then buyshort(1,TC,market);
IF C<=(ENTERPRICE-2*ATR) AND HOLDING>0 THEN SELL(1,HOLDING,MARKET);
IF C>=(ENTERPRICE+2*ATR) AND HOLDING<0 THEN SELLSHORT(1,HOLDING,MARKET);
IF CROSS(H,REF(HHV(H,10),1)) AND HOLDING<0 THEN SELLSHORT(1,HOLDING,MARKET);
IF CROSS(LLV(L,10),L) AND HOLDING>0 THEN SELL(1,HOLDING,MARKET);


命数如织,当如磐石。
 回到顶部
帅哥哟,离线,有人找我吗?
dck886
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:11 积分:0 威望:0 精华:0 注册:2020/2/18 20:57:47
  发帖心情 Post By:2020/12/28 16:36:08    Post IP:122.238.151.60[只看该作者]

老师一个信号也没有

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


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2020/12/28 16:37:10    Post IP:58.246.57.26[只看该作者]

 
图片点击可在新窗口打开查看此主题相关图片如下:temp.png
图片点击可在新窗口打开查看

本地测试正常。


命数如织,当如磐石。
 回到顶部
帅哥哟,离线,有人找我吗?
FireScript
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2020/12/28 16:40:26    Post IP:58.246.57.26[只看该作者]

 你本地是不是数据量太少了。


命数如织,当如磐石。
 回到顶部
帅哥哟,离线,有人找我吗?
dck886
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:11 积分:0 威望:0 精华:0 注册:2020/2/18 20:57:47
  发帖心情 Post By:2020/12/28 16:44:59    Post IP:122.238.151.60[只看该作者]

真是奇怪,我就是啥也没,我更新下版本试试

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


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2020/12/28 16:46:05    Post IP:58.246.57.26[只看该作者]



截个图我看下。

贴图教程: http://www.weistock.com/bbs/dispbbs.asp?boardid=2&Id=31614


命数如织,当如磐石。
 回到顶部
帅哥哟,离线,有人找我吗?
dck886
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:11 积分:0 威望:0 精华:0 注册:2020/2/18 20:57:47
  发帖心情 Post By:2020/12/28 16:51:06    Post IP:122.238.151.60[只看该作者]

可以了,内存占太多不计算了
IF CROSS(H,REF(HHV(H,10),1)) AND HOLDING<0 THEN SELLSHORT(1,HOLDING,MARKET); 
IF CROSS(LLV(L,10),L) AND HOLDING>0 THEN SELL(1,HOLDING,MARKET);
这两句能变成平空之后开多,平多之后开空吗

 回到顶部
总数 13 1 2 下一页