通达信还不错的箱体主图未加密选股指标公式源码

通达信还不错的箱体主图未加密选股指标公式源码

源码正文：

ma1:MA(CLOSE,20),COLORBLUE,LINETHICK2{XG51};
MA2:IF(MA1>=REF(MA1,1),MA1,DRAWNULL),COLORBLUE,LINETHICK2{XG51};
MA3:IF(REF(MA1,1)>MA1,MA1,DRAWNULL),COLORYELLOW,LINETHICK2{XG51};
选手:=MA(C,2){XG51};
箱顶:MA(REF(HHV(C,30),1),2),LINETHICK2,COLORFFFFE5{XG51};
箱底:MA(REF(LLV(C,30),1),2),LINETHICK2,COLORCYAN{XG51};
T4:=crOSS(选手,箱底) AND 箱顶/箱底>110/100{XG51};
T5:=CROSS(箱顶,选手) AND 箱顶/箱底>110/100{XG51};
VAR1X:=(C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100{XG51};
VAR2X:=SMA(VAR1X,3,1){XG51};
VAR3X:=SMA(VAR2X,3,1){XG51};
VAR4X:=SMA(VAR3X,3,1){XG51};
DRAWTEXT(CROSS(VAR4X,VAR3X) AND VAR4X>75,H*1.03,'减仓'),COLORBLUE{XG51};
空:=ema(C,5){XG51};
均衡:=EMA(空,5),COLORRED{XG51};
中轨:=HHV(MA(H,13),13),COLORWHITE,LINETHICK2{XG51};
趋势:=LLV(MA(H,13),1),COLORBLUE,LINETHICK2{XG51};
VARA:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100;
VARB:=EMA(0.667*REF(VARA,1)+0.333*VARA,5){XG51};
VARC:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(Abs(CLOSE-REF(C,1)),6,1)*100{XG51};
VAR1:=(HIGH+LOW+OPEN+2*CLOSE)/5{XG51};
VAR2:=REF(VAR1,1){XG51};
VAR3:=SMA(MAX(VAR1-VAR2,0),10,1)/SMA(ABS(VAR1-VAR2),10,1)*100{XG51};
VAR4:=FILTER(IF(COUNT(VAR3<20,5)>=1 AND COUNT(VAR1=LLV(VAR1,10),10)>=1 AND CLOSE>=OPEN*1.038 AND vol>MA(VOL,5)*1.2,1,0),5){XG51};
VAR5:=FILTER(均衡>REF(均衡,1)AND 中轨<REF(中轨,1)AND C>REF(C,1),11){XG51};
A2:=(100 * (CLOSE - (MA(CLOSE,30)))) / (MA(CLOSE,30)){XG51};
A3:=100 - ((90 * ((HHV(HIGH,20)) - CLOSE)) / ((HHV(HIGH,20)) - (LLV(LOW,20)))){XG51};
A4:=100 - (MA(((100 * ((HHV(HIGH,6)) - CLOSE)) / ((HHV(HIGH,6)) - (LLV(LOW,6)))),28)){XG51};
A5:=MA(A4,6){XG51};
红持股:=IF((A3 < A5),A5,A3),COLORWHITE{XG51};
DRAWTEXT(红持股 AND VAR5,L*0.95,'追击'),COLOR00FF00{XG51};
DRAWICON(红持股 AND VAR5,L*0.98,26){XG51};
VAR6:=REF(CLOSE,1);
VAR7:=SMA(MAX(CLOSE-VAR6,0),6,1)/SMA(ABS(CLOSE-VAR6),6,1)*100;
DRAWTEXT(CROSS(84,VAR7),H*1.04,'逃顶'),COLORBLUE {XG51};
DRAWICON(CROSS(84,VAR7),H*1.02,9){XG51};
VA3:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100{XG51};
VA4:=SMA(VA3,9,1){XG51};
VA5:=SMA(VA4,9,1){XG51};
VA6:=(CLOSE-SMA(CLOSE,13,1))/SMA(CLOSE,13,1)*(-100){XG51};
VA7:=REF(VA6,1)>13 AND REF(VA6,1)/VA6>1.23 AND CLOSE/REF(CLOSE,1)>1.03{XG51};
感恩庄家:= VA7 AND REF(CLOSE,1)<=COst(5) {XG51};
DRAWTEXT(感恩庄家,L*0.96,'杀底'),COLORFFFFFF {XG51};
买线:=EMA(C,2){XG51};
卖线:=EMA(SLOPE(C,21)*20+C,42);
BU:=CROSS(买线,卖线){XG51};
SEL:=CROSS(卖线,买线){XG51};
STICKLINE(买线>=卖线,LOW,HIGH,0.0,1),COLORWHITE{XG51};
STICKLINE(买线>=卖线,CLOSE,OPEN,2,1),COLORWHITE{XG51};
STICKLINE(买线<卖线,LOW,HIGH,0.0,1),COLORCYAN{XG51};
STICKLINE(买线<卖线,CLOSE,OPEN,2,1),COLORCYAN{XG51};
小股民:=EMA(CLOSE,5),COLORRED{XG51};
操盘:=MA(CLOSE,9),COLORGREEN,LINETHICK2{XG51};
界点:=MA(CLOSE,20),COLORLIMAGENTA{X-G?5^1-C-N-{};

通达信一眼辨牛熊主图未加密选股指标公式源码

源码正文：

N1:=18;N2:=50;N3:=89;N4:=180{XG51};
DRAWBAND(ma(C,18),RGB(185,20,30),MA(C,50),RGB(0,100,100));DRAWKLINE(H,O,L,C){XG51};
警示牌:=1{XG51};
高:=REFDATE(HHV(H,180),DATE)*1.05{XG51};
低:=REFDATE(LLV(L,180),DATE)*0.95{XG51};
A11:=MA(C,18){XG51};
A12:=MA(C,50){XG51};
A13:=MA(C,89){XG51};
A14:=IF((MA(C,180)<=高 AND MA(C,180)>=低) OR C>=MA(C,180),MA(C,180),DRAWNULL){XG51};
牛股:=ISLAstBAR AND A11>A12 AND A12>A13 AND A13>IF(A14=DRAWNULL,0,A14) AND C>A11 OR ISLASTBAR AND A11>A12 AND C>=A11{XG51};
猴股:=ISLASTBAR AND A11>A12 AND C<A11 {XG51};
熊股:=ISLASTBAR AND IF(A14=DRAWNULL,A12<A13 AND C<A13,A13<A14 AND C<A14) OR ISLASTBAR AND A11<A12{XG51};
DRAWGBK(警示牌=1 AND 牛股,0,0,0,'牛股',0){XG51};
DRAWGBK(警示牌=1 AND 猴股,0,0,0,'猴股',0){XG51};
DRAWGBK(警示牌=1 AND 熊股,0,0,0,'熊股',0){XG51};
DRAWKLINE(H,O,L,C){XG51};
MA18:MA(C,N1),COLORRED{XG51};
MA50:MA(C,N2),COLORBLUE{XG51};
MA89:MA(C,N3),COLORFF00FF{XG51};
MA180:MA(C,N4),COLORWHITE{XG51};
超买:=MA(C,10)*IF(CAPITAL=0,1.04,1.1),POINTDOT,COLORCYAN,LINETHICK2{XG51};
DRAWTEXT(crOSS(MA(C,N1),MA(C,N2)),MA(C,N2)*0.99,'↖金叉'),LINETHICK2,COLORFF00FF{XG51};
所属板块:=STRCAT('所属板块: ',STRCAT(STRCAT(STRCAT('　　行业 ',HYBLOCK),STRCAT(' 　地域
',DYBLOCK)),STRCAT(' 概念 ',GNBLOCK))){XG51};
总股本:=STRCAT(STRCAT('　　总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿'){XG51};
流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿'){XG51};
市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿'){XG51};
上市日期:=STRCAT(' 上市日期: ',CON2STR(HHV((BARSCOUNT(C)=0)*(DATE+19000000),0),0)){XG51};
股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(总股本,流通盘),市值),上市日期)){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.005,0,0,所属板块),COLORBLUE,LINETHICK2{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.005,0.118,0,股本市值),COLORCYAN,LINETHICK2{XG51};
DRAWTEXT_FIX(C>0,0.005,0.06,0,'主题投资：'),COLORFF00FF,LINETHICK2{XG51};
DRAWTEXT_FIX(C>0,0.078,0.06,0,EXTERNSTR(0,2)),COLORFF00FF,LINETHICK2{XG51};
{XG51};
ZD:=100*(C-REF(C,1))/REF(C,1){XG51};
涨停:=ZD>=9.90{XG51};
STICKLINE((涨停>0 AND C=H),O, H, 3, 0),LINETHICK3, COLORBLUE{XG51};
大阳线:=ZD>=5.00 AND ZD<9.90{XG51};
STICKLINE((大阳线>0 AND C<=H),O, C, 3, 0),LINETHICK3, COLORFF00FF{XG51};

STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<=MA(C,18)*1.03,H,C,0.05,0), COLOR0000FF{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50))AND C<=MA(C,18)*1.03,C,O,3,0), COLOR0066FF{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50))AND C<=MA(C,18)*1.03,O,L,0.05,0), COLOR0099FF{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<=MA(C,18)*1.03 AND C<O,O,(C-O)/2+O,3,0),COLORFFFF80{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C>O,C,(C-O)/2+O,3,0),COLORWHITE{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C>O,O,(C-O)/2+O,3,0),COLORBLUE{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C>O,C,H,0.5,0),COLORWHITE{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C<O,C,(C-O)/2+O,3,0),COLORWHITE{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C<O,O,(C-O)/2+O,3,0),COLORFFFF80{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C<O,O,H,0.5,0),COLORFFFF80{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C>MA(C,18)*1.03 AND C<O,C,L,0.5,0),COLORWHITE{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C>=O,C,(C-O)/2+O,3,0),COLORBLUE{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C>=O,O,(C-O)/2+O,3,0),COLORWHITE{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C>=O,C,H,0.5,0),COLORBLUE{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C<O,C,(C-O)/2+O,3,0),COLORBLUE{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C<O,O,(C-O)/2+O,3,0),COLORFFFF80{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C<O,O,H,0.5,0),COLORFFFF80{XG51};
STICKLINE(CROSS(MA(C,18),MA(C,50)) AND C<MA(C,18) AND C<O,C,L,0.5,0),COLORBLUE{XG51};
年:=YEAR,NODRAW{XG51};
月:=MONTH,NODRAW{XG51};
星期:=WEEkdAY,NODRAW{XG51};
日1:=DATETODAY(DATE){XG51};
上市日:=REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT){XG51};
自然日:=日1-DATETODAY(上市日)+1{XG51};
ZB:=(自然日-REF(自然日,1))!=星期-REF(星期,1)
OR TOTALBARSCOUNT-CURRBARSCOUNT=0{XG51};
本周第几天:=BArslAST(ZB)+1{XG51};
本月第几天:=BARSLAST(年*100+月!=REF(年*100+月,1))+1{XG51};
MA1:=REF(C,本周第几天){XG51};
MA2:=REF(MA1,本周第几天){XG51};
MA3:=REF(MA2,本周第几天){XG51};
MA4:=REF(MA3,本周第几天){XG51};
五周价:=(C+MA1+MA2+MA3+MA4)/5{XG51};
五周:REFDATE(五周价,DATE),COLOR9E9E21,LINETHICK1{XG51};
CC:=IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL),COLORRED{XG51};
止赢:1.05*CC,COLORBLUE,NODRAW{XG51};
止损:0.97*CC,COLORFF00FF,NODRAW{XG51};
N:=18{XG51};
A1:=REF(H,N)=HHV(H,2*N+1){XG51};
B1:=FILTER(A1,N){XG51};
C1:=BacKSET(B1,N+1){XG51};
D1:=FILTER(C1,N){XG51};
A2:=REF(L,N)=LLV(L,2*N+1){XG51};
B2:=FILTER(A2,N){XG51};
C2:=BACKSET(B2,N+1){XG51};
D2:=FILTER(C2,N){XG51};
E1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1))/2{XG51};
E2:=(H+L)/2{XG51};
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(C)=1{XG51};
L1:=(D2 AND NOT(D1 AND E1<E2)){XG51};
H2:=D1 AND NOT(D2 AND E1>=E2){XG51};
X1:=REF(BARSLAST(H1),1)+1{XG51};
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,10000),X1)){XG51};
G1:=F1>REF(F1,1){XG51};
I1:=BACKSET(G1,2){XG51};
LD:=I1>REF(I1,1){XG51};
L2:=LD OR ISLASTBAR OR BARSCOUNT(C)=1{XG51};
X2:=REF(BARSLAST(L2),1)+1{XG51};
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,H,0),X2)){XG51};
G2:=F2>REF(F2,1){XG51};
I2:=BACKSET(G2,2){XG51};
HD:=I2>REF(I2,1){XG51};
R1:=BACKSET(ISLASTBAR,BARSLAST(HD)+1){XG51};
S1:=R1>REF(R1,1){XG51};
T1:=BACKSET(ISLASTBAR,BARSLAST(LD)+1){XG51};
U1:=T1>REF(T1,1){XG51};
R2:=BACKSET(S1,REF(BARSLAST(HD),1)+2){XG51};
S2:=R2>REF(R2,1){XG51};
T2:=BACKSET(U1,REF(BARSLAST(LD),1)+2){XG51};
U2:=T2>REF(T2,1){XG51};
NOTEXT1:DRAWLINE(S2,H,S1,H,1),LINETHICK2,COLORWHITE{XG51};
NOTEXT2:DRAWLINE(U2,L,U1,L,1),LINETHICK2,COLORCYAN{XG51};
DA:=YEAR AND MONTH AND DAY{XG51};
AAA:=STRCAT(CON2STR(YEAR,0),'年'){XG51};
AAB:=STRCAT(CON2STR(MONTH,0),'月'){XG51};
AA33:=STRCAT(CON2STR(DAY,0),'日'){XG51};
AA4:=STRCAT('【',IF(WEEKDAY=1,'星期一',IF(WEEKDAY=2,'星期二',IF(WEEKDAY=3,'星期三',IF(WEEKDAY=4,'星期四',IF(WEEKDAY=5,'星期五',IF(WEEKDAY=6,'六','日'))))))){XG51};
AA:=STRCAT(STRCAT(STRCAT(AAA,AAB),STRCAT(AA33,AA4)),'】'){XG51};
SA:DRAWTEXT_FIX(DA,0,1,0,AA),COLORCYAN{X!G*5?1!C!N!{};