强势弱势一看便知(通达信)

源码正文：

CS:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100{XG51};
YJD: (ema(CS,3)-50)*2{XG51};
极弱:-80{XG51};
强势:60{XG51};
风险:80{XG51};
弱势:-60{XG51};
VAR4:=(1.1)*CLOSE{XG51};
VAR5:=(0.9)*CLOSE{XG51};
VAR6:=100*(WINNER(VAR4)-WINNER(VAR5)){XG51};
S1:2*Ema(100-VAR6,1),COLORBLUE{XG51};
S2:EMA(S1,9){XG51};
S3:=MA(S2,9){XG51};
条件:=crOSS(YJD,极弱) AND S1>S2{XG51};
条件0:=CROSS(强势,YJD) AND S1<S2{XG51};
DRAWICON(条件,极弱,5){XG51};
DRAWICON(条件0,强势,6){X-G~5^1-C-N-{};

源码正文：

N:=5{XG51};
A1:=BacKSET(ISLAstBAR,PEAKBARS(1,N,1)+1){XG51};
A2:=A1>REF(A1,1){XG51};
B1:=BACKSET(ISLASTBAR,PEAKBARS(1,N,2)+1){XG51};
B2:=B1>REF(B1,1){XG51};
C1:=BACKSET(ISLASTBAR,PEAKBARS(1,N,3)+1){XG51};
C2:=C1>REF(C1,1){XG51};
A11:=BACKSET(ISLASTBAR,TROUGHBARS(2,N,1)+1){XG51};
A21:=A11>REF(A11,1){XG51};
B11:=BACKSET(ISLASTBAR,TROUGHBARS(2,N,2)+1){XG51};
B21:=B11>REF(B11,1){XG51};
C11:=BACKSET(ISLASTBAR,TROUGHBARS(2,N,3)+1){XG51};
C21:=C11>REF(C11,1){XG51};
①:DRAWLINE(B2,H,A2,H,0),COLORYELLOW{XG51};
②:DRAWLINE(C2,H,B2,H,0),COLORCC6633{XG51};
③:IF(A1,PEAK(1,N,1),DRAWNULL),COLORFFAA00{XG51};
④:DRAWLINE(C2,H,A2,H,0),COLORLIGREEN{XG51};
⑤:DRAWLINE(B21,L,A21,L,0),COLORBLUE{XG51};
⑥:DRAWLINE(C21,L,B21,L,0),COLORFF00FF{XG51};
⑦:DRAWLINE(C21,L,A21,L,0),COLORGRAY{XG51};
⑧:IF(A11,TROUGH(2,N,1),DRAWNULL),COLORWHITE{X?G?5?1?C?N?{};