通达信红色共振指标公式源码副图

通达信红色共振指标公式源码副图

WJ:=(HIGH+LOW+CLOSE)/3;V1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE));V2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-WJ);V3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW);V4:=IF(HIGH=LOW,1,WJ-MIN(CLOSE,OPEN));V5:=vol/IF(HIGH=LOW,4,HIGH-LOW);V6:=(V1*V5);V7:=(V2*V5);V8:=(V3*V5);V9:=(V4*V5);RT:=(V9+V8)/1000,COLORYELLOW,NODRAW;TRE:=-(V6+V7)/1000,COLORRED,NODRAW;RRT:=((V9+V8)-(V6+V7))/1000,COLORYELLOW,NODRAW;TTR:=SUM(RRT,3),COLORYELLOW,NODRAW;DG1:=(crOSS(TTR,0));DRAWICON(TTR>0,0.8,1);DRAWICON(CROSS(TTR,0),0.8,23);DRAWICON(TTR<0,0.8,2);DRAWTEXT(ISLASTBAR=1,IF(TTR>=0,0.8,0.8),--VOL),COLORCYAN;mtm:=CLOSE-REF(CLOSE,12);MAMTM:=MA(MTM,6);DRAWICON(MTM>MAMTM,1.8,1);DRAWICON(CROSS(MTM,MAMTM),1.8,23);DRAWICON(MTM<MAMTM,1.8,2);DRAWTEXT(ISLASTBAR=1,IF(MTM>=0,1.8,1.8),--MTM),COLORCYAN;MTM叉:MTM>MAMTM,POINTDOT;RSV1:=-(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100;Lwr1:=SMA(RSV1,3,1);LWR2:=SMA(LWR1,3,1);DRAWICON(LWR1>LWR2,2.8,1);DRAWICON(CROSS(LWR1,LWR2),2.8,23);DRAWICON(LWR1<LWR2,2.8,2);DRAWTEXT(ISLASTBAR=1,IF(LWR1>=0,2.8,2.8),--LWR),COLORCYAN;LWR叉:LWR1>LWR2,POINTDOT;bbi:=(MA(CLOSE,3)+MA(CLOSE,9)+MA(CLOSE,12)+MA(CLOSE,26))/4;DRAWICON(CLOSE>BBI,3.8,1);DRAWICON(CROSS(CLOSE,BBI),3.8,23);DRAWICON(CLOSE<BBI,3.8,2);DRAWTEXT(ISLASTBAR=1,IF(BBI>=0,3.8,3.8),--BBI),COLORCYAN;BBI金叉:CLOSE>BBI,POINTDOT;TR1:=EXPMEMA(MAX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),3);HD :=HIGH-REF(HIGH,1);LD :=REF(LOW,1)-LOW;DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),3);DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),3);PDI:=DMP*100/TR1;mdi:=DMM*100/TR1;DRAWICON(PDI>MDI,4.8,1);DRAWICON(CROSS(PDI,MDI),4.8,23);DRAWICON(PDI<MDI,4.8,2);DRAWTEXT(ISLASTBAR=1,IF(PDI>=0,4.8,4.8),--dmi),COLORCYAN;DMI叉:PDI>MDI,POINTDOT;LC:=REF(CLOSE,1);rsi1:=(SMA(MAX(CLOSE-LC,0),3,1))/(SMA(ABS(CLOSE-LC),3,1))*100;RSI2:=(SMA(MAX(CLOSE-LC,0),12,1))/(SMA(ABS(CLOSE-LC),12,1))*100;DRAWICON(RSI1>RSI2,5.8,1);DRAWICON(CROSS(RSI1,RSI2),5.8,23);DRAWICON(RSI1<RSI2,5.8,2);DRAWTEXT(ISLASTBAR=1,IF(RSI1>=0,5.8,5.8),--RSI),COLORCYAN;RSI叉:RSI1>RSI2,POINTDOT;RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);DRAWICON(K>D,6.8,1);DRAWICON(CROSS(K,D),6.8,23);DRAWICON(K<D,6.8,2);DRAWTEXT(ISLASTBAR=1,IF(RSV>=0,6.8,6.8),--kdj),COLORCYAN;kdJ叉:K>D,POINTDOT;DIFF:=EMA(CLOSE,6)-EMA(CLOSE,13);DEA:=EMA(DIFF,5);DRAWICON(DIFF>DEA,7.8,1);DRAWICON(CROSS(DIFF,DEA),7.8,23);DRAWICON(DIFF<DEA,7.8,2);DRAWTEXT(ISLASTBAR=1,IF(DIFF>=0,7.8,7.8),--macd),COLORCYAN;MCDA叉:DIFF>DEA,POINTDOT;MA1:=MA(C,5)-MA(C,13)+MA(C,3),COLORLIGREEN;MA2:=MA(C,5)-MA(C,13)+MA(C,8),COLORLIGREEN;DRAWICON(MA1>MA2,8.8,1);DRAWICON(CROSS(MA1,MA2),8.8,23);DRAWICON(MA1<MA2,8.8,2);DRAWTEXT(ISLASTBAR=1,IF(MA1>=0,8.8,8.8),--MA),COLORCYAN;MA叉:MA1>MA2,POINTDOT;