通达信牛熊彩K主图未加密选股指标公式源码

源码正文：

VAR1:=BacKSET(REF(HIGH,2)=HHV(HIGH,5),3){XG51};
VAR2:=crOSS(VAR1,0.9){XG51};
VAR3:=BACKSET(REF(LOW,2)=LLV(LOW,5),3){XG51};
VAR4:=CROSS(VAR3,0.9){XG51};
压力:= REF(HIGH,BArslAst(VAR2)), POINTDOT,COLOREA91B5{XG51};
STICKLINE(CLOSE,REF(HIGH,BARSLAST(VAR2)),REF(HIGH,BARSLAST(VAR2)),2,1),COLOREA91B5,LINETHICK3{XG51};
支撑:= REF(LOW,BARSLAST(VAR4)), POINTDOT,COLOR00B4FF{XG51};
STICKLINE(CLOSE,REF(LOW,BARSLAST(VAR4)),REF(LOW,BARSLAST(VAR4)),2,1),COLOR00B4FF,LINETHICK3{XG51};
PP:=90{XG51};
D2:=L=LLV(L,PP){XG51};
低T:=BARSLAST(D2){XG51};
低A:=REF(L,低T){XG51};
EE:=BACKSET(ISLASTBAR,BARSLAST(D2)){XG51};
C7:IF(EE AND REF(C,低T-13)>低A ,REF(C,低T-13),DRAWNULL),NODRAW,COLORFFFF00{XG51};
XL:(C-LLV(L,PP))/LLV(L,PP),NODRAW{XG51};
LLV(L,90){XG51};
X:=(C7-低A)*3{XG51};
D:=低A{XG51};
Y:=D+X{XG51};
天:CONST(Y),NODRAW,COLORBLUE{XG51};
强:CONST(Y-(Y-D)*1/4),NODRAW,COLORFFFF00{XG51};
倍:CONST(D+(C7-低A)*2),NODRAW,COLOR00FF00{XG51};
中:CONST(Y-(Y-D)*1/2),NODRAW,COLORRED{XG51};
弱:CONST(Y-(Y-D)*3/4),NODRAW,COLOR0099FF{XG51};
STICKLINE(EE,天,天,12,0),COLORBLUE{XG51};
STICKLINE(EE ,倍,倍,-1,0),COLOR00FF00{XG51};
STICKLINE(EE,强,强,12,0),COLOR00AAFF{XG51};
STICKLINE(EE,中,中,12,0),COLORRED{XG51};
STICKLINE(EE,弱,弱,12,0),COLOR0099FF{XG51};
STICKLINE(EE ,C7,C7,-1,0),COLOR00FF00{XG51};
DRAWLINE(低T=1,低A,C7 AND CROSS(VAR3,0.9),L,1){XG51};
下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100){XG51};
ARSV:=SMA(下档线,3,1){XG51};
AK:=Sma(ARSV,3,1){XG51};
AD:=((3 * ARSV) - (2 * AK)){XG51};
AJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100){XG51};
ARSV24:=SMA(AJ12,3,1){XG51};
AK24:=SMA(ARSV24,3,1){XG51};
AD24:=((3 * ARSV24) - (2 * AK24)){XG51};
撑:=IF(CROSS(AD24,AD),HIGH,REF(HIGH,BARSLAST(CROSS(AD24,AD)))){XG51};
撑压位:=IF(ISLASTBAR ,撑,DRAWNULL){XG51};
底底:=LLV(HIGH,30){XG51};
底:=IF(ISLASTBAR ,底底,DRAWNULL){XG51};
STICKLINE(ISLASTBAR ,撑压位,撑压位,80,1),LINETHICK1,COLORFFFFFF{XG51};
STICKLINE(ISLASTBAR ,底,底,60,1),COLOR00FF00,LINETHICK1{X~G-5_1~C~N~{};

源码正文：

AA1:=xma(Xma(XMA(ema(CLOSE,1),2),2),2){XG51};
AA:=XMA((AA1-REF(AA1,1))/REF(AA1,1),11)*1000,COLOR0000FF,NODRAW{XG51};
BB:=EMA(AA,44){XG51};
CC:=EMA(AA-BB,1),NODRAW{XG51};
AA2:=XMA(XMA(XMA(EMA(WINNER(C)*100,1),2),2),2),NODRAW{XG51};
stICKLINE(AA2>30 AND COST(50)<C AND CC>0,CC,0,4,0),COLOR000099{XG51};
STICKLINE(AA2>30 AND COST(50)<C AND CC>0,CC,0,3,0),COLOR0000CC{XG51};
STICKLINE(AA2>30 AND COST(50)<C AND CC>0,CC,0,2,0),COLOR0000FF{XG51};
STICKLINE(AA2>30 AND COST(50)<C AND CC>0,CC,0,0.5,0),COLORCC66FF{XG51};
STICKLINE(AA2>30 AND COST(50)>C AND CC>0,CC,0,4,0),COLOR990099{XG51};
STICKLINE(AA2>30 AND COST(50)>C AND CC>0,CC,0,3,0),COLORBB00BB{XG51};
STICKLINE(AA2>30 AND COST(50)>C AND CC>0,CC,0,2,0),COLORDD00DD{XG51};
STICKLINE(AA2>30 AND COST(50)>C AND CC>0,CC,0,0.5,0),COLORFF00FF{XG51};
STICKLINE(AA2<30 AND COST(50)>C AND CC>0,CC,0,4,0),COLOR000099{XG51};
STICKLINE(AA2<30 AND COST(50)>C AND CC>0,CC,0,3,0),COLOR0000CC{XG51};
STICKLINE(AA2<30 AND COST(50)>C AND CC>0,CC,0,2,0),COLOR0000BB{XG51};
STICKLINE(AA2<30 AND COST(50)>C AND CC>0,CC,0,1,0),COLOR0000FF{XG51};
STICKLINE(AA2>30 AND COST(50)<C AND CC<0,CC,0,3,0),COLOR009900{XG51};
STICKLINE(AA2<30 AND COST(50)>C AND CC<0,CC,0,3,0),COLOR009900{XG51};
A1:=MA(C,1);A5:=MA(C,5);A6:=MA(C,6){XG51};
DRAWICON(crOSS(1,5),0,1){XG51};
DRAWTEXT(CROSS( CC,0),0,'*买'),COLORBLUE{XG51};
DRAWTEXT(CROSS(0, CC),0,'*卖'),COLORCYAN{X-G?5^1-C-N-{};