Input:N(10),M1(3),M2(3);
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; K:=SMA(RSV,M1,1); D:=SMA(K,M2,1); J:=3*K-2*D; POLYLINE(1,D),colorFFFF00; 短高:IF(BETWEEN("KDJ.K",100,80),88,100),PRECIS0; 短低:IF(BETWEEN("KDJ.K",20,0),12,0),PRECIS0; 波低:IF(BETWEEN("KDJ.K#week",10,0),30,0),PRECIS0; 波高:IF(BETWEEN("KDJ.K#week",100,90),70,100),PRECIS0; 中低:IF(BETWEEN("KDJ.K#MONTH",20,0),30,0),PRECIS0,color0000FF; 中高:IF(BETWEEN("KDJ.K#MONTH",100,75),70,100),PRECIS0; POLYLINE(1,0),color00FFFF; A1:=BARSLAST(REF(CROSS("MACD.DIFF","MACD.DEA"),1)); B1:=REF(CLOSE,A1+1)>CLOSE AND REF("MACD.DIFF",A1+1)<"MACD.DIFF" AND CROSS("MACD.DIFF","MACD.DEA"); MACD底背離:FILTER(B1>0,5),LineThick0,PRECIS0; STICKLINE(FILTER(B1>0,5),0,10,3,0),color00FF00; DRAWTEXT(FILTER(B1>0,5),10,'MACD底背'),color00FF00; A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1)); B2:=REF(CLOSE,A2+1)>CLOSE AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D"); KDJ底背離:FILTER(B2>0,5),LineThick0,PRECIS0; STICKLINE(FILTER(B2>0,5),0,20,3,0),color00FFFF; DRAWTEXT(FILTER(B2>0,5),20,'KDJ底背'),color00FFFF; A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1)); B3:=REF(CLOSE,A3+1)>CLOSE AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2"); RSI底背離:FILTER(B3>0,5),LineThick0,PRECIS0; STICKLINE(FILTER(B3>0,5),0,30,3,0),colorFFFF00; DRAWTEXT(FILTER(B3>0,5),30,'RSI底背'),colorFFFF00; POLYLINE(1,100),color0000FF; C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIFF"),1)); D1:=REF(CLOSE,C1+1)<CLOSE AND REF("MACD.DIFF",C1+1)>"MACD.DIFF" AND CROSS("MACD.DEA","MACD.DIFF"); MACD頂背離:FILTER(D1>0,5),Linethick0,PRECIS0; STICKLINE(FILTER(D1>0,5),100,80,3,0),color0066FF; DRAWTEXT(FILTER(D1>0,5),80,'MACD頂背'),color0066FF; C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1)); D2:=REF(CLOSE,C2+1)<CLOSE AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K"); KDJ頂背離:FILTER(D2>0,5),Linethick0,PRECIS0; STICKLINE(FILTER(D2>0,5),100,70,3,0),color0000FF; DRAWTEXT(FILTER(D2>0,5),70,'KDJ頂背'),color0000FF; C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1)); D3:=REF(CLOSE,C3+1)<CLOSE AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1"); RSI頂背離:FILTER(D3>0,5),Linethick0,PRECIS0; |
|