以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  这个能帮转化成金字塔版本的实现自动交易?  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=163769)

--  作者:代人发贴
--  发布时间:2018/5/31 14:57:25
--  这个能帮转化成金字塔版本的实现自动交易?
 这个能帮转化成金字塔版本的实现自动交易?
N:=10;
N1:=20;
STICKLINE((EMA(CLOSE,10) >= EMA(CLOSE,30)),LOW,HIGH,COLORRED,0);
STICKLINE((EMA(CLOSE,10) >= EMA(CLOSE,30)),OPEN,CLOSE,COLORRED,0);
STICKLINE((EMA(CLOSE,10) < EMA(CLOSE,30)),LOW,HIGH,COLORGREEN,0);
STICKLINE((EMA(CLOSE,10) < EMA(CLOSE,30)),OPEN,CLOSE,COLORGREEN,0);
LL1:=EMA(CLOSE,N);
HH1:=EMA(CLOSE,N1);
T:=IFELSE(HH1>LL1,1,-1);
G:=IFELSE(HH1>LL1,HH1,LL1);
DRAWLINE(T=1&&REF(T,1)=1,G,T=1&&REF(T,1)=1,REF(G,1),COLORGREEN);
DRAWLINE(T=-1&&REF(T,1)=-1,G,T=-1&&REF(T,1)=-1,REF(G,1),COLORRED);
DRAWSL(T=1,G,0,1,0,COLORGREEN);
DRAWSL(T=-1,G,0,1,0,COLORRED);
DRAWTEXT(CROSS(EMA(CLOSE,30),EMA(CLOSE,10)),HIGH,\'S\');
DRAWTEXT(CROSS(EMA(CLOSE,10),EMA(CLOSE,30)),LOW,\'B\');
DRAWNUMBER(CROSS(EMA(CLOSE,30),EMA(CLOSE,10)),LOW,CLOSE,0,COLORGREEN);
DRAWNUMBER(CROSS(EMA(CLOSE,10),EMA(CLOSE,30)),HIGH,CLOSE,0,COLORRED);
CROSS(EMA(CLOSE,10),EMA(CLOSE,30)),BPK;
CROSS(EMA(CLOSE,30),EMA(CLOSE,10)),SPK;
AUTOFILTER;
 

--  作者:FireScript
--  发布时间:2018/5/31 15:05:11
--  
 N:=10;
N1:=20;
//STICKLINE((EMA(CLOSE,10) >= EMA(CLOSE,30)),LOW,HIGH,COLORRED,0);
//STICKLINE((EMA(CLOSE,10) >= EMA(CLOSE,30)),OPEN,CLOSE,COLORRED,0);
//STICKLINE((EMA(CLOSE,10) < EMA(CLOSE,30)),LOW,HIGH,COLORGREEN,0);
//STICKLINE((EMA(CLOSE,10) < EMA(CLOSE,30)),OPEN,CLOSE,COLORGREEN,0);
LL1:=EMA(CLOSE,N);
HH1:=EMA(CLOSE,N1);
T:=IFELSE(HH1>LL1,1,-1);
G:=IFELSE(HH1>LL1,HH1,LL1);
//DRAWLINE(T=1&&REF(T,1)=1,G,T=1&&REF(T,1)=1,REF(G,1),COLORGREEN);
//DRAWLINE(T=-1&&REF(T,1)=-1,G,T=-1&&REF(T,1)=-1,REF(G,1),COLORRED);
//DRAWSL(T=1,G,0,1,0,COLORGREEN);
//DRAWSL(T=-1,G,0,1,0,COLORRED);
//DRAWTEXT(CROSS(EMA(CLOSE,30),EMA(CLOSE,10)),HIGH,\'S\');
//DRAWTEXT(CROSS(EMA(CLOSE,10),EMA(CLOSE,30)),LOW,\'B\');
//DRAWNUMBER(CROSS(EMA(CLOSE,30),EMA(CLOSE,10)),LOW,CLOSE,0,COLORGREEN);
//DRAWNUMBER(CROSS(EMA(CLOSE,10),EMA(CLOSE,30)),HIGH,CLOSE,0,COLORRED);
//

if CROSS(EMA(CLOSE,10),EMA(CLOSE,30)) then
begin
平空:sellshort(holding<0,holding,market);
开多:buy(holding=0,1,market);
end

if CROSS(EMA(CLOSE,30),EMA(CLOSE,10)) then
begin
平多:sell(holding>0,holding,market);
开空:buyshort(holding=0,1,market);
end


 画图的部分,注释掉了。涉及到交易的就上面的代码。如果要保留画图,你把注释去掉即可。