主题：老师帮我成金字塔日内交易

DTM:=IF(OPEN<=REF(OPEN,1),0,MAX((HIGH-OPEN),(OPEN-REF(OPEN,1))));
DBM:=IF(OPEN>=REF(OPEN,1),0,MAX((OPEN-LOW),(OPEN-REF(OPEN,1))));
STM:=SUM(DTM,30);
SBM:=SUM(DBM,30);
A:=IF(STM>SBM,(STM-SBM)/STM,IFELSE(STM=SBM,0,(STM-SBM)/SBM));
AA:MA(A,45);

 
if COUNT(AA<REF(AA,1),29)>27 and AA>REF(AA,1) and holding=0 then BEGIN
 buy(1,50,MARKETR);
end
if COUNT(AA>REF(AA,1),29)>21   and   AA<REF(AA,1) and holding=0 then begin
 BUYSHORT(1,50,MARKETR);
end
if C-ENTERPRICE>69 or CROSS(LLV(C,60),C) or C-ENTERPRICE>130  and  EMA(C,30)<REF(EMA(C,30),1) and holding>0 then begin
 sell(1,holding,MARKETR);
end
if ENTERPRICE-C>8 and holding>0 then begin
 sell(1,holding,MARKETR);
end
if ENTERPRICE-C>Q or CROSS(C,HHV(C,40)) or ENTERPRICE-C>53  and  EMA(C,23)>REF(EMA(C,23),1) and holding<0 then begin
 sellshort(1,holding,MARKETR);
end
if C-ENTERPRICE>11  and holding<0 then begin
 sellshort(1,holding,MARKETR);
end
if (HHV(HIGH,ENTERBARS+1)-C)/ENTERPRICE*1000>29 and holding>0 then begin
 sell(1,holding,MARKETR);
end

if (C-LLV(LOW,ENTERBARS+1))/ENTERPRICE*1000>20 and holding<0 then begin
 sellshort(1,holding,MARKETR);
end

变量Q不知道是什么。你自己填充处理。建议你学习pel语言基本语法后，自行尝试编写修改。