求高手将此通达信的指标修改成同花顺可以用，谢谢

2024-11-18 16:44:34

推荐回答（1个）

回答1：

TR :=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),6,1);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SMA(IF(HD>0 AND HD>LD,HD,0),6,1);
DMM:= SMA(IF(LD>0 AND LD>HD,LD,0),6,1);
PDI:= DMP*100/TR;
MDI:= DMM*100/TR;
ADX:= SMA(ABS(MDI-PDI)/(MDI+PDI)*100,6,1);
ADXR:=(ADX+REF(ADX,7))/2;
JC:=PDI<40 AND MDI<40 AND ADX<40 AND ADXR<40;
JC4:=BETWEEN(BARSLAST(CROSS(PDI,MDI)),1,4) AND CROSS(ADX,ADXR);
A30:=MA(CLOSE,30)>=REF(MA(CLOSE,30),1);
V5:=VOL>MA(VOL,5) AND MA(VOL,5)>MA(VOL,34);
A51:=MA(CLOSE,5)>MA(CLOSE,10);

TR :=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),6,1);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SMA(IF(HD>0 AND HD>LD,HD,0),6,1);
DMM:= SMA(IF(LD>0 AND LD>HD,LD,0),6,1);
PDI:= DMP*100/TR;
MDI:= DMM*100/TR;
ADX:= SMA(ABS(MDI-PDI)/(MDI+PDI)*100,6,1);
ADXR:=(ADX+REF(ADX,7))/2;
JC:=PDI<40 AND MDI<40 AND ADX<40 AND ADXR<40;
JC4:=BETWEEN(BARSLAST(CROSS(PDI,MDI)),1,4) AND CROSS(ADX,ADXR);
A30:=MA(CLOSE,30)>=REF(MA(CLOSE,30),1);
V5:=VOL>MA(VOL,5) AND MA(VOL,5)>MA(VOL,34);
A51:=MA(CLOSE,5)>MA(CLOSE,10);

TR :=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),6,1);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SMA(IF(HD>0 AND HD>LD,HD,0),6,1);
DMM:= SMA(IF(LD>0 AND LD>HD,LD,0),6,1);
PDI:= DMP*100/TR;
MDI:= DMM*100/TR;
ADX:= SMA(ABS(MDI-PDI)/(MDI+PDI)*100,6,1);
ADXR:=(ADX+REF(ADX,7))/2;
AJC:=CROSS(pdi,mdi) and pdi>=20;
AD:=ADXR>ADX or ADXRA5:=MA(CLOSE,5)>MA(CLOSE,10) and MA(CLOSE,5)>MA(CLOSE,30);
A30:=MA(CLOSE,30)>=REF(MA(CLOSE,30),1);
CLOSE>OPEN and AJC AND ADXR>=30 AND AD and A5 AND A30 andVOL>MA(VOL,5)

Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(DYBLOCK,' ');
Z4:=STRCAT(Z2,GNBLOCK);
Z5:=STRCAT(Z4,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z5,FGBLOCK)),COLORYELLOW;

MA5:MA(CLOSE,5),COLORWHITE;
MA10:MA(CLOSE,10),COLORYELLOW;
MA20:MA(CLOSE,20),COLORMAGENTA;
MA60:MA(CLOSE,60),COLORRED;
MA120:MA(CLOSE,120),COLORGREEN;
MA250:MA(CLOSE,250),COLORBROWN;

TR:= EMA(EMA(EMA(CLOSE,23),23),23);
TRIX := (TR-REF(TR,1))/REF(TR,1)*100;
TRMA := MA(TRIX,8);
lh:=COUNT(MIN(TRIX,TRMA)/MAX(TRIX,TRMA)>=0.95,2);
lh and trix>trma and ma(c,5)>ma(c,10) and v>ma(v,5)

ZT:=C/REF(C,1)>1.097;
STICKLINE(ZT,H,O,1,0),COLOR00FFFF

HD:=FILTER(BACKSET(FILTER(REF(C,10)=HHV(C,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(REF(C,10)=LLV(C,2*10+1),10),10+1),10);
波峰:=IF(BARSLAST(HD)波谷:=IF(BARSLAST(HD)>BARSLAST(LD) AND NOT(LD),REF(C,BARSLAST(LD)),REF(C,BARSLAST(LD))),COLOR80FF00,POINTDOT;
前期高位:REF(C,BARSLAST(HD)),COLORLIBLUE,POINTDOT;
STICKLINE(C,前期高位,前期高位,8,0),COLORLIBLUE;

MA1:=MA(CLOSE,5);
MA2:=MA(CLOSE,10);
MA3:=MA(CLOSE,20);
ZJ:=AMOUNT/10000;{资金}
TM:=V-MA(V,10);{量填满}
一穿三:=MA1>O AND MA2>O AND MA3>O AND MA1OPEN ;
DRAWTEXT(一穿三,L-0.012,'一穿三'),COLORRED;
STICKLINE(一穿三,OPEN,CLOSE,0.5,0),COLORRED

TR :=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),6,1);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SMA(IF(HD>0 AND HD>LD,HD,0),6,1);
DMM:= SMA(IF(LD>0 AND LD>HD,LD,0),6,1);
PDI:= DMP*100/TR;
MDI:= DMM*100/TR;
ADX:= SMA(ABS(MDI-PDI)/(MDI+PDI)*100,6,1);
ADXR:=(ADX+REF(ADX,7))/2;
JC:=PDI<40 AND MDI<40 AND ADX<40 AND ADXR<40;
JC4:=BETWEEN(BARSLAST(CROSS(PDI,MDI)),1,4) AND CROSS(ADX,ADXR);
A30:=MA(CLOSE,30)>=REF(MA(CLOSE,30),1);
V5:=VOL>MA(VOL,5) AND MA(VOL,5)>MA(VOL,34);
A51:=MA(CLOSE,5)>MA(CLOSE,10);