源码
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;