N:=9;
M:=3;
LOWV:=LLV(LOW,N);
HIGHV:=HHV(HIGH,N);
RSV:=EMA((CLOSE-LOWV)/(HIGHV-LOWV)*100,M);
K:EMA(RSV,M),LINESTICK,COLORLICYAN;
D:MA(K,M);
A:80,COLORGREEN,LINETHICK1;
B:20,COLORRED,LINETHICK2;
角度03:ATAN((K/REF(K,1)-1)*100)*180/3.1416,COLORMAGENTA,NODRAW,LINETHICK1;
IF(角度03>=-10,K,DRAWNULL),LINESTICK,COLORRED,LINETHICK1;
DRAWICON(K<14,20,1);
DRAWICON(K>85,80,2);
DRAWTEXT(CROSS(K,B) AND MA(CLOSE,5)<CLOSE,B,'加仓'),COLORYELLOW;
DRAWTEXT(K>80 AND D>80 AND CROSS(D,K) AND MA(CLOSE,5)<HIGH,A,'减仓'),COLORGREEN;
底:0,LINETHICK2;
中轨:50,POINTDOT;
TRR:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
HD:=HIGH-REF(HIGH,1);
LD:=REF(LOW,1)-LOW;
PDM:=SUM(IF(HD>0 AND HD>LD,HD,0),14);
MDM:=SUM(IF(LD>0 AND LD>HD,LD,0),14);
PDI:=PDM*100/TRR;
MDI:=MDM*100/TRR;
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
B1:=REF(C,A1+1)>C AND REF(DIF,A1+1)<DIF AND CROSS(DIF,DEA);
RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K1:=SMA(RSV1,3,1);
D1:=SMA(K1,3,1);
A2:=BARSLAST(REF(CROSS(K1,D1),1));
B2:=REF(C,A2+1)>C AND REF(K1,A2+1)<K1 AND CROSS(K1,D1);
LC:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);
C1:=BARSLAST(REF(CROSS(DEA,DIF),1));
D11:=REF(C,C1+1)<C AND REF(DIF,C1+1)>DIF AND CROSS(DEA,DIF);
C2:=BARSLAST(REF(CROSS(D1,K1),1));
D22:=REF(C,C2+1)<C AND REF(K1,C2+1)>K1 AND CROSS(D1,K1);
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
D33:=REF(C,C3+1)<C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);
C4:=BARSLAST(REF(CROSS(MDI,PDI),1));
D44:=REF(C,C4+1)<C AND REF(MDI,C4+1)>MDI AND CROSS(MDI,PDI);
A4:=BARSLAST(REF(CROSS(PDI,MDI),1));
B4:=REF(C,A4+1)>C AND REF(PDI,A4+1)<PDI AND CROSS(PDI,MDI);
DMI底背:IF(B4>0,-50,0),COLOR0099FF,POINTDOT;
DRAWTEXT(B4>0,0,'DMI底背'),COLOR0099FF;
DMI顶背:IF(D44>0,50,0),COLORWHITE,POINTDOT;
DRAWTEXT(D44>0,15,'DMI顶背'),COLORWHITE;
MACD底背:IF(B1>0,-50,0),COLORRED,POINTDOT;
DRAWTEXT(B1>0,-15,'MACD底背'),COLORRED;
MACD顶背:IF(D11>0,50,0),COLOR00FF00,POINTDOT;
DRAWTEXT(D11>0,25,'MACD顶背'),COLOR00FF00;
KDJ底背:IF(B2>0,-50,0),COLORFF00FF,POINTDOT;
DRAWTEXT(B2>0,-25,'KDJ底背'),COLORFF00FF;
KDJ顶背:IF(D22>0,50,0),COLORFFCC66,POINTDOT;
DRAWTEXT(D22>0,35,'KDJ顶背'),COLORFFCC66;
RSI底背:IF(B3>0,-50,0),COLORYELLOW,POINTDOT;
DRAWTEXT(B3>0,-35,'RSI底背'),COLORYELLOW;
RSI顶背:IF(D33>0,50,0),COLORFFFFFF,POINTDOT;
DRAWTEXT(D33>0,45,'RSI顶背'),COLORFFFFFF;
STICKLINE(B1>0,-50,0,0,0),COLORRED;
STICKLINE(B2>0,-50,0,0,0),COLORFF00FF;
STICKLINE(B3>0,-50,0,0,0),COLORYELLOW;
STICKLINE(D11>0,50,0,0,0),COLOR00FF00;
STICKLINE(D22>0,50,0,0,0),COLORFFCC66;
STICKLINE(D33>0,50,0,0,0),COLORWHITE;
STICKLINE(B4>0,-50,0,0,0),COLOR0099FF;
STICKLINE(D44>0,50,0,0,0),COLORBLUE;
