通达信居士星星未加密选股指标公式源码

源码正文：

V1:=ma(C,3)=HHV(MA(C,3),7){XG51};
V2:=MA(C,3)>MA(C,5){XG51};
V3:=MA(V,5)>MA(V,10)*1.01{XG51};
V4:=COUNT(MA(C,1)>REF(C,1),2)=2{XG51};
LC20:=REF(CLOSE,1){XG51};
rsi20:=SMA(MAX(CLOSE-LC20,0),4.1,1)/SMA(Abs(CLOSE-LC20),4.1,1)*100{XG51};
底部:=crOSS(RSI20,11)*1{XG51};
VAR3A:=3{XG51};
VAR2A:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1){XG51};
mtm:=C-REF(C,1){XG51};
DX:=100*ema(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6){XG51};
YXF:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0){XG51};
加仓:=IF(FILTER(YXF=1,5),1,0){XG51};
QQ:= CLOSE>REF(CLOSE,1)*1.02{XG51};
BB1:=SMA(MAX(CLOSE-REF(CLOSE,1),0),21,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),21,1)*1000{XG51};
GG1:=MA(BB-LLV(BB1,27),5){XG51};
AA1:=(REF(H,4)-REF(L,1))/C*100>10{XG51};
S1:=DYnaINFO(7)>3 AND DYNAINFO(7)<88{XG51};
S2:=FINANCE(7)<1900000000 AND FINANCE(1)<2100000000{XG51};
S4:=IF(NAMELIKE('S'),0,1){XG51};
S5:=IF(NAMELIKE('*'),0,1){XG51};
S6:=NOT(DYNAINFO(4)=0) AND S1 AND S2 AND S4 AND S5{XG51};
IF(底部 AND 加仓 AND AA1 AND S6 ,1,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={};