通达信潜龙在天及选股指标公式源码分享

MA5:MA(C,5),COLORWHITE; MA11:MA(C,11),COLORYELLOW; MA21:MA(C,21),COLORMAGENTA; MA31:MA(C,41),COLORGREEN; MA60:MA(C,61),COLORBLUE; LC:=REF(CLOSE,1); RSI5:=((SMA(MAX((CLOSE-LC),0),5,1)/SMA(ABS((CLOSE-LC)),5,1))*100); TR1:=SUM(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((LOW-REF(CLOSE,1)))),10); HD:=(HIGH-REF(HIGH,1)); LD:=(REF(LOW,1)-LOW); DMP:=SUM(IF(((HD 0)AND(HD LD)),HD,0),10); DMM:=SUM(IF(((LD 0)AND(LD HD)),LD,0),10); PDI:=((DMP*100)/TR1); MDI:=((DMM*100)/TR1); ADX:=MA(((ABS((MDI-PDI))/(MDI+PDI))*100),5); AV:=(RSI5+ADX); DXR:=(((ADX+REF(ADX,5))/2)+RSI5); WR10:=((100*(HHV(HIGH,10)-CLOSE))/(HHV(HIGH,10)-LLV(LOW,10))); NEWVOL:=(RSI5-WR10); 龙:=(AV+NEWVOL); AA:=MA(C,40) REF(MA(C,40),1)ANDREF(MA(C,40),1) REF(MA(C,40),2); BB:=MA(C,60) REF(MA(C,60),1)ANDREF(MA(C,60),1) REF(MA(C,60),2); CC:=MA(C,20) REF(MA(C,20),1)ANDREF(MA(C,20),1) REF(MA(C,20),2); EE:=(AAORBBORCC); DRAWTEXT(CROSS(龙,0)ANDEE,L*0.98,'潜'),COLORRED; V1:=DMA((((HIGH+LOW)+(CLOSE*2))/4.15),0.9); HY1:=REF(EMA(V1,3),1); 上收:=C; 上开:=O; 上高:=H; 上低:=L; JJ:=(上开+上高+上低)/3; A:=EMA(JJ,4); 黄金线:A,COLORFFFF00,LINETHICK1; 能量线:=DMA(((CLOSE+OPEN)/2),(VOL/(SMA(VOL,4,1)*4))); 箱顶:MA(REF(HHV(上收,30),1),2),COLORBLUE,LINETHICK1; 箱底:MA(REF(LLV(上收,30),1),2),COLORBLACK,LINETHICK1; VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20; VAR12:=(HIGH+LOW+CLOSE)/3; VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14)); VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70)); VAR15:=IF(VAR13 =150ANDVAR13 200ANDVAR14 =150ANDVAR14 200,10,0); VAR16:=IF(VAR13 =-150ANDVAR13 -200ANDVAR14 =-150ANDVAR14 -200,-10,VAR15); VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100; VAR18:=100-ABS(VAR17); VAR19:=IF(VAR18 90,VAR18,100); VAR1A:=IF(VARE 0,VARE,0); VAR1B:=IF(VAR14 =200ANDVAR13 =150,15,IF(VAR14 =-200ANDVAR13 =-150,-15,VAR16))+60; VAR1C:=VAR1A 48ANDVAR1B 60ANDVAR19 DRAWTEXT(VAR1CANDCOUNT(VAR1C,30)=1,HIGH*1.05,'大笔出'),LINETHICK1,COLORFFCC66; VAR2:=(2*CLOSE+HIGH+LOW)/4; VAR4:=LLV(LOW,5); VAR5:=HHV(HIGH,4); :=EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4); :=EMA(0.667*REF(散户,1)+0.333*散户,2); DRAWTEXT(CROSS(散户,庄家)AND散户 30,L*0.92,'吸'),COLORRED; DRAWTEXT(CROSS(庄家,散户)AND散户 70,H*1.02,'抛'),COLORGREEN; VVAR3:=REF(CLOSE,1); VVAR4:=SMA(MAX(CLOSE-VVAR3,0),6,1)/SMA(ABS(CLOSE-VVAR3),6,1)*100; DRAWTEXT(CROSS(84,VVAR4),H*1.05,'逃'),COLORYELLOW; VVAR5:=REF((LOW+OPEN+CLOSE+HIGH)/4,1); VVAR6:=SMA(ABS(LOW-VVAR5),13,1)/SMA(MAX(LOW-VVAR5,0),10,1); VVAR7:=EMA(VVAR6,10); VVAR8:=LLV(LOW,33); VVAR9:=EMA(IF(LOW =VVAR8,VVAR7,0),5); :=FILTER(VVAR9 REF(VVAR9,1),5); DRAWTEXT(主力,L*0.9,'入'),COLORRED; RSI:=((SMA(MAX((CLOSE-LC),0),3,1)/SMA(ABS((CLOSE-LC)),3,1))*100); FF:=EMA(CLOSE,3); MA15:=EMA(CLOSE,21); DRAWTEXT(CROSS(FF,MA15),(LOW*0.96),'建'),COLORYELLOW; LC:=REF(CLOSE,1);RSI5:=((SMA(MAX((CLOSE-LC),0),5,1)/SMA(ABS((CLOSE-LC)),5,1))*100);TR1:=SUM(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((LOW-REF(CLOSE,1)))),10);HD:=(HIGH-REF(HIGH,1));LD:=(REF(LOW,1)-LOW);DMP:=SUM(IF(((HD 0)AND(HD LD)),HD,0),10);DMM:=SUM(IF(((LD 0)AND(LD HD)),LD,0),10);PDI:=((DMP*100)/TR1);MDI:=((DMM*100)/TR1);ADX:=MA(((ABS((MDI-PDI))/(MDI+PDI))*100),5);AV:=(RSI5+ADX);DXR:=(((ADX+REF(ADX,5))/2)+RSI5);WR10:=((100*(HHV(HIGH,10)-CLOSE))/(HHV(HIGH,10)-LLV(LOW,10)));NEWVOL:=(RSI5-WR10);VARA1:=SMA(IF(CROSS((AV+NEWVOL),0),4,0),3,1);VARA2:=SMA(VARA1,3,1),COLOR0000FF;VARA3:=SMA(VARA2,3,1),COLOR00FFFF;建仓买点:IF(CROSS(VARA2,VARA3)AND(VARA2 40),5,0*10000);

