源码

LC:=REF(CLOSE,1);
 RSI:SMA(MAX(CLOSE-LC,0),10,1)/SMA(ABS(CLOSE-LC),10,1)*100,COLORWHITE;

AA:=REF(RSI,N1)=HHV(RSI,2*N1+1);
 QY:=BACKSET(AA,N1+1);
 CC:=FILTER(QY,N1) AND RSI=HHV(RSI,N1+1);
 DRAWICON(CC,RSI*1.02,2);
 DDD:=BARSLAST(CC);
 GDTS:=IF(CC,CURRBARSCOUNT,0);
 DINGBU:=IF(DDD,REF(RSI,DDD),RSI);{顶部}
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
 DINGBU1:=REF(DINGBU,DDD+1);
 GDCS1:=CONST(DINGBUTS);
 DINGBUTS1:=REF(DINGBUTS,DDD+1);
 GDCS2:=CONST(DINGBUTS1);
 DINGBU2:=REF(DINGBU1,DDD+1);
 MM:=IF(CURRBARSCOUNT>GDCS2,0,1);
高点压力:DRAWLINE(CURRBARSCOUNT=GDCS2,RSI,CURRBARSCOUNT=GDCS1,RSI,1) COLORRED;

AA1:=REF(RSI,N1)=LLV(RSI,2*N1+1);
 QY1:=BACKSET(AA1,N1+1);
 CC1:=FILTER(QY1,N1) AND RSI=LLV(RSI,N1+1);
 DRAWICON(CC1,RSI*0.90,1);
 DD1:=BARSLAST(CC1);
 DDTS:=IF(CC1,CURRBARSCOUNT,0);
 YDB:=IF(DD1,REF(RSI,DD1),RSI);
 DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
 DDCS1:=CONST(DDTS1);
 ZDB:=REF(YDB,DD1+1);
 DDTS2:=REF(DDTS1,DD1+1);
 DDCS2:=CONST(DDTS2);
低点支撑:DRAWLINE(CURRBARSCOUNT=DDCS2,RSI,CURRBARSCOUNT=DDCS1,RSI,1) COLORRED;
 ZGSTAR:=(高点压力+低点支撑)/2;
 ZGEND:=CONST((高点压力+低点支撑)/2);
 STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);
中轨:DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLORFF55BB;

AA短:=REF(RSI,N2)=HHV(RSI,2*N2+1);
 QY短:=BACKSET(AA短,N2+1);
 CC短:=FILTER(QY短,N2) AND RSI=HHV(RSI,N2+1);
 DRAWICON(CC短,RSI*1.02,2);
 DDD短:=BARSLAST(CC短);
GDTS短:=IF(CC短,CURRBARSCOUNT,0);
 DINGBU短:=IF(DDD短,REF(RSI,DDD短),RSI);{顶部}
DINGBUTS短:=IF(DDD短,REF(GDTS短,DDD短),GDTS);
 DINGBU1短:=REF(DINGBU短,DDD短+1);
 GDCS1短:=CONST(DINGBUTS短);
DINGBUTS1短:=REF(DINGBUTS短,DDD短+1);
 GDCS2短:=CONST(DINGBUTS1短);
DINGBU2短:=REF(DINGBU1短,DDD短+1);
 MM短:=IF(CURRBARSCOUNT>GDCS2短,0,1);
压力:DRAWLINE(CURRBARSCOUNT=GDCS2短,RSI,CURRBARSCOUNT=GDCS1短,RSI,1) COLORYELLOW;

AA1短:=REF(RSI,N2)=LLV(RSI,2*N2+1);
 QY1短:=BACKSET(AA1短,N2+1);
 CC1短:=FILTER(QY1短,N2) AND RSI=LLV(RSI,N2+1);
 DRAWICON(CC1短,RSI*0.90,1);
 DD1短:=BARSLAST(CC1短);
DDTS短:=IF(CC1短,CURRBARSCOUNT,0);
 YDB短:=IF(DD1短,REF(RSI,DD1短),RSI);
 DDTS1短:=IF(DD1短,REF(DDTS短,DD1短),DDTS短);
DDCS1短:=CONST(DDTS1短);
ZDB短:=REF(YDB短,DD1短+1);
 DDTS2短:=REF(DDTS1短,DD1短+1);
 DDCS2短:=CONST(DDTS2短);
支撑:DRAWLINE(CURRBARSCOUNT=DDCS2短,RSI,CURRBARSCOUNT=DDCS1短,RSI,1) COLORYELLOW;

50 COLORWHITE,POINTDOT;