通达信金钻牛股及未加密选股指标公式源码

通达信金钻牛股及未加密选股指标公式源码

源码正文：

VARX:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100{XG51};
VARX1:=SMA(VARX,3,1){XG51};
VARX2:=Sma(VARX1,3,1){XG51};
VARX3:=REF(LOW,1);
VARX4:=SMA(Abs(LOW-VARX3),3,1)/SMA(MAX(LOW-VARX3,0),3,1)*100;
VARX5:=ema(IF(CLOSE*1.2,VARX4*10,VARX4/10),3);
VARX6:=LLV(LOW,30);
VARX7:=HHV(VARX5,30);
VARX8:=IF(LLV(LOW,58),1,0);
A9:= DATETODAY(DATE);DS:=IF(A9<9966,1,DRAWNULL){XG51};
筹码短期:=dma((3*HIGH+LOW+OPEN+2*CLOSE)/7,vol/(SUM(AMOUNT,8)/(AMOUNT/VOL/100)/100));
筹码中期:=DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/(SUM(AMOUNT,13)/(AMOUNT/VOL/100)/100));
筹码长期:=DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/(SUM(AMOUNT,20)/(AMOUNT/VOL/100)/100));dif:=EMA(EMA(CLOSE,18)-EMA(CLOSE,34),11){XG51};
XSR:=1150501;XS:=IF(DATE<XSR,1,DRAWNULL){XG51};
macd:=EMA(EMA(DIF,11),11),COLOR58FF58{XG51};
DEF:=2*(DIF-MacD),COLORFFFF00,LINETHICK0{XG51};
mms:=((100)*(EMA(EMA(mtm,6),6)))/(EMA(EMA(ABS(MTM),6),6)){XG51};
MMM:=((100)*(EMA(EMA(MTM,12),12)))/(EMA(EMA(ABS(MTM),12),12)){XG51};
MML:=((100)*(EMA(EMA(MTM,26),26)))/(EMA(EMA(ABS(MTM),26),26)){XG51};
VARR1:=(HHV(HIGH,24)-CLOSE)/(HHV(HIGH,24)-LLV(LOW,24))*100{XG51};
VARR2:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100{XG51};
VARR3:=(2*CLOSE+HIGH+LOW)/4{XG51};
VARR4:=LLV(LOW,26){XG51};
VARR5:=HHV(HIGH,34){XG51};
VARR6:=EMA((VARR3-VARR4)/(VARR5-VARR4)*100,16){XG51};
VARR7:=SMA((SMA(VARR2,3,1)+3),3,1),LINETHICK3{XG51};
VARR8:=EMA(VARR6,7){XG51};
VARR9:=SMA(VARR1,3,1){XG51};
VARR10:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
VARR11:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VARR12:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;
VARR13:=(VARR10+VARR11+VARR12)/3;
VARR14:=IF(VARR13<=-20,10,0);
VARR15:=HHV(VARR14,10){XG51};
VARR24:=LLV(LOW,36){XG51};
VARR25:=HHV(HIGH,30){XG51};
VARR26:=EMA((CLOSE-VARR24)/(VARR25-VARR24)*4,4)*25{XG51};
VARB27:=(((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100)/2+22)*1{XG51};
VARB28:=(((CLOSE -(((EMA(AMOUNT,13) /EMA(VOL,13)) / 100))) / (((EMA(AMOUNT,13) /EMA(VOL,13)) / 100))) * 100){XG51};
VARB29:=IF(A9<15366,1,DRAWNULL){XG51};
AA05:=MA(C,5){XG51};
AA30:=MA(C,30){XG51};
MA05:=MA(C,5){XG51};
MA10:=MA(C,13){XG51};
MA30:=MA(C,34){XG51};
BB05:=ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416{XG51};
BB10:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416{XG51};
BB30:=ATAN((MA30/REF(MA30,1)-1)*100)*180/3.1416{XG51};
速度5:=SMA(EMA((MA05-REF(MA05,1))/REF(MA05,1),3)*100,3,1)*XS{XG51};
加速度5:=EMA((速度5-REF(速度5,1)),3)*VARB29{XG51};
五日乖离率:=(C-AA05)/AA05*VARB29*100*DS{XG51};
三拾日乖离率:=(C-MA30)/MA30*100*VARB29{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)*XS{XG51};
stICKLINE(买入,(LOW)*(0.99000001),0,6,0)*XS*VARB29,COLORWHITE{XG51};
VAR1:=EMA(HHV(HIGH,500),21){XG51};
VAR2:=EMA(HHV(HIGH,250),21){XG51};
VAR3:=EMA(HHV(HIGH,90),21){XG51};
VAR4:=EMA(LLV(LOW,500),21){XG51};
VAR5:=EMA(LLV(LOW,250),21){XG51};
VAR6:=EMA(LLV(LOW,90),21){XG51};
VAR7:=EMA((VAR4*0.96+VAR5*0.96+VAR6*0.96+VAR1*0.558+VAR2*0.558+VAR3*0.558)/6,21){XG51};
VAR8:=EMA((VAR4*1.25+VAR5*1.23+VAR6*1.2+VAR1*0.55+VAR2*0.55+VAR3*0.65)/6,21){XG51};
VAR9:=EMA((VAR4*1.3+VAR5*1.3+VAR6*1.3+VAR1*0.68+VAR2*0.68+VAR3*0.68)/6,21){XG51};
VARA:=EMA((VAR7*3+VAR8*2+VAR9)/6*1.738,21){XG51};
VARB:=REF(LOW,1){XG51};
VARC:=SMA(ABS(LOW-VARB),3,1)/SMA(MAX(LOW-VARB,0),3,1)*100{XG51};
VARD:=EMA(IF(CLOSE*1.35<=VARA,VARC*10,VARC/10),3){XG51};
VARE:=LLV(LOW,30){XG51};
VARF:=HHV(VARD,30){XG51};
VAR10:=IF(MA(CLOSE,58),1,0){XG51};
DRAWTEXT(A9>15298,LOW,'(CLOSE-LC)*VID;LONG := SUM(RC,0)2)))*100);RC := (CLOSE-LC)*VID;LONG := SUM(RC,0){XG51};
DIFF := SMA(LONG,10,1);DEA := SMA(LONG,2
0,1);LON : DIFF-DEA; (CLOSE-LC)*VID;LONG := SUM(RC,0)'){X_G-5_1_C_N_{};

通达信画线支撑主图未加密选股指标公式源码

源码正文：

Z1:=stRCAT(HYBLOCK,' '){XG51};
Z2:=STRCAT(Z1,DYBLOCK){XG51};
Z3:=STRCAT(Z2,' '){XG51};
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLOR00C0C0{XG51};
ZF:=Abs(100*(H-L)/REF(C,1))>3{XG51};
dif:=ema(CLOSE,8)-Ema(CLOSE,13){XG51};
DEA:=EMA(DIF,6){XG51};
macd:=2*(DIF-DEA){XG51};
金叉:=crOSS(DIF,DEA); 死叉:=CROSS(DEA,DIF){XG51};
DIF下拐:=REF(DIF,3)<REF(DIF,2)AND REF(DIF,2)<REF(DIF,1)AND REF(DIF,1)>DIF=REF(DIF,1){XG51};
MacD下拐:=REF(DIF,3)<REF(DIF,2)AND REF(MACD,2)<REF(MACD,1)AND REF(MACD,1)>MACD=REF(MACD,1){XG51};
下拐:=MAX(DIF下拐,MACD下拐){XG51};
GD1:=EVERY(DIF>REF(DIF,1),BArslASTCOUNT(DIF>DEA))AND DIF>DEA{XG51};
GD2:=EVERY(MACD>REF(MACD,1),BARSLASTCOUNT(DIF>DEA))AND DIF>DEA{XG51};
GD:=MAX(GD1,GD2){XG51};
高点1:=REF(MAX(C,O),BARSLAST(GD1)+1){XG51};
高点2:=REF(MAX(C,O),BARSLAST(GD2)+1){XG51};
高点:=IF(高点2>=高点1,高点2,高点1){XG51};
AA:=HHV(IF(C>O,C,MAX(C,O)),BARSLASTCOUNT(高点)+1)=HHV(IF(C>O,C,MAX(C,O)),BARSLASTCOUNT(bbi>REF(BBI,1)AND C>BBI)){XG51};
压力:DRAWLINE(BARSLAST(AA)=0,IF(C>O,C,MAX(C,O)),BARSNEXT(AA),REF(IF(C>O,C,MAX(C,O)),BARSLAST(AA)),1),DOTLINE,COLORBLUE{XG51};
LD1:=EVERY(DIF<REF(DIF,1),BARSLASTCOUNT(DIF<DEA))AND DIF<DEA{XG51};
LD2:=EVERY(MACD<REF(MACD,1),BARSLASTCOUNT(DIF<DEA))AND DIF<DEA{XG51};
LD:=MIN(LD1,LD2){XG51};
低点1:=REF(MIN(C,O),BARSLAST(LD1)+1){XG51};
低点2:=REF(MIN(C,O),BARSLAST(LD2)+1){XG51};
低点:=IF(低点2<=低点1,低点1,低点2){XG51};
BB:=LLV(IF(C<O,C,MIN(C,O)),BARSLASTCOUNT(LD)+1)=LLV(IF(C<O,C,MIN(C,O)),BARSLASTCOUNT(DIF<REF(DIF,1) AND BBI<REF(BBI,1)}AND L<BBI)){XG51};
支撑:DRAWLINE(BARSLAST(BB)=0,IF(C<O,C,MIN(C,O)),BARSNEXT(BB),REF(IF(C<O,C,MIN(C,O)),BARSLAST(BB)),1),DOTLINE,COLORCYAN{XG51};
PP1:=BARSLAST(AA)=1{XG51};
YLX:=REF(MAX(C,O),BARSLAST(PP1)+1){XG51};
突破:CROSS(C,YLX),NODRAW,COLORRED{XG51};
STICKLINE(突破,C,O,2,0),COLORRED{XG51};
DIF突破:=REF(DIF,BARSLAST(PP1)+1){XG51};
有效突破:=突破 AND DIF>DIF突破{XG51};
{XG51};
PP2:=BARSLAST(BB)=1{XG51};
ZCX:=REF(MIN(C,O),BARSLAST(PP2)+1){XG51};
破位:CROSS(ZCX,C),NODRAW,COLORLIBLUE{XG51};
STICKLINE(破位,C,O,2,0),COLORLIBLUE{XG51};
PP7:=BARSLAST(破位)=1{XG51};
破位k线:=REF(O,BARSLAST(PP7)+1){XG51};
突破破位:CROSS(C,破位K线),NODRAW,COLORMAGENTA{XG51};
STICKLINE(突破破位 AND C>O AND MACD>REF(MACD,1),C,O,2,0),COLORMAGENTA{XG51};
六十天高点:=HHV(C,1)=HHV(C,60),NODRAW,COLORLIMAGENTA{XG51};
历史新高:=HHV(C,1)=HHV(C,0),NODRAW,COLORWHITE{XG51};
六十天低点:=MIN(O,C)<=LLV(MIN(O,C),60)NODRAW,COLORGREEN{XG51};
历史新低:=LLV(MIN(O,C),1)=LLV(MIN(O,C),0),NODRAW,COLORYELLOW{XG51};
STICKLINE(六十天高点 AND C>O,C,O,2,0),COLORLIMAGENTA{XG51};
STICKLINE(六十天高点 AND C<O,O,(C+O)/2,2,0),COLORCYAN{XG51};
STICKLINE(六十天高点 AND C<O,C,(C+O)/2,2,0),COLORLIMAGENTA{XG51};
STICKLINE(六十天低点 AND C<O,C,O,2,0),COLORCYAN{XG51};
STICKLINE(六十天低点 AND C>O,C,(C+O)/2,2,0),COLORLIMAGENTA{XG51};
STICKLINE(六十天低点 AND C>O,O,(C+O)/2,2,0),COLORCYAN{XG51};
STICKLINE(历史新高 AND C>O,C,O,2,0),COLORWHITE{XG51};
STICKLINE(历史新高 AND C<O,O,(C+O)/2,2,0),COLORYELLOW{XG51};
STICKLINE(历史新高 AND C<O,C,(C+O)/2,2,0),COLORWHITE{XG51};
STICKLINE(历史新低 AND C<O,C,O,2,0),COLORYELLOW{XG51};
STICKLINE(历史新低 AND C>O,C,(C+O)/2,2,0),COLORWHITE{XG51};
STICKLINE(历史新低 AND C>O,O,(C+O)/2,2,0),COLORYELLOW{XG51};
六十天压力:DRAWLINE(BARSLAST(六十天高点)=0,C,BARSNEXT(六十天高点),REF(C,BARSLAST(六十天高点)),1),DOTLINE,COLORLIMAGENTA{XG51};
历史压力:DRAWLINE(BARSLAST(历史新高)=0,C,BARSNEXT(历史新高),REF(C,BARSLAST(历史新高)),1),DOTLINE,COLORWHITE{XG51};
六十天支撑:DRAWLINE(BARSLAST(六十天低点)=0,MIN(C,O),BARSNEXT(六十天低点),REF(MIN(C,O),BARSLAST(六十天低点)),1),DOTLINE,COLORGREEN{XG51};
历史支撑:DRAWLINE(BARSLAST(历史新低)=0,MIN(C,O),BARSNEXT(历史新低),REF(MIN(C,O),BARSLAST(历史新低)),1),DOTLINE,COLORLIGREEN{XG51};
六十天前高:=六十天高点 AND REF(C,1)<C AND C>REFX(C,1){XG51};
PP3:=BARSLAST(六十天前高)=1{XG51};
六十天前高点:=REF(C,BARSLAST(PP3)+1){XG51};
突破60天压力:CROSS(C,六十天前高点)NODRAW,COLORLIMAGENTA{XG51};
历史前高:=历史新高 AND REF(C,1)<C AND C>REFX(C,1){XG51};
PP4:=BARSLAST(历史前高)=1{XG51};
历史高点:=REF(C,BARSLAST(PP4)+1){XG51};
突破历史压力:CROSS(C,历史高点)NODRAW,COLORWHITE{XG51};
PP5:=BARSLAST(六十天低点)=1{XG51};
破60天低点:CROSS(REF(C,BARSLAST(PP5)+1),C)NODRAW,COLORCYAN{XG51};
PP6:=BARSLAST(历史新低)=1{XG51};
破历史新低:CROSS(REF(C,BARSLAST(PP6)+1),C)NODRAW,COLORYELLOW{XG51};
实体:=(C-O)/C=HHV((C-O)/C,15){XG51};
阳15:=C>O AND vol>=HHV(VOL,15){XG51};
单阳:(C>REF(C,1)*1.035 OR 实体)AND C>O AND (阳15 OR VOL>REF(VOL,1)*1.9),NODRAW,COLORBLUE{XG51};
DRAWTEXT(CURRBARSCOUNT<100 AND 单阳,L*0.991,'阳'),COLOR00FFFF{XG51};
STICKLINE(单阳,O,C,2,0),COLOR00FFFF{XG51};
高不破价:=REF(C,BARSLAST(单阳)){XG51};
低不破价:=REF(O,BARSLAST(单阳)){XG51};
单阳不破:=CURRBARSCOUNT<100 AND BARSLAST(单阳)<11 AND LLV(C,BARSLAST(单阳))>=低不破价{XG51};
STICKLINE(单阳不破,低不破价,低不破价,4,0),COLORCYAN{XG51};
STICKLINE(单阳不破,高不破价,高不破价,4,0),COLORRED{XG51};
DRAWTEXT(BARSLAST(单阳)=01 AND 单阳不破,低不破价*0.99,'1'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=02 AND 单阳不破,低不破价*0.99,'2'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=03 AND 单阳不破,低不破价*0.99,'3'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=04 AND 单阳不破,低不破价*0.99,'4'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=05 AND 单阳不破,低不破价*0.99,'5'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=06 AND 单阳不破,低不破价*0.99,'6'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=07 AND 单阳不破,低不破价*0.99,'7'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=08 AND 单阳不破,低不破价*0.99,'8'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=09 AND 单阳不破,低不破价*0.99,'9'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=10 AND 单阳不破,低不破价*0.99,'10'),COLORBLACK{XG51};
PP8:=BARSLAST(单阳不破)=0{XG51};
ZCX1:=REF(低不破价,BARSLAST(PP8)+1){XG51};
破单阳:=CROSS(ZCX1,C),NODRAW,COLORLIBLUE{XG51};
STICKLINE(破单阳,C,O,2,0),COLORLIBLUE{X+G_5?1+C+N+{};