[求助]老师帮助改下代码 - 策略编写求助区 - 金字塔客服中心 - 专业程序化交易软件提供商

//不知对不对，加入了平仓参数p
input:p(1,1,100,1);
VAR6:=(2*CLOSE+HIGH+OPEN+LOW)/8;

VAR7:=LLV(LOW,12);

VAR8:=HHV(HIGH,20);

VAR9:=EMA((VAR6-VAR7)/(VAR8-VAR7)*150,13);

VARA:=EMA(0.667*REF(VAR9,1)+0.333*VAR9,2);

SARLINE:=ABS(SAR(3,0.01,0.1));

TR1:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),6);

HD:=HIGH-REF(HIGH,1);

LD:=REF(LOW,1)-LOW;

DMP:=SUM(IFELSE(HD>0 && HD>LD,HD,0),6);

DMM:=SUM(IFELSE(LD>0 && LD>HD,LD,0),6);

PDI:=DMP*100/TR1,COLORWHITE;

MDI:=DMM*100/TR1,COLORYELLOW;

ADX:=MA(ABS(MDI-PDI)/(MDI+PDI)*150,20),COLORRED;

ADXR:=(ADX+REF(ADX,14))/2,COLORGREEN;

MA10:=EMA(CLOSE,11);

MA1:=MA(CLOSE,5);

if VAR9>VARA&&CLOSE>=SARLINE&&MA10>REF(MA10,1)&&ADX>30&&CLOSE>REF(OPEN,1)&&CLOSE>REF(OPEN,2)&&CLOSE>REF(CLOSE,1)&&CLOSE>REF(CLOSE,2)&&CLOSE>MA1&&CLOSE>OPEN then
begin
SELLSHORT(1 ,holding ,MARKET );
BUY( 1,holding ,MARKET);
end

if VAR9<=VARA&&CLOSE<SARLINE&&MA10<REF(MA10,1)&&ADX<80&&CLOSE<REF(OPEN,1)&&CLOSE<REF(OPEN,2)&&CLOSE<REF(CLOSE,1)&&CLOSE<REF(CLOSE,2)&&CLOSE<MA1&&CLOSE<OPEN then
begin
SELL(1 ,holding ,MARKET );
BUYSHORT(1 ,holding ,MARKET );
end

//判断是否亏损达到30个点，自动止损；
if enterprice-c>=30*mindiff then
begin
sell（1,holding,market）;
end
if c-enterprice>=30*mindiff then
begin
sellshort（1,holding,market）;
end
//当开仓后，盈利达到40到100点时，回撤80%，平仓
HV:=HHV(ASSET,0); //交易来最大资产

HB:=HV - ASSET; //当前的回撤

hui:HB/HV;
if c-enterprice>=40*mindiff and c-enterprice<=100*mindiff and hui>=0.8 then
begin
sell（1,p,market）;
end
if enterprice-c>=40*mindiff and enterprice-c<=100*mindiff and hui=0.8 then
begin
sellshort（1,p,market）;
end
//开仓后，盈利达到100点以上时，回撤30%，平仓
if c-enterprice>=100*mindiff and hui=0.3 then
begin
sell（1,p,market）;
end
if enterprice-c>=100*mindiff and hui=0.3 then
begin
sellshort（1,p,market）;
end

主题：[求助]老师帮助改下代码