请帮忙修改成金字塔的，谢谢

代人发帖

//hr//DQSJ:=211220;SS:=IF(DATE>DQSJ,1,1);
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26)*SS;
DEA:=EMA(DIFF,9);
DRAWICON(DIFF>DEA,1*SS,'ICO4');
DRAWICON(DIFF<DEA,1*SS,'ICO5');
RSV:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
DRAWICON(K>D,2*SS,'ICO4');
DRAWICON(K<D,2*SS,'ICO5');
LC:=REF(CLOSE,1);
RSI1:=(SMA(MAX(CLOSE-LC,0),9,1))/(SMA(ABS(CLOSE-LC),9,1))*100;
RSI2:=(SMA(MAX(CLOSE-LC,0),26,1))/(SMA(ABS(CLOSE-LC),26,1))*100;
DRAWICON(RSI1>RSI2,3*SS,'ICO4');
DRAWICON(RSI1<RSI2,3*SS,'ICO5');LWR1:=SMA(RSV,3,1);
LWR2:=SMA(LWR1,3,1);DRAWICON(LWR1>LWR2,4*SS,'ICO4');
DRAWICON(LWR1<LWR2,4*SS,'ICO5');
BBI:=(MA(CLOSE,3)+MA(CLOSE,9)+MA(CLOSE,12)+MA(CLOSE,26))/4;
DRAWICON(CLOSE>BBI,5*SS,'ICO4');
DRAWICON(CLOSE<BBI,5*SS,'ICO5');
MTM:=CLOSE-REF(CLOSE,1)*SS;
MMS:=100*EMA(EMA(MTM,9),9)/EMA(EMA(ABS(MTM),9),3);
MMM:=100*EMA(EMA(MTM,26),12)/EMA(EMA(ABS(MTM),26),12);
DRAWICON(MMS>MMM,6*SS,'ICO4');
DRAWICON(MMS<MMM,6*SS,'ICO5');
CROSS(DIFF>DEA && K>D && RSI1>RSI2 && LWR1>LWR2 && CLOSE>BBI && MMS>MMM,0.5),BK;
CROSS(DIFF<DEA && K<D && RSI1<RSI2 && LWR1<LWR2 && CLOSE<BBI && MMS<MMM,0.5),SK;
C>=BKPRICE+15*MINPRICE && BKVOL>0,CLOSEOUT;C<=SKPRICE-15*MINPRICE && SKVOL>0,CLOSEOUT;
C<=BKPRICE-15*MINPRICE && BKVOL>0,CLOSEOUT;C>=SKPRICE+15*MINPRICE && SKVOL>0,CLOSEOUT;AUTOFILTER;
SETSIGPRICE(BK,C-3*MINPRICE);SETSIGPRICE(SK,C+3*MINPRICE);//SETEXPIREDATE('20230711');

技术008

//hr//DQSJ:=211220;SS:=IF(DATE>DQSJ,1,1);
ss:=1;
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26)*SS;
DEA:=EMA(DIFF,9);
DRAWICON(DIFF>DEA,1*SS,'ICO4');
DRAWICON(DIFF<DEA,1*SS,'ICO5');
RSV:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
DRAWICON(K>D,2*SS,'ICO4');
DRAWICON(K<D,2*SS,'ICO5');
LC:=REF(CLOSE,1);
RSI1:=(SMA(MAX(CLOSE-LC,0),9,1))/(SMA(ABS(CLOSE-LC),9,1))*100;
RSI2:=(SMA(MAX(CLOSE-LC,0),26,1))/(SMA(ABS(CLOSE-LC),26,1))*100;
DRAWICON(RSI1>RSI2,3*SS,'ICO4');
DRAWICON(RSI1<RSI2,3*SS,'ICO5');LWR1:=SMA(RSV,3,1);
LWR2:=SMA(LWR1,3,1);DRAWICON(LWR1>LWR2,4*SS,'ICO4');
DRAWICON(LWR1<LWR2,4*SS,'ICO5');
BBI:=(MA(CLOSE,3)+MA(CLOSE,9)+MA(CLOSE,12)+MA(CLOSE,26))/4;
DRAWICON(CLOSE>BBI,5*SS,'ICO4');
DRAWICON(CLOSE<BBI,5*SS,'ICO5');
MTM:=CLOSE-REF(CLOSE,1)*SS;
MMS:=100*EMA(EMA(MTM,9),9)/EMA(EMA(ABS(MTM),9),3);
MMM:=100*EMA(EMA(MTM,26),12)/EMA(EMA(ABS(MTM),26),12);
DRAWICON(MMS>MMM,6*SS,'ICO4');
DRAWICON(MMS<MMM,6*SS,'ICO5');
if CROSS(DIFF>DEA && K>D && RSI1>RSI2 && LWR1>LWR2 && CLOSE>BBI && MMS>MMM,0.5) and holding<=0 then
begin
        sellshort(1,holding,marketr);
buy(1,1,marketr);       
end
if CROSS(DIFF<DEA && K<D && RSI1<RSI2 && LWR1<LWR2 && CLOSE<BBI && MMS<MMM,0.5) and holding>=0 then
begin
                sell(1,holding,marketr);
buyshort(1,1,marketr);
        end

if C>=enterprice+15*mindiff then
begin
sell(1,holding,marketr);
        sellshort(1,holding,marketr);
end
if C<=enterprice-15*mindiff then
begin
sell(1,holding,marketr);
        sellshort(1,holding,marketr);
end

如果可以

谢谢老师