poiqazli 发表于 2023-11-1 23:16:20

多指标背离提示综合副图

<div class="stock-fc-code-box"><p><br></p><p><br></p><p>X1:2*"RSI.RSI1"(6,12,24),COLORWHITE;</p><p><br></p><p>X2:=2*"RSI.RSI2"(6,12,24);</p><p><br></p><p>150,COLORRED;</p><p><br></p><p>底:-50;</p><p><br></p><p>顶:50;</p><p><br></p><p>TRR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);</p><p><br></p><p>HD := HIGH-REF(HIGH,1);</p><p><br></p><p>LD := REF(LOW,1)-LOW;</p><p><br></p><p>PDM:= SUM(IF(HD&gt;0 AND HD&gt;LD,HD,0),14);</p><p><br></p><p>MDM:= SUM(IF(LD&gt;0 AND LD&gt;HD,LD,0),14);</p><p><br></p><p>PDI:= PDM*100/TRR;</p><p><br></p><p>MDI:= MDM*100/TRR;</p><p><br></p><p>A1:=BARSLAST(REF(CROSS("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9)),1));</p><p><br></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><br></p><p>A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));</p><p><br></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><br></p><p>A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));</p><p><br></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><br></p><p>C1:=BARSLAST(REF(CROSS("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9)),1));</p><p><br></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><br></p><p>C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1));</p><p><br></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><br></p><p>C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));</p><p><br></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><br></p><p>C4:=BARSLAST(REF(CROSS(MDI,PDI),1));</p><p><br></p><p>D4:=REF(C,C+1)&lt;C AND REF(MDI,C4+1)&gt;MDI AND CROSS(MDI,PDI);</p><p><br></p><p>A4:=BARSLAST(REF(CROSS(PDI,MDI),1));</p><p><br></p><p>B4:=REF(C,A4+1)&gt;C AND REF(PDI,A4+1)&lt;PDI AND CROSS(PDI,MDI);</p><p><br></p><p>MACD底背:IF(B1&gt;0,-30,0),COLORRED,POINTDOT;</p><p><br></p><p>DRAWTEXT(B1&gt;0,-20,'M底'),COLORRED;</p><p><br></p><p>MACD顶背:IF(D1&gt;0,30,0),COLOR00FF00,POINTDOT;</p><p><br></p><p>DRAWTEXT(D1&gt;0,20,'M顶'),COLOR00FF00;</p><p><br></p><p>KDJ底背:IF(B2&gt;0,-20,0),COLORFF00FF,POINTDOT;</p><p><br></p><p>DRAWTEXT(B2&gt;0,-10,'K底'),COLORFF00FF;</p><p><br></p><p>KDJ顶背:IF(D2&gt;0,20,0),COLORFFCC66,POINTDOT;</p><p><br></p><p>DRAWTEXT(D2&gt;0,10,'K顶'),COLORFFCC66;</p><p><br></p><p>RSI底背:IF(B3&gt;0,-40,0),COLORYELLOW,POINTDOT;</p><p><br></p><p>DRAWTEXT(B3&gt;0,-30,'RSI底'),COLORYELLOW;</p><p><br></p><p>RSI顶背:IF(D3&gt;0,40,0),COLORFFFFFF,POINTDOT;</p><p><br></p><p>DRAWTEXT(D3&gt;0,30,'RSI顶背'),COLORFFFFFF;</p><p><br></p><p>STICKLINE(B1&gt;0,-40,0,0,0),COLORRED;</p><p><br></p><p>STICKLINE(B2&gt;0,-35,0,0,0),COLORFF00FF;</p><p><br></p><p>STICKLINE(B3&gt;0,-50,0,4,0),COLORYELLOW;</p><p><br></p><p>STICKLINE(D1&gt;0,40,0,0,0),COLOR00FF00;</p><p><br></p><p>STICKLINE(D2&gt;0,35,0,0,0),COLORFFCC66;</p><p><br></p><p>STICKLINE(D3&gt;0,50,0,4,0),COLORWHITE;</p><p><br></p><p>{大盘}</p><p><br></p><p>DIFFD :=EMA(INDEXC/100,12) - EMA(INDEXC/100,26);</p><p><br></p><p>DEAD:=EMA(DIFFD,9);</p><p><br></p><p>MACDD:=2*(DIFFD-DEAD);</p><p><br></p><p>{RSI}</p><p><br></p><p>LCD:=REF(INDEXC,1);</p><p><br></p><p>RSID1:=SMA(MAX(INDEXC-LCD,0),6,1)/SMA(ABS(INDEXC-LCD),6,1)*100;</p><p><br></p><p>RSID2:=SMA(MAX(INDEXC-LCD,0),12,1)/SMA(ABS(INDEXC-LCD),12,1)*100;</p><p><br></p><p>AD1:=BARSLAST(REF(CROSS(DIFFD,DEAD),1));</p><p><br></p><p>BD1:=REF(INDEXC,AD1+1)&gt;INDEXC AND REF(DIFFD,AD1+1)&lt;DIFFD AND CROSS(DIFFD,DEAD);</p><p><br></p><p>CD1:=BARSLAST(REF(CROSS(DEAD,DIFFD),1));</p><p><br></p><p>DD1:=REF(INDEXC,CD1+1)&lt;INDEXC AND REF(DIFFD,CD1+1)&gt;DIFFD AND CROSS(DEAD,DIFFD);</p><p><br></p><p>MACDD底背:=IF(BD1&gt;0,-50,0),COLORRED,POINTDOT;</p><p><br></p><p>DRAWTEXT(BD1&gt;0,-50,'大盘MACD底背'),COLORRED;</p><p><br></p><p>STICKLINE(BD1&gt;0,-50,0,0,0),COLORRED;</p><p><br></p><p>MACDD顶背:=IF(DD1&gt;0,50,0),COLOR00FF00,POINTDOT;</p><p><br></p><p>DRAWTEXT(DD1&gt;0,50,'大盘MACD顶背'),COLOR00FF00;</p><p><br></p><p>STICKLINE(DD1&gt;0,50,0,0,0),COLOR00FF00;</p><p><br></p><p>AD3:=BARSLAST(REF(CROSS(RSID1,RSID2),1));</p><p><br></p><p>BD3:=REF(INDEXC,AD3+1)&gt;INDEXC AND REF(RSID1,AD3+1)&lt;RSID1 AND CROSS(RSID1,RSID2);</p><p><br></p><p>CD3:=BARSLAST(REF(CROSS(RSID2,RSID1),1));</p><p><br></p><p>DD3:=REF(INDEXC,CD3+1)&lt;INDEXC AND REF(RSID1,CD3+1)&gt;RSID1 AND CROSS(RSID2,RSID1);</p><p><br></p><p>RSID底背:=IF(BD3&gt;0,-50,0),COLORYELLOW,POINTDOT;</p><p><br></p><p>DRAWTEXT(BD3&gt;0,-40,'大盘RSI底背'),COLORRED;</p><p><br></p><p>STICKLINE(BD3&gt;0,-40,0,0,0),COLORYELLOW;</p><p><br></p><p>RSID顶背:=IF(DD3&gt;0,50,0),COLORFFFFFF;</p><p><br></p><p>DRAWTEXT(DD3&gt;0,40,'大盘RSI顶背'),COLORFFFFFF;</p><p><br></p><p>STICKLINE(DD3&gt;0,40,0,0,0),COLORFFFFFF;</p><p><br></p><p>H1:=MAX(DYNAINFO(3),DYNAINFO(5));</p><p><br></p><p>L1:=MIN(DYNAINFO(3),DYNAINFO(6));</p><p><br></p><p>P1:=H1-L1;</p><p><br></p><p>阻力:=L1+P1*7/8;</p><p><br></p><p>支撑:=L1+P1*0.5/8;</p><p><br></p><p>中线:=(支撑+阻力)/2,COLORWHITE,POINTDOT;</p><p><br></p><p>V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);</p><p><br></p><p>趋势线:=EMA(V11,3),LINETHICK2,COLORLIMAGENTA;</p><p><br></p><p>BB0:=REF(趋势线,1)&lt;11 AND CROSS(趋势线,11) AND C&lt;中线;</p><p><br></p><p>DRAWTEXT(BB0,0,'★买'),COLORRED;</p><p><br></p><p>DD0:=REF(趋势线,1)&gt;89 AND CROSS(89,趋势线) AND C&gt;中线;</p><p><br></p><p>DRAWTEXT(DD0,0,'★卖'),COLORGREEN;</p><p><br></p><p>ZTTT:=C&gt;=REF(C,1)*1.07;</p><p><br></p><p>MMTT:50*(COUNT(CROSS("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9)),1)=1 AND ZTTT),COLORYELLOW;</p><p>流通盘:CAPITAL/1000000,NODRAW;</p><p><br></p><p>量比:DYNAINFO(17),NODRAW;</p><p><br></p><p>利润率:FINANCE(43),NODRAW;</p><p><br></p><p>DRAWTEXT_FIX(1,0,0,0,'DYBLOCK'+'GNBLOCK');<br/>宣传:DRAWTEXT_FIX(1,0.99,5,1,'~☆~更多精选指标请访问:995168.cn'),COLORRED; </p></div>
页: [1]
查看完整版本: 多指标背离提示综合副图