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


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

   

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


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

主题:请老师改一下这个模型

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


加好友 发短信
等级:新手上路 帖子:92 积分:0 威望:0 精华:0 注册:2016/8/23 17:14:54
请老师改一下这个模型  发帖心情 Post By:2016/9/25 20:28:02    Post IP:119.100.178.220[只看该作者]

用户已被锁定

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


加好友 发短信
等级:罗宾汉 帖子:46311 积分:50819 威望:0 精华:2 注册:2011/3/23 8:50:25
  发帖心情 Post By:2016/9/26 9:30:57    Post IP:180.169.30.6[只看该作者]

input:n(14),m(6),avglen(30),entrybar(2);
TR1:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),N);//最高价与最低价做差,最高价与前一周期收盘价做差,最低价与前一周期收盘价作差,在上述三个数据中取绝对值最大者,对该最大值做N周期累加求和。。
HD:=HIGH-REF(HIGH,1);//最高价与前一周期最高价做差
LD:=REF(LOW,1)-LOW;//前一周期最低价与最低价做差
DMP:=SUM(IFELSE(HD>0 and HD>LD,HD,0),N);//如果HD>0并且HD>LD,取HD否则取0,对取值做N周期累加求和。
DMM:=SUM(IFELSE(LD>0 and LD>HD,LD,0),N);//如果LD>0并且LD>HD,取LD否则取0,对取值做N周期累加求和。
PDI:=DMP*100/TR1;
MDI:=DMM*100/TR1;
ADX:=MA(ABS(MDI-PDI)/(MDI+PDI)*100,M);//MDI与PDI差的绝对值与(MDI+PDI)*100做比值,取该比值的M个周期均值。
ADXR:=(ADX+REF(ADX,M))/2;
UPPERMA:EMA(HIGH,AVGLEN);//计算30根K线最高价的EMA
LOWERMA:EMA(LOW,AVGLEN);//计算30根K线最低价的EMA
CHANSPREAD:=(UPPERMA-LOWERMA)/2;//通过EMA计算出噪音通道宽度
BUYSETUP:=C>UPPERMA and ADX>REF(ADX,1);//当ADX向上且当前价大于30根K线最高价的EMA满足买入准备条件
BUYTARGET:C+CHANSPREAD;//满足买入准备条件时,用前BAR价格计算出多头触发价 
MROBS:=BARSLAST(BUYSETUP);//上次满足买入准备条件距离当前BAR的数目

m1:=MAX(OPEN,REF(BUYTARGET,1));
if MROBS<ENTRYBAr and holding=0 and BARPOS>100 and H>=BUYTARGET and VOL>0 then buyshort(holding=0,1,limitr,m1),IGNORECHECKPRICE;//系统入场
//SETSIGPRICETYPE(BK,MAX(OPEN,REF(BUYTARGET,1)));
m2:=MIN(OPEN,REF(UPPERMA,1)-mindiff);
if holding<0 and enterbars>0 and VOL>0 and LOW<=UPPERMA-mindiff then sellshort(1,0,limitr,m2),IGNORECHECKPRICE;//系统出场
//SETSIGPRICETYPE(SP,MIN(OPEN,REF(UPPERMA,1)-mindiff));

SELLSETUP:=C<LOWERMA and ADX>REF(ADX,1);//当ADX向上且当前价下于30根K线最低价的EMA满足卖出准备条件
SELLTARGET:=C-CHANSPREAD;//满足卖出准备条件时,用前BAR价格计算出空头触发价
MROSS:=BARSLAST(SELLSETUP);//上次满足卖出准备条件距离当前BAR的数目
m3:=MIN(OPEN,REF(SELLTARGET,1));
if MROSS<=ENTRYBAR and holding=0 and BARPOS>100 and LOW<=SELLTARGET and VOL>0 then buy(holding=0,1,limitr,m3),IGNORECHECKPRICE;
//SETSIGPRICETYPE(SK,MIN(OPEN,REF(SELLTARGET,1)));
m4:=MAX(OPEN,REF(LOWERMA,1)+mindiff);
if holding>0 and enterbars>0 and VOL>0 and HIGH>=LOWERMA+mindiff then sell(1,0,limitr,m4),IGNORECHECKPRICE;



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

客户服务部

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

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com

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


加好友 发短信
等级:新手上路 帖子:92 积分:0 威望:0 精华:0 注册:2016/8/23 17:14:54
  发帖心情 Post By:2016/9/26 11:50:25    Post IP:221.234.19.230[只看该作者]

用户已被锁定

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


加好友 发短信
等级:新手上路 帖子:92 积分:0 威望:0 精华:0 注册:2016/8/23 17:14:54
  发帖心情 Post By:2016/9/26 16:48:17    Post IP:221.234.19.230[只看该作者]

用户已被锁定

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


加好友 发短信
等级:罗宾汉 帖子:46311 积分:50819 威望:0 精华:2 注册:2011/3/23 8:50:25
  发帖心情 Post By:2016/9/26 16:58:20    Post IP:180.169.30.6[只看该作者]

这里面没有引用,但是有些计算结果是会在收盘前不停变大变小的,所以最好用走完k线下单模式


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

客户服务部

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

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com

 回到顶部