通达信测幅主图未加密选股指标公式源码

源码正文：

KG1:=20{XG51};
F1:=10{XG51};
A1:=10{XG51};
A2:=10{XG51};
A3:=zig(1,A1){XG51};
A4:=PEAK(1,A1,1);
A5:=TROUGH(1,A1,1){XG51};
CC:=IF((A3 < (REF(A3,1))),A4,A5),LINETHICK2{XG51};
A6:=crOSS((A4 - 0.02),A3){XG51};
A7:=CROSS(A3,(A5 + 0.02)){XG51};
A8:=A2 / 100{XG51};
A9:=IF((A3 < (REF(A3,1))),A8,REVERSE(A8)){XG51};
A10:=IF((A3 < (REF(A3,1))),A6,A7){XG51};
H1:REF((CC * (1 - (A9 * 1))),BArslAst(A10)),DOTLINE{XG51};
H2:REF((CC * (1 - (A9 * 2))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H3:REF((CC * (1 - (A9 * 3))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H4:REF((CC * (1 - (A9 * 4))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H5:REF((CC * (1 - (A9 * 5))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H6:REF((CC * (1 - (A9 * 6))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H7:REF((CC * (1 - (A9 * 7))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H8:REF((CC * (1 - (A9 * 8))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H9:REF((CC * (1 - (A9 * 9))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H10:REF((CC * (1 - (A9 * 10))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H11:REF((CC * (1 - (A9 * 11))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H12:REF((CC * (1 - (A9 * 12))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H13:REF((CC * (1 - (A9 * 13))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H14:REF((CC * (1 - (A9 * 14))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
H15:REF((CC * (1 - (A9 * 15))),BARSLAST(A10)),DOTLINE,LINETHICK0{XG51};
A11:=BARSLAST((ISLASTBAR = 1)) + 1{XG51};
A12:=HHV(HIGH,100){XG51};
A13:=LLV(LOW,100){XG51};
A14:=IF((PERIOD = 12),1.00005,(IF((PERIOD < 3),1.0005,1.002))){XG51};
STICKLINE(((CC >= A13) AND (CC <= A12)),CC,(CC * A14),10,-1000),COLORWHITE{XG51};
STICKLINE(((CC >= A13) AND (CC <= A12)),H1,H1,5,0),COLORBROWN{XG51};
STICKLINE(((H1 > A13) AND (H1 < A12)),H2,H2,5,0),COLORBROWN{XG51};
STICKLINE(((H2 > A13) AND (H2 < A12)),H3,H3,5,0),COLORBROWN{XG51};
STICKLINE(((H3 > A13) AND (H3 < A12)),H4,H4,5,0),COLORBROWN{XG51};
STICKLINE(((H4 > A13) AND (H4 < A12)),H5,H5,5,0),COLORBROWN{XG51};
STICKLINE(((H5 > A13) AND (H5 < A12)),H6,H6,5,0),COLORBROWN{XG51};
STICKLINE(((H6 > A13) AND (H6 < A12)),H7,H7,5,0),COLORBROWN{XG51};
STICKLINE(((H7 > A13) AND (H7 < A12)),H8,H8,5,0),COLORBROWN{XG51};
STICKLINE(((H8 > A13) AND (H8 < A12)),H9,H9,5,0),COLORBROWN{XG51};
STICKLINE(((H9 > A13) AND (H9 < A12)),H10,H10,5,0),COLORBROWN{XG51};
STICKLINE(((H10 > A13) AND (H10 < A12)),H11,H11,5,0),COLORBROWN{XG51};
STICKLINE(((H11 > A13) AND (H11 < A12)),H12,H12,5,0),COLORBROWN{XG51};
STICKLINE(((H12 > A13) AND (H12 < A12)),H13,H13,5,0),COLORBROWN{XG51};
STICKLINE(((H13 > A13) AND (H13 < A12)),H14,H14,5,0),COLORBROWN{XG51};
STICKLINE(((H14 > A13) AND (H14 < A12)),H15,H15,5,0),COLORBROWN{XG51};
DRAWTEXT(BARSLAST(A10) ,H1,'10' ),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H2,'20'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H3,'30'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H4,'40'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H5,'50'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H6,'60'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H7,'70'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H8,'80'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H9,'90'),COLORC0C0C0{XG51};
DRAWTEXT(BARSLAST(A10) ,H10,'100'),COLORC0C0C0{X_G.5_1_C_N_{};

源码正文：

stICKLINE(1,0,0,1,0),POINTDOT,LINETHICK3,COLOR0000FF{XG51};
QQ:=(((((ma(CLOSE,1) + MA(CLOSE,3)) + MA(CLOSE,5)) + MA(CLOSE,7)) + MA(CLOSE,9)) / 5){XG51};
WW:=(((((MA(CLOSE,2) + MA(CLOSE,4)) + MA(CLOSE,6)) + MA(CLOSE,8)) + MA(CLOSE,10)) / 5){XG51};
A:=ema(QQ,3){XG51};
B:=EMA(WW,10){XG51};
VAR1:=EMA(AMOUNT,1)/EMA(vol,1)/100{XG51};
AA:=dma(A,VAR1){XG51};
BB:=DMA(B,VAR1){XG51};
VAR29:=MAX((2 * (AA - BB)),0) * 100{XG51};
NHSH_:EMA(VAR29,3),COLORFFFFFF{XG51};
CB:=WINNER(CLOSE)*100{XG51};
CC:=EMA(CB,2){XG51};
追涨热度:MAX((EMA(CC,2) - EMA(CC,5)),0),LINETHICK0,COLOR00FFFF{XG51};
STICKLINE(1,0,0,1,0),POINTDOT,LINETHICK3{XG51};
STICKLINE(1,0,0,1,0),POINTDOT,LINETHICK3{XG51};
敢死隊:IF((((VAR29 > 0) AND (VAR29 > REF(VAR29,1)))),(BArslAST(crOSS(VAR29,0.01)) + 1),0),LINETHICK0{XG51};
主力拉升:IF((((VAR29 > 0) AND (VAR29 > REF(VAR29,1)))),66,0),LINETHICK0,COLORFF00FF{XG51};
主力启动:IF((CROSS(VAR29,0.01)),66,0),LINETHICK0,COLORFF00FF{XG51};
STICKLINE(((VAR29 > 0) AND (VAR29 > REF(VAR29,1))),REF((NHSH_ * 1.035),1),(NHSH_ * 1.035),6,1),COLORFF00FF{XG51};
HHHD:=IF(CROSS(VAR29,0.01),CLOSE,REF(CLOSE,BARSLAST(CROSS(VAR29,0.01)))){XG51};
HHH:=IF(CROSS(VAR29,0.01),(LOW * 0.995),REF((LOW * 0.995),BARSLAST(CROSS(VAR29,0.01)))){XG51};
成本:IF((((VAR29 > 0) AND (VAR29 > REF(VAR29,1)))),HHHD,0),LINETHICK0{XG51};
止赢:IF((((VAR29 > 0) AND (VAR29 > REF(VAR29,1)))),(HHHD * 1.06),0),LINETHICK0,COLOR0000FF{XG51};
止赢１:=IF((((VAR29 > 0) AND (VAR29 > REF(VAR29,1)))),(HHHD * 1.1),0){XG51};
止损:IF((((VAR29 > 0) AND (VAR29 > REF(VAR29,1))) ),HHH,0),LINETHICK0,COLORFFFF00{XG51};
离場:IF(((主力拉升 = 0) ),(BARSLAST(CROSS(主力拉升,0.01)) + 1),0),LINETHICK0,COLOR00FFFF{XG51};
KZ:="kdj.K"(9,3,3){XG51};
DZ:="kdj.D"(9,3,3){XG51};
K:="KDJ.K"(9,3,3){XG51};
KA:="KDJ.D"(9,3,3){XG51};
DA:="KDJ.K"(9,3,3){XG51};
NN:="KDJ.D"(9,3,3){XG51};
NNN:=(BARSLAST((CROSS(KZ,DZ) AND (KZ < 50))) < 13){XG51};
NNNN:=(BARSLAST((CROSS(K,KA) AND (K < 20))) < 13){XG51};
AAK:=(BARSLAST((CROSS(DA,NN) AND (DA < 20))) < 13){XG51};
BBK:=IF((((MA(VOL,5) / 240) >= 5) AND ((CLOSE > (REF(CLOSE,1) * 0.98)) = 1)),88,0){XG51};
VAR1MM:=IF(((((((CLOSE / REF(CLOSE,1)) >= 1) AND (((VOL / CAPITAL) * 100) <= 30)) AND (((VOL / CAPITAL) * 100) >= 1.5)) AND ((HIGH / CLOSE) <= 1.001)) AND (BBK >= 1)),93,0){XG51};
IF((((((VAR1MM > 90) AND NNN) AND NNNN) AND AAK) ),20,0){XG51};
IF(((((VAR1MM > 90) AND NNN) AND NNNN) ),20,0){XG51};
VAR2MM:=EMA(MA(IF((CLOSE > OPEN),((CLOSE - OPEN) * VOL),IF((CLOSE < OPEN),((CLOSE - OPEN) * VOL),0)),5),1){XG51};
VAR3MM:=EMA(MA(IF((CLOSE > REF(CLOSE,1)),((CLOSE - REF(CLOSE,1)) * VOL),IF((CLOSE < REF(CLOSE,1)),((CLOSE - REF(CLOSE,1)) * VOL),0)),5),1){XG51};
VAR4MM:=EMA(MA(IF((OPEN > REF(CLOSE,1)),((OPEN - REF(CLOSE,1)) * VOL),IF((OPEN < REF(CLOSE,1)),((OPEN - REF(CLOSE,1)) * VOL),0)),5),1){XG51};
VAR5MM:=EMA(MA(IF((CLOSE < OPEN),((OPEN - CLOSE) * VOL),IF((CLOSE > OPEN),((OPEN - CLOSE) * VOL),0)),10),1){XG51};
VAR6MM:=EMA(MA(IF((CLOSE < REF(CLOSE,1)),((REF(CLOSE,1) - CLOSE) * VOL),IF((CLOSE > REF(CLOSE,1)),((REF(CLOSE,1) - CLOSE) * VOL),0)),10),1){XG51};
VAR7MM:=EMA(MA(IF((OPEN < REF(CLOSE,1)),((REF(CLOSE,1) - OPEN) * VOL),IF((OPEN > REF(CLOSE,1)),((REF(CLOSE,1) - OPEN) * VOL),0)),10),1){XG51};
VAR8MM:=(CLOSE > OPEN){XG51};
VAR9MM:=(CLOSE > REF(CLOSE,1)){XG51};
VARAMM:=(OPEN > REF(CLOSE,1)){XG51};
VARBMM:=((VAR8MM OR VAR9MM) OR VARAMM){XG51};
VARCMM:=((((VAR2MM + VAR3MM) + VAR4MM) / 3) / 100){XG51};
VARDMM:=((((VAR5MM + VAR6MM) + VAR7MM) / 3) / 100){XG51};
VAR25MM:=EMA((((((((COUNT(VAR9MM,12) / 12) + (COUNT(VAR8MM,12) / 12)) + (COUNT(VARAMM,12) / 12)) / 3) * MA(VARCMM,5)) * 2) * 1.1),2){XG51};
换手:=(((VARDMM < 0) AND (VARCMM > VAR25MM)) AND (((CLOSE + OPEN) / 2) > MA(CLOSE,5))){XG51};
NMB:=((VOL / CAPITAL) * 100){XG51};
IF((((((CROSS(换手,0.1) AND ((VARCMM / 50) >= 0.1)) AND (NMB >= 3)) AND NNN) AND NNNN)),20,0){X~G_5-1~C~N~{};