VAR8:= DMA(EMA(CLOSE,12),SUM(VOL/CAPITAL,5)/3),LINETHICK2;
VARA:=REF(CLOSE,1);
VARE:=SMA(MAX(CLOSE-VARA,0),6,1)/SMA(ABS(CLOSE-VARA),6,1)*100;
VARF:=(2*CLOSE+HIGH+LOW)/4;
VAR10:=LLV(LOW,23);
VAR11:=HHV(HIGH,23);
VAR12:=EMA((VARF-VAR10)/(VAR11-VAR10)*100,6);
VAR13:=EMA(0.667*REF(VAR12,1)+0.333*VAR12,4);
RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
RSV24:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
K24:=SMA(RSV24,3,1);
D24:=SMA(K24,3,1);
J24:=3*K24-2*D24;
压力位:IF(CROSS(J24,J),H,REF(H,BARSLAST(CROSS(J24,J)))),COLOR00FF33,LINETHICK1;
支撑位:IF(CROSS(J,J24),L,REF(L,BARSLAST(CROSS(J,J24)))),COLORCC33CC,LINETHICK1;
支撑价:LLV(LOW,34) ,COLOR7FFF00,LINETHICK2;
阻力价:HHV(HIGH,19),COLORFF9900, LINETHICK2;
十:MA(C,5),COLOR00FFFF,LINETHICK2;
涨:IF(MA(CLOSE,5) REF(MA(CLOSE,5),1),MA(CLOSE,5),DRAWNULL),COLORRED,LINETHICK2;
平:IF(MA(CLOSE,5)=REF(MA(CLOSE,5),1),MA(CLOSE,5),DRAWNULL),COLOR00FFFF,LINETHICK3;
跌:IF(MA(CLOSE,5) REF(MA(CLOSE,5),1),MA(CLOSE,5),DRAWNULL),COLORGREEN,LINETHICK2;
DRAWTEXT(REF(C,BARSLAST(REF(CROSS('TMJ_MACD.DIF','TMJ_MACD.DEA'),1))+1) C
AND REF('TMJ_MACD.DIF',BARSLAST(REF(CROSS('TMJ_MACD.DIF','TMJ_MACD.DEA'),1))
+1) 'TMJ_MACD.DIF' AND CROSS('TMJ_MACD.DIF','TMJ_MACD.DEA') 0,L*0.9,'MACD底背离'),COLORRED;{MACD底背离}
DRAWTEXT(REF(C,BARSLAST(REF(CROSS('TMJ_KDJ.K','TMJ_KDJ.D'),1))+1) C AND
REF('TMJ_KDJ.K',BARSLAST(REF(CROSS('TMJ_KDJ.K','TMJ_KDJ.D'),1))+1)
'TMJ_KDJ.K' AND CROSS('TMJ_KDJ.K','TMJ_KDJ.D'),L*0.980,'KDJ底背离'),COLORRED;{KDJ底背离}
DRAWTEXT(REF(C,BARSLAST(REF(CROSS('RSI.RSI1','RSI.RSI2'),1))+1) C AND
REF('RSI.RSI1',BARSLAST(REF(CROSS('RSI.RSI1','RSI.RSI2'),1))+1) 'RSI.RSI1'
AND CROSS('RSI.RSI1','RSI.RSI2') 0,L*0.970,'RSI底背离'),COLORRED;{RSI底背离};
DRAWTEXT(REF(C,BARSLAST(REF(CROSS('TMJ_MACD.DEA','TMJ_MACD.DIF'),1))+1) C
AND REF('TMJ_MACD.DIF',BARSLAST(REF(CROSS('TMJ_MACD.DEA','TMJ_MACD.DIF'),1))+1) 'TMJ_MACD.DIF' AND
CROSS('TMJ_MACD.DEA','TMJ_MACD.DIF') 0,H*1.08,'MACD顶背离'),COLORADEAEA;{MACD顶背离};
DRAWTEXT(REF(C,BARSLAST(REF(CROSS('TMJ_KDJ.D','TMJ_KDJ.K'),1))+1) C AND
REF('TMJ_KDJ.K',BARSLAST(REF(CROSS('TMJ_KDJ.D','TMJ_KDJ.K'),1))+1)
'TMJ_KDJ.K' AND CROSS('TMJ_KDJ.D','TMJ_KDJ.K') 0,H*1.05,'KDJ顶背离'),COLORADEAEA;{KDJ顶背离}
DRAWTEXT(REF(C,BARSLAST(REF(CROSS('RSI.RSI2','RSI.RSI1'),1))+1) C
AND REF('RSI.RSI1',BARSLAST(REF(CROSS('RSI.RSI2','RSI.RSI1'),1))+1)
'RSI.RSI1' AND CROSS('RSI.RSI2','RSI.RSI1') 0,H*1.02,'RSI顶背离'),COLORADEAEA;{RSI顶背离};
(阻力价+支撑价)/2 COLORGREEN CIRCLEDOT;
