[求助]请金字塔老师帮忙改编成图表交易程序，万分感谢！ - 公式模型编写问题提交 - 金字塔客服中心 - 专业程序化交易软件提供商

参数部分请自行填充。改写很简单，就是把你开平标记的条件放到开平语句中即可

MA7: MA(C,7);
MA16 : MA(CLOSE,16);
FS:= MA16 + 2*STD(CLOSE,16);
FS1:= MA16 - 2*STD(CLOSE,16);
SJ:=BARSLAST(DATE<>REF(DATE,1) OR BARPOS=1)+1;
SJE:=SJ>=0 AND TIME<=230000 ;
JS:=TIME>=033000;

TJ1:=MA7>MA16 AND C>MA7;
TJ2:=MA7<MA16 AND C<MA7;
CL:=SJE AND C>FS;
CL2:=SJE AND C<FS1;
TJ3:=IF(SJ=1,0,IF(CL,1,IF(CL2,-1,REF(TJ3,1))));
TJ6:=IF(SJ=1,0,IF(REF(TJ6,1)<>1 AND (SJE AND (CL OR (TJ1 AND TJ6=-1))),1,IF(REF(TJ6,1)<>-1 AND (SJE AND (CL2 OR (TJ2 AND TJ3=1))),-1,IF(JS,0,REF(TJ6,1)))));

DRAWICON(REF(TJ6,1)<>1 AND TJ6=1,L,4);
DRAWICON(REF(TJ6,1)<>-1 AND TJ6=-1,H,5);
DRAWTEXT(REF(TJ6,1)=0 AND TJ6=1,L,' 开多');
buy(TJ6,1)=0 AND TJ6=1,1,MARKET);

DRAWTEXT(REF(TJ6,1)=0 AND TJ6=-1,H,' 开空');
buySHORT(,,);//参数自行填充。

DRAWTEXT(REF(TJ6,1)=-1 AND TJ6=1,L,' 平空开多');
if REF(TJ6,1)=-1 AND TJ6=1 then begin
SELLSHORT();
buy();
end
DRAWTEXT(REF(TJ6,1)=1 AND TJ6=-1,H,' 平多开空');
if REF(TJ6,1)=1 AND TJ6=-1 then BEGIN
sell();
BUYSHORT();
end

DRAWTEXT(REF(TJ6,1)<>0 AND TJ6=0,L,' 收盘平仓');
if TJ6,1)<>0 AND TJ6=0 then begin
sell();
SELLSHORT();

end

[此贴子已经被作者于2018/10/22 16:49:53编辑过]

主题：[求助]请金字塔老师帮忙改编成图表交易程序，万分感谢！