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


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

   

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


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

主题:请老师帮忙修改程序化模型

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


加好友 发短信
等级:新手上路 帖子:32 积分:0 威望:0 精华:0 注册:2018/2/4 22:00:19
请老师帮忙修改程序化模型  发帖心情 Post By:2018/3/11 21:43:01    Post IP:120.239.32.9[显示全部帖子]

老师帮忙修改成金字塔程序化交易模型

第一个指标出现(抄底)信号后结合MACD金叉后下一根K线买入多单,止损点放在下单前5根K线点最低点,浮盈超过百分之十后设置百分之五的保本动态止损

A11:=MA(CLOSE,5);
A12:=MA(CLOSE,10);
A13:=MA(CLOSE,20);
A14:=MA(CLOSE,30);
均线多头排列:IF(A11 > A12 AND A12 > A13 AND CROSS(A13,A14) AND C > O,18,0),STICK,LINETHICK2,COLOR00BBFF;
DRAWTEXT(A11 > A12 AND A12 > A13 AND CROSS(A13,A14) AND C > O,35,'均线多头排列'),COLOR00FFFF;
VAR1:=HHV(HIGH,9)-LLV(LOW,9);
VAR2:=HHV(HIGH,9)-CLOSE;
VAR3:=CLOSE-LLV(LOW,9);
VAR4:=VAR2/VAR1*100-70;
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60));
VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR7:=SMA(VAR3/VAR1*100,3,1);
VAR8:=LLV(LOW,34);
VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);
VAR10:=IF(VAR9 > 100,VAR9-100,0);
VAR11:=HHV(HIGH,34);
VAR12:=EMA((VAR6-VAR8)/(VAR11-VAR8)*100,13);
VAR13:=EMA(0.667*REF(VAR12,1)+0.333*VAR12,2);
VAR13,COLOR000000;
STICKLINE(VAR12-VAR13 > 0,VAR12,VAR13,8,0),COLOR0055FF;
STICKLINE(VAR12-VAR13 < 0,VAR12,VAR13,8,0),COLOR00FF00;
A1:=HHV(HIGH,50)/LLV(LOW,100) > 1.5;
A2:=(HHV(HIGH,50)-LOW)/(HHV(HIGH,50)-LLV(LOW,100));
A3:=(LOW-LLV(LOW,100))/(HHV(HIGH,50)-LLV(LOW,100));
VAR2W:=100-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
MW:= EMA(VAR2W,3);
VAR3W:=EMA(VAR2W,7);
M1:= EMA(VAR3W,5);
MB1:=CROSS(MW,M1) AND M1 < 20;
抄底 :IF((MB1),40,0),LINETHICK2,COLORFFFFFF;
DRAWTEXT(抄底 ,62,'★'),COLOR00FFFF;
DRAWTEXT(抄底 ,52,'抄底 '),COLORFF00FF;


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


加好友 发短信
等级:新手上路 帖子:32 积分:0 威望:0 精华:0 注册:2018/2/4 22:00:19
  发帖心情 Post By:2018/3/12 9:57:05    Post IP:120.239.32.9[显示全部帖子]

测试通不过

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


加好友 发短信
等级:新手上路 帖子:32 积分:0 威望:0 精华:0 注册:2018/2/4 22:00:19
  发帖心情 Post By:2018/3/12 11:05:17    Post IP:120.239.32.9[显示全部帖子]

通不过,麻烦老师帮忙修改一下

DIFF : EMA(CLOSE,S) - EMA(CLOSE,P);
DEA  : EMA(DIFF,M);
MACD1 : 2*(DIFF-DEA), COLORSTICK;

variable:n=0;
if 抄底 then n:=1'
if not(抄底) then n:=0;
//n=1表示之前出过抄底信号了
if n=1 and cross(diff,dea) then
begin
buy(1,1,marketr);
ll_price:=ref(close,5);
end
 
if close<ll_price and holding>0 then sell(1,1,marketr)

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


加好友 发短信
等级:新手上路 帖子:32 积分:0 威望:0 精华:0 注册:2018/2/4 22:00:19
  发帖心情 Post By:2018/3/12 11:08:22    Post IP:120.239.32.9[显示全部帖子]

好的

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


加好友 发短信
等级:新手上路 帖子:32 积分:0 威望:0 精华:0 注册:2018/2/4 22:00:19
  发帖心情 Post By:2018/3/12 15:49:19    Post IP:120.239.32.9[显示全部帖子]

我比较菜鸟,修改还是没通过,提示未定义的变量,字符串缺少引号
麻烦老师帮我修改一下,万分感谢!

DIFF : EMA(CLOSE,S) - EMA(CLOSE,P);
DEA  : EMA(DIFF,M);
MACD1 : 2*(DIFF-DEA), COLORSTICK;
variable:n=0;
if 抄底 then n:=1'
if not(抄底) then n:=0;
//n=1表示之前出过抄底信号了
if n=1 and cross(diff,dea) then
begin
buy(1,1,marketr);
ll_price:=ref(close,5);
end
 
if close<ll_price and holding>0 then sell(1,1,marketr)


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


