可以帮忙转换下嘛 自己弄了几次都弄不好

封神

//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+Q*MINPRICE && BKVOL>0,CLOSEOUT;
C<=SKPRICE-Q*MINPRICE && SKVOL>0,CLOSEOUT;
C<=BKPRICE-Q*MINPRICE && BKVOL>0,CLOSEOUT;
C>=SKPRICE+Q*MINPRICE && SKVOL>0,CLOSEOUT;
AUTOFILTER;
SETSIGPRICE(BK,C-Q1*MINPRICE);
SETSIGPRICE(SK,C+Q1*MINPRICE);
TRADE_OTHER('AUTO');
CLOSEMINUTE<=2,CLOSEOUT;
//SETEXPIREDATE('20230711');

admin

Q1和Q根据自己的情况定义下。

[PEL] 复制代码

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');


if CROSS(DIFF>DEA && K>D && RSI1>RSI2 && LWR1>LWR2 && CLOSE>BBI && MMS>MMM,0.5) then BEGIN
        buy(HOLDING=0,1,LIMIT,C-Q1*MINDIFF);
end

if CROSS(DIFF<DEA && K<D && RSI1<RSI2 && LWR1<LWR2 && CLOSE<BBI && MMS<MMM,0.5) then BEGIN
        buyshort(HOLDING=0,1,LIMIT,C-Q1*MINDIFF);
end       




if C>=ENTERPRICE+Q*MINDIFF and HOLDING>0 then begin
        sell(1,HOLDING,MARKET);
end

if C<=ENTERPRICE-Q*MINDIFF and HOLDING<0 then begin  
        sellshort(1,HOLDING,MARKET);
end

if C<=ENTERPRICE-Q*MINDIFF and HOLDING>0 then begin
        sell(1,HOLDING,MARKET);
end

if C>=ENTERPRICE+Q*MINDIFF and HOLDING<0 then begin  
        sellshort(1,HOLDING,MARKET);
end



if REMAININGTIME(CLOSETIME(0))<2*60 then BEGIN
        sell(HOLDING>0,HOLDING,MARKET);
        sellshort(HOLDING<0,HOLDING,MARKET);
end

技术009

[PEL] 复制代码

dqsj:=1211220;//21年12月20日

ss:=if(date>dqsj,1,1);
diff:=ema(close,12)-ema(close,26)*ss;
dea:=ema(diff,9);
//输出的图标 请自行调整，这里选择图标1 和2
drawicon(diff>dea,1*ss,1);
drawicon(diff<dea,1*ss,2);
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,1);
drawicon(k<d,2*ss,2);
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,1);
drawicon(rsi1<rsi2,3*ss,2);
lwr1:=sma(rsv,3,1);
lwr2:=sma(lwr1,3,1);
drawicon(lwr1>lwr2,4*ss,1);
drawicon(lwr1<lwr2,4*ss,2);
bbi:=(ma(close,3)+ma(close,9)+ma(close,12)+ma(close,26))/4;
drawicon(close>bbi,5*ss,1);
drawicon(close<bbi,5*ss,2);
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,1);
drawicon(mms<mmm,6*ss,2);


bkprice:=hhv(h,enterbars+1);
skprice:=llv(l,enterbars+1);

//q是参数 请自行补充全定义
q:=5;
sell(c>=bkprice+q*mindiff && holding>0,holding,market);
sellshort(c<=skprice-q*mindiff && holding<0,holding,market);
sell(c<=bkprice-q*mindiff && holding>0,holding,market);
sellshort(c>=skprice+q*mindiff && holding<0,holding,market);


//q1是参数 请自行补充全定义
q1:=1;
if cross(diff>dea && k>d && rsi1>rsi2 && lwr1>lwr2 && close>bbi && mms>mmm,0.5) and  holding=0 then  buy(1,1,limitr,c-q1*mindiff);
if cross(diff<dea && k<d && rsi1<rsi2 && lwr1<lwr2 && close<bbi && mms<mmm,0.5) and  holding=0 then buyshort(1,1,limitr,c+q1*mindiff);


//收盘前2分钟平仓,在小周期上比较有效
if remainingtime(closetime(0))<=60 then 
begin
收盘平多:sell(1,holding,market);
收盘平空:sellshort(1,holding,market); 
end 

封神

技术009 发表于 2023-12-8 15:33
[mw_shl_code=pel,true]dqsj:=1211220;//21年12月20日

ss:=if(date>dqsj,1,1);

非常感谢，可以删除这个帖子嘛