主力增仓榜通达信公式 主图 源码附图

M1:=3;M2:=5;M3:=7;M4:=13;M5:=15;M6:=21;

VAR1:=LLV(HIGH,240);

VAR2:=100*(CLOSE-VAR1)/VAR1;

VAR3:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;

VAR4:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;

VAR5:=0;

VAR6:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/

SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;

VAR7:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/

SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;

VARA:=BARSCOUNT(CLOSE);

VARB:=VAR6<20 AND VAR7<23 AND VARA>35;

VARC:=VARB AND COUNT(VARB,1)=1;

VARD:=EMA(CLOSE,21)-EMA(CLOSE,8);

VARE:=EMA(VARD,5);

VARF:=TROUGHBARS(3,6,1)<4 AND CROSS(VARD,VARE);

VAR8:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);

VAR9:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND

REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);

VAR10:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND

REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);

VAR11:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2)

AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);

VAR12:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2)

AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);

VAR13:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2)

AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);

VAR14:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2)

AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);

VAR15:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2)

AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);

VAR16:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2)

AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);

VAR17:=EMA(CLOSE,2)-EMA(CLOSE,150);

VAR1A:=EMA(VAR17,100);

VAR1B:=2*(VAR17-VAR1A);

VAR1C:=POW(VAR1B,3)*0.1+POW(VAR1B,1);

VAR1D:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));

VAR1E:=EMA(VAR1D*0.97,3);

VAR1F:=(HIGH+LOW+CLOSE)/3;

VAR18:=(VAR1F-MA(VAR1F,14))/(0.015*AVEDEV(VAR1F,14));

VAR19:=CROSS(VAR1E,LOW);

选股买点:= VAR8,COLORRED;

组合买:=(VAR9+VAR11+VAR13+VAR15);

组合卖:=(VAR10+VAR12+VAR14+VAR16);

黑马线:=IF(YEAR<2098 AND VAR1B>0.1,VAR1C,0);

VAR20:=选股买点 AND VARF AND VARC AND VAR19 AND VAR2<0 AND VAR3=0

AND VAR4=0 AND VAR18<(-110);

DRAWTEXT(VAR11,LOW-LOW*0.02,'进'),COLORMAGENTA , LINETHICK4;

STICKLINE(组合买,CLOSE,OPEN,3,0),COLORBLUE;

DRAWTEXT(组合买,LOW-LOW*0.02,'B'),COLORGREEN;

STICKLINE(组合卖,CLOSE,OPEN,3,0),COLORGREEN;

DRAWTEXT(组合卖,HIGH*1.04,'S'),COLORYELLOW;

STICKLINE(选股买点,CLOSE,OPEN,3,0),COLORBLUE;

DRAWTEXT(选股买点>0,LOW-LOW*0.02,'B'),COLORMAGENTA;

DRAWTEXT(VAR14,HIGH*1.1,'空仓'), LINETHICK3, COLORCYAN;

DRAWTEXT(VAR18<-110 AND 选股买点>0,LOW-LOW*0.06,'进'),COLORRED ,LINETHICK3 ;

VAA1:=(ZIG(3,10) < REF(ZIG(3,10),1)) AND (REF(ZIG(3,10),1) > REF(ZIG(3,10),2));

VAA2:=(ZIG(3,10) > REF(ZIG(3,10),1)) AND (REF(ZIG(3,10),1) < REF(ZIG(3,10),2));

DRAWTEXT(VAA1,HIGH*1.02,'卖'),COLORYELLOW;

DRAWTEXT(VAA2 AND (DATE < 1070804),LOW-LOW*0.02,'卖'),COLORYELLOW;

STICKLINE(VAA1 AND (DATE < 1070804),CLOSE,OPEN,1.5,0),COLORYELLOW;

STICKLINE(VAA1 AND (DATE < 1070804),HIGH,LOW,1.5,0),COLORYELLOW;

STICKLINE(VAA2 AND (DATE < 1070804),CLOSE,OPEN,1.5,0),COLORFF00FF;

STICKLINE(VAA2 AND (DATE < 1070804),HIGH,LOW,1.5,0),COLORFF00FF;

VARG:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20; 

VARH:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA 

