通达信〖建仓低吸〗启涨指标公式源码

VAR7Q:=((EMA(CLOSE,3)-EMA(CLOSE,8)))*10;
STICKLINE(VAR7Q>0,0,-10,3.8,0),COLORRED,LINETHICK3;
STICKLINE(VAR7Q< 0,0,-10,3.8,0),COLORGREEN,LINETHICK3;
VARKH:VAR7Q,COLORRED,NODRAW;
DRAWTEXT_FIX(C>0,0.1,0.001,0,'红买绿卖红色持股，位低最好，超80小心'),COLORYELLOW;
VARUL:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100;
VAR7T:=SMA(VARUL,3,1);
VAR0J:=SMA(VAR7T,3,1);
VARTW:=SMA(VAR0J,3,1);
VAR19:= VAR0J;
VARG7:= VARTW;
VARC0:crOSS(VAR0J,VARTW) AND VAR0J< 20,COLORYELLOW,NODRAW;
STICKLINE(FILTER(VARC0,10)=1,0,80,1,0),COLORRED;
VAR28:VAR0J,COLORFF99CC,NODRAW;
VARVG:=CROSS(VARTW,VAR0J) AND VAR0J>80;
VAR88:=CROSS(VAR7T,VAR0J) AND VAR0J>80 AND VAR0J>VARTW;
STICKLINE(VAR88,85,100,3,0),COLOR0099FF;
VAR2K:=LLV(LOW,36);
VARFR:=HHV(HIGH,30);
VARXI:=80,COLORGREEN,DOTLINE;
VARB4:=87.5,COLOR00FF00;
VARED:=(EMA(((CLOSE-VAR2K)/(VARFR-VAR2K))*(4),4))*(25);
VARVC:=VARED,COLOR0000FF,LINETHICK2;
VARGB:=(((VARED-LLV(VARED,21))/(HHV(VARED,21)-LLV(VARED,21)))*(4))*(25);
VARLZ:=IF(CROSS(VARGB,90) AND (VARVC< 40),33,0),COLORFFFF00;
STICKLINE(VARLZ,0,50,2,0),COLOR0099FF;
DRAWTEXT(CROSS(VARGB,90) AND (VARVC< 40),55,''),COLORFFFF00;
VARW2:CROSS(VARGB,90) AND (VARVC< 40),COLORWHITE,NODRAW;
VAR96:=10,COLOR0000FF;
VARME:=IF((COUNT((VARVC>REF(VARVC,1)),1)=1) AND (REF(VARVC,1)< REF(REF(VARVC,1),1)) AND (VARVC< VAR96),40,0),COLORF00FF0;
STICKLINE(VARME,0,30,1,0),COLORF00FF0;
DRAWTEXT((COUNT((VARVC>REF(VARVC,1)),1)=1) AND (REF(VARVC,1)< REF(REF(VARVC,1),1)) AND (VARVC< VAR96),40,'关注'),COLORF00FF0;
VARUQ:(COUNT((VARVC>REF(VARVC,1)),1)=1) AND (REF(VARVC,1)< REF(REF(VARVC,1),1)) AND (VARVC< VAR96),COLORMAGENTA,NODRAW;
VARHN:=(CLOSE-LLV(LOW,55.144))/(HHV(HIGH,55.144)-LLV(LOW,55))*80;
VARV9:=SMA(VARHN,7,1);
VAR5N:=SMA(VARV9,5,1);
VARKZ:=IF(CROSS(VARV9,VAR5N) AND VARV9< 20,80,0),STICK,COLORMAGENTA,LINETHICK3;
STICKLINE(VARKZ,0,50,2,0),COLORMAGENTA;
VARJN:CROSS(VARV9,VAR5N) AND VARV9< 20,COLORYELLOW,NODRAW;
VARKI:=(3*CLOSE+LOW+OPEN+HIGH)/6;
VARK6:=(20*VARKI+19*REF(VARKI,1)+18*REF(VARKI,2)+17*REF(VARKI,3)+16*REF(VARKI,4)+15*REF(VARKI,5)+14*REF(VARKI,6)+13*REF(VARKI,7)+12*REF(VARKI,8)+11*REF(VARKI,9)+10*REF(VARKI,10)+9*REF(VARKI,11)+8*REF(VARKI,12)+7*REF(VARKI,13)+6*REF(VARKI,14)+5*REF(VARKI,15)+4*REF(VARKI,16)+3*REF(VARKI,17)+2*REF(VARKI,18)+REF(VARKI,20))/211;
VARSV:=EMA(VARK6,2);
VARF0:=EMA(VARSV,2);
VAR7K:=EMA(VARF0,2);
VARX6:IF(CROSS(VARK6,VAR7K),1,0),COLORCYAN,NODRAW;
STICKLINE(VARX6 AND VAR7Q>0,0,40,1,0),COLORYELLOW;
DRAWTEXT(CROSS(VARK6,VAR7K) AND VAR7Q>0,48,'启涨'),COLORYELLOW;
VARPE:CROSS(VARK6,VAR7K) AND VAR7Q>0,COLORMAGENTA,NODRAW;
VAROI:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
VARMM:=REVERSE(VAROI);
VARMS:=SMA(VAROI,3,1);
VARIM:= SMA(VARMS,3,1);
VAR6D:= SMA(VARIM,3,1);
DRAWICON(CROSS(VARIM,VAR6D) AND VARIM< 40,36,1);
DRAWICON(CROSS(VAR6D,VARIM) AND VAR6D>75,90,2);
DRAWTEXT(CROSS(VARIM,VAR6D) AND VARIM< 40,25,'低吸'), COLORLIRED;
VAR3B:CROSS(VARIM,VAR6D) AND VARIM< 40,COLORWHITE,NODRAW;
VAR7C:=(3*C+H+L+O)/6;
VARPF:=(8*VAR7C+7*REF(VAR7C,1)+6*REF(VAR7C,2)+5*REF(VAR7C,3)+4*REF(VAR7C,4)+3*REF(VAR7C,5)+2*REF(VAR7C,6)+REF(VAR7C,8))/36;
VAR41:=(HHV(VARPF,5)+HHV(VARPF,10)+HHV(VARPF,20))/3;
VARQD:=(LLV(VARPF,5)+LLV(VARPF,10)+LLV(VARPF,20))/3;
VARRT:=(HHV(VAR41,5)+HHV(VAR41,10)+HHV(VAR41,20))/3;
VARAP:=(LLV(VARQD,5)+LLV(VARQD,10)+LLV(VARQD,20))/3;
VARLP:=(LLV(VARPF,2)+LLV(VARPF,4)+LLV(VARPF,6))/3;
STICKLINE(VARPF>VARLP,-10,-16,3.8,0),COLOR3333CC;
VAR06:=(C*2+H+L)/4*10;
VAR3F:=EMA(VAR06,13)-EMA(VAR06,34);
VARTC:=EMA(VAR3F,5);
VAR5D:=VAR19>VARG7;
VAR6C:=2*(VAR3F-VARTC)*5.5>=0;
VARXY:=VAR7Q>0;
VAR5H:=VARPF>VARLP;
VARU3:=VAR5D+VAR6C+VARXY+VAR5H;
VARMB:VARU3=4 AND REF(VARU3!=4,1),COLORRED,NODRAW;
VARW6:VARC0+VARW2+VARUQ+VARJN+VARX6+VARPE+VAR3B+VARMB,COLORCYAN,NODRAW;
VAREK:VARMB AND VAR19<=10,COLORWHITE,NODRAW;
VAR2E:VARMB AND VAR19>=78,COLORRED,NODRAW;
VARL5:VAR88,COLORGREEN,NODRAW;
VARTV:2*(VAR3F-VARTC)*5.5,COLORLIRED,NODRAW;
STICKLINE(VARTV>=0,0,8,3.8,0),COLORLIRED,LINETHICK3;
DRAWICON(VARMB,8,11);
DRAWBAND(VAR19,RGB(155,50,50),VARG7,RGB(50,250,0));
DRAWTEXT(FILTER(VARC0,10)=1,71,'建仓'),COLORWHITE;