通达信量能看盘+新宝塔线公式源码

量能看盘

SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
饱和度:IF(SAT>1,1,SAT)*100,LINETHICK0;
{增加率:(SAT-REF(SAT,1))/REF(SAT,1)*100,LINETHICK0;}
量能≤５:STICKLINE(饱和度<=5,5,饱和度+20,4,0),COLORRED;
量能1５～8０:STICKLINE((饱和度>15 AND 饱和度< 80),5,饱和度+8,4,0),COLOR5290FF;
量能５～15:STICKLINE((饱和度>5 AND 饱和度< 15),5,饱和度+8,4,0),COLORYELLOW;
量能８０～９７:STICKLINE((饱和度>80 AND 饱和度< 97),5,饱和度,4,0),COLORFFCC00;
量能≥９７:STICKLINE(饱和度>=97,5,饱和度,4,0),COLORGREEN;
VAR21:=LLV(LOW,33);
VAR31:=HHV(HIGH,21);
VAR41:=EMA((CLOSE-VAR21)/(VAR31-VAR21)*100,20)*0.998;
当前安全度:100-EMA(0.667*REF(VAR41,1)+0.333*VAR41,1),LINETHICK0 ,COLORRED;
VAR1:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
VAR2:=SMA(VAR1,20,1);
VAR3:=SMA(VAR2,15,1);
VAR4:=(3*VAR2+2*VAR3)/4;
VAR5:= REF(VAR4,1);
RSA:SMA(MAX(VAR4-VAR5,0),2,1)/SMA(ABS(VAR4-VAR5),2,1)*100,LINETHICK2;
RSB:MA(RSA,10),COLOR00FFFF,LINETHICK2;

初升介入:IF(CROSS(RSA,RSB),50,0),STICK,LINETHICK2;
洗盘加仓:IF(CROSS(RSB,90),50,0),STICK,LINETHICK2;
DRAWTEXT(CROSS(RSA,RSB),0,'初升介入'),COLORBLUE;
DRAWTEXT(CROSS(RSB,90),0,'洗盘加仓'),COLOR00FFFF;
DRAWTEXT(CROSS(RSA,RSB),RSA*1.2,'▲'),COLORRED;
DRAWTEXT(CROSS(RSB,RSA),RSB*1.3,'▼'),COLORFF00FF;
业绩: FINANCE(33),Linethick0;
市盈率:dynainfo(49);

（背离）新宝塔线公式源码

V1:=C>REF(C,1) AND C>REF(C,2);
V2:=REF(V1,1) AND C<=REF(C,1) AND C>=REF(C,2);
V3:=REF(V2,1) AND C>=REF(C,1) AND C<=REF(C,2);
V4:=REF(V3,1) AND C<=REF(C,1) AND C>=REF(C,2);
V5:=REF(V4,1) AND C>=REF(C,1) AND C<=REF(C,2);
V6:=REF(V5,1) AND C<=REF(C,1) AND C>=REF(C,2);
V7:=REF(V6,1) AND C>=REF(C,1) AND C<=REF(C,2);
V8:=REF(V7,1) AND C<=REF(C,1) AND C>=REF(C,2);
V9:=REF(V8,1) AND C>=REF(C,1) AND C<=REF(C,2);
V10:=REF(V9,1) AND C<=REF(C,1) AND C>=REF(C,2);
V11:=REF(V10,1) AND C>=REF(C,1) AND C<=REF(C,2);
V12:=REF(V11,1) AND C<=REF(C,1) AND C>=REF(C,2);
R1:=C<REF(C,1) AND C<REF(C,2);
R2:=REF(R1,1) AND C>=REF(C,1) AND C<=REF(C,2);
R3:=REF(R2,1) AND C<=REF(C,1) AND C>=REF(C,2);
R4:=REF(R3,1) AND C>=REF(C,1) AND C<=REF(C,2);
R5:=REF(R4,1) AND C<=REF(C,1) AND C>=REF(C,2);
R6:=REF(R5,1) AND C>=REF(C,1) AND C<=REF(C,2);
R7:=REF(R6,1) AND C<=REF(C,1) AND C>=REF(C,2);
R8:=REF(R7,1) AND C>=REF(C,1) AND C<=REF(C,2);
R9:=REF(R8,1) AND C<=REF(C,1) AND C>=REF(C,2);
R10:=REF(R9,1) AND C>=REF(C,1) AND C<=REF(C,2);
R11:=REF(R10,1) AND C<=REF(C,1) AND C>=REF(C,2);
R12:=REF(R11,1) AND C>=REF(C,1) AND C<=REF(C,2);
VA:=V1 OR V2 OR V3 OR V4 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10 OR V11 OR V12;
VB:=R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR R10 OR R11 OR R12;
VC:=REF(R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR R10 OR R11 OR R12,1) AND V1;
VD:=REF(V1 OR V2 OR V3 OR V4 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10 OR V11 OR V12,1) AND R1;
STICKLINE(VA,C,REF(C,1),6,1),COLORRED;
STICKLINE(VB,C,REF(C,1),6,0),COLORCYAN;
STICKLINE(VC,REF(C,1),REF(C,2),6,0),COLORMAGENTA;
STICKLINE(VD,REF(C,1),REF(C,2),6,0),COLOR008800;
A1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));
DRAWTEXT(REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA")>0,L/1.01,'★M'),COLOR00FFFF;{MACD底背离}
A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));
DRAWTEXT(REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D")>0,L/1.005,'★K'),COLORYELLOW;{KDJ底背离}
A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
DRAWTEXT(REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2")>0,L,'★R'),COLORYELLOW;{RSI底背离};
B1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));
DRAWTEXT(REF(C,B1+1)<C AND REF("MACD.DIF",B1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF")>0,HHV(H,3)*1.01,'★M'),COLOR00FF00;{MACD顶背离};
B2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));
DRAWTEXT(REF(C,B2+1)<C AND REF("KDJ.K",B2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K")>0,HHV(H,3)*1.005,'★K'),COLORGREEN;{KDJ顶背离}
B3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
DRAWTEXT(REF(C,B3+1)<C AND REF("RSI.RSI1",B3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1")>0,HHV(H,3),'★R'),COLORGREEN;{RSI顶背离};