((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1); 

VAR21:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA 

((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1); 

VAR22:=VARH<REF(VAR21,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1); 

DRAWTEXT(VAR22 AND COUNT(VAR22,30)=1,HIGH*1.02,'′大资金'),LINETHICK1,COLORFF00FF; 

VAR23:=(HIGH+LOW+CLOSE)/3; 

VAR24:=(VAR23-MA(VAR23,14))/(0.015*AVEDEV(VAR23,14)); 

VAR25:=(VAR23-MA(VAR23,70))/(0.015*AVEDEV(VAR23,70)); 

VAR26:=IF(VAR24>=150 AND VAR24<200 AND VAR25>=150 AND VAR25<200,10,0); 

VAR27:=IF(VAR24<=-150 AND VAR24>-200 AND VAR25<=-150 AND VAR25>-200,-10,VAR26); 

VAR28:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100; 

VAR29:=100-ABS(VAR28); 

VAR30:=IF(VAR29<90,VAR29,100); 

VAR1G:=IF(VARG>0, VARG,0); 

VAR1H:=IF(VAR25>=200 AND VAR24>=150,15,IF(VAR25<=-200 AND VAR24<=-150,-15,VAR27))+60; 

VAR1I:=VAR1G>48 AND VAR1H>60 AND VAR30<100; 

DRAWTEXT(VAR1I AND COUNT(VAR1I,30)=1,HIGH*1.06,'大笔出货'),LINETHICK1,COLORFFCC66; 

DRAWTEXT(CROSS(ZIG(3,14),REF(ZIG(3,14),1)),LOW*1.001,'底'),COLORGREEN;

DRAWTEXT(CROSS(REF(ZIG(3,13),1),ZIG(3,13)),HIGH*1,'逃顶'), COLORRED;

 

原理解析：
M1赋值:3
M2赋值:5
M3赋值:7
M4赋值:13
M5赋值:15
M6赋值:21
VAR1赋值:240日内最高价最低值
VAR2赋值:100*(收盘价-VAR1)/VAR1
VAR3赋值:(收盘价-528日内最低价最低值)/(528日内最高价最高值-528日内最低价最低值)*100
VAR4赋值:(收盘价-530日内收盘价最低值)/(530日内收盘价最高值-530日内收盘价最低值)*100
VAR5赋值:0
VAR6赋值:SMA(收盘价-1日前的收盘价和0较大值,34,1)/
SMA(收盘价-1日前的收盘价的绝对值,7,1)*100
VAR7赋值:SMA(收盘价-1日前的收盘价和0较大值,13,1)/
SMA(收盘价-1日前的收盘价的绝对值,13,1)*100
VARA赋值:收盘价的有效数据周期数
VARB赋值:VAR6<20 AND VAR7<23 AND VARA>35
VARC赋值:VARB AND 统计1日满足VARB的天数=1
VARD赋值:收盘价的21日指数移动平均-收盘价的8日指数移动平均
VARE赋值:VARD的5日指数移动平均
VARF赋值:TROUGHBARS(3,6,1)<4 AND VARD上穿VARE
VAR8赋值:IF(TROUGHBARS(3,16,1)=0 AND 最高价>最低价+0.04,4,0)
VAR9赋值:ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3)
VAR10:=ZIG(3,6)=REF(ZIG(3,6),2) AND
REF(ZIG(3,6),2)>=REF(ZIG(3,6),3)
VAR11:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3)
VAR12:=ZIG(3,22)=REF(ZIG(3,22),2)
AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3)
VAR13:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3)
VAR14:=ZIG(3,51)=REF(ZIG(3,51),2)
AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3)
VAR15:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3)
VAR16:=ZIG(3,72)=REF(ZIG(3,72),2)
AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3)
VAR17:=收盘价的2日指数移动平均-收盘价的150日指数移动平均
VAR1A:=VAR17的100日指数移动平均
VAR1B:=2*(VAR17-VAR1A)
VAR1C:=POW(VAR1B,3)*0.1+POW(VAR1B,1)
VAR1D:=SQRT(SQRT(最低价*最高价*开盘价*收盘价))
VAR1E:=VAR1D*0.97的3日指数移动平均
VAR1F:=(最高价+最低价+收盘价)/3
VAR18:=(VAR1F-VAR1F的14日简单移动平均)/(0.015*AVEDEV(VAR1F,14))
VAR19:=VAR1E上穿最低价
选股买点赋值: VAR8,画红色
组合买赋值:(VAR9+VAR11+VAR13+VAR15)
组合卖赋值:(VAR10+VAR12+VAR14+VAR16)
如果YEAR<2098 AND VAR1B>0.1返回VAR1C否则返回0
VAR20:=选股买点 AND VARF AND VARC AND VAR19 AND VAR2<0 AND VAR3=0 AND VAR4=0 AND VAR18<(-110)
当满足条件VAR11时,在最低价-最低价*0.02和'进'位置书写文字
当满足条件组合买时,在收盘价和开盘价之间画柱状线
当满足条件组合买时,在最低价-最低价*0.02和'B'位置书写文字
当满足条件组合卖时,在收盘价和开盘价之间画柱状线
当满足条件组合卖时,在最高价*1.04和'S'位置书写文字
当满足条件选股买点时,在收盘价和开盘价之间画柱状线
当满足条件选股买点>0时,在最低价-最低价*0.02和'B'位置书写文字
当满足条件VAR14时,在最高价*1.1和'空仓'位置书写文字
当满足条件VAR18<-110 AND 选股买点>0时,在最低价-最低价*0.06和'进'位置书写文字
VAA1赋值:(ZIG(3,10) < REF(ZIG(3,10),1)) AND (REF(ZIG(3,10),1) > REF(ZIG(3,10),2))
VAA2赋值:(ZIG(3,10) > REF(ZIG(3,10),1)) AND (REF(ZIG(3,10),1) < REF(ZIG(3,10),2))
当满足条件VAA1时,在最高价*1.02和'卖'位置书写文字
DRAWTEXT(VAA2 AND (DATE < 1070804),最低价-最低价*0.02,'卖'),画黄色
STICKLINE(VAA1 AND (DATE < 1070804),收盘价,开盘价,1.5,0),画黄色
STICKLINE(VAA1 AND (DATE < 1070804),最高价,最低价,1.5,0),画黄色
STICKLINE(VAA2 AND (DATE < 1070804),收盘价,开盘价,1.5,0),COLORFF00FF
STICKLINE(VAA2 AND (DATE < 1070804),最高价,最低价,1.5,0),COLORFF00FF
VARG赋值:MA(100*(收盘价-34日内收盘价最低值)/(34日内最高价最高值-34日内最低价最低值),5)-20
 
