通达信杀庄雷达主图未加密选股指标公式源码

源码正文：

N:=15;UR:=6;LR:=6{XG51};
TC1:=IF(H=HHV(H,8*UR),H,DRAWNULL){XG51};
TC2:=CONst(BArslAST(TC1=H))+1{XG51};
UPPER:=CONST(IF(TC2=1,H,REF(H,TC2-1))){XG51};
BC1:=IF(L=LLV(L,8*LR),L,DRAWNULL){XG51};
BC2:=CONST(BARSLAST(BC1=L))+1{XG51};
LOWER:=CONST(IF(BC2=1,L,REF(L,BC2-1))){XG51};
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER{XG51};
HP:=CURRBARSCOUNT<=TC2 AND H=UPPER{XG51};
STICKLINE(IF(BC2>TC2,HP,LP),LOWER,UPPER,0,0),COLOR628962{XG51};
STICKLINE(IF(BC2>TC2,LP,HP),LOWER,UPPER,0,0),COLOR628962{XG51};
NOD:=(IF(TC2>BC2,TC2,BC2)-IF(TC2>BC2,BC2,TC2)){XG51};
LR1:=FORCAST(C,NOD+1){XG51};
NP:IF(CURRBARSCOUNT<=maX(BC2,TC2),CONST(IF(MIN(TC2,BC2)=1,LR1,REF(LR1,MIN(TC2,BC2)-1))),DRAWNULL),POINTDOT,COLOR93BDA8{XG51};
LR2:=SLOPE(C,NOD+1){XG51};
LR3:=CONST(IF(MIN(TC2,BC2)=1,LR2,REF(LR2,MIN(TC2,BC2)-1))){XG51};
FP:NP-LR3*(NOD),POINTDOT,COLOR93BDA8{XG51};
EQU:(NP+FP)/2,POINTDOT,COLOR93BDA8{XG51};
AD:=Abs(NP-FP);{XG51};
DBL:=BARSLAST(BC1!=DRAWNULL)+1{XG51};
DBH:=BARSLAST(TC1!=DRAWNULL)+1{XG51};
BSP:=IF(BC2>TC2,DBL,DBH)-1{XG51};
LRL:=IF(NP>FP,FP+AD/NOD*BSP,FP-AD/NOD*BSP){XG51};
AT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND H>LRL,H,LRL){XG51};
AT2:=HHV(AT1-LRL,MAX(BC2,TC2)){XG51};
AT3:=CONST(BARSLAST(AT1-LRL=AT2)){XG51};
AT4:=CONST(IF(AT3=0,H,REF(H,AT3))){XG51};
AT5:=CONST(IF(AT3=0,AT1-LRL,REF(AT1-LRL,AT3))){XG51};
ATL:=LRL+AT5{XG51};
UT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND L<LRL,L,LRL){XG51};
UT2:=HHV(LRL-UT1,MAX(BC2,TC2)){XG51};
UT3:=CONST(BARSLAST(LRL-UT1=UT2)){XG51};
UT4:=CONST(IF(UT3=0,H,REF(H,UT3))){XG51};
UT5:=CONST(IF(UT3=0,LRL-UT1,REF(LRL-UT1,UT3))){XG51};
UTL:=LRL-UT5{XG51};
RH:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,ATL,CONST(REF(ATL,MIN(BC2,TC2)-11))){XG51};
RL:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,UTL,CONST(REF(UTL,MIN(BC2,TC2)-11))){XG51};
中轨:IF(NP>FP,IF(LRL<=RH,LRL,DRAWNULL),IF(LRL>=RL,LRL,DRAWNULL)),COLOR628962{XG51};
上轨:IF(NP>FP,IF(ATL<=RH,ATL,DRAWNULL),IF(ATL>=RL,ATL,DRAWNULL)),COLOR628962{XG51};
下轨:IF(NP>FP,IF(UTL<=RH,UTL,DRAWNULL),IF(UTL>=RL,UTL,DRAWNULL)),COLOR628962{XG51};
MA1:=MA(CLOSE,5){XG51};
dif:=ema(CLOSE,12)-EMA(CLOSE,26){XG51};
DEA:=EMA(DIF,9){XG51};
TJ1:=BARSLAST(crOSS(DIF,DEA)){XG51};
TJ2:=REF(H,TJ1){XG51};
IF(TJ1<30,TJ2,DRAWNULL),COLORCYAN,LINETHICK1{XG51};
IF(CROSS(DIF,DEA),H*1.005,DRAWNULL),CIRCLEDOT,COLORBLUE,LINETHICK{XG51};
STICKLINE(CROSS(DIF,DEA),H*1.0005,H*0.9995,7,0),COLORCYAN{XG51};
ADD:=SUMBARS(V ,CAPITAL*1){XG51};
A2:=SUM(COST(20),ADD)/ADD{XG51};
A1:=SUM(COST(10),ADD)/ADD{XG51};
A3D:=SUM(COST(30),ADD)/ADD{XG51};
A4D:=SUM(COST(40),ADD)/ADD{XG51};
A5D:=SUM(COST(50),ADD)/ADD{XG51};
E:=LLV(L,250)=L{XG51};
E1:=BARSLAST(E){XG51};
庄家成本:(5*A1+4*A2+3*A3D+2*A4D+A5D)/15, CIRCLEDOT,COLOR00FFFF{XG51};
OK1:STICKLINE(CROSS(C,庄家成本) AND E1>=40 ,O ,C ,5 ,0 ),COLOR00FFFF;{XG51};
A线:=HHV(H,20){XG51};
B线:=LLV(L,20){XG51};
C线:=(A线+B线)/2{XG51};
做多线:IF(C线,C线,DRAWNULL)COLORFF00FF,LINETHICK2{X*G_5=1*C*N*{};

源码正文：

庄压:=HHV(ma(H,13),13),COLORBLUE{XG51};
赢在龙头:=(L+H+C*4)/6{XG51};
工作:=ema(赢在龙头,12),COLOR00FF00{XG51};
度假:=EMA(赢在龙头,19){XG51};
赢在:=(工作-REF(工作,1))/REF(工作,1)*100{XG51};
龙头:=(度假-REF(度假,1))/REF(度假,1)*100{XG51};
G:=BArslAst(crOSS(赢在,0)){XG51};
雪:REF(赢在龙头,G)*1,COLORAacC66,,LINETHICK2{XG51};
B2:=SMA(SMA(SMA(C,2,1),2,1),2,1){XG51};
SMA2:=MA(B2,3){XG51};
停损下限:=IF(LLV(MA(B2,8),3)<B2,LLV(MA(B2,8),3),B2){XG51};
米:IF(B2>SMA2,B2,DRAWNULL),COLORWHITE,LINETHICK3{XG51};
饼干:HHV(MA(B2,1),13),COLOR00AAFF,LINETHICK1{XG51};
VAR1A:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR2A:=MA(VAR1A,7){XG51};
VAR3A:=VAR2A-MA(VAR1A,7/2)<0{XG51};
VAR4A:=VAR2A-MA(VAR1A,7/2)>0{XG51};
VAR5A:=BARSLAST(VAR3A){XG51};
VAR6A:=0-BARSLAST(VAR4A){XG51};
VAR7A:=IF(VAR3A<=0,VAR5A,VAR6A){XG51};
STICKLINE(饼干>B2 AND B2>SMA2,饼干,B2,0,-1),COLORYELLOW,LINETHICK4{XG51};
STICKLINE(饼干>SMA2 AND B2<SMA2,饼干,SMA2,0,-1),COLORYELLOW,LINETHICK4{XG51};
突破:=REF(EMA(C,14),1)COLORLIMAGENTA,LINETHICK1{XG51};
A1X:=(EMA(C,14)-突破)/突破*100,NODRAW{XG51};
出击:=IF(A1X>=0,REF(EMA(C,14),BARSLAST(CROSS(A1X,0))+1),DRAWNULL)COLORWHITE,LINETHICK1{XG51};
休假:=IF(A1X<0,REF(EMA(C,14),BARSLAST(CROSS(0,A1X))+1),DRAWNULL)COLORCYAN,LINETHICK2{XG51};
STICKLINE(A1X>=0,出击,突破,0,-1)COLORWHITE{XG51};
{XG51};
VAR177:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR277:=LLV(LOW,5){XG51};
VAR377:=HHV(HIGH,5){XG51};
VAR477:=EMA((VAR177-VAR277)/(VAR377-VAR277)*100,5){XG51};
MA177:=MA(VAR477,2){XG51};
XXX:=STICKLINE(FILTER(VAR477>MA177 AND REF(VAR477,1)<30,5),O,C,3,1),COLORRED{XG51};
DRAWICON(FILTER(VAR477>MA177 AND REF(VAR477,1)<30,5),L,9){XG51};
LC20:=REF(CLOSE,1){XG51};
rsi20:=SMA(MAX(CLOSE-LC20,0),4.1,1)/SMA(Abs(CLOSE-LC20),4.1,1)*100,NODRAW{XG51};
DRAWTEXT(CROSS(RSI20,11)*1,
L*0.99,'超跌'),COLORCYAN{XG51};
散户:= EMA(((2*CLOSE+HIGH+LOW)/4-LLV(LOW,5))/(HHV(HIGH,4)-LLV(LOW,5))*100,4){XG51};
庄家:= EMA(0.667*REF(散户,1)+0.333*散户,2){XG51};
DRAWTEXT(CROSS("kdj.J"(27,3,3),0.0001),L*0.989, ' 可以买'),COLOR00FFEE{XG51};
F33:=100*(C-REF(C,1))/REF(C,1){XG51};
今小昨:=IF(C<REF(O,1) AND F33<0,1,0){XG51};
P133:=今小昨{XG51};
今小前:=IF(C<REF(O,2) AND F33<0,1,0){XG51};
P233:=今小前{XG51};
STICKLINE(P133=0 AND REF(P133,1)=1 AND P233=0 AND REF(P233,1)=1,O,C,2.5,00),COLORBLUE{XG51};
AA:=REF(CLOSE,1){XG51};
BBB:=SMA(MAX(CLOSE-AA,0),5,1)/SMA(ABS(CLOSE-AA),5,1)*1000{XG51};
HHH:=BBB-LLV(BBB,10){XG51};
SS:=(MA(HHH,2)*3+HHH*13)/16{XG51};
短线买点:=IF(SS>13,MA(SS,2),SS){XG51};
STICKLINE(CROSS(短线买点,21),(MAX(C,O)+MIN(O,C)*3)/4,
(MAX(C,O)*3+MIN(O,C)*1)/4,3,0),COLORLIMAGENTA{X^G*5=1^C^N^{};