加好友 发短信
等级:新手上路 帖子:32 积分:0 威望:0 精华:0 注册:2018/2/4 22:00:19
  发帖心情 Post By:2018/3/12 19:53:17    Post IP:120.239.32.9[显示全部帖子]

测试通不过
提示:REF 函数在逐K线模式下不能直接在IF控制语句之内引用

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


加好友 发短信
等级:新手上路 帖子:32 积分:0 威望:0 精华:0 注册:2018/2/4 22:00:19
  发帖心情 Post By:2018/3/14 9:27:07    Post IP:120.239.32.67[显示全部帖子]

测试通不过
提示:REF 函数在逐K线模式下不能直接在IF控制语句之内引用

因为水平有限没学会,经过前几次您的帮助编写,知道您是绝对的编程高手,再次请您帮助解决难题。谢谢!

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


加好友 发短信
等级:新手上路 帖子:32 积分:0 威望:0 精华:0 注册:2018/2/4 22:00:19
  发帖心情 Post By:2018/3/14 10:49:39    Post IP:120.239.32.67[显示全部帖子]

因为水平有限没学会,经过前几次您的帮助编写,知道您是绝对的编程高手,再次请老师您帮助解决难题。谢谢!

测试通不过
提示:REF 函数在逐K线模式下不能直接在IF控制语句之内引用

DIFF : EMA(CLOSE,S) - EMA(CLOSE,P);
DEA  : EMA(DIFF,M);
MACD1 : 2*(DIFF-DEA), COLORSTICK;
variable:n=0;
if 抄底 then n:=1;
if not(抄底) then n:=0;
//n=1表示之前出过抄底信号了
if n=1 and cross(diff,dea) then
begin
buy(1,1,marketr);
ll_price:=ref(close,5);
end
 
if close<ll_price and holding>0 then sell(1,1,marketr);

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


加好友 发短信
等级:新手上路 帖子:32 积分:0 威望:0 精华:0 注册:2018/2/4 22:00:19
  发帖心情 Post By:2018/5/26 8:40:49    Post IP:120.239.32.165[显示全部帖子]

老师这一段代码测试通不过,ll_price:=ref(close,5);提示:REF 函数在逐K线模式下不能直接在IF控制语句之内引用。
麻烦你帮忙修改一下,谢谢!


A11:=MA(CLOSE,5);
A12:=MA(CLOSE,10);
A13:=MA(CLOSE,20);
A14:=MA(CLOSE,30);
均线多头排列:IF(A11 > A12 AND A12 > A13 AND CROSS(A13,A14) AND C > O,18,0),STICK,LINETHICK2,COLOR00BBFF;
DRAWTEXT(A11 > A12 AND A12 > A13 AND CROSS(A13,A14) AND C > O,35,'均线多头排列'),COLOR00FFFF;
VAR1:=HHV(HIGH,9)-LLV(LOW,9);
VAR2:=HHV(HIGH,9)-CLOSE;
VAR3:=CLOSE-LLV(LOW,9);
VAR4:=VAR2/VAR1*100-70;
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60));
V***:=(2*CLOSE+HIGH+LOW)/4;
VAR7:=SMA(VAR3/VAR1*100,3,1);
VAR8:=LLV(LOW,34);
VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);
VAR10:=IF(VAR9 > 100,VAR9-100,0);
VAR11:=HHV(HIGH,34);
A1:=HHV(HIGH,50)/LLV(LOW,100) > 1.5;
A2:=(HHV(HIGH,50)-LOW)/(HHV(HIGH,50)-LLV(LOW,100));
A3:=(LOW-LLV(LOW,100))/(HHV(HIGH,50)-LLV(LOW,100));
VAR2W:=100-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
MW:= EMA(VAR2W,3);
VAR3W:=EMA(VAR2W,7);
M1:= EMA(VAR3W,5);
MB1:=CROSS(MW,M1) AND M1 < 20;
抄底 :IF((MB1),40,0),LINETHICK2,COLORFFFFFF;
DRAWTEXT(抄底 ,62,'★'),COLOR00FFFF;
DRAWTEXT(抄底 ,52,'抄底 '),COLORFF00FF;
DIFF : EMA(CLOSE,S) - EMA(CLOSE,P);
DEA  : EMA(DIFF,M);
MACD1 : 2*(DIFF-DEA), COLORSTICK;
variable:n=0;
if 抄底 then n:=1;
if not(抄底) then n:=0;
//n=1表示之前出过抄底信号了
if n=1 and cross(diff,dea) then
begin
buy(1,1,marketr);
ll_price:=ref(close,5);

end
 
if close<ll_price and holding>0 then sell(1,1,marketr);

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


加好友 发短信
等级:新手上路 帖子:32 积分:0 威望:0 精华:0 注册:2018/2/4 22:00:19
  发帖心情 Post By:2018/5/26 9:04:26    Post IP:120.239.32.165[显示全部帖子]

抱歉!老师,
我重复提问了,你给我回复回复显示在第二页,才发现,,实在对不起,给你添加工作量。



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