通达信周趋势能量柱副图
<div class="stock-fc-code-box"><p>N:=5;QJ0:=(HIGH+LOW+CLOSE)/3;</p><p>QJ1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE));</p><p>QJ2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-QJ0);</p><p>QJ3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW);</p><p>QJ4:=IF(HIGH=LOW,1,QJ0-MIN(CLOSE,OPEN));</p><p>QJ5:=VOL/(IF(HIGH=LOW,4,HIGH-LOW));</p><p>QJ6:="MACD.DIF">"MACD.DEA" AND "MACD.DEA"<0;</p><p>QJ7:="KDJ.K">"KDJ.D" AND "KDJ.D"<30;</p><p>QJ8:="MACD.DIF"<"MACD.DEA";</p><p>QJ9:="KDJ.K"<"KDJ.D" AND "KDJ.K">80;</p><p>特大:QJ4*QJ5,NODRAW;大单:QJ3*QJ5,NODRAW;</p><p>中单:QJ1*QJ5,NODRAW;小单:QJ2*QJ5,NODRAW;</p><p>W1:=SUM(大单,N)+SUM(特大,N);W2:=SUM(小单,N)+SUM(中单,N);</p><p>量振1:=特大>大单 AND 大单>小单;</p><p>量振2:=特大<小单 AND 大单<小单;</p><p>标振1:=QJ6 AND QJ7;</p><p>标振2:=QJ8 AND QJ9;</p><p>A:=W1-W2;A0:=IF(A>0,A,0);B0:=IF(A<0,A,0);</p><p>STICKLINE(A0,0,A0,3,0),COLOR000044;</p><p>STICKLINE(A0,0,A0,2.5,0),COLOR000088;</p><p>STICKLINE(A0,0,A0,1.5,0),COLOR0000AA;</p><p>STICKLINE(A0,0,A0,1,0),COLOR0000CC;</p><p>STICKLINE(B0,0,-B0,3,0),COLOR004400;</p><p>STICKLINE(B0,0,-B0,2.5,0),COLOR008800;</p><p>STICKLINE(B0,0,-B0,1.5,0),COLOR00AA00;</p><p>STICKLINE(B0,0,-B0,1,0),COLOR00CC00;</p><p>周趋势:MA(A,5),COLORFFFFFF;</p><p>平滑值:EMA(周趋势,5),COLOR00FFFF;</p><p>STICKLINE(标振1 AND 量振1 AND 周趋势>平滑值,0,A0,3,0),COLORYELLOW;</p><p>DRAWTEXT(标振1 AND 量振1 AND 周趋势>平滑值,A0,'振'),COLORYELLOW;</p><p><br></p></div>
页:
[1]