标题：指标请写成模型.

老师好!.如下指标请写成模型.红色线开多平空.青色线开空平多.用收盘价下单.谢谢!

 

USERRIGHT:=1;
OO:=(USERRIGHT=0);
AA:=(USERRIGHT=1);
BB:=(USERRIGHT=2);
CC:=(USERRIGHT=3);
DD:=(USERRIGHT=4);
EE:=(USERRIGHT=5);
if (((AA or BB) or CC)) then
begin

A7:=(((EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),40)+EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),120))+EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),256))/3);
VAR7:=FORCAST(A7,16);
PARTLINE((VAR7>REF(VAR7,1)),VAR7,COLORRED),COLOR0000FF;
PARTLINE((VAR7<REF(VAR7,1)),VAR7,COLORCYAN),COLORFFFF54;

end

if VAR7>REF(VAR7,1) then begin

    sellshort(1,0,thisclose);

    buy(holding=0,1,thisclose);

end

 

if VAR7<REF(VAR7,1) then begin

     sell(1,0,thisclose);

     buyshort(holding=0,1,thisclose);

end

1楼试了出错如附图请更改谢谢!!
此主题相关图片如下：qq截图20141127212723.png

 

 

USERRIGHT:=1;
OO:=(USERRIGHT=0);
AA:=(USERRIGHT=1);
BB:=(USERRIGHT=2);
CC:=(USERRIGHT=3);
DD:=(USERRIGHT=4);
EE:=(USERRIGHT=5);
ee:=(((EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),40)+EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),120))+EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),256))/3);
if (((AA or BB) or CC)) then
begin

A7:=ee;
VAR7:=FORCAST(A7,16);
PARTLINE((VAR7>REF(VAR7,1)),VAR7,COLORRED),COLOR0000FF;
PARTLINE((VAR7<REF(VAR7,1)),VAR7,COLORCYAN),COLORFFFF54;

end
 
if VAR7>REF(VAR7,1) then begin

    sellshort(1,0,thisclose);

    buy(holding=0,1,thisclose);

end

 

if VAR7<REF(VAR7,1) then begin

     sell(1,0,thisclose);

     buyshort(holding=0,1,thisclose);

end

试了出错呢需修改
此主题相关图片如下：qq截图20141128091528.png

 

 

USERRIGHT:=1;
OO:=(USERRIGHT=0);
AA:=(USERRIGHT=1);
BB:=(USERRIGHT=2);
CC:=(USERRIGHT=3);
DD:=(USERRIGHT=4);
EE:=(USERRIGHT=5);
ee:=(((EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),40)+EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),120))+EMA(((((OPEN+HIGH)+LOW)+CLOSE)/4),256))/3);

if (((AA or BB) or CC)) then
begin

A7:=ee;

 

end
ff:=FORCAST(A7,16);
if (((AA or BB) or CC)) then
begin
VAR7:=ff;
end
PARTLINE((VAR7>REF(VAR7,1)) and (AA or BB or CC),VAR7,COLORRED),COLOR0000FF;
PARTLINE((VAR7<REF(VAR7,1))  and (AA or BB or CC),VAR7,COLORCYAN),COLORFFFF54;
if VAR7>REF(VAR7,1) then begin

    sellshort(1,0,thisclose);

    buy(holding=0,1,thisclose);

end

 

if VAR7<REF(VAR7,1) then begin

     sell(1,0,thisclose);

     buyshort(holding=0,1,thisclose);

end