【通达信免费源码】波段王副图指标源码红色持股绿色持币

用法：红色持股，绿色持币，上面的信号出现代表短期顶部，下面的信号出现代表短期底部，同一天信号出现越多，可靠性越强，顶背离和底背离信号就不解释，按字面意思理解。

公式源码：

LMG1:=HHV(MA(H,13),13);
LMG2:=LLV(MA(H,13),1);
LMG3:=LMG1=LMG2 AND REF(LMG2,1)REF(LMG1,1);
LMG4:=LMG1LMG2 AND REF(LMG2,1)=REF(LMG1,1);
LMG5:=IF(LMG1=LMG2,20,-20);
LMG6:=LMG1=LMG2 AND REF(CLOSE,1)>LMG1 AND CLOSE<LMG1;
VAR1:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)100)/3;
LMG7:=VAR1<-9 AND VAR1> REF(VAR1,1);
大顶:=VAR1>20 AND FILTER(VAR1< REF(VAR1,1),5);
短顶:=VAR1>9 AND FILTER(VAR1< REF(VAR1,1),5),COLORGREEN;
VAR2:=HHV(VAR1>20,10);
危险:=VAR2 AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2STD(CLOSE,20));
注意止损:=VAR2 AND FILTER(VAR1< REF(VAR1,1),6) AND CROSS(MA(CLOSE,5),MA(CLOSE,2));
大底:=VAR1<-20 AND FILTER(VAR1> REF(VAR1,1),7);
短底:=VAR1<-9 AND VAR1> REF(VAR1,1);
持币区域:=VAR1,COLORFEDCBA;
持股区域:=IF(VAR1>0,VAR1,0);
STICKLINE(短顶,30,27,1,0),COLORWHITE;
STICKLINE(大顶,30,33,2,0),COLORBLUE;
STICKLINE(危险,33,36,3,0),COLORGREEN;
STICKLINE(短底,-27,-30,1,0),COLORWHITE;
STICKLINE(大底,-30,-33,2,0),COLORRED;
STICKLINE(LMG7,-33,-36,3,0),COLORYELLOW;
多空线:=(MA(LOW,6)+MA(LOW,13)+MA(LOW,26))/3;
STICKLINE(CLOSE>多空线,0,20,1,1),COLORRED;
STICKLINE(CLOSE<多空线,0,-20,1,1),COLORGREEN;
RSV:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=((3 * K) - (2 * D));
RSV12:=(((CLOSE - LLV(LOW,34)) / (HHV(HIGH,34) - LLV(LOW,34))) * 100);
K12:=SMA(RSV12,3,1);
D12:=SMA(K12,3,1);
J12:=((3 * K12) - (2 * D12));
RSV24:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
K24:=SMA(RSV24,3,1);
D24:=SMA(K24,3,1);
J24:=((3 * K24) - (2 * D24));
压力位:=IF(CROSS(J24,J),HIGH,REF(HIGH,BARSLAST(CROSS(J24,J))));
LMGXHW0:=(OPEN<压力位 AND CLOSE>压力位) OR (REF(CLOSE,1)<REF(压力位,1) AND OPEN>压力位 AND CLOSE>压力位);
VAR101:=VOL/((HIGH-LOW)2-ABS(CLOSE-OPEN));
ZDMP1:=IF(CLOSE>OPEN,VAR101(HIGH-LOW),IF(CLOSEOPEN,VAR101((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
ZDMP2:=IF(CLOSE);%0AZDMP2:=IF(CLOSE)OPEN,0-VAR101((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR101(HIGH-LOW),0-VOL/2));
A01:=SUM((ZDMP1+ZDMP2),10);
A02:=SUM((ZDMP1+ZDMP2),20);
A03:=SUM((ZDMP1+ZDMP2),30);
A04:=ZDMP1+ZDMP2;
A05:=SUM(A04,5);
V1:=(MA(VOL,6)+MA(VOL,13)+MA(VOL,26))/3;
多空量:=V1;
上限:=V11.382;
下限:=V10.618;
LMGXHW1:=IF(CROSS(J24,J),HIGH,REF(HIGH,BARSLAST(CROSS(J24,J))));
DRAWICON(CROSS(LMGXHW1,多空线) AND LMG5=20,32,2);
DRAWICON(CROSS(多空线,LMGXHW1) AND LMG5=20,32,2);
LC:=REF(CLOSE,1);
RSI11:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
底背离:IF(CROSS(FF,MA15),-20,-40),COLORRED;
顶背离:IF(CROSS(88,RSI),20,40),COLORGREEN;
V11:=(C2+H+L)/410;
V12:=EMA(V11,13)-EMA(V11,34);
V13:=EMA(V12,5);
V14:=2(V12-V13)5.5;
庄秘撤:=IF(V14=0,V14,0);
庄秘进:=IF(V14;%0A%E5%BA%84%E7%A7%98%E8%BF%9B:=IF(V14)=0,V14,0);
V15:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))8;
V16:=EMA(3V15-2SMA(V15,18,1),5);
V17:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))10;
V18:=(INDEXC2+INDEXH+INDEXL)/4;
V19:=EMA(V18,13)-EMA(V18,34);
V1A:=EMA(V19,3);
V1B:=(V19-V1A)/2;
大筹金进场:=IF(V1B>=0,V1B,0),COLORYELLOW,LINETHICK2;
大筹金撤走:=IF(V1B<=0,V1B,0),COLORBLUE,LINETHICK2;
AA:=WINNER(CLOSE+CLOSE15/100)100;
BB:=WINNER(CLOSE+CLOSE0/100)100;
CC:=AA-BB;
DD:=(WINNER(CLOSE-CLOSE0.1/100)-WINNER(CLOSE-CLOSE15/100))100;
EE:=CC<3 AND DD<0.5 AND (OPEN<LOW OR OPEN>LOW);
A1:=DYNAINFO(6);
A2:=IF(LOW>A1,0,IF(HIGHA1,1,(A1-LOW+0.01)/(HIGH-LOW+0.01)));
A3:=VOL/WINNER(LOW);
A4:=REF(HHV(CLOSE,120),1);
A5:=REF(LLV(CLOSE,120),1);
A6:=100(CLOSE-A5)/(A4-A5);
A7:=A2);%0AA3:=VOL/WINNER(LOW);%0AA4:=REF(HHV(CLOSE,120),1);%0AA5:=REF(LLV(CLOSE,120),1);%0AA6:=100(CLOSE-A5)/(A4-A5);%0AA7:=A2)0 OR A2=1;
A8:=A7 AND A3/REF(A3,3)>=3 AND A6<80;
A9:=REF(A8,1) OR REF(A8,2) OR REF(A8,3) OR REF(A8,4);
A10:=A8 AND A9;
A11:=IF(FILTER(A8,3),5,0);
A12:=IF(FILTER(A10,3) OR EE,10,0);
DRAWTEXT(A11=5,-2,'资金进场'),COLORRED;
DRAWTEXT(A12=10,-15,'资金增仓'),COLORMAGENTA;
VAR11:=REF(LOW,1);
VAR12:=SMA(ABS(LOW-VAR11),13,1)/SMA(MAX(LOW-VAR11,0),13,1)4;
VAR13:=EMA(VAR12,13);
VAR14:=LLV(LOW,34);
VAR15:=EMA(IF(LOW=VAR14,VAR13,0),3);
主力进场:=STICKLINE(VAR15,3);%0A%E4%B8%BB%E5%8A%9B%E8%BF%9B%E5%9C%BA:=STICKLINE(VAR15)REF(VAR15,1),0,VAR15,7,0 );
洗盘:=IF(VAR15<REF(VAR15,1),VAR15,0);
VAR6:=100-3SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))100,20,1)+2SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))100,20,1),15,1);
VAR7:=100-3SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))100,20,1)+2SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))100,20,1),15,1);
VAR8:=VAR6<REF(VAR7,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(VAR8 AND COUNT(VAR8,30)=1,-10,'资金增筹'),COLORYELLOW;