通达信突破重云主图未加密选股指标公式源码

源码正文：

DA1:=IF(130>TOTALBARSCOUNT,TOTALBARSCOUNT,130){XG51};
DA:=IF(CURRBARSCOUNT>DA1,0,DA1){XG51};
HI:=REFDATE(HHV(H,DA),DATE){XG51};
LO:=REFDATE(LLV(L,DA),DATE){XG51};
C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL){XG51};
GZ:=EXP(LN(HI/LO)/10);
LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA){XG51};
LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA){XG51};
LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA){XG51};
LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA){XG51};
LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA){XG51};
LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA){XG51};
LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA){XG51};
LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA){XG51};
LH9:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA){XG51};
LH10:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA){XG51};
L01:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0{XG51};
L02:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0{XG51};
L03:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0{XG51};
L04:=REFDATE(HHV(LH4,DA),DATE){XG51};
L05:=REFDATE(HHV(LH5,DA),DATE){XG51};
L06:=REFDATE(HHV(LH6,DA),DATE){XG51};
L07:=REFDATE(HHV(LH7,DA),DATE){XG51};
L08:=REFDATE(HHV(LH8,DA),DATE){XG51};
L09:=REFDATE(HHV(LH9,DA),DATE){XG51};
L10:=REFDATE(HHV(LH10,DA),DATE){XG51};
SS:=(L01+L02+L03+L04+L05+L06+L07+L08+L09+L10){XG51};
stICKLINE(CEILING(DA*L01/SS)*3>=CURRBARSCOUNT,HI*99/100,HI/GZ,9,0)COLOR2F2F2D,LINETHICK3{XG51};
STICKLINE(CEILING(DA*L02/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,1)*99/100,HI/POW(GZ,2),9,0)COLOR2F2F2D,LINETHICK3{XG51};
STICKLINE(CEILING(DA*L03/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*99/100,HI/POW(GZ,3),9,0)COLOR2F2F2D,LINETHICK3{XG51};
STICKLINE(CEILING(DA*L04/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,3)*99/100,HI/POW(GZ,4),9,0)COLOR2F2F2D,LINETHICK3{XG51};
STICKLINE(CEILING(DA*L05/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*99/100,HI/POW(GZ,5),9,0)COLOR2F2F2D,LINETHICK3{XG51};
STICKLINE(CEILING(DA*L06/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,5)*99/100,HI/POW(GZ,6),9,0)COLOR2F2F2D,LINETHICK3{XG51};
STICKLINE(CEILING(DA*L07/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*99/100,HI/POW(GZ,7),9,0)COLOR2F2F2D,LINETHICK3{XG51};
STICKLINE(CEILING(DA*L08/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,2),LO*POW(GZ,3)*99/100,9,0)COLOR2F2F2D,LINETHICK3{XG51};
STICKLINE(CEILING(DA*L09/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*99/100,9,0)COLOR2F2F2D,LINETHICK3{XG51};
STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,LO,LO*POW(GZ,1)*99/100,9,0)COLOR2F2F2D,LINETHICK3{XG51};

W00:=COST(1){XG51};
W10:=COST(10){XG51};
W20:=COST(20){XG51};
W30:=COST(30){XG51};
W40:=COST(40){XG51};
W50:=COST(50){XG51};
W60:=COST(60){XG51};
W70:=COST(70){XG51};
W80:=COST(80){XG51};
W90:=COST(90){XG51};
W100:=COST(99){XG51};
W5:=COST(5){XG51};
W15:=COST(15){XG51};
W25:=COST(25){XG51};
W35:=COST(35){XG51};
W45:=COST(45){XG51};
W55:=COST(55){XG51};
W65:=COST(65){XG51};
W75:=COST(75){XG51};
W85:=COST(85){XG51};
W95:=COST(95){XG51};
C5:=W5-W00{XG51};
C10:=W10-W5{XG51};
C15:=W15-W10{XG51};
C20:=W20-W15{XG51};
C25:=W25-W20{XG51};
C30:=W30-W25{XG51};
C35:=W35-W30{XG51};
C40:=W40-W35{XG51};
C45:=W45-W40{XG51};
C50:=W50-W45{XG51};
C55:=W55-W50{XG51};
C60:=W60-W55{XG51};
C65:=W65-W60{XG51};
C70:=W70-W65{XG51};
C75:=W75-W70{XG51};
C80:=W80-W75{XG51};
C85:=W85-W80{XG51};
C90:=W90-W85{XG51};
C95:=W95-W90{XG51};
C100:=W100-W95{XG51};
ZX:=MIN(C5,MIN(C10,MIN(C15,MIN(C20,MIN(C25,MIN(C30,MIN(C35,MIN(C40,MIN(C45,MIN(C50,MIN(C55,MIN(C60,MIN(C65,MIN(C70,MIN(C75,MIN(C80,MIN(C85,MIN(C90,MIN(C95,C100))))))))))))))))))){XG51};
STICKLINE(ZX=C5,W00,W5,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C10,W10,W5,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C15,W15,W10,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C20,W20,W15,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C25,W25,W20,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C30,W30,W25,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C35,W35,W30,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C40,W40,W35,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C45,W45,W40,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C50,W50,W45,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C55,W55,W50,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C60,W60,W55,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C65,W65,W60,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C70,W70,W65,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C75,W75,W70,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C80,W80,W75,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C85,W85,W70,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C90,W90,W85,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C95,W95,W90,5,0),COLORFF8800{XG51};
STICKLINE(ZX=C100,W100,W95,5,0),COLORFF8800{XG51};
筹宽:=W100-W00{XG51};
J90:=W90-W60{XG51};
J80:=W80-W50{XG51};
J70:=W70-W40{XG51};
J60:=W60-W30{XG51};
J50:=W50-W20{XG51};
J40:=W40-W10{XG51};
J30:=W30-W00{XG51};
STICKLINE(J90/筹宽<0.08,W90,W60,5,0),COLOR74D9A4{XG51};
STICKLINE(J80/筹宽<0.08,W80,W50,5,0),COLOR74D9A4{XG51};
STICKLINE(J70/筹宽<0.08,W70,W40,5,0),COLOR74D9A4{XG51};
STICKLINE(J60/筹宽<0.08,W60,W30,5,0),COLOR74D9A4{XG51};
STICKLINE(J50/筹宽<0.08,W50,W20,5,0),COLOR74D9A4{XG51};
STICKLINE(J40/筹宽<0.08,W40,W10,5,0),COLOR74D9A4{XG51};
JJ90:=W90-W70{XG51};
JJ80:=W80-W60{XG51};
JJ70:=W70-W50{XG51};
JJ60:=W60-W40{XG51};
JJ50:=W50-W30{XG51};
JJ40:=W40-W20{XG51};
JJ30:=W30-W10{XG51};
STICKLINE(JJ90/筹宽<0.05,W90,W70,5,0),COLOR66FFFF{XG51};
STICKLINE(JJ80/筹宽<0.05,W80,W60,5,0),COLOR66FFFF{XG51};
STICKLINE(JJ70/筹宽<0.05,W70,W50,5,0),COLOR66FFFF{XG51};
STICKLINE(JJ60/筹宽<0.05,W60,W40,5,0),COLOR66FFFF{XG51};
STICKLINE(JJ50/筹宽<0.05,W50,W30,5,0),COLOR66FFFF{XG51};
STICKLINE(JJ40/筹宽<0.05,W40,W20,5,0),COLOR66FFFF{XG51};
STICKLINE(JJ30/筹宽<0.05,W30,W10,5,0),COLOR66FFFF{XG51};
TYX3:=ma(REF(HHV((C+L+O+H)/4,30),1),3){XG51};
TYX4:=MA((C+L+O+H)/4,13){XG51};
TYX5:=ema((C+L+O+H)/4,21){XG51};
STICKLINE(C<TYX5 AND C>O,H,L,0,0),COLOR0022FF{XG51};
STICKLINE(C<TYX5 AND C>O,C,O,3,0),COLOR0022FF{XG51};
STICKLINE(C<TYX5 AND C>O,C,O,2,0),COLOR0055FF{XG51};
STICKLINE(C<TYX5 AND C>O,C,O,1,0),COLOR0088FF{XG51};
STICKLINE(C<TYX5 AND C<O,H,L,0,0),COLOR007700{XG51};
STICKLINE(C<TYX5 AND C<O,C,O,3,0),COLOR005500{XG51};
STICKLINE(C<TYX5 AND C<O,C,O,2,0),COLOR006600{XG51};
STICKLINE(C<TYX5 AND C<O,C,O,1,0),COLOR007700{XG51};
STICKLINE(C>TYX5 AND C<O,H,L,0,0),COLORFFDD44{XG51};
STICKLINE(C>TYX5 AND C<O,C,O,3,0 ),COLORFF7700{XG51};
STICKLINE(C>TYX5 AND C<O,C,O,2,0 ),COLORFFAA22{XG51};
STICKLINE(C>TYX5 AND C<O,C,O,1 ,0 ),COLORFFDD44{XG51};
STICKLINE(C>TYX5 AND C>O,H,L,0,0 ),COLOR00EEFF{XG51};
STICKLINE(C>TYX5 AND C>O,C,O,3,0 ),COLOR00AAFF{XG51};
STICKLINE(C>TYX5 AND C>O,C,O,2,0 ),COLOR00CCFF{XG51};
STICKLINE(C>TYX5 AND C>O,C,O,1,0 ),COLOR00EEFF{XG51};
STICKLINE(C>TYX4 AND C>O,H,L,0,0),COLORFF66AA{XG51};
STICKLINE(C>TYX4 AND C>O,C,O,3,0 ),COLORFF11FF{XG51};
STICKLINE(C>TYX4 AND C>O,C,O,2,0 ),COLORFF44FF{XG51};
STICKLINE(C>TYX4 AND C>O,C,O,1,0 ),COLORFF66FF{XG51};
STICKLINE(C>TYX4 AND C<O,H,L,0,0),COLOREEEEEE{XG51};
STICKLINE(C>TYX4 AND C<O,C,O,3,0),COLOR9F9F9F{XG51};
STICKLINE(C>TYX4 AND C<O,C,O,2,0),COLORCCCCCC{XG51};
STICKLINE(C>TYX4 AND C<O,C,O,1,0),COLOREEEEEE{XG51};
STICKLINE(C>TYX3 AND C>O,H,L,0,0),COLOR0000DD{XG51};
STICKLINE(C>TYX3 AND C>O,C,O,3,0),COLOR000099{XG51};
STICKLINE(C>TYX3 AND C>O,C,O,2,0),COLOR0000BB{XG51};
STICKLINE(C>TYX3 AND C>O,C,O,1,0),COLOR0000DD{XG51};
STICKLINE((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,1,0),COLORBLUE{XG51};
STICKLINE((REF(C,1)-C)*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,1,0),COLORRED{XG51};
STICKLINE(REF(COUNT(C<TYX3,5)=5,1) AND C>TYX3 AND C>O,C,O,1,0),COLOR00CCFF{XG51};
N:=3{XG51};
L0:=0.00{XG51};
L1:=Abs(L-REF(L,1))<=L0{XG51};
L2:=ABS(L-REF(L,2))<=L0{XG51};
L3:=ABS(L-REF(L,3))<=L0{XG51};
L4:=ABS(L-REF(L,4))<=L0{XG51};
L5:=ABS(L-REF(L,5))<=L0{XG51};
精准线首次:=L1 OR L2 OR L3 OR L4 OR L5{XG51};
精准左:=FILTER(精准线首次,N) {XG51};
天数:=BArslAST(精准左){XG51};
LTS:=REF(L,天数){XG51};
精准右:=ABS(L-LTS)<=L0{XG51};
STICKLINE(精准左,L,L,50,-1),COLOR8080FF{XG51};
G1:=ABS(H-REF(H,1))<=L0{XG51};
G2:=ABS(H-REF(H,2))<=L0{XG51};
G3:=ABS(H-REF(H,3))<=L0{XG51};
G4:=ABS(H-REF(H,4))<=L0{XG51};
G5:=ABS(H-REF(H,5))<=L0{XG51};
G6:=ABS(H-REF(H,6))<=L0{XG51};
G7:=ABS(H-REF(H,7))<=L0{XG51};
G8:=ABS(H-REF(H,8))<=L0{XG51};
精准线1首次:=G1 OR G2 OR G3 OR G4 OR G5 OR G6 OR G7 OR G8{XG51};
精准左1:=FILTER(精准线1首次,N) {XG51};
天数1:=BARSLAST(精准左1){XG51};
GTS:=REF(L,天数1){XG51};
精准右1:=ABS(H-LTS)<=L0{XG51};
STICKLINE(精准左1,H,H,50,-1),COLOR00FF00;
PZ:=CAPITAL/1000000{XG51};
TJ2:=(V/REF(V,1)>=1.55 AND (C>REF(C,1) OR C>=O)) AND (2.2>=V/REF(V,1) AND (C>REF(C,1) OR C>=O)) {XG51};
TJ3:=RANGE(C/REF(C,1),0.999,1.04){XG51};
JD:=ATAN((MA(C,13)/REF(MA(C,13),1)-1)*100)*57.3{XG51};
XG:=PZ<6 AND TJ2 AND TJ3 AND JD>8{XG51};
DRAWTEXT(XG,O,'小倍阳'),COLORBLUE{XG51};
COHL:=(C+O+H+L)/4{XG51};
成交均价:=AMOUNT/vol/100{XG51};
TEST:=BETWEEN(成交均价,L,H){XG51};
CC0:=IF(TEST,成交均价,COHL),COLORRED{XG51};
CC:=FORCAST(CC0,5),COLORRED{XG51};
EMA34:=EMA(CC,34),COLORFFCC66;
EMA21:=EMA(CC,21),COLORCYAN{XG51};
EMA13:=EMA(CC,13),COLORGRAY{XG51};
EMA5:=EMA(EMA(CC,5),2),COLORBLUE{XG51};
TJ:= ABS(EMA13-EMA5)<EMA5*0.01 AND ABS(EMA13-EMA21)<EMA21*0.01 AND ABS(EMA34-EMA21)<EMA21*0.01 AND EMA5>REF(EMA5,1) AND EMA13>REF(EMA13,1) AND EMA21>REF(EMA21,1) AND EMA34>REF(EMA34,1){XG51};
启动点:=FILTER(TJ,5){XG51};
DRAWTEXT(启动点,L*0.95,'启动'),COLORLIMAGENTA{XG51};
AA1:=REF(CLOSE,2)<REF(OPEN,2){XG51};
AA21:=REF(CLOSE,1)<REF(OPEN,1){XG51};
AA22:=REF(CLOSE,1)>REF(OPEN,1){XG51};
AA2:=AA21 OR AA22{XG51};
AA3:=REF(VOL,1)<REF(VOL,2){XG51};
AA4:=VOL>REF(VOL,2){XG51};
AA:=AA1 AND AA2 AND AA3 AND AA4{XG51};
BB1:=VOL/REF(VOL,1)>1.8{XG51};
BB2:=VOL/REF(VOL,1)<2.5{XG51};
BB:=BB1 AND BB2{XG51};
CC1:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.02{XG51};
小倍阳:=AA AND BB AND CC1{XG51};
DRAWTEXT(小倍阳,L*0.95,'小倍阳'),COLORFF00FF{XG51};
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6{XG51};
取舍线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)
+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)
+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,LINETHICK2,COLORWHITE{XG51};
生命线:MA(取舍线,6),LINETHICK2,COLOR00BB00{XG51};
五日线:MA(CLOSE,5),POINTDOT,COLORLIGREEN{XG51};
水平面:MA(CLOSE,60),CIRCLEDOT,COLORMAGENTA{XG51};
MA1:=MA(CLOSE,5){XG51};
MA2:=MA(CLOSE,10){XG51};
MA3:=MA(CLOSE,30){XG51};
MA4:=MA(CLOSE,60){XG51};
WYA001:=(2*CLOSE+HIGH+LOW)/4{XG51};
WYA002:=EMA(WYA001,4){XG51};
WYA003:=EMA(WYA002,4){XG51};
WYA004:=EMA(WYA003,4){XG51};
WYA柱:=(WYA004-REF(WYA004,1))/REF(WYA004,1)*100{XG51};
WYA线1:=MA(WYA柱,2){XG51};
WYA线2:=MA(WYA柱,1){XG51};
WY分时1线:=MA(CLOSE,1){XG51};
WY分时21线:=MA(CLOSE,21){XG51};
DRAWICON(WYA线1>0.25 AND WYA线2>0.25 AND crOSS(WYA线1,WYA线2),HIGH*1.02,2){XG51};
DRAWICON(WYA线1<0 AND WYA线2<0 AND CROSS(WYA线1,WYA线2),HIGH*1.02,2){XG51};
DRAWICON( CROSS(WY分时21线,WY分时1线),HIGH*1.02,2){XG51};
DRAWICON(WYA线1<-0.25 AND WYA线2<-0.25 AND CROSS(WYA线2,WYA线1),LOW*0.98,1){XG51};
DRAWICON(WYA线1>0 AND WYA线2>0 AND CROSS(WYA线2,WYA线1),LOW*0.98,1),COLORBLUE{XG51};
DRAWICON(CROSS(WY分时1线,WY分时21线),LOW*0.98,1),COLORBLUE{X!G.5!1!C!N!{};

源码正文：

wr1:=100*(HHV(HIGH,5)-CLOSE)/(HHV(HIGH,5)-LLV(LOW,5)){XG51};
WR2:=100*(HHV(HIGH,8)-CLOSE)/(HHV(HIGH,8)-LLV(LOW,8)){XG51};
WR3:=100*(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13)){XG51};
WR4:=100*(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21)){XG51};
WR5:=100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)){XG51};
WR:=(WR1+(WR2*0.618)+(WR3*0.382)+(WR4*0.236)+(WR5*0.146))/2.382{XG51};
威廉:=ma(WR,3){XG51};
KK:=SMA(威廉,3,1){XG51};
HH:=MA((威廉-KK),5){XG51};
DD:威廉-KK,LINETHICK0,COLOR00FFFF{XG51};
stICKLINE((威廉<KK),威廉-KK,0,2,0),COLOR0000FF{XG51};
STICKLINE((威廉>KK),威廉-KK,0,2,0),COLOR00FFFF{X_G*5_1_C_N_{};