公式解读：

[源码注释]通达信公式动态公式解读

输出MA5:收盘价的5日简单移动平均,画白色

输出MA11:收盘价的11日简单移动平均,画黄色

输出MA21:收盘价的21日简单移动平均,画洋红色

输出MA31:收盘价的41日简单移动平均,画绿色

输出MA60:收盘价的61日简单移动平均,画蓝色

LC赋值:1日前的收盘价

RSI5赋值:(((收盘价-LC)和0的较大值的5日[1日权重]移动平均/(收盘价-LC)的绝对值的5日[1日权重]移动平均)*100)

TR1赋值:(最高价-最低价)和(最高价-1日前的收盘价)的绝对值的较大值和(最低价-1日前的收盘价)的绝对值的较大值的10日累和

HD赋值:(最高价-1日前的最高价)

LD赋值:(1日前的最低价-最低价)

DMP赋值:如果((HD ,返回?,否则返回?的?日累和

0)AND(HD

LD)),HD,0),10)

DMM赋值:如果((LD ,返回?,否则返回?的?日累和

0)AND(LD

HD)),LD,0),10)

PDI赋值:((DMP*100)/TR1)

MDI赋值:((DMM*100)/TR1)

ADX赋值:(((MDI-PDI)的绝对值/(MDI+PDI))*100)的5日简单移动平均

AV赋值:(RSI5+ADX)

DXR赋值:(((ADX+5日前的ADX)/2)+RSI5)

WR10赋值:((100*(10日内最高价的最高值-收盘价))/(10日内最高价的最高值-10日内最低价的最低值))

NEWVOL赋值:(RSI5-WR10)

龙赋值:(AV+NEWVOL)

AA赋值:收盘价的40日简单移动平均

1日前的收盘价的40日简单移动平均ANDREF(收盘价的40日简单移动平均,1)

2日前的收盘价的40日简单移动平均

BB赋值:收盘价的60日简单移动平均

1日前的收盘价的60日简单移动平均ANDREF(收盘价的60日简单移动平均,1)

2日前的收盘价的60日简单移动平均

