通达信S点买卖主图未加密选股指标公式源码

通达信S点买卖主图未加密选股指标公式源码

源码正文：

M1:=3;M2:=5;M3:=7;M4:=13;M5:=15;M6:=21{XG51};
VAR1:=LLV(HIGH,240){XG51};
VAR2:=100*(CLOSE-VAR1)/VAR1{XG51};
VAR3:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100{XG51};
VAR4:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100{XG51};
VAR5:=0{XG51};
VAR6:=SMA(maX(CLOSE-REF(CLOSE,1),0),34,1)/
SMA(Abs(CLOSE-REF(CLOSE,1)),7,1)*100{XG51};
VAR7:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/
SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100{XG51};
VARA:=BARSCOUNT(CLOSE){XG51};
VARB:=VAR6<20 AND VAR7<23 AND VARA>35{XG51};
VARC:=VARB AND COUNT(VARB,1)=1{XG51};
VARD:=ema(CLOSE,21)-EMA(CLOSE,8){XG51};
VARE:=EMA(VARD,5){XG51};
VARF:=TROUGHBARS(3,6,1)<4 AND crOSS(VARD,VARE){XG51};
VAR8:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0){XG51};
VAR9:=zig(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND
REF(ZIG(3,6),2)<=REF(ZIG(3,6),3){XG51};
VAR10:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND
REF(ZIG(3,6),2)>=REF(ZIG(3,6),3){XG51};
VAR11:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2)
AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3){XG51};
VAR12:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2)
AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3){XG51};
VAR13:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2)
AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3){XG51};
VAR14:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2)
AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3){XG51};
VAR15:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2)
AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3){XG51};
VAR16:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2)
AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3){XG51};
VAR17:=EMA(CLOSE,2)-EMA(CLOSE,150){XG51};
VAR1A:=EMA(VAR17,100){XG51};
VAR1B:=2*(VAR17-VAR1A){XG51};
VAR1C:=POW(VAR1B,3)*0.1+POW(VAR1B,1){XG51};
VAR1D:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE)){XG51};
VAR1E:=EMA(VAR1D*0.97,3){XG51};
VAR1F:=(HIGH+LOW+CLOSE)/3{XG51};
VAR18:=(VAR1F-MA(VAR1F,14))/(0.015*AVEDEV(VAR1F,14)){XG51};
VAR19:=CROSS(VAR1E,LOW){XG51};
选股买点:= VAR8,COLORWHITE{XG51};
组合买:=(VAR9+VAR11+VAR13+VAR15){XG51};
组合卖:=(VAR10+VAR12+VAR14+VAR16){XG51};
黑马线:=IF(YEAR<2098 AND VAR1B>0.1,VAR1C,0){XG51};
VAR20:=选股买点 AND VARF AND VARC AND VAR19 AND VAR2<0 AND VAR3=0
AND VAR4=0 AND VAR18<(-110){XG51};
DRAWTEXT(VAR11,LOW-LOW*0.02,'进'),COLORLIMAGENTA , LINETHICK4{XG51};
stICKLINE(组合买,CLOSE,OPEN,3,0),COLORYELLOW{XG51};
DRAWTEXT(组合买,LOW-LOW*0.02,'B'),COLORCYAN{XG51};
STICKLINE(组合卖,CLOSE,OPEN,3,0),COLORCYAN{XG51};
DRAWTEXT(组合卖,HIGH*1.04,'S'),COLORBLUE{XG51};
STICKLINE(选股买点,CLOSE,OPEN,3,0),COLORYELLOW{XG51};
DRAWTEXT(选股买点>0,LOW-LOW*0.02,'B'),COLORLIMAGENTA{XG51};
DRAWTEXT(VAR14,HIGH*1.1,'空仓'), LINETHICK3, COLORGREEN{XG51};
DRAWTEXT(VAR18<-110 AND 选股买点>0,LOW-LOW*0.06,'进'),COLORWHITE ,LINETHICK3 {XG51};
VAA1:=(ZIG(3,10) < REF(ZIG(3,10),1)) AND (REF(ZIG(3,10),1) > REF(ZIG(3,10),2)){XG51};
VAA2:=(ZIG(3,10) > REF(ZIG(3,10),1)) AND (REF(ZIG(3,10),1) < REF(ZIG(3,10),2)){XG51};
DRAWTEXT(VAA1,HIGH*1.02,'卖'),COLORBLUE{XG51};
DRAWTEXT(VAA2 AND (DATE < 1070804),LOW-LOW*0.02,'卖'),COLORBLUE{XG51};
STICKLINE(VAA1 AND (DATE < 1070804),CLOSE,OPEN,1.5,0),COLORBLUE{XG51};
STICKLINE(VAA1 AND (DATE < 1070804),HIGH,LOW,1.5,0),COLORBLUE{XG51};
STICKLINE(VAA2 AND (DATE < 1070804),CLOSE,OPEN,1.5,0),COLORFF00FF{XG51};
STICKLINE(VAA2 AND (DATE < 1070804),HIGH,LOW,1.5,0),COLORFF00FF{XG51};
VARG:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VARH:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA
((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR21:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA
((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR22:=VARH<REF(VAR21,1) AND vol>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(VAR22 AND COUNT(VAR22,30)=1,HIGH*1.02,'′大资金'),LINETHICK1,COLORFF00FF;
VAR23:=(HIGH+LOW+CLOSE)/3;
VAR24:=(VAR23-MA(VAR23,14))/(0.015*AVEDEV(VAR23,14));
VAR25:=(VAR23-MA(VAR23,70))/(0.015*AVEDEV(VAR23,70));
VAR26:=IF(VAR24>=150 AND VAR24<200 AND VAR25>=150 AND VAR25<200,10,0);
VAR27:=IF(VAR24<=-150 AND VAR24>-200 AND VAR25<=-150 AND VAR25>-200,-10,VAR26);
VAR28:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VAR29:=100-ABS(VAR28);
VAR30:=IF(VAR29<90,VAR29,100);
VAR1G:=IF(VARG>0, VARG,0);
VAR1H:=IF(VAR25>=200 AND VAR24>=150,15,IF(VAR25<=-200 AND VAR24<=-150,-15,VAR27))+60;
VAR1I:=VAR1G>48 AND VAR1H>60 AND VAR30<100;
DRAWTEXT(VAR1I AND COUNT(VAR1I,30)=1,HIGH*1.06,'大笔出货'),LINETHICK1,COLORFFCC66;
DRAWTEXT(CROSS(ZIG(3,14),REF(ZIG(3,14),1)),LOW*1.001,'底'),COLORCYAN{XG51};
DRAWTEXT(CROSS(REF(ZIG(3,13),1),ZIG(3,13)),HIGH*1,'逃顶'), COLORWHITE{X.G*5+1.C.N.{};

通达信脉冲MACD未加密选股指标公式源码

源码正文：

0.4,COLORFF0000{XG51};
dif:(ema(CLOSE,12)-Ema(CLOSE,26)){XG51};
DEA:EMA(DIF,9){XG51};
macd:((DIF-DEA)*2),COLORstICK{XG51};
A1:=((1.5*((((EXPMEMA(IF((((REF(LOW,1)-LOW)>0) AND ((REF(LOW,1)-LOW)>(HIGH-REF(HIGH,1)))),(REF(LOW,1)-LOW),0),14)*100)/EXPMEMA(MAX(MAX((HIGH-LOW),Abs((HIGH-REF(CLOSE,1)))),ABS((REF(CLOSE,1)-LOW))),14)) + ((EXPMEMA(IF((((HIGH-REF(HIGH,1))>0) AND ((HIGH-REF(HIGH,1))>(REF(LOW,1)-LOW))),(HIGH-REF(HIGH,1)),0),14)*100)/EXPMEMA(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((REF(CLOSE,1)-LOW))),14)))-REF((((EXPMEMA(IF((((REF(LOW,1)-LOW)>0) AND ((REF(LOW,1)-LOW)>(HIGH-REF(HIGH,1)))),(REF(LOW,1)-LOW),0),14)*100)/EXPMEMA(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((REF(CLOSE,1)-LOW))),14)) + ((EXPMEMA(IF((((HIGH-REF(HIGH,1))>0) AND ((HIGH-REF(HIGH,1))>(REF(LOW,1)-LOW))),(HIGH-REF(HIGH,1)),0),14)*100)/EXPMEMA(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((REF(CLOSE,1)-LOW))),14))),1)))/(((EXPMEMA(IF((((REF(LOW,1)-LOW)>0) AND ((REF(LOW,1)-LOW)>(HIGH-REF(HIGH,1)))),(REF(LOW,1)-LOW),0),14)*100)/EXPMEMA(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((REF(CLOSE,1)-LOW))),14)) + ((EXPMEMA(IF((((HIGH-REF(HIGH,1))>0) AND ((HIGH-REF(HIGH,1))>(REF(LOW,1)-LOW))),(HIGH-REF(HIGH,1)),0),14)*100)/EXPMEMA(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((REF(CLOSE,1)-LOW))),14)))){XG51};
脉冲:(MA((((A1*(MA(((EXPMEMA(IF((((REF(LOW,1)-LOW)>0) AND ((REF(LOW,1)-LOW)>(HIGH-REF(HIGH,1)))),(REF(LOW,1)-LOW),0),14)*100)/EXPMEMA(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((REF(CLOSE,1)-LOW))),14)),1)/((EXPMEMA(IF((((HIGH-REF(HIGH,1))>0) AND ((HIGH-REF(HIGH,1))>(REF(LOW,1)-LOW))),(HIGH-REF(HIGH,1)),0),14)*100)/EXPMEMA(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((REF(CLOSE,1)-LOW))),14))))*(((EXPMEMA(IF((((REF(LOW,1)-LOW)>0) AND ((REF(LOW,1)-LOW)>(HIGH-REF(HIGH,1)))),(REF(LOW,1)-LOW),0),14)*100)/EXPMEMA(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((REF(CLOSE,1)-LOW))),14))-((EXPMEMA(IF((((HIGH-REF(HIGH,1))>0) AND ((HIGH-REF(HIGH,1))>(REF(LOW,1)-LOW))),(HIGH-REF(HIGH,1)),0),14)*100)/EXPMEMA(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((REF(CLOSE,1)-LOW))),14))))/MA((((EXPMEMA(IF((((REF(LOW,1)-LOW)>0) AND ((REF(LOW,1)-LOW)>(HIGH-REF(HIGH,1)))),(REF(LOW,1)-LOW),0),14)*100)/EXPMEMA(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((REF(CLOSE,1)-LOW))),14))-((EXPMEMA(IF((((HIGH-REF(HIGH,1))>0) AND ((HIGH-REF(HIGH,1))>(REF(LOW,1)-LOW))),(HIGH-REF(HIGH,1)),0),14)*100)/EXPMEMA(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((REF(CLOSE,1)-LOW))),14))),1)),1)*0.5){XG51};
{X*G!5~1*C*N*{};