同花顺薛斯通道及突破量系统主图选股指标公式源码

同花顺薛斯通道及突破量系统主图选股指标公式源码

源码正文：

N:=5;M:=3{XG51};
AA:=ma((2*CLOSE+HIGH+LOW)/4,5){XG51};
通道1:AA*N/100,LINETHICK2{XG51};
通道2:AA*(200-N)/100,LINETHICK2{XG51};
CC:=Abs((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20){XG51};
DD:=dma(CLOSE,CC){XG51};
通道3:(1+M/100)*DD,LINETHICK2{XG51};
通道4:(1-M/100)*DD,LINETHICK2{XG51};
二分位:(H+L)/2 ,LINETHICK2,colorgreen,POINTDOT{XG51};
VAR1:=MA(CLOSE,3){XG51};
FF:=VAR1>REF(VAR1,1){XG51};
PARTLINE(Var1,FF,RGB(255,0,0),1,RGB(0,255,0)),LINETHICK1{XG51};
RSV:=(CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100{XG51};
K:=SMA(RSV,5,1){XG51};
D:=SMA(K,5,1){XG51};
J:=3*K-2*D{XG51};
X:=REF(J,1)<10 AND H>REF(H,1) AND C>REF(C,1) AND C>REF(O,1) AND L>REF(L,1){XG51};
stICKLINE(X,L ,L,20,0),COLOR008888{XG51};
STICKLINE(X,L ,H,0,0),COLORFF00FF{XG51};
STICKLINE(X,C ,O,5,0),COLORFF00FF{XG51};
bias1:=(C-MA(C,6))/MA(C,6)*100{XG51};
BIAS2:=(C-MA(C,12))/MA(C,12)*100{XG51};
BIAS3:=(C-MA(C,24))/MA(C,24)*100{XG51};
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6{XG51};
乖离:=MA(BIAS,3){XG51};
DRAWTEXT(crOSS(BIAS,乖离)  AND 乖离<-9,C,'---------BIAS底买'),colorgreen{XG51};
DRAWTEXT(CROSS(BIAS,乖离)  AND 乖离>3,C,'---------BIAS顶'),colorblue{XG51};
aa:=CLOSE > REF(CLOSE, 1) AND REF(CLOSE, 1) > REF(CLOSE, 2) AND REF(CLOSE, 1) < REF(CLOSE, 3) AND IF(REF(CLOSE, 3) < REF(CLOSE, 4), 1, IF(REF(CLOSE, 4) < REF(CLOSE, 5),REF(CLOSE, 1) < REF(CLOSE, 4) OR( REF(CLOSE, 2) < REF(CLOSE, 4) AND REF(CLOSE, 3) >= REF(CLOSE, 5) ),IF(REF(CLOSE, 5) < REF(CLOSE, 6), 1,REF(CLOSE, 6) < REF(CLOSE, 7)))){XG51};
bb:=CLOSE < REF(CLOSE, 1) AND REF(CLOSE, 1) < REF(CLOSE, 2) AND REF(CLOSE, 1) > REF(CLOSE, 3) AND IF(REF(CLOSE, 3) > REF(CLOSE, 4), 1, IF(REF(CLOSE, 4) > REF(CLOSE, 5),REF(CLOSE, 1) > REF(CLOSE, 4) OR( REF(CLOSE, 2) > REF(CLOSE, 4) AND REF(CLOSE, 3) <= REF(CLOSE, 5) ),IF(REF(CLOSE, 5) > REF(CLOSE, 6), 1,REF(CLOSE, 6) > REF(CLOSE, 7)))){XG51};
DRAWTEXT(aa AND CLOSE>REF(OPEN,2),LOW,'三平底'),color,COLORFF00FF{XG51};
DRAWTEXT(bb AND CLOSE<REF(CLOSE,2),HIGH,'三平顶'),color00ff00{XG51};
S下:=HHV(MA(HIGH,2),2),colorgreen,LINETHICK0{XG51};
S上:=LLV(MA(HIGH,2),1),colorred,LINETHICK0{XG51};
Sppp:=-(S上-S下)/REF(C,1)*100{XG51};
Sptem1:=(MIN(O,C)-L)/(H-L)*100{XG51};
Sptem2:=(H-MAX(O,C))/(H-L)*100{XG51};
SPTEM3:=(C-O)/(H-L)*100{XG51};
SKJ1:=(SPTEM3>49 AND SPTEM1>0.3*SPTEM2) OR SPTEM3>80{XG51};
SKJ2:=(SPTEM3<=49 AND SPTEM3>20 AND SPTEM1>SPTEM2){XG51};
SKJ3:=(SPTEM3<=20 AND sptem3>-20 AND sptem1>1.2*sptem2){XG51};
SKJ4:=(SPTEM3<-20 AND SPTEM3>-40 AND SPTEM1>2*SPTEM2){XG51};
SKJ:=(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4) AND (Sppp>2 OR REF(Sppp,1)>2 ){XG51};
短买:=IF(SUM(sppp>0,5)=5 AND SUM(skj>0,5)=0,5*(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4),5*skj),colorred{XG51};
DRAWTEXT(短买,L,'↖短买'),colorwhite{XG51};
x1:=(C+L+H)/3{XG51};
bb13:=ATAN(ema(x1,13)-REF(EMA(x1,13),1))*3.1416*10{XG51};
ema8:=EMA(C,8){XG51};
DRAWTEXT(FILTER(bb13>1 AND EMA(x1,13)>REF(EMA(x1,8),1),10),
ema8,'&ang;45'),colorwhite{XG51};
STICKLINE(C>=COST(50)AND C<=COST(58)AND C>O,O,C,5,0),colorred{XG51};
STICKLINE(C>=COST(97)AND C<=COST(100)AND C>O,O,C,5,0),colorwhite{XG51};
DRAWTEXT(C>=COST(97)AND C<=COST(100) AND C>O,C,'-->97%'),colorred{XG51};
DRAWTEXT(C>=COST(50)AND C<=COST(58) AND C>O,C,'--50%'),coloryellow{XG51};
//
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
买入线:=IF(CROSS(K,15),100,0){XG51};
DRAWTEXT(买入线,L,'&larr;kd底'),colorff00ff{XG51};
买出线:=IF(CROSS(K,80),100,0){XG51};
DRAWTEXT(买出线,H,'&larr;KD顶'), colorwhite {XG51};
LC := REF(CLOSE,1){XG51};
rsi1:=SMA(MAX(CLOSE-LC,0),8,1)/SMA(ABS(CLOSE-LC),8,1)*100{XG51};
买入线:=IF(CROSS(RSI1,20),100,0){XG51};
DRAWTEXT(买入线,L,'&larr;RSI底'),  colorred {XG51};
买出线:=IF(CROSS(RSI1,80),100,0){XG51};
DRAWTEXT(买出线,H,'&larr;RSI顶'),colorcyan{XG51};
wr:="W&R"(14){XG51};
DRAWICON(FILTER(CROSS(WR,(0 - 81)),10),L,4);//威廉买点&uarr; &darr{XG51};
DRAWICON(FILTER(CROSS((0 -19),WR),10),H,5);//威廉卖点
DRAWTEXT(FILTER(CROSS(WR,(0 - 81)),21),L,'威廉买'),ALIGN0,colorred;//威廉买点
DRAWTEXT(FILTER(CROSS(0 -19,WR),21),H,'威廉卖'),ALIGN2,colorgreen;//威廉卖点
TYP := (HIGH + LOW + CLOSE)/3{XG51};
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)){XG51};
买入线:=IF(CROSS(CCI,-160),100,0){XG51};
DRAWTEXT(买入线,L,'&larr;CCI底'),COLOR0099FF {XG51};
买出线:=IF(CROSS(CCI,200),100,0){XG51};
DRAWTEXT(买出线,H,'&larr;CCI顶'),coloryellow {XG51};
Var3:=LLV(LOW,5)=LLV(LOW,45) AND CLOSE>=OPEN*1.04{XG51};
Var4:=CLOSE>(REF(HIGH,1)+REF(LOW,1))/2{XG51};
Var5:=Var3 AND Var4{XG51};
DRAWTEXT(Var5,LOW,'★ '),coloryellow , {XG51};
极品底:=IF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,50,0),colorwhite{XG51};
DRAWTEXT(极品底=50,LOW,'★ '){XG51};
DRAWTEXT(V>=REF(V*1.88,1) AND C>O AND C>REF(C,1),O,'&larr;---突量-------------------------------------------------------------------------------------'),coloryellow{XG51};
DRAWTEXT(V>=REF(V*1.88,1) AND C<O AND C<REF(C,1),O,'&larr;---跌量-------------------------------------------------------------------------------------'),colorblue{XG51};
DRAWTEXT(LLV(vol,13)=VOL AND C>=REF(C,1),O,'缩量'),coloryellow{XG51};
AA0:=SUMBARS(VOL,CAPITAL){XG51};
DRAWTEXT(IF(CAPITAL=0,AMOUNT=LLV(AMOUNT,34),VOL<MA(VOL,AA0)/3),L,'地量'),colormagenta{X+G*5~1+C+N+{};