以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  文化转成金字塔代码  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=168264)

--  作者:qq代人发帖
--  发布时间:2019/2/18 12:29:39
--  文化转成金字塔代码
第一个
CROSS(AMA1,AMA3)&&CX>10,BPK;
CROSSDOWN(AMA1,AMA3)&&CX>3,SPK;
ZY:=128;
ZS:=13;
HT:=65;
CLOSE>BKPRICE+ZY*10*MINPRICE,SP;
CLOSE<BKPRICE-ZS*10*MINPRICE,SP;
CLOSE<BKHIGH-HT*10*MINPRICE,SP;
ZYA:=228;
ZSA:=31;
HTA:=61;
CLOSE<SKPRICE-ZYA*10*MINPRICE,BP;
CLOSE>SKPRICE+ZSA*10*MINPRICE,BP;
CLOSE>SKLOW+HTA*10*MINPRICE,BP;
SETALLSIGPRICETYPE(TRACING_ORDER);
CLOSEKLINE(0,8);
AUTOFILTER;


第二个
CROSS(AMA1,AMA3),BK;
CROSSDOWN(AMA1,AMA2),SP;
//YOYO止损部分
REF(C,1)-C>8*ATR,SP;
//C-REF(C,1)>CS2*ATR,BP;
ZY:=110;
ZS:=20;
HT:=45;
CLOSE>BKPRICE+ZY*10*MINPRICE,SP;
CLOSE<BKPRICE-ZS*10*MINPRICE,SP;
CLOSE<BKHIGH-HT*10*MINPRICE,SP;
SETALLSIGPRICETYPE(TRACING_ORDER);
CLOSEKLINE(0,8);
AUTOFILTER;
 
第3个
CROSSDOWN(AMA1,AMA2) && CX>30,SK;
CROSS(AMA1,AMA3),BP;
EVERY(AMA1>REF(AMA1,1),10*40),BP;
//YOYO止损部分
//REF(C,1)-C>4*ATR,SP;
C-REF(C,1)>CS1*ATR,BP;
ZY:=65;
ZS:=28;
HT:=66;
CLOSE<SKPRICE-ZY*10*MINPRICE,BP;
CLOSE>SKPRICE+ZS*10*MINPRICE,BP;
CLOSE>SKLOW+HT*10*MINPRICE,BP;
SETALLSIGPRICETYPE(TRACING_ORDER);
CLOSEKLINE(0,8);
AUTOFILTER;


--  作者:wenarm
--  发布时间:2019/2/18 13:30:57
--  

第一个,剩余的请学习金字塔语法后参照第一个实现修改尝试修改。

if CROSS(AMA1,AMA3) and CX>10 then
 begin
  sellshort(1,1,MARKET);
  buy(holding=0,1,MARKET);
 end
 
if CROSS(AMA3,AMA1) and CX>3 then
 begin
  sell(1,1,MARKET);
  buyshort(holding=0,1,MARKET);
 end


ZY:=128;
ZS:=13;
HT:=65;
if CLOSE>ENTERPRICE+ZY*10*MINDIFF and holding>0 then sell(1,1,MARKET);
if CLOSE<ENTERPRICE-ZS*10*MINDIFF and holding>0 then sell(1,1,MARKET);
if CLOSE<hhv(high,ENTERBARS+1)-HT*10*MINDIFF and holding>0 then sell(1,1,MARKET) ;
ZYA:=228;
ZSA:=31;
HTA:=61;
CLOSE<ENTERPRICE-ZYA*10*MINDIFF and holding<0 then sellshort(1,1,MARKET);
CLOSE>ENTERPRICE+ZSA*10*MINDIFF and holding<0 then sellshort(1,1,MARKET);
CLOSE>llv(low,EXITBARS+1)+HTA*10*MINDIFF and holding<0 then sellshort(1,1,MARKET);