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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 老师帮我成金字塔日内交易

   

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


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

主题:老师帮我成金字塔日内交易

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


加好友 发短信
等级:新手上路 帖子:6 积分:0 威望:0 精华:0 注册:2018/10/23 10:50:05
老师帮我成金字塔日内交易  发帖心情 Post By:2018/10/25 21:13:10    Post IP:14.106.98.51[只看该作者]


DTM:=IF(OPEN<=REF(OPEN,1),0,MAX((HIGH-OPEN),(OPEN-REF(OPEN,1))));
DBM:=IF(OPEN>=REF(OPEN,1),0,MAX((OPEN-LOW),(OPEN-REF(OPEN,1))));
STM:=SUM(DTM,30);
SBM:=SUM(DBM,30);
A:=IF(STM>SBM,(STM-SBM)/STM,IFELSE(STM=SBM,0,(STM-SBM)/SBM));
AA:MA(A,45);
COUNT(AA<REF(AA,1),29)>27 && AA>REF(AA,1),BK(50); 
COUNT(AA>REF(AA,1),29)>21 && AA<REF(AA,1),SK(50);
C-BKPRICE>69||CROSS(LV(C,60),C)||C-BKPRICE>130&&EMA(C,30)<REF(EMA(C,30),1),SP(BKVOL);
BKPRICE-C>8,SP(BKVOL);
SKPRICE-C>Q||CROSS(C,HV(C,40))||SKPRICE-C>53&&EMA(C,23)>REF(EMA(C,23),1),BP(SKVOL);
C-SKPRICE>11,BP(SKVOL);
(BKHIGH-C)/BKPRICE*1000>29,SP(BKVOL);
(C-SKLOW)/SKPRICE*1000>20,BP(SKVOL);
老师帮我改成金字塔日内交易,早上9点开盘,到下午15点收盘平掉所有仓位

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


加好友 发短信
等级:管理员 帖子:26631 积分:0 威望:0 精华:7 注册:2015/4/9 14:59:07
  发帖心情 Post By:2018/10/26 1:49:40    Post IP:180.159.145.220[只看该作者]

DTM:=IF(OPEN<=REF(OPEN,1),0,MAX((HIGH-OPEN),(OPEN-REF(OPEN,1))));
DBM:=IF(OPEN>=REF(OPEN,1),0,MAX((OPEN-LOW),(OPEN-REF(OPEN,1))));
STM:=SUM(DTM,30);
SBM:=SUM(DBM,30);
A:=IF(STM>SBM,(STM-SBM)/STM,IFELSE(STM=SBM,0,(STM-SBM)/SBM));
AA:MA(A,45);
 
if COUNT(AA<REF(AA,1),29)>27 and AA>REF(AA,1) and holding=0 then BEGIN
 buy(1,50,MARKETR);
end
if COUNT(AA>REF(AA,1),29)>21   and   AA<REF(AA,1) and holding=0 then begin
 BUYSHORT(1,50,MARKETR);
end
if C-ENTERPRICE>69 or CROSS(LLV(C,60),C) or C-ENTERPRICE>130  and  EMA(C,30)<REF(EMA(C,30),1) and holding>0 then begin
 sell(1,holding,MARKETR);
end
if ENTERPRICE-C>8 and holding>0 then begin
 sell(1,holding,MARKETR);
end
if ENTERPRICE-C>Q or CROSS(C,HHV(C,40)) or ENTERPRICE-C>53  and  EMA(C,23)>REF(EMA(C,23),1) and holding<0 then begin
 sellshort(1,holding,MARKETR);
end
if C-ENTERPRICE>11  and holding<0 then begin
 sellshort(1,holding,MARKETR);
end
if (HHV(HIGH,ENTERBARS+1)-C)/ENTERPRICE*1000>29 and holding>0 then begin
 sell(1,holding,MARKETR);
end
if (C-LLV(LOW,ENTERBARS+1))/ENTERPRICE*1000>20 and holding<0 then begin
 sellshort(1,holding,MARKETR);
end

变量Q不知道是什么。你自己填充处理。建议你学习pel语言基本语法后,自行尝试编写修改。


编程无捷径,技巧靠积累。
 回到顶部