CC赋值:收盘价的20日简单移动平均

1日前的收盘价的20日简单移动平均ANDREF(收盘价的20日简单移动平均,1)

2日前的收盘价的20日简单移动平均

EE赋值:(AAORBBORCC)

当满足条件龙上穿0ANDEE时,在最低价*0.98位置书写文字,画红色

V1赋值:以0.9为权重(((最高价+最低价)+(收盘价*2))/4.15)的动态移动平均

HY1赋值:1日前的V1的3日指数移动平均

上收赋值:收盘价

输出箱顶:1日前的30日内上收的最高值的2日简单移动平均,画蓝色,线宽为1

输出箱底:1日前的30日内上收的最低值的2日简单移动平均,画黑色,线宽为1

VARE赋值:100*(收盘价-34日内收盘价的最低值)/(34日内最高价的最高值-34日内最低价的最低值)的5日简单移动平均-20

VAR12赋值:(最高价+最低价+收盘价)/3

VAR13赋值:(VAR12-VAR12的14日简单移动平均)/(0.015*VAR12的14日平均绝对偏差)

VAR14赋值:(VAR12-VAR12的70日简单移动平均)/(0.015*VAR12的70日平均绝对偏差)

VAR15赋值:如果VAR13 ,返回?,否则返回?

=150ANDVAR13

200ANDVAR14

=150ANDVAR14

200,10,0)

VAR16赋值:如果VAR13 ,返回?,否则返回?

=-150ANDVAR13

-200ANDVAR14

=-150ANDVAR14

-200,-10,VAR15)

VAR17赋值:(收盘价-收盘价的13日简单移动平均)/收盘价的13日简单移动平均*100

VAR18赋值:100-VAR17的绝对值

VAR19赋值:如果VAR18 ,返回?,否则返回?

90,VAR18,100)

VAR1A赋值:如果VARE ,返回?,否则返回?

0,VARE,0)

VAR1B赋值:如果VAR14 ,返回?,否则返回?

=200ANDVAR13

=150,15,如果VAR14 ,返回?,否则返回?

=-200ANDVAR13

=-150,-15,VAR16))+60

VAR1C赋值:VAR1A

48ANDVAR1B

60ANDVAR19

100

当满足条件VAR1CANDCOUNT(VAR1C,30)=1时,在最高价*1.05位置书写文字,线宽为1,COLORFFCC66

VAR2赋值:(2*收盘价+最高价+最低价)/4

VAR4赋值:5日内最低价的最低值

VAR5赋值:4日内最高价的最高值

散户赋值:(VAR2-VAR4)/(VAR5-VAR4)*100的4日指数移动平均

庄家赋值:0.667*1日前的散户+0.333*散户的2日指数移动平均

当满足条件散户上穿庄家AND散户时,在?位置书写文字

30,最低价*0.92,'吸'),画红色

当满足条件庄家上穿散户AND散户时,在?位置书写文字

70,最高价*1.02,'抛'),画绿色

VVAR3赋值:1日前的收盘价

VVAR4赋值:收盘价-VVAR3和0的较大值的6日[1日权重]移动平均/收盘价-VVAR3的绝对值的6日[1日权重]移动平均*100

当满足条件84上穿VVAR4时,在最高价*1.05位置书写文字,画黄色

VVAR5赋值:1日前的(最低价+开盘价+收盘价+最高价)/4

VVAR6赋值:最低价-VVAR5的绝对值的13日[1日权重]移动平均/最低价-VVAR5和0的较大值的10日[1日权重]移动平均

VVAR7赋值:VVAR6的10日指数移动平均

VVAR8赋值:33日内最低价的最低值

VVAR9赋值:如果最低价 ,返回?,否则返回?的?日指数移动平均

=VVAR8,VVAR7,0),5)

主力赋值:VVAR9 的?日过滤

1日前的VVAR9,5)

当满足条件主力时,在最低价*0.9位置书写文字,画红色

RSI赋值:(((收盘价-LC)和0的较大值的3日[1日权重]移动平均/(收盘价-LC)的绝对值的3日[1日权重]移动平均)*100)

FF赋值:收盘价的3日指数移动平均

MA15赋值:收盘价的21日指数移动平均

当满足条件FF上穿MA15时,在(最低价*0.96)位置书写文字,画黄色