通达信赛老巴主图未加密选股指标公式源码

源码正文：

N:=120{XG51};
K:=BArslAst(CURRBARSCOUNT=N);
GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0));
DD:=CONST(IF(ISLASTBAR=1,LLV(L,K),0));
KJ:=GD-DD;
GD4:=IF(CURRBARSCOUNT<=N/2,GD,DRAWNULL);
DRAWBAND(GD4,RGB(0,0,250),DD+KJ/2,RGB(0,0,0));
平衡:IF(CURRBARSCOUNT<=N,DD+KJ/2,DRAWNULL),COLOR00FFFF,NODRAW;
压力:IF(CURRBARSCOUNT<=N,GD-KJ*0.191,DRAWNULL),COLORFF00FF,NODRAW;
支撑:IF(CURRBARSCOUNT<=N,DD+KJ*0.191,DRAWNULL),COLOR00FF00,NODRAW;
低吸:IF(CURRBARSCOUNT<=N/2 AND crOSS(平衡,LOW),1,DRAWNULL),COLORFF8899,NODRAW;
低涨:IF(CURRBARSCOUNT<=N,(C/LLV(LOW,K)-1)*100,DRAWNULL),COLOR0000FF,NODRAW;
天:BARSLAST(L=DD),COLOR00FFFF,NODRAW;
ma5:MA(CLOSE,5),COLORFFFFFF;
MA10:MA(CLOSE,10),COLOR00FFFF;
MA20:MA(C,20),COLORFF00FF;
高:IF(CURRBARSCOUNT<=N,GD,DRAWNULL),COLOR00FFFF,POINTDOT;
低:IF(CURRBARSCOUNT<=N,DD,DRAWNULL),COLOR00FF00,POINTDOT;

STICKLINE(CURRBARSCOUNT=N,GD,DD,0,-1),COLORCYAN;
STICKLINE(CURRBARSCOUNT=N/2,GD,DD,0,-1),COLORCYAN;
STICKLINE(CURRBARSCOUNT=1,GD,DD,0,-1),COLORCYAN;
STICKLINE(CURRBARSCOUNT<=N,平衡,平衡,3,-1),COLORRED;
STICKLINE(CURRBARSCOUNT<=N/2,压力,压力,3,-1),COLORWHITE;
STICKLINE(CURRBARSCOUNT<=N/2,支撑,支撑,3,-1),COLORCYAN;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
DRAWICON(低吸,LOW,13);

DRAWTEXT(CURRBARSCOUNT=1,压力,'0.809'),COLOR0000FF;
DRAWTEXT(CURRBARSCOUNT=1,平衡,'0.500'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=1,支撑,'0.191'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=N/2+9,GD-KJ/12,'★强势区域--急拉减仓!'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=N/2+9,GD-KJ/3,'●震荡整理--寻机低吸!'),COLOR00FF00;
DRAWTEXT(CURRBARSCOUNT=N/2+9,DD+KJ/3,'◆反弹中轨--逢高休息!'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/2+9,DD+KJ/10,'■弱势区域--暂不参与!'),COLORFFFF00;
DRAWTEXT(CURRBARSCOUNT=N,GD-KJ/12,'■目前k线天数：请看参数!'),COLOR0000FF;
DRAWTEXT(CURRBARSCOUNT=N,压力,'■建议查阅K线:短线30天,中长线120天!'),COLORFF8899{X~G?5_1~C~N~{};

源码正文：

SHORT:=12;LONG:=26;MID:=9{XG51};
M1:=3;M2:=3;KG:=1{XG51};
DFC:=C-REF(C,1){XG51};
WJXS:=(LONG-SHORT)/2{XG51};
JGL_JF:WJXS*ema(DFC,SHORT)COLORBLUE{XG51};
dif_JIP:=Ema(JGL_JF,LONG),COLOR1188FF{XG51};
DEA_GEM:=EMA(DIF_JIP,MID),COLORCYAN{XG51};
macd_LING:2*(DIF_JIP-DEA_GEM),COLOR1133FF,COLORstICK{XG51};
K_DF_J:=SMA(JGL_JF,M1,1)DOTLINE,COLORFEDCBA;0{XG51};
D_DF_G:=SMA(K_DF_J,M2,1)DOTLINE,COLOR13F8F9{XG51};
J_DF_L:=2.5*K_DF_J-1.5*D_DF_G,COLORF813F9{XG51};
RF:=REF(J_DF_L,1){XG51};
DJ:=Abs(J_DF_L-RF){XG51};
MM:=(HHV(DJ,120)+LLV(DJ,120))/2{XG51};
STICKLINE(J_DF_L>RF,J_DF_L,RF,2.3,0),COLOR1388D3{XG51};
STICKLINE(J_DF_L>RF,J_DF_L,RF,1.0,0),COLOR13AAD3{XG51};
STICKLINE(J_DF_L<RF,J_DF_L,RF,2.3,0),COLOR338833{XG51};
STICKLINE(J_DF_L<RF,J_DF_L,RF,1.0,0),COLOR33AA33{XG51};
N:=SQRT(SHORT*LONG){XG51};
NN:=IF(N<9,9,N){XG51};
BZC:=STD(DFC,NN){XG51};
U:IF(KG=1,K_DF_J+2*BZC,MA(C,25600)),COLORFE9813,crOSSDOT,LINETHICK2{XG51};
D:IF(KG=1,K_DF_J-2*BZC,MA(C,25600)),COLORFE9813,CROSSDOT,LINETHICK2{X-G~5_1-C-N-{};