冰川彰所 发表于 2024-4-4 23:57:58

粒米观海量能变化天量地量副图

<div class="stock-fc-code-box"><br/><div><br/><p>以下是粒米观海(量能变化,天量,地量,副图)</p><br/><p>粒米观海(量能变化,天量,地量,副图)</p><br/><p>{粒米观海}<br><br/>VAR2:=(((CLOSE - LLV(LOW,27)) / (HHV(HIGH,27) - LLV(LOW,27))) * 100);<br><br/>角度:(((CLOSE - REF(OPEN,29)) / REF(OPEN,29)) * 100);<br><br/>VAR3:=SMA(VAR2,3,1);<br><br/>VAR4:=SMA(VAR3,9,1);<br><br/>VAR5:=((3 * VAR3) - (2 * VAR4));<br><br/>VAR6:=VOL;<br><br/>换手:((VOL / CAPITAL) * 100);<br><br/>STICKLINE((VOL AND (VAR3 &gt; VAR4)),0,VOL,9,1),colorred;<br><br/>STICKLINE((VOL AND (VAR3 &lt;= VAR4)),0,VOL,9,1),colorFFFF00;<br><br/>VAR2:=(CLOSE - REF(CLOSE,1));<br><br/>VAR3:=IF(((CLOSE - REF(CLOSE,1)) &gt;= 0),VAR2,0);<br><br/>VAR4:=(REF(CLOSE,1) - CLOSE);<br><br/>VAR5:=IF(((CLOSE - REF(CLOSE,1)) &lt;= 0),VAR4,0);<br><br/>VAR6:=(SUM(VAR3,16) / SUM(VAR5,16));<br><br/>VAR7:=(100 - (100 / (1 + VAR6)));<br><br/>VAR8:=EMA(VAR7,16);<br><br/>VAR9:=EMA(VAR8,8);<br><br/>VARA:=EMA(VAR8,45);<br><br/>MO:=(VAR8 - VARA);<br><br/>ML:=(VAR9 - VARA);<br><br/>VAR1A:=EMA(CLOSE,32);<br><br/>VAR2A:=MA(OPEN,32);<br><br/>趋势:=(VAR1A - VAR2A);<br><br/>观望:IF(((((MO &gt; ML) AND (趋势 &lt; 0)) AND (MO &gt; REF(MO,3))) AND (趋势 &gt; REF(趋势,3))),9,0);<br><br/>STICKLINE(((((MO &gt; ML) AND (趋势 &lt; 0)) AND (MO &gt; REF(MO,3))) AND (趋势 &gt; REF(趋势,3))),VOL,0,9,1);<br><br/>VAR2:=(HIGH - LOW);<br><br/>VAR3:=ABS((OPEN - CLOSE));<br><br/>VAR4:=(HIGH - IF((CLOSE &gt; OPEN),CLOSE,OPEN));<br><br/>VAR5:=(IF((CLOSE &gt; OPEN),OPEN,CLOSE) - LOW);<br><br/>VAR6:=((VAR3 / VAR2) * VOL);<br><br/>VAR7:=((VAR4 / VAR2) * VOL);<br><br/>VAR8:=((VAR5 / VAR2) * VOL);<br><br/>VAR9:=IF(((VOL / CAPITAL) &gt; 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100)))));<br><br/>VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100);<br><br/>VARB:=(((MA(CLOSE,5) &gt; MA(CLOSE,10)) AND (MA(CLOSE,10) &gt; MA(CLOSE,30))) AND (MA(CLOSE,30) &gt; MA(CLOSE,60)));<br><br/>VARC:=((MA(CLOSE,5) &lt; MA(CLOSE,10)) AND (MA(CLOSE,10) &lt; MA(CLOSE,30)));<br><br/>上攻量:STICKLINE((((VAR6 &gt;= VAR7) AND (VAR6 &gt;= VAR8)) AND (CLOSE &gt; OPEN)),0,VAR6,8,0),colorred;<br><br/>下攻量:STICKLINE((((VAR6 &gt;= VAR7) AND (VAR6 &gt;= VAR8)) AND (CLOSE &lt; OPEN)),0,VAR6,8,0);<br><br/>上探量:STICKLINE(((VAR7 &gt; VAR6) AND (VAR7 &gt; VAR8)),0,VAR7,8,0),colorCCCC66;<br><br/>下探量:STICKLINE(((VAR8 &gt; VAR6) AND (VAR8 &gt; VAR7)),0,VAR8,8,0),colorFF6633;<br><br/>地量:STICKLINE(((VAR9 &gt; 2) AND (VOL &lt; (MA(VOL,5) / 2))),0,VOL,2.5,0);<br><br/>量:=(EMA(IF((CLOSE &gt;= REF(CLOSE,2)),VOL,(0 - VOL)),60) / MA(VOL,60));<br><br/>量1:=EMA(量,3);<br><br/>量2:=EMA(量,5);<br><br/>量3:=EMA(量,8);<br><br/>T1:=((量2 &gt;= 量3) AND (量 &lt; REF(量,1)));<br><br/>T2:=((量2 &lt; 量3) AND (量 &gt; REF(量,1)));<br><br/>K1:=SUM(IF((CLOSE &gt;= REF(CLOSE,1)),VOL,0),8);<br><br/>K2:=SUM(IF((CLOSE &lt; REF(CLOSE,1)),VOL,0),8);<br><br/>KC:=(((EMA(VOL,3) - LLV(VOL,50)) / (HHV(VOL,50) - LLV(VOL,50))) * 100);<br><br/>KH:=((EMA(EMA(KC,4),16) + EMA(((K1 / (K1 + K2)) * 100),7)) / 4);<br><br/>AA:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));<br><br/>主动买盘:IF((CLOSE &gt; OPEN),(AA * (HIGH - LOW)),IF((CLOSE &lt; OPEN),(AA * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))),POINTDOT,colorred;<br><br/>主动卖盘:IF((CLOSE &gt; OPEN),(0 - (AA * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE &lt; OPEN),(0 - (AA * (HIGH - LOW))),(0 - (VOL / 2)))),LINETHICK0,colorFF0000;<br><br/>STICKLINE((主动买盘 &gt; 0),0,VOL,4,0),colorFF0000;<br><br/>STICKLINE((主动买盘 &gt; 0),0,主动买盘,4,0),colorFF00FF;<br><br/>STICKLINE(CROSS(KH,30),0,VOL,4,0);<br><br/>STICKLINE(CROSS(30,KH),0,VOL,4,0),color6783DB;<br><br/>DRAWICON(CROSS(KH,30),VOL,11);<br><br/>DRAWICON(CROSS(30,KH),VOL,11);<br><br/>DRAWTEXT(CROSS(KH,30),VOL,'--&gt;量顶');<br><br/>DRAWTEXT(CROSS(30,KH),VOL,'--&gt;量顶'),color6783DB;<br><br/>换手率:=((VOL * 100) / CAPITAL);<br><br/>换手相对位置:=(((换手率 - LLV(换手率,89)) / (HHV(换手率,89) - LLV(换手率,89))) * 100);<br><br/>换手相对位置2:=(((换手率 - LLV(换手率,144)) / (HHV(换手率,144) - LLV(换手率,144))) * 100);<br><br/>换手率天量拐点:=IF(((REF(换手相对位置,1) = 100) AND (换手相对位置 &lt; 100)),1,0);<br><br/>换手率天量拐2:=IF(((REF(换手相对位置2,1) = 100) AND (换手相对位置2&lt; 100)),1,0);<br><br/>换手率地量拐点:=IF(((REF(换手相对位置,1) = 0) AND (换手相对位置 &gt; 0)),(0 - 1),0);<br><br/>换手率地量拐2:=IF(((REF(换手相对位置2,1) = 0) AND (换手相对位置2&gt; 0)),(0 - 1),0);<br><br/>天量a:STICKLINE(((REF(换手相对位置,1) = 100) AND (换手相对位置 &lt; 100)),0,(VOL * 1.2),1,0);<br><br/>DRAWICON(((REF(换手相对位置,1) = 100) AND (换手相对位置 &lt; 100)),(VOL * 1.2),11);<br><br/>DRAWTEXT(((REF(换手相对位置,1) = 100) AND (换手相对位置 &lt; 100)),(VOL * 1.2),'--&gt;天量');<br><br/>天量b:STICKLINE(((REF(换手相对位置2,1) = 100) AND (换手相对位置2 &lt; 100)),0,(VOL * 1.2),1,0);<br><br/>DRAWICON(((REF(换手相对位置2,1) = 100) AND (换手相对位置2 &lt; 100)),(VOL * 1.2),11);<br><br/><br><br/>DRAWTEXT(((REF(换手相对位置2,1) = 100) AND (换手相对位置2 &lt; 100)),(VOL * 1.2),'--&gt;天量');<br><br/>地量a:STICKLINE(((REF(换手相对位置,1) = 0) AND (换手相对位置 &gt; 0)),0,(VOL * 1.2),1,0);<br><br/>DRAWICON(((REF(换手相对位置,1) = 0) AND (换手相对位置 &gt; 0)),(VOL * 1.2),10);<br><br/><br><br/>DRAWTEXT(((REF(换手相对位置,1) = 0) AND (换手相对位置 &gt; 0)),(VOL * 1.2),'--&gt;地量');<br><br/>地量b:STICKLINE(((REF(换手相对位置2,1) = 0) AND (换手相对位置2 &gt; 0)),0,(VOL * 1.2),1,0);<br><br/>DRAWICON(((REF(换手相对位置2,1) = 0) AND (换手相对位置2 &gt; 0)),(VOL * 1.2),10);<br><br/><br><br/>DRAWTEXT(((REF(换手相对位置2,1) = 0) AND (换手相对位置2 &gt; 0)),(VOL * 1.2),'--&gt;地量1');<br><br/>常量:STICKLINE((VOL &gt; (MA(VOL,5) * 0.1)),0,VOL,0.1,0),colorFFFFFF;<br><br/>A1:=MA(VOL,20);<br><br/>A2:=MA(VOL,90);<br><br/>DRAWICON(CROSS(A1,A2),LOW,4);<br><br/>DRAWICON(CROSS(A2,A1),LOW,5);<br><br/></p><p><br></p><p><br></p><p><br></p><br/></div><br/></div>
页: [1]
查看完整版本: 粒米观海量能变化天量地量副图