通达信拉升顶底背离主图未加密选股指标公式源码

通达信拉升顶底背离主图未加密选股指标公式源码

源码正文：

ma13:=MA(CLOSE,13){XG51};
X1:=(CLOSE+LOW+HIGH)/(3){XG51};
BB13:=((ATAN(ema(X1,13)-REF(EMA(X1,13),1)))*(3.1416))*(10){XG51};
EMA8:=EMA(CLOSE,8){XG51};
DRAWTEXT(FILTER((BB13>1) AND (EMA(X1,13)>REF(EMA(X1,8),1)),10),EMA8,'∠45上升'),CoLorFFFFFF{XG51};
压力:MA(REF(HHV(CLOSE,30),1),2),CoLor9DFFFF{XG51};
支撑:MA(REF(LLV(CLOSE,30),1),2),CoLorABFF46{XG51};
AA1:=(AMOUNT)/(vol){XG51};
BB1:=(LOW<(AA1)*(0.9)){XG51};
CC1:=(((CLOSE-REF(CLOSE,1))/(REF(CLOSE,1)))*(100)>1.2){XG51};
DD1:=(LOW<(MA(CLOSE,5))*(0.921)){XG51};
EE1:=(VOL<(MA(VOL,5))*(1.5)){XG51};
FF1:=BB1 AND CC1 AND DD1 AND EE1{XG51};
DRAWTEXT(FF1,(LOW)*(0.96),'老鼠仓'),CoLor4080FF{XG51};
A51:=(3)*(SMA(((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55)))*(100),5,1))-(2)*(SMA(((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55)))*(100),5,1)){XG51};
黑马线:=EMA(A51,5){XG51};
A54:=((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)))*(100){XG51};
趋势线:=MA((3)*(SMA(A54,6,1))-(2)*(SMA(SMA(A54,5,1),5,1)),2){XG51};
DRAWTEXT(crOSS(趋势线,0) AND (黑马线<40),(LOW)*(0.96),'▲大黑马'),CoLor00FFFF{XG51};
LC:=REF(CLOSE,1){XG51};
rsi:=((SMA(MAX(CLOSE-LC,0),3,1))/(SMA(Abs(CLOSE-LC),3,1)))*(100){XG51};
FF:=EMA(CLOSE,3){XG51};
MA15:=EMA(CLOSE,21){XG51};
DRAWTEXT(CROSS(FF,MA15),(LOW)*(0.96),'底背离'),CoLorA6E500{XG51};
DRAWTEXT(CROSS(88,RSI),(HIGH)*(1.04),'顶背离'),CoLor1880FF{XG51};
VAR2:=LLV(LOW,27){XG51};
VAR3:=HHV(HIGH,34){XG51};
VAR4:=(EMA(((CLOSE-VAR2)/(VAR3-VAR2))*(4),4))*(25){XG51};
注意买:=IF((VAR4<10),80,100){XG51};
RSV:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))*(100){XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=(3)*(K)-(2)*(D){XG51};
超跌:=IF((J<0),10,0){XG51};
BDDD:=(LLV(J,2)=LLV(J,8)){XG51};
买入:=IF(CROSS(J,REF(J+0.01,1)) AND BDDD AND (J<20),30,0){XG51};
DRAWTEXT(买入 AND (注意买=100) AND (超跌=0),(LOW)*(0.96),'短线'),CoLor8000FF{XG51};
mtm:=CLOSE-REF(CLOSE,1){XG51};
DX:=((100)*(EMA(EMA(MTM,6),6)))/(EMA(EMA(ABS(MTM),6),6)){XG51};
买:=IF((LLV(DX,2)=LLV(DX,7)) AND COUNT((DX<0),2) AND CROSS(DX,MA(DX,2)),1,0){XG51};
DRAWTEXT(FILTER((买=1),5),(LOW)*(0.96),'拉升'),CoLorFFDE00{XG51};
stICKLINE((CLOSE>REF(CLOSE,1)),HIGH,LOW,0,1),CoLor0000FF{XG51};
STICKLINE((CLOSE>REF(CLOSE,1)),OPEN,CLOSE,8,0),CoLor000055{XG51};
STICKLINE((CLOSE=REF(CLOSE,1)),HIGH,LOW,0,1),CoLorFFFFFF{XG51};
STICKLINE((CLOSE=REF(CLOSE,1)),OPEN,CLOSE,8,1),CoLor333333{XG51};
STICKLINE((CLOSE<REF(CLOSE,1)),HIGH,LOW,0,1),CoLorFFFF00{XG51};
STICKLINE((CLOSE<REF(CLOSE,1)),OPEN,CLOSE,8,0),CoLorFF0033{XG51};
STICKLINE((CLOSE>OPEN),OPEN,LOW,0.5,0),CoLor0000FF{XG51};
STICKLINE((CLOSE>OPEN),CLOSE,HIGH,0.5,0),CoLor0000FF{XG51};
STICKLINE((OPEN>=CLOSE),CLOSE,LOW,0.5,0),CoLor00FF00{XG51};
STICKLINE((OPEN>=CLOSE),OPEN,HIGH,0.5,0),CoLor00FF00{XG51};
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,7,0),CoLorFF7700{XG51};
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,6,0),CoLorFF9900{XG51};
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,5,0),CoLorFFBB00{XG51};
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,4,0),CoLorFFCC00{XG51};
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,3,0),CoLorFFDD00{XG51};
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,2,0),CoLorFFEE00{XG51};
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,1,0),CoLorFFFF00{XG51};
STICKLINE((CLOSE>OPEN),CLOSE,OPEN,7,0),CoLor000055{XG51};
STICKLINE((CLOSE>OPEN),CLOSE,OPEN,6,0),CoLor000066{XG51};
STICKLINE((CLOSE>OPEN),CLOSE,OPEN,5,0),CoLor000077{XG51};
STICKLINE((CLOSE>OPEN),CLOSE,OPEN,4,0),CoLor000099{XG51};
STICKLINE((CLOSE>OPEN),CLOSE,OPEN,3,0),CoLor0000BB{XG51};
STICKLINE((CLOSE>OPEN),CLOSE,OPEN,2,0),CoLor0000DD{XG51};
STICKLINE((CLOSE>OPEN),CLOSE,OPEN,1,0),CoLor0000FF{XG51};
VAR9Q:=((((CLOSE=HHV(CLOSE,4)) AND ((REF(CLOSE,1)>=REF(CLOSE,2)) or (REF(CLOSE,1)>=REF(CLOSE,3))) or (REF(CLOSE,1)=HHV(CLOSE,4)) AND (CLOSE>=REF(CLOSE,2))) or (REF(CLOSE,2)=HHV(CLOSE,4)) AND (REF(CLOSE,3)=LLV(CLOSE,4)) AND (CLOSE>=REF(CLOSE,1))) or (REF(CLOSE,3)=HHV(CLOSE,4)) AND (CLOSE>=REF(CLOSE,1)) AND (CLOSE>=REF(CLOSE,2))){XG51};
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),7,0),CoLor000055{XG51};
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),6,0),CoLor000066{XG51};
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),5,0),CoLor000077{XG51};
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),4,0),CoLor000099{XG51};
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),3,0),CoLor0000BB{XG51};
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),2,0),CoLor0000DD{XG51};
STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),1,0),CoLor0000FF{XG51};
VARAQ:=(CLOSE=HHV(CLOSE,4)) AND (REF(CLOSE,1)=LLV(CLOSE,4)){XG51};
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),7,0),CoLorFF11FF{XG51};
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),6,0),CoLorFF33FF{XG51};
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),5,0),CoLorFF55FF{XG51};
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),4,0),CoLorFF77FF{XG51};
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),3,0),CoLorFF99FF{XG51};
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),2,0),CoLorFFBBFF{XG51};
STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),1,0),CoLorFFddfF{XG51};
VARBQ:=((((CLOSE=LLV(CLOSE,4)) AND ((REF(CLOSE,1)<REF(CLOSE,2)) or (REF(CLOSE,1)<REF(CLOSE,3))) or (REF(CLOSE,1)=LLV(CLOSE,4)) AND (CLOSE<REF(CLOSE,2))) or (REF(CLOSE,2)=LLV(CLOSE,4)) AND (REF(CLOSE,1)<>HHV(CLOSE,4)) AND (CLOSE<REF(CLOSE,1))) or (REF(CLOSE,3)=LLV(CLOSE,4)) AND (CLOSE<REF(CLOSE,1)) AND (CLOSE<REF(CLOSE,2))){XG51};
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),7,0),CoLor333333{XG51};
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),6,0),CoLor555555{XG51};
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),5,0),CoLor777777{XG51};
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),4,0),CoLor999999{XG51};
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),3,0),CoLorBBBBBB{XG51};
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),2,0),CoLorDDDDDD{XG51};
STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),1,0),CoLorFFFFFF{XG51};
VARCQ:=((REF(CLOSE,1)=LLV(CLOSE,4)) AND (CLOSE>=REF(CLOSE,2)) or (REF(CLOSE,2)=LLV(CLOSE,4)) AND (REF(CLOSE,1)<=REF(CLOSE,3)) AND (REF(CLOSE,2)<REF(CLOSE,4)) AND (CLOSE>=REF(CLOSE,1))){XG51};
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),7,0),CoLor003300{XG51};
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),6,0),CoLor005500{XG51};
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),5,0),CoLor007700{XG51};
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),4,0),CoLor009900{XG51};
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),3,0),CoLor00BB00{XG51};
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),2,0),CoLor00DD00{XG51};
STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),1,0),CoLor00FF00{XG51};
VARDQ:=((REF(CLOSE,1)=HHV(CLOSE,4)) AND (CLOSE<REF(CLOSE,2)) or ((REF(CLOSE,2)=HHV(CLOSE,4)) AND (REF(CLOSE,1)>REF(CLOSE,3)) or (REF(CLOSE,3)=HHV(CLOSE,4)) AND (REF(CLOSE,1)>REF(CLOSE,2))) AND (REF(CLOSE,2)>=REF(CLOSE,4)) AND (CLOSE<REF(CLOSE,1))){XG51};
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),7,0),CoLorFF1100{XG51};
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),6,0),CoLorFF3300{XG51};
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),5,0),CoLorFF5500{XG51};
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),4,0),CoLorFF7700{XG51};
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),3,0),CoLorFF9900{XG51};
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),2,0),CoLorFFBB00{XG51};
STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),1,0),CoLorFFDD00{X.G_5*1.C.N.{};

通达信牛散最实用主图未加密选股指标公式源码

源码正文：

N:=80{XG51};
M:=3{XG51};
高1:=REF(HHV(H,150),3){XG51};
低1:=REF(LLV(L,150),3){XG51};
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809{XG51};
%19:REFDATE(H1,DATE),POINTDOT,COLORBLUE,LINETHICK3{XG51};
%38:REFDATE(H2,DATE),POINTDOT,COLORmaGENTA,LINETHICK3{XG51};
%50:REFDATE(H3,DATE),POINTDOT,COLORBLACK,LINETHICK3{XG51};
%61:REFDATE(H4,DATE),POINTDOT,COLORWHITE,LINETHICK3{XG51};
%80:REFDATE(H5,DATE),POINTDOT,COLORRED,LINETHICK3{XG51};
AA05:MA(C,5),LINETHICK3,COLOR0099CC{XG51};
五日乖离率:=(C-AA05)/AA05*100{XG51};
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416{XG51};
速度5:=SMA(ema((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1){XG51};
加速度5:EMA((速度5-REF(速度5,1)),3),NODRAW{XG51};
IF(BB05>30 AND AA05>REF(AA05,1), AA05,DRAWNULL),LINETHICK3,COLORWHITE{XG51};
AA10:MA(C,10);AA20:=MA(C,20){XG51};
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416{XG51};
IF(BB05<0 AND AA05<REF(AA05,1), AA05,DRAWNULL),LINETHICK3,COLORCYAN{XG51};
AA30:MA(C,30){XG51};
三拾日乖离率:(C-AA30)/AA30*100,NODRAW{XG51};
VAR1:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1){XG51};
VAR2:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1){XG51};
BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416{XG51};
IF(BB30>15 AND AA30>REF(AA30,1), AA30,DRAWNULL),LINETHICK3,COLORFF00FF{XG51};
强势狙击:=FILTER(BB30>30 AND BB10>45 AND crOSS(BB05,60),10){XG51};
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND AA05>REF(AA05,1)AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA10>REF(AA10,1)
AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1),10) {XG51};
清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>AA30 OR O>AA30) AND AA05<REF(AA05,1)AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10<REF(AA10,1),10){XG51};
DRAWTEXT(加仓 ,LOW*0.98,'←加仓'),COLORWHITE{XG51};
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10>REF(AA10,1) {XG51};
减仓:=FILTER(JC,10){XG51};
MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<AA30{XG51};
买入:=FILTER(MR,10){XG51};
DRAWTEXT(减仓,HIGH*1.02,'←减仓'),COLORGREEN{XG51};
DRAWTEXT(买入,LOW*0.98,'←买入'),COLORBLUE{XG51};
VAR21:=MAX(Abs(HIGH-AMOUNT/vol/100),ABS(AMOUNT/VOL/100-LOW)){XG51};
VAR3:=ABS((OPEN+CLOSE)/2-AMOUNT/VOL/100){XG51};
MV:=(VAR21+VAR3)/AMOUNT*VOL*100*50{X-G_5-1-C-N-{};