以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  请老师再帮忙将文华改写成金字塔公式，在此拜谢了！！！  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=95257)
--  作者：yunxiaoyishi
--  发布时间：2016/3/29 16:23:24
--  请老师再帮忙将文华改写成金字塔公式，在此拜谢了！！！

//设置多头入场触发价与多头平仓触发价
BUYPRICE:=VALUEWHEN(CON1,HIGH+ATR10*0.5);
LONGEXITPRICE:=VALUEWHEN(CON1,LOW-ATR10*0.5);
//设置空头入场触发价与空头平仓触发价
SELLPRICE:=VALUEWHEN(CON2,LOW-ATR10*0.5);
SHORTEXITPRICE:=VALUEWHEN(CON2,HIGH+ATR10*0.5);
//满足上升趋势且向上突破触发价则进场做多
REF(HISTOGRAM,1)>0&&VOL>0&&HIGH>=BUYPRICE,BK;
SETSIGPRICETYPE(BK,MAX(OPEN,BUYPRICE));
//满足下降趋势且向下突破触发价则进场做空
REF(HISTOGRAM,1)<0&&VOL>0&&LOW<=SELLPRICE,SK;
SETSIGPRICETYPE(SK,MIN(OPEN,SELLPRICE));
//转为下降趋势多头平仓出场
BKVOL>0&&BARSBK>0&&REF(CON2,1)=1&&VOL>0,SP;
SETSIGPRICETYPE(SP,OPEN);
//转为上升趋势空头平仓出场
SKVOL>0&&BARSSK>0&&REF(CON1,1)=1&&VOL>0,BP;
SETSIGPRICETYPE(BP,OPEN);
//向下突破多头平仓触发价格则多头平仓出场
BKVOL>0&&BARSBK>0&&LOW<=LONGEXITPRICE&&VOL>0,SP;
SETSIGPRICETYPE(SP,MIN(OPEN,LONGEXITPRICE));
//向上突破空头平仓触发价格则空头平仓出场
SKVOL>0&&BARSSK>0&&HIGH>=SHORTEXITPRICE&&VOL>0,BP;
SETSIGPRICETYPE(BP,MAX(OPEN,SHORTEXITPRICE));

 

请老师再帮忙将文华改写成金字塔公式，在此拜谢了！！！
--  作者：jinzhe
--  发布时间：2016/3/29 16:33:52
--  
处理中，请稍等
--  作者：yunxiaoyishi
--  发布时间：2016/3/30 10:04:43
--  

老师~帮我看看哈~~谢谢了
--  作者：jinzhe
--  发布时间：2016/3/30 10:11:14
--  

BUYPRICE:=VALUEWHEN(CON1,HIGH+ATR10*0.5);
LONGEXITPRICE:=VALUEWHEN(CON1,LOW-ATR10*0.5);
//设置空头入场触发价与空头平仓触发价
SELLPRICE:=VALUEWHEN(CON2,LOW-ATR10*0.5);
SHORTEXITPRICE:=VALUEWHEN(CON2,HIGH+ATR10*0.5);
//满足上升趋势且向上突破触发价则进场做多
if REF(HISTOGRAM,1)>0 and VOL>0 and HIGH>=BUYPRICE then buy(holding=0,1,limitr,max(o,buyprice));

//满足下降趋势且向下突破触发价则进场做空
if REF(HISTOGRAM,1)<0 and VOL>0 and LOW<=SELLPRICE then buyshort(holding=0,1,limitr,min(o,sellprice));

//转为下降趋势多头平仓出场
if holding>0 and enterbars>0 and REF(CON2,1)=1 and VOL>0 then sell(1,0,limitr,o);

//转为上升趋势空头平仓出场
if holding<0 and enterbars>0 and REF(CON1,1)=1 and VOL>0 then sellshort(1,0,limitr,o);

//向下突破多头平仓触发价格则多头平仓出场
if holding>0 and enterbars>0 and LOW<=LONGEXITPRICE and VOL>0 then sell(1,0,limitr,min(o,longexitprice));

//向上突破空头平仓触发价格则空头平仓出场
if holding<0 and enterbars>0 and HIGH>=SHORTEXITPRICE and VOL>0 then sellshort(1,0,limitr,MAX(OPEN,SHORTEXITPRICE));