VARH赋值:100-3*SMA((收盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1)+2*SMA(SMA 
((收盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1),15,1)
 
VAR21:=100-3*SMA((开盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1)+2*SMA(SMA 
((开盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1),15,1)
 
VAR22:=VARH<1日前的VAR21 AND 成交量>1日前的成交量 AND 收盘价>1日前的收盘价
 
DRAWTEXT(VAR22 AND 统计30日满足VAR22的天数=1,最高价*1.02,'′大资金'),LINETHICK1,COLORFF00FF
 
VAR23:=(最高价+最低价+收盘价)/3
 
VAR24:=(VAR23-VAR23的14日简单移动平均)/(0.015*AVEDEV(VAR23,14))
 
VAR25:=(VAR23-VAR23的70日简单移动平均)/(0.015*AVEDEV(VAR23,70))
如果VAR24>=150 AND VAR24<200 AND VAR25>=150 AND VAR25<200返回10否则返回0
如果VAR24<=-150 AND VAR24>-200 AND VAR25<=-150 AND VAR25>-200返回-10否则返回VAR26
 
VAR28:=(收盘价-收盘价的13日简单移动平均)/收盘价的13日简单移动平均*100
 
VAR29:=100-VAR28的绝对值
如果VAR29<90返回VAR29否则返回100
如果VARG>0返回 VARG否则返回0
 
VAR1H:=IF(VAR25>=200 AND VAR24>=150,15,IF(VAR25<=-200 AND VAR24<=-150,-15,VAR27))+60
 
VAR1I:=VAR1G>48 AND VAR1H>60 AND VAR30<100
 
DRAWTEXT(VAR1I AND 统计30日满足VAR1I的天数=1,最高价*1.06,'大笔出货'),LINETHICK1,COLORFFCC66
 
DRAWTEXT(CROSS(ZIG(3,14),REF(ZIG(3,14),1)),最低价*1.001,'底'),画绿色
DRAWTEXT(CROSS(REF(ZIG(3,13),1),ZIG(3,13)),最高价*1,'逃顶'), 画红色