通达信中长线黑马未加密选股指标公式源码

通达信中长线黑马未加密选股指标公式源码

源码正文：

N:=0{XG51};
M:=60{XG51};
TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,1))))){XG51};
MTIME:=MOD(FROMOPEN,TOTAL){XG51};
CTIME:=IF(MTIME<0.5,TOTAL,MTIME){XG51};
Vvol:=IF(CURRBARSCOUNT=1,V*TOTAL/CTIME,V){XG51};
VAR1:=VVOL/CAPITAL*100;
VAR2:=HHV(VAR1,0);
VAR3:=VAR1/VAR2*100;
VAR4:=(H-L)/L*100;
VAR5:=BArslAst(VAR3>N);
VAR6:=REF(HIGH,VAR5){XG51};
VAR7:=COUNT(CLOSE<VAR6,VAR5){XG51};
平均成本:=IF(VAR5=0,CLOSE,SUM(CLOSE*VVOL,VAR5)/SUM(VVOL,VAR5)){XG51};
进出:=(CLOSE-平均成本)/平均成本*IF((CLOSE-平均成本)/平均成本<1,1000,10){XG51};
主力入场:=DRAWICON(进出=0,LOW,1){XG51};
买入:=STICKLINE(crOSS(CLOSE,VAR6) AND VAR3<M AND VAR7>VAR5*9/10,0,70,1,1){XG51};
MDAY:=BARSLAST(VAR3>60 AND VAR3<=70){XG51};
HIGHM:=REF(HIGH,MDAY){XG51};
COUNTM:=COUNT(CLOSE<HIGHM,MDAY){XG51};
MEDIUMCOST:=IF(MDAY=0,CLOSE,SUM(CLOSE*VVOL,MDAY)/SUM(VVOL,MDAY)){XG51};
拉升资金:=(CLOSE-MEDIUMCOST)/MEDIUMCOST*IF((CLOSE-MEDIUMCOST)/MEDIUMCOST<1,1000,10){XG51};
中线买入:=STICKLINE(CROSS(CLOSE,HIGHM) AND VAR3<50 AND COUNTM>MDAY*9/10,0,50,1,1){XG51};
SDAY:=BARSLAST(VAR3>40 AND VAR3<=50){XG51};
HIGHS:=REF(HIGH,SDAY){XG51};
COUNTS:=COUNT(CLOSE<HIGHS,SDAY){XG51};
SHORTCOST:=SUM(CLOSE,SDAY)/SDAY{XG51};
散户进出:=MA((CLOSE-SHORTCOST)/SHORTCOST*IF((CLOSE-SHORTCOST)/SHORTCOST<1,1000,10),10){XG51};
短线买入:=STICKLINE(CROSS(CLOSE,HIGHS) AND VAR3<30 AND COUNTS>SDAY*9/10,0,50,1,1){XG51};
一剑封喉:=(CROSS(CLOSE,VAR6) AND VAR3<M AND VAR7>VAR5*9/10 AND 拉升资金>散户进出)
OR (CROSS(CLOSE,HIGHM) AND VAR3<50 AND COUNTM>MDAY*9/10 AND 拉升资金>散户进出) {XG51};
IF(一剑封喉,50,0){X^G^5?1^C^N^{};

通达信明日之星主图未加密选股指标公式源码

源码正文：

ma5:MA(CLOSE,5){XG51};
MA10:MA(CLOSE,10){XG51};
MA30:MA(CLOSE,30){XG51};
MA60:MA(CLOSE,60){XG51};
红轨道:=MA(MA(CLOSE,3),1),LINETHICK1,COLORBLUE{XG51};
绿轨道:=MA(MA(CLOSE,3),3){XG51};
上升:IF(红轨道>=绿轨道,绿轨道,DRAWNULL),COLORWHITE,LINETHICK3{XG51};
AA1:=3*SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1)-2*SMA(SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1),3,1){XG51};
加仓:=IF(crOSS(AA1,REF(AA1+0.01,1)) AND LLV(AA1,2)=LLV(AA1,8) AND
BETWEEN(AA1,20,60),1,0){XG51};
波段底:=(3)*(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27)
- LLV(LOW,27)))*(100),5,1)) -
(2)*(SMA(SMA(((CLOSE -
LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1),3,1)){XG51};
DRAWICON(加仓,L*0.97,7){XG51};
DRAWICON(CROSS(波段底,3),L*0.97,1){XG51};
A:=(3*C+L+O+H)/6{XG51};
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210{XG51};
mtm:=C-REF(C,1){XG51};
DX:=100*ema(EMA(MTM,6),6)/EMA(EMA(Abs(MTM),6),6){XG51};
CB:=EMA(X,13){XG51};
卖:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0){XG51};
DRAWTEXT(FILTER(卖=1,1),HIGH*1.02,'卖'),COLORRED{XG51};
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0){XG51};
DRAWTEXT(FILTER(买=1,5),LOW-0.03,'买'),COLORWHITE{XG51};
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
BDGD:=HHV(J,2)=HHV(J,8) AND J>80{XG51};
注意:=IF(CROSS(REF(J-0.01,1),J) AND REF(BDGD,1),1,0){XG51};
DRAWTEXT(注意 AND
卖!=1,HIGH*1.02,'减'),COLORLIGREEN{XG51};
加仓A:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10{XG51};
DRAWTEXT(FILTER((CROSS(加仓A,0) OR CROSS(CLOSE,CB)) AND
买!=1,3),LOW-0.03,'加'),COLOR0080FF{XG51};
MA18:=MA(C,18){XG51};
跟:=IF(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),1,0){XG51};
DRAWTEXT(MA18>=REF(MA18,3) AND
CROSS(CLOSE,MA18),LOW*0.96,'跟'),COLOR7F52AF{XG51};
买价:=((C-REF(MA5,1))/5+MA5)*1.004{XG51};
买条件:=CROSS(C,买价) AND 买价>REF(买价,1){XG51};
白k线买进:IF(买条件,L,H),COLORRED,POINTDOT{XG51};
stICKLINE(买条件,H,L,0,1),COLORRED,LINETHICK2{XG51};
STICKLINE(买条件,O,C,4,1),COLORRED,LINETHICK2{XG51};
加码价:=((C-REF(MA10,1))/20+MA10)*1.004{XG51};
加码条件:=CROSS(C,加码价) AND
加码价>REF(加码价,1){XG51};
黄K线加码:IF(加码条件,L,H),COLORBLUE,POINTDOT{XG51};
STICKLINE(加码条件,H,L,0,1),COLORBLUE,LINETHICK2{XG51};
STICKLINE(加码条件,O,C,4,1),COLORBLUE,LINETHICK2{XG51};
P1:=5{XG51};
P2:=10{XG51};
P3:=20{XG51};
P4:=30{XG51};
P5:=60{XG51};
P6:=120{XG51};
P7:=240{XG51};
P8:=340{XG51};
N:=4{XG51};
WX:=MA(CLOSE,0){XG51};
M1:=MA(CLOSE,P1){XG51};
M2:=(MA(CLOSE,P2) * IF((N < 2),WX,1)){XG51};
M3:=(MA(CLOSE,P3) * IF((N < 3),WX,1)){XG51};
M4:=(MA(CLOSE,P4) * IF((N < 4),WX,1)){XG51};
M5:=(MA(CLOSE,P5) * IF((N < 5),WX,1)){XG51};
M6:=(MA(CLOSE,P6) * IF((N < 6),WX,1)){XG51};
M7:=(MA(CLOSE,P7) * IF((N < 7),WX,1)){XG51};
M8:=(MA(CLOSE,P8) * IF((N < 8),WX,1)){XG51};
C1:=REF(CLOSE,1){XG51};
C2:=HHV(C1,2){XG51};
C3:=LLV(C1,1){XG51};
ET:=HHV(C1,2){XG51};
ET1:=REF(ET,1){XG51};
XB:=LLV(C1,1){XG51};
XB1:=REF(XB,1){XG51};
M:=BArslAST(((CLOSE < XB) AND (C1 >= XB1))){XG51};
M11:=REF(M,1){XG51};
N9:=BARSLAST(((CLOSE > ET) AND (C1 <= ET1))){XG51};
N1:=REF(N9,1){XG51};
M21:=(BARSLAST((((M - N9) > 0) AND (M11 <= N1))) + 1){XG51};
N2:=(BARSLAST((((N9 - M) > 0) AND (N1 <= M11))) + 1){XG51};
ET2:=HHV(ET,M21){XG51};
XB2:=LLV(XB,N2){XG51};
H1:=IF(((M - N9) > 0),CLOSE,ET2){XG51};
H2:=IF((A = 1),CLOSE,C2){XG51};
H3:=IF(((M - N9) < 0),CLOSE,XB2){XG51};
H4:=IF((A = 1),CLOSE,XB2){XG51};
H5:=IF((((M - N9) > 0) OR (A = 1)),CLOSE,H3){XG51};
H6:=REF(H5,1){XG51};
H7:=REF(H5,2){XG51};
H8:=(H5 > H6){XG51};
H9:=(((H4 = REF(H4,1)) AND (REF(H4,1) < REF(H4,2))) AND (H5 > REF(H5,2))){XG51};
H10:=(((H2 = REF(H2,1)) AND (H4 = REF(H4,1))) AND (H5 = REF(H5,2))){XG51};
W:=((H8 OR H9) OR H10){XG51};
T9:=((H5 < H6) AND (H5 < REF(H5,2))){XG51};
T10:=((H4 = REF(H4,1)) AND (H5 < REF(H5,2))){XG51};
T11:=((H3 > REF(H3,1)) AND (H5 < REF(H5,1))){XG51};
T12:=((H5 = REF(H5,1)) AND (H3 = H4)){XG51};
T13:=((H2 = REF(H2,1)) AND (H2 = H5)){XG51};
TW:=((((T9 OR T10) OR T11) OR T12) OR T13){XG51};
PK:=((AMOUNT * (((OPEN + CLOSE) + HIGH) + LOW)) / 4){XG51};
PK1:=IF((vol > 0),(PK / AMOUNT),((((OPEN + CLOSE) + HIGH) + LOW) / 4)){XG51};
BBP:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100){XG51};
STICKLINE((ISLASTBAR AND W),(H5 * 1.025),(H5 * 0.99),0.5,0),COLORFF8800{XG51};
STICKLINE((ISLASTBAR AND W),(H5 * 1.02),H5,8,0),COLOR102088{XG51};
STICKLINE((ISLASTBAR AND W),(H5 * 1.02),H5,7,0),COLOR102099{XG51};
STICKLINE((ISLASTBAR AND W),(H5 * 1.02),H5,6,0),COLOR1020AA{XG51};
STICKLINE((ISLASTBAR AND W),(H5 * 1.02),H5,5,0),COLOR1020BB{XG51};
STICKLINE((ISLASTBAR AND W),(H5 * 1.02),H5,4,0),COLOR1020CC{XG51};
STICKLINE((ISLASTBAR AND W),(H5 * 1.02),H5,3,0),COLOR1020DD{XG51};
STICKLINE((ISLASTBAR AND W),(H5 * 1.02),H5,2,0),COLOR1020EE{XG51};
STICKLINE((ISLASTBAR AND W),(H5 * 1.02),H5,1,0),COLOR1020FF{XG51};
DRAWTEXT((ISLASTBAR AND (BBP >= 96.5)),(H5 * 1.022),'明见-短高-龙头-除外'),COLORWHITE{XG51};
DRAWTEXT((ISLASTBAR AND (BBP < 1)),((H5 + H4) / 1.96),'明见-短低-跌停-除外'),COLORCYAN{XG51};
DRAWTEXT(((ISLASTBAR AND W) AND (BBP < 96.5)),(H5 * 1.022),'明日看涨'),COLORBLUE{XG51};
DRAWTEXT(((ISLASTBAR AND TW) AND (BBP > 1)),((H5 + H4) / 2),'明日看跌'),COLORCYAN{X~G?5_1~C~N~{};