打印本文
關閉窗口
老師好!.如下指標請寫成模型.紅色線開多平空.青色線開空平多.用收盤價下單.謝謝!
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
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