晓军886 发表于 2023-11-1 21:35:17

通达信经典指标背离副图

<div class="stock-fc-code-box"><p>上:80,COLORRED;</p><p>下卖:20,COLOR00FF00;</p><p>MACD顶背:0,COLOR00FF00;</p><p>MACD底背:0,COLORRED;</p><p>KDJ顶背:0,COLORFFCC66;</p><p>KDJ底背:0,COLORFF00FF;</p><p>RSI顶背:0,COLORFFFFFF;</p><p>RSI底背:0,COLORYELLOW;</p><p>DMI顶背:0,COLORBLUE;</p><p>DMI底背:0,COLOR0099FF;</p><p>TRR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);</p><p>HD := HIGH-REF(HIGH,1);</p><p>LD := REF(LOW,1)-LOW;</p><p>PDM:= SUM(IF(HD&gt;0 AND HD&gt;LD,HD,0),14);</p><p>MDM:= SUM(IF(LD&gt;0 AND LD&gt;HD,LD,0),14);</p><p>PDI:= PDM*100/TRR;</p><p>MDI:= MDM*100/TRR;</p><p>A1:=BARSLAST(REF(CROSS("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9)),1));</p><p>B1:=REF(C,A1+1)&gt;C AND REF("MACD.DIF"(12,26,9),A1+1)&lt;"MACD.DIF"(12,26,9) AND CROSS("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9));</p><p>A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));</p><p>B2:=REF(C,A2+1)&gt;C AND REF("KDJ.K"(9,3,3),A2+1)&lt;"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));</p><p>A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));</p><p>B3:=REF(C,A3+1)&gt;C AND REF("RSI.RSI1"(6,12,24),A3+1)&lt;"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));</p><p>C1:=BARSLAST(REF(CROSS("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9)),1));</p><p>D1:=REF(C,C1+1)&lt;C AND REF("MACD.DIF"(12,26,9),C1+1)&gt;"MACD.DIF"(12,26,9) AND CROSS("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9));</p><p>C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1));</p><p>D2:=REF(C,C2+1)&lt;C AND REF("KDJ.K"(9,3,3),C2+1)&gt;"KDJ.K"(9,3,3) AND CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3));</p><p>C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));</p><p>D3:=REF(C,C3+1)&lt;C AND REF("RSI.RSI1"(6,12,24),C3+1)&gt;"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));</p><p>C4:=BARSLAST(REF(CROSS(MDI,PDI),1));</p><p>D4:=REF(C,C+1)&lt;C AND REF(MDI,C4+1)&gt;MDI AND CROSS(MDI,PDI);</p><p>A4:=BARSLAST(REF(CROSS(PDI,MDI),1));</p><p>B4:=REF(C,A4+1)&gt;C AND REF(PDI,A4+1)&lt;PDI AND CROSS(PDI,MDI);</p><p>DRAWTEXT(B4&gt;0,5,'DMI底背'),COLOR0099FF;</p><p>DRAWTEXT(D4&gt;0,95,'DMI顶背'),COLORBLUE;</p><p>DRAWTEXT(B1&gt;0,15,'MACD底背'),COLORRED;</p><p>DRAWTEXT(B2&gt;0,10,'KDJ底背'),COLORFF00FF;</p><p>DRAWTEXT(B3&gt;0,18,'RSI底背'),COLORYELLOW;</p><p>DRAWTEXT(D1&gt;0,85,'MACD顶背'),COLOR00FF00;</p><p>DRAWTEXT(D2&gt;0,90,'KDJ顶背'),COLORFFCC66;</p><p>DRAWTEXT(D3&gt;0,96,'RSI顶背'),COLORFFFFFF;</p><p>STICKLINE(B1&gt;0,20,0,0,0),COLORRED;</p><p>STICKLINE(B2&gt;0,20,0,0,0),COLORFF00FF;</p><p>STICKLINE(B3&gt;0,20,0,0,0),COLORYELLOW;</p><p>STICKLINE(D1&gt;0,80,100,0,0),COLOR00FF00;</p><p>STICKLINE(D2&gt;0,100,80,0,0),COLORFFCC66;</p><p>STICKLINE(D3&gt;0,100,80,0,0),COLORWHITE;</p><p>STICKLINE(B4&gt;0,20,0,0,0),COLOR0099FF;</p><p>STICKLINE(D4&gt;0,100,80,0,0),COLORBLUE;</p><p>VAR188:=((CLOSE - LLV(LOW,34))/(HHV(HIGH,34) - LLV(LOW,34)))*(100);</p><p>VAR288:=REVERSE(VAR188);</p><p>VAR388:=SMA(VAR188,9,1);</p><p>K88:=SMA(VAR388,3,1);</p><p>D88:=SMA(K88,3,1);</p><p>STICKLINE((K88 &gt;= D88),K88,D88,1,0),COLOR0000FF;</p><p>STICKLINE((K88 &lt;= D88),K88,D88,1,0),COLOR00FF00;</p><p>DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);</p><p>DEA:=EMA(DIFF,9);</p><p>MMACD:=(DIFF-DEA)*2;</p><p>RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9));</p><p>K:=SMA(RSV,9,3);</p><p>D:=SMA(K,9,3);</p><p>J:=3*K-2*D;</p><p>A:=CROSS(DIFF,DEA) AND CROSS(K,D) AND CROSS(J,D) AND DIFF&lt;0;</p><p>SA:=CROSS(DEA,DIFF) AND CROSS(D,K) AND CROSS(D,J) AND DIFF&gt;0;</p><p>DRAWTEXT(FILTER(A,10)=1,12,' 金叉'),COLORYELLOW;</p><p>STICKLINE(FILTER(A,10)=1,0,20,2,0),COLORRED ;</p><p>DRAWTEXT(FILTER(SA,10)=1,97,'死叉'),COLORYELLOW;<br>宣传:DRAWTEXT_FIX(1,0.99,5,1,'~☆~更多精选指标请访问:995168.cn'),COLORRED;</p></div>
页: [1]
查看完整版本: 通达信经典指标背离副图