通达信云端短线主图选股指标公式源码

通达信云端短线主图选股指标公式源码

源码正文：

Z1:=stRCAT(HYBLOCK,' '){XG51};
Z2:=STRCAT(Z1,DYBLOCK){XG51};
Z3:=STRCAT(Z2,' '){XG51};
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORWHITE{XG51};
N1:=7;
VAR1:=REF(C,1);
VAR2:=SMA(maX(C-VAR1,0),N1,1)/SMA(Abs(C-VAR1),N1,1)*1000;
VAR3:=DRAWLINE(VAR2>=HHV(VAR2,N1),VAR2,VAR2<=LLV(VAR2,N1),VAR2,1){XG51};
VAR4:=VAR2=VAR3{XG51};
VAR5:=VAR2<REF(VAR2,1){XG51};
RSV:=(C-LLV(L,25))/(HHV(HIGH,25)-LLV(L,25))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
VAR6:=(2*C+H+L)/3{XG51};
VAR7:=ema(EMA(EMA(VAR6,4),4),4){XG51};
VAR8:=(VAR7-REF(VAR7,1))/REF(VAR7,1)*100{XG51};
VAR9:=MA(VAR8,3)+0.03{XG51};
VAR10:=MA(VAR8,1){XG51};
KB:=EMA(C,3)-EMA(C,18){XG51};
DB:=EMA(KB,3){XG51};
AA:=BARSCOUNT(C){XG51};
AH:=HHV(H,120){XG51};
AL:=LLV(L,120){XG51};
A0:=(AH-AL)/30{XG51};
VAR2S:=(2*CLOSE+HIGH+LOW)/4;
VAR3S:=IF(YEAR>=2099 AND MONTH>2,0,1);
VAR4S:=LLV(LOW,5); VAR5S:=HHV(HIGH,4);
散:=EMA((VAR2S-VAR4S)/(VAR5S-VAR4S)*100,4)*VAR3S;
庄:=EMA(0.667*REF(散,1)+0.333*散,2)*VAR3S{XG51};
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,3.2,0),COLOR004400{XG51};
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,2.7,0),COLOR006600{XG51};
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,2.1,0),COLOR008800{XG51};
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,1.5,0),COLOR00AA00{XG51};
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,0.9,0),COLOR00CC00{XG51};
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,0.3,0),COLOR00EE00{XG51};
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,3.2,0),COLOR000055{XG51};
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,2.7,0),COLOR000077{XG51};
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,2.1,0),COLOR000099{XG51};
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,1.5,0),COLOR0000BB{XG51};
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,0.9,0),COLOR0000DD{XG51};
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,0.3,0),COLOR0000FF{XG51};
STICKLINE(crOSS(VAR9,VAR10) AND J>65,H,OPEN,3.15,0),COLORAA1100{XG51};
STICKLINE(CROSS(VAR9,VAR10) AND J>65,H,OPEN,2.45,0),COLORAA3300{XG51};
STICKLINE(CROSS(VAR9,VAR10) AND J>65,H,OPEN,1.75,0),COLORAA5500{XG51};
STICKLINE(CROSS(VAR9,VAR10) AND J>65,H,OPEN,1.05,0),COLORAA7700{XG51};
STICKLINE(CROSS(VAR9,VAR10) AND J>65,H,OPEN,0.35,0),COLORAA9900{XG51};
STICKLINE(VAR4 AND VAR5,L,OPEN,3.15,0),COLOR1111FF{XG51};
STICKLINE(VAR4 AND VAR5,L,OPEN,2.45,0),COLOR3333FF{XG51};
STICKLINE(VAR4 AND VAR5,L,OPEN,1.75,0),COLOR5555FF{XG51};
STICKLINE(VAR4 AND VAR5,L,OPEN,1.05,0),COLOR7777FF{XG51};
STICKLINE(VAR4 AND VAR5,L,OPEN,0.35,0),COLOR9999FF{XG51};
STICKLINE(CROSS(散,庄) AND 散<30,L,OPEN,3.15,0),COLOR770077{XG51};
STICKLINE(CROSS(散,庄) AND 散<30,L,OPEN,2.45,0),COLOR990099{XG51};
STICKLINE(CROSS(散,庄) AND 散<30,L,OPEN,1.75,0),COLORBB00BB{XG51};
STICKLINE(CROSS(散,庄) AND 散<30,L,OPEN,1.05,0),COLORDD00DD{XG51};
STICKLINE(CROSS(散,庄) AND 散<30,L,OPEN,0.35,0),COLORFF00FF{XG51};
STICKLINE(CROSS(0.9,1/vol*1000>0.01 AND "kdj.J"<0),L,OPEN,3.15,0),COLOR337777{XG51};
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "kdJ.J"<0),L,OPEN,2.45,0),COLOR339999{XG51};
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,1.75,0),COLOR33BBBB{XG51};
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,1.05,0),COLOR33DDDD{XG51};
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,0.35,0),COLOR33FFFF{XG51};
STICKLINE((AA+0)/34=FLOOR((AA+0)/34),L,OPEN,3.15,-1),COLORLIMAGENTA{XG51};
AAA:=COST(50){XG51};
STICKLINE(CROSS(C,AAA),O,C,3,0 ),COLORFF0080{XG51};
V1:=dma((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9){XG51};
HY1:=REF(EMA(V1,3),1){XG51};
超短线:MA(CLOSE,1),COLORBLACK{XG51};
主力线:HY1,COLORLIRED,LINETHICK2{XG51};
中支线:MA(CLOSE,60),COLORYELLOW,LINETHICK3{XG51};
V2:=(1-7/100)*(DMA(CLOSE,V1)){XG51};
决策:REFDATE(V2,DATE),,LINETHICK2,COLORBLACK{XG51};
DRAWTEXT(ISLASTBAR,决策,'决策线'),COLORRED{XG51};
DRAWTEXT_FIX(1,0.88,5,0,'~★~云在云端作品~★~'),COLORLIMAGENTA{XG51};
LC1:=REF(CLOSE,1){XG51};
rsi1:=((SMA(MAX((CLOSE - LC1),0),3,1) / SMA(ABS((CLOSE - LC1)),3,1)) * 100){XG51};
FF11:=EMA(CLOSE,3){XG51};
MA15:=EMA(CLOSE,21){XG51};
M:=MA(CLOSE,5),COLORWHITE{XG51};
M1:=MA(CLOSE,10),COLORBLUE;
爆点:=CROSS(M,M1){XG51};
DRAWTEXT(爆点,M*0.96,'*爆②'),COLORBLUE{XG51};
DRAWTEXT(CROSS(CLOSE,HY1),LOW,'*爆①'),COLORWHITE{XG51};
DRAWTEXT(CROSS(88,RSI1),(HIGH * 1.03),'*警'),COLORCYAN{XG51};
STICKLINE(ISLASTBAR,HHV(C,5),HHV(C,5),50,1)COLORRED{XG51};
STICKLINE(ISLASTBAR,HHV(C,5)*0.95,HHV(C,5)*0.95,50,1)COLORBLUE{X_G~5-1_C_N_{};