通达信最牛短线操盘选股指标公式源码

通达信最牛短线操盘选股指标公式源码

源码正文：

NA:=stRCAT(CON2STR(YEAR,0),' 年 ');
YA:=STRCAT(CON2STR(MONTH,0),' 月 ');
RA:=STRCAT(CON2STR(DAY,0),' 日 ');
SJ:=STRCAT(STRCAT(NA,YA), RA);
DRAWTEXT_FIX(C>0,0.88,0,0,SJ){XG51};

买线:=ema(C,2);
卖线:=Ema(SLOPE(C,21)*20+C,42);
STICKLINE(买线>=卖线,HHV(H,60),LLV(L,60),5,0),COLOR000045{XG51};
STICKLINE(买线<卖线,HHV(H,60),LLV(L,60),5,0),COLOR004500{XG51};
红轨道:=MA(MA(CLOSE,3),1),LINETHICK1,COLORBLUE{XG51};
轨道:MA(MA(CLOSE,3),3),COLOR32CD32,LINETHICK2{XG51};
SHENG:=IF(红轨道>=轨道,轨道,DRAWNULL){XG51};
升:SHENG,COLORLIMAGENTA,LINETHICK2{XG51};
N1:=14{XG51};
M:=6{XG51};
TR1:=EXPMEMA(MAX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N1){XG51};
HD :=HIGH-REF(HIGH,1){XG51};
LD :=REF(LOW,1)-LOW{XG51};
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),N1){XG51};
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),N1){XG51};
pdi:=DMP*100/TR1,LINETHICK2{XG51};
mdi:=DMM*100/TR1{XG51};
ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,M){XG51};
ADXR:=EXPMEMA(ADX,M){XG51};
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2){XG51};
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),3,1),COLOR0000FF;
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2){XG51};
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),3,0),COLORC08000;
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORLIMAGENTA ;
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0) ,COLOR00FF00; }
N:=7{XG51};
T1:=CONST(LLVBARS(LOW,N)){XG51};
T1HIGH:=CONST(REF(HIGH,T1)){XG51};
CC:=CONST(CURRBARSCOUNT){XG51};
T2:=CONST(BArslAST((CURRBARSCOUNT >(CC+T1)) AND (HIGH>T1HIGH))){XG51};
T2HIGH:=CONST(REF(HIGH,T2)){XG51};
T3:=CONST(BARSLAST((CURRBARSCOUNT >(CC+T2)) AND (HIGH>T2HIGH))){XG51};
T3HIGH:=CONST(REF(HIGH,T3)){XG51};
AB:=EMA(((2*C+H+L)/4-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,8);
BA:=EMA(AB,5);
A1:=REFDATE(REF(HHV(H,96),5),DATE);
B1:=REFDATE(REF(LLV(L,96),5),DATE);
DY:=((A1)+(B1))/2;
箱顶:IF(AB>0 AND AB-BA<=0,A1,A1),COLORCYAN,DOTLINE;
箱腰:IF(AB>0 AND AB-BA<=0,DY,DY),COLORBLUE,DOTLINE;
箱低:IF(AB>0 AND AB-BA<=0,B1,B1),COLORWHITE,DOTLINE;
DRAWTEXT(ISLASTBAR,箱顶,'箱顶'),COLORBLUE{XG51};
DRAWTEXT(ISLASTBAR,箱腰,''),COLORBLUE{XG51};
DRAWTEXT(ISLASTBAR,箱低,'箱低'),COLORBLUE{XG51};
VARAA:=IF(CLOSE>150,91.3,0.913){XG51};
STICKLINE(crOSS(zig(3,5),REF(ZIG(3,5),1)),箱低,箱腰,0.1,-1),COLORWHITE{XG51};
STICKLINE(CROSS(REF(ZIG(3,5),1),ZIG(3,5)),箱顶,箱腰,0.1,-1),COLORCYAN{XG51};
DRAWICON(CROSS(ZIG(3,5),REF(ZIG(3,5),1)),箱腰,1){XG51};
DRAWICON(CROSS(REF(ZIG(3,5),1),ZIG(3,5)),箱腰,2){XG51};
EE:=(H+L+O+2*C)/5;
CRTP:=EE+(H-L);
CRZL:=2*EE-L;
CRZC:=2*EE-H;
CRFZ:=EE-(H-L);

均线:=expma(C,12),COLORBROWN,LINETHICK2{XG51};
日:=50{XG51};
昨前:=3;
高2:=REF(HHV(H,日),昨前);
低2:=REF(LLV(L,日),昨前);
H4:=高2-(高2-低2)*0.618;
H5:=高2-(高2-低2)*0.809;
H81:=IF(H=HHV(H,9),H,DRAWNULL){XG51};
H82:=CONST(BARSLAST(H81!=DRAWNULL)){XG51};
H83:=CONST(IF(H82=0,L,REF(L,H82))){XG51};
H84:=CONST(REF(BARSLAST(L<H83),H82+1)+H82+1){XG51};
H85:=CONST(IF(H84=0,L,REF(L,H84))){XG51};
H86:=CONST(REF(BARSLAST(L<H85),H84+1)+H84+1){XG51};
H87:=IF(CURRBARSCOUNT<=H82+10,CONST(IF(H86=0,L,REF(L,H86))),DRAWNULL),DOTLINE{XG51};
H88:=IF(CURRBARSCOUNT<=H82+1,IF(H=HHV(H,9),H,DRAWNULL),DRAWNULL),CIRCLEDOT{XG51};
DRAWTEXT(CURRBARSCOUNT=H82+10,H87,'LINE'),COLORBLUE{XG51};
DRAWTEXT(ISLASTBAR,H87,''),COLORBLUE{XG51};
dif:=EMA(DCLOSE,12)-EMA(DCLOSE,26){XG51};
DEA:=EMA(DIF,9){XG51};
AAA:=(DIF-DEA)*2*60{XG51};
起爆:=CROSS(AAA-REF(AAA,1),15){XG51};
DRAWTEXT(起爆,MA(L,3),'↖暴涨'),COLORBLUE,LINETHICK2{XG51};
LC:=REF((O+H+L+2*C)/5,1){XG51};
rsi:=SMA(MAX(C-LC,0),7,1)/SMA(ABS(C-LC),7,1)*10{XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
cci:=(TYP-MA(TYP,23))/(0.015*AVEDEV(TYP,23)){XG51};
买:=CROSS(RSI,7.1) AND MA(V,5)>MA(V,10),COLORWHITE{XG51};
DRAWTEXT(CROSS(RSI,7.1) AND MA(V,5)>MA(V,10),MA(L,3),'↖◆短线擒黑马◆'),COLORRED{XG51};
DRAWICON(买,MA(L,3),17){XG51};
卖:=CROSS(7.1,RSI) AND MA(V,10)>MA(V,5),COLORCYAN{XG51};
DRAWTEXT(CROSS(7.1,RSI) AND MA(V,10)>MA(V,5),箱顶,'■■逃跑■■'),COLORCYAN{XG51};
DRAWICON(卖,MA(H,3),28);

A81:=EMA(C,3),COLORRED{XG51};
A82:=EMA(C,5),COLORBLUE{XG51};
A83:=EMA(C,7),COLORLIMAGENTA{XG51};
A84:=EMA(C,12),COLORCYAN{XG51};
A85:=EMA(C,20),COLORWHITE{XG51};
A86:=EMA(C,50),COLORYELLOW,LINETHICK2{XG51};
SS8:=CROSS(A81,A85) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018 {XG51};
SSS8:=CROSS(A81,A85) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018{XG51};
DRAWICON(SS8 ,MA(L,3),5){XG51};
DRAWTEXT(SS8,MA(L,3),'↖绝密买点'),COLORBLUE{XG51};
ZYX1:="dmi.PDI"(12,6){XG51};
ZYX2:="DMI.MDI"(12,6){XG51};
ZYX3:=ZYX1>65 AND ZYX1>REF(ZYX1,1){XG51};
ZYX4:=LLV(ZYX1,0){XG51};
ZYX5:=BARSLAST(ZYX4=ZYX1){XG51};
ZYX6:=(0-REF(ZYX2,4))/(ZYX4-REF(ZYX2,ZYX5))>2{XG51};
ZYX7:=ZYX1>REF(ZYX1,1){XG51};
ZYX8:=vol>2*MA(VOL,30){XG51};
ZYX9:="DMI.ADX"(12,6){XG51};
ZYXA:="DMI.ADXR"(12,6){XG51};
ZYXB:=CLOSE>MA(CLOSE,30) AND CLOSE<MA(CLOSE,30)*1.04{XG51};
ZYXC:=MA(CLOSE,30)>REF(MA(CLOSE,30),1){XG51};
ZYXD:=BARSLAST(CROSS(MA(CLOSE,5),MA(CLOSE,10)))<BARSLAST(CROSS(MA(CLOSE,10),MA(CLOSE,5))){XG51};
ZYXF:=TROUGHBARS(3,15,1)<4{XG51};
ZYX10:=EMA(CLOSE,30)>REF(EMA(CLOSE,30),2){XG51};
ZYX11:=IF(ZYXF=1,50,0){XG51};
ZYX12:=CROSS(ZYX2,ZYX1) AND CROSS(ZYXA,ZYX9){XG51};
ZYX13:=CROSS(ZYX2,ZYX1) AND CROSS(ZYX9,ZYXA){XG51};
ZYX14:=ZYXB AND ZYXC AND ZYXD AND ZYX10 AND ZYX6 AND ZYX7 AND ZYX8*50{XG51};
ZYX15:=BARSLAST(CROSS(ZYX2,ZYX1)=1){XG51};
ZYX16:=BARSLAST(CROSS(ZYX1,ZYX2)=1){XG51};
ZYX17:=HHV(ZYX1,ZYX16){XG51};
ZYX18:=BARSLAST(ZYX1=ZYX17){XG51};
ZYX19:=ZYX3 OR ZYX12 OR ZYX13*100{XG51};
ZYX1A:=ZYX13*100{XG51};
DRAWICON(FILTER(ZYXF=1,3),MA(L,3),23){XG51};
DRAWTEXT(FILTER(ZYXF=1,3),箱低,'■■铁底■■'),COLORCYAN{XG51};
ND:=10{XG51};
PTD:=CONST(LLVBARS(V,ND)){XG51};
G21:=30{XG51};
T112:=CONST(HHVBARS(V,G21)){XG51};
T122:=IF(CURRBARSCOUNT<=G21+7,CONST(IF(T112=0,H,REF(H,T112))),DRAWNULL);
T122A:=IF(CURRBARSCOUNT=T112+1,T122,DRAWNULL),CIRCLEDOT,COLORRED{XG51};
DRAWTEXT(ISLASTBAR,T122,''),COLORRED{XG51};
W10:=10{XG51};
TW1:=CONST(HHVBARS(V,W10)){XG51};
TW0:=IF(CURRBARSCOUNT<=W10+7,CONST(IF(TW1=0,C,REF(C,TW1))),DRAWNULL);
TW0A:=IF(CURRBARSCOUNT=TW1+1,TW0,DRAWNULL),CIRCLEDOT,COLORRED{XG51};
DRAWTEXT(ISLASTBAR,TW0,''),COLORRED{XG51};
W20:=20{XG51};
TW20:=CONST(HHVBARS(V,W20)){XG51};
TW22:=IF(CURRBARSCOUNT<=W20+7,CONST(IF(TW20=0,C,REF(C,TW20))),DRAWNULL);
TW22A:=IF(CURRBARSCOUNT=TW20+1,TW22,DRAWNULL),COLORRED{XG51};
DRAWTEXT(ISLASTBAR,TW22,''),COLORRED{XG51};
MW:=10{XG51};
MW1:=CONST(LLVBARS(V,MW)){XG51};
MW0:=IF(CURRBARSCOUNT<=MW+7,CONST(IF(MW1=0,O,REF(O,MW1))),DRAWNULL);
MW0A:=IF(CURRBARSCOUNT=MW1+1,MW0,DRAWNULL),CIRCLEDOT,COLORRED{XG51};
DRAWTEXT(ISLASTBAR,MW0,''),COLORRED{XG51};
EM1:=EMA(C,18),NODRAW{XG51};
EM2:=EMA(C,36),COLORWHITE{XG51};
EM3:=EMA(C,55),COLORCYAN{XG51};
TJ8:=BETWEEN(EM2,EM1,EM3){XG51};
B18:=''{XG51};
DRAWTEXT(VOL=HHV(VOL,20),C ,B18),COLORWHITE{XG51};
RSV:=(CLOSE-LLV(LOW,11))/(HHV(HIGH,11)-LLV(LOW,11))*100{XG51};
短期底部:=LLV(OPEN,30){XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=(3*K-2*D),LINETHICK2{XG51};
D2:=SMA(J,3,1)*0.82{XG51};
VAR72:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100{XG51};
VAR73:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100{XG51};
VAR74:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100{XG51};
VAR75:=(VAR72+2*VAR73+3*VAR74)/6{XG51};
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26){XG51};
DEA2:=EMA(DIFF,6){XG51};
MacD超跌2:=(COUNT(DIFF<DEA2,19))=10{XG51};
DRAWTEXT(CROSS(J,-3),MA(L,3),'↖超跌反弹'),COLORCYAN{XG51};
{XG51};
W1:=C=HHV(C,20){XG51};
W2:=BARSLAST(W1){XG51};
W3:=IF(W2>0,REF(C,W2),REF(C,W2)){XG51};
W4:=CROSS(C,REF(W3,1)){XG51};
突破盘整:=W4 AND COUNT(W4,5)=1{XG51};
DRAWTEXT(突破盘整>0,MA(L,3),'↙突破盘整'),COLORWHITE{XG51};
C6:=REF(C,1){XG51};
涨停:=IF((C-C6)*100/C6>=(10-0.01*100/C6),1,0){XG51};
STICKLINE(涨停,OPEN,CLOSE,1,0),COLORBLUE{XG51};
STICKLINE(涨停,H,L,0,0),COLORBLUE{XG51};
DRAWTEXT(涨停,MA(H,3),'↙涨停'),COLORBLUE{XG51};
RSI1:=SMA(MAX(CLOSE-LC,0),3,1)/SMA(ABS(CLOSE-LC),3,1)*100{XG51};
SELL2:=(CROSS(88,RSI1)){XG51};
DRAWTEXT(SELL2,MA(H,3),'↙★出'),COLOR00FF00{XG51};
VB1:=C-REF(C,1){XG51};
VB2:=100*EMA(EMA(VB1,6),6)/EMA(EMA(ABS(VB1),6),6){XG51};
VB3:=IF(LLV(VB2,2)=LLV(VB2,7) AND COUNT(VB2<0,2) AND CROSS(VB2,MA(VB2,2)),1,0){XG51};
VB4:=FILTER(VB3=1,5){XG51};
DRAWTEXT(VB4,MA(L,3),'↖★买'),COLOR00FFFF{XG51};
VARD1:=(C+H+O+L)/4{XG51};
卖出:=xma(VARD1,20)*(1+80/1000),COLORFFFFFF,LINETHICK3{XG51};
买入:=XMA(VARD1,32)*(1-100/1000),COLOR0000FF,LINETHICK3{XG51};
机会来临:=REF(IF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,30,0),1),COLORF00FF0,LINETHICK2{XG51};
RSV2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K2:=REF(MA(RSV2,3),1)+(RSV2-REF(MA(RSV2,3),1))/3{XG51};
DD2:=REF(MA(K2,3),1)+(K2-REF(MA(K2,3),1))/3{XG51};
J2:=3*K2-2*DD2{XG51};
BB1:=EMA(J2,5){XG51};
BB2:=REF(BB1,1){XG51};
金叉:=CROSS(BB1,BB2){XG51};
DRAWTEXT(CROSS(C,卖出),MA(H,3),'↙卖出'),COLOR00FFFF{XG51};
DRAWTEXT(CROSS(C,买入) AND BB1>BB2 AND C>REF(O,2),MA(L,3),'↖买入'),COLOR0000FF{XG51};
DRAWICON(CROSS(C,买入) AND 金叉 AND 机会来临 ,MA(L,3),13){XG51};
DRAWTEXT(CROSS(C,买入) AND 金叉 AND 机会来临,MA(L,3),'↖【绝杀点】'),COLOR00FF00{XG51};
F:=EMA(CLOSE,10)-EMA(CLOSE,21){XG51};
A:=EMA(F,8){XG51};
MD:=(F-A)*2{XG51};
ZQ:=BARSLAST(CROSS(F,A) AND A<=0.05)+1{XG51};
LZ:=BARSLASTCOUNT(MD<REF(MD,1))>1{XG51};
HZ:=BARSLASTCOUNT(MD>REF(MD,1))>1{XG51};
LZQ:=BARSLASTCOUNT(LZ){XG51};
HZQ:=BARSLASTCOUNT(HZ){XG51};
LZQTJ:=COUNT(LZQ,ZQ){XG51};
HZQTJ:=COUNT(HZQ,ZQ){XG51};
NQR:=REF(CLOSE,4){XG51};
SRZF:=((CLOSE-NQR)/NQR)*100,NODRAW{XG51};
绝杀黑马:=REF(LZQTJ,1)>=2 AND REF(HZQTJ,1)>=3 AND HZQTJ=0 AND LZQTJ=0 AND SRZF>2,LINETHICK2{XG51};
DRAWTEXT(绝杀黑马,MA(L,3),'↖★绝杀黑马'),COLOR00FFFF{XG51};
箱顶@:箱顶+箱顶*0.02,COLORLIGRAY{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.02,0.01,0,'你好'),COLORWHITE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.02,0.05,0,'恭喜发财'),COLORCYAN{X~G~5?1~C~N~{};