龙虎榜主图成交换手提醒通达信公式 主图 源码附图
ZT:=C/REF(C,1)>1.095;
STICKLINE(ZT,O,C,0.8,0),COLORYELLOW;
M5:MA(C,5);
M10:MA(C,10);
M20:MA(C,20);
M60:MA(C,60);
M30:MA(C,30),NODRAW;
M120:MA(C,120),NODRAW;
V55:=MA(V,55);
V33:=MA(V,33);
V3:=MA(V,4);
TJ0:=V33>V55;
TJ1:=C>O;
TJ2:=C>MA(C,55);
TJ3:=COUNT(CROSS(V3,V33),1)=1 AND TJ2 AND TJ1 AND TJ0;
TJ4:=COUNT(V/V33>2.2,1)=1 AND TJ1 AND TJ2;
DRAWTEXT(TJ3 OR TJ4,(C+O)/2,'<-放量'),COLORYELLOW;
{关键涨停K提示,突破55平台第一天涨停}
GTJ0:=33;
GTJ1:=COUNT(ZT,GTJ0)=1;
GTJ2:=C=HHV(H,GTJ0);
DRAWTEXT(GTJ1 AND GTJ2,M60,'<-关键涨停K线'),COLORYELLOW;
{STICKLINE(GTJ1 AND GTJ2,L,0,1,1);}
{关键突破}
TP1:=COUNT(C>HHV(H,33),33)=1;
TP2:=V/MA(V,33)>1.8;
DRAWTEXT(TP1 AND TP2,H,'<-关键突破'),COLORYELLOW;
价格振幅 := (H-L)/L*100;
换手率 := DYNAINFO(37)*100;
SZ := IF(CODELIKE('000') OR CODELIKE('002') OR CODELIKE('300'),1,0);
指数涨跌 := (INDEXC - REF(INDEXC,1))/REF(INDEXC,1)*100;
个股涨跌 := (C-REF(C,1))/REF(C,1)*100;
涨跌幅偏离SZ := IF(个股涨跌>9.7,10, 个股涨跌) - 指数涨跌 ;
涨跌幅偏离SH := 个股涨跌 - 指数涨跌;
{指数3日涨跌幅:= (INDEXC - REF(INDEXC,3))/REF(INDEXC,3)*100;
个股3日涨跌幅:= (C-REF(C,3))/REF(C,3)*100;
三日涨跌幅偏离:= ABS(个股3日涨跌幅-指数3日涨跌幅);}
三日涨跌幅SZ:= ABS(涨跌幅偏离SZ + REF(涨跌幅偏离SZ,1)+ REF(涨跌幅偏离SZ,2));
三日涨跌幅SH:= ABS(涨跌幅偏离SH + REF(涨跌幅偏离SH,1)+ REF(涨跌幅偏离SH,2));
{DRAWTEXT(ISLASTBAR AND 三日涨跌幅偏离 >= 20,H*1.04, VARCAT('3日涨跌幅振幅偏离达到20%: ',VAR2STR(三日涨跌幅偏离,1))),COLORRED;}
DRAWTEXT(ISLASTBAR AND SZ=1 AND 三日涨跌幅SZ >= 20, H*1.04,VARCAT('3日涨跌幅振幅偏离累计达到20%:',VAR2STR(三日涨跌幅SZ,1))),COLORRED;
DRAWTEXT(ISLASTBAR AND SZ=0 AND 三日涨跌幅SH >= 20, H*1.04,VARCAT('3日涨跌幅振幅偏离累计达到20%:',VAR2STR(三日涨跌幅SH,1))),COLORRED;
DRAWTEXT(ISLASTBAR AND 价格振幅 >= 15,H, VARCAT('当日价格振幅达到15%: ',VAR2STR(价格振幅,1))),DRAWABOVE,COLORRED;
DRAWTEXT(ISLASTBAR AND 换手率 >= 20, (H+L)/2, VARCAT('当日换手率达到20%: ',VAR2STR(换手率,1))),COLORYELLOW;
DRAWTEXT(ISLASTBAR AND SZ=1 AND ABS(涨跌幅偏离SZ)>7, L,VARCAT('当日涨跌幅偏离值达到±7%:',VAR2STR(涨跌幅偏离SZ,1))),COLORRED;
DRAWTEXT(ISLASTBAR AND SZ=0 AND ABS(涨跌幅偏离SH)>7, L,VARCAT('当日涨跌幅偏离值达到±7%:',VAR2STR(涨跌幅偏离SH,1))),COLORRED;
{龙虎榜}
LHB:=SIGNALS_USER(490,0)-SIGNALS_USER(491,0); {龙虎榜净买入额}
DRAWTEXT(LHB>0 AND LHB<10000,L*0.99,VARCAT(VARCAT('●',VAR2STR(LHB,2)),'万')),COLORMAGENTA;
DRAWTEXT(LHB>10000,L*0.99,VARCAT(VARCAT('●',VAR2STR(LHB/10000,2)),'亿')),COLORMAGENTA;
DRAWTEXT(LHB<0 AND LHB>-10000,L*0.99,VARCAT(VARCAT('○',VAR2STR(LHB,2)),'万')),COLORGREEN;
DRAWTEXT(LHB<-10000,L*0.99,VARCAT(VARCAT('○',VAR2STR(LHB/10000,2)),'亿')),COLORGREEN;
{大宗成交额}
{大宗:=SIGNALS_USER(588,0)*SIGN(SIGNALS_USER(588,0)),NODRAW;
DRAWTEXT(大宗>0,(H+L)/2,VARCAT(VARCAT('---大宗',VAR2STR(大宗,0)),'万')),COLORYELLOW;};
未来函数检测结果如下：
该公式包含未来函数:DYNAINFO
解密、编写股票、期货策略请联系QQ或微信同号：88652583
相关股票指标公式
原理解析：
ZT赋值:C/1日前的C>1.095
当满足条件ZT时,在O和C之间画柱状线
输出M5:C的5日简单移动平均
输出M10:C的10日简单移动平均
输出M20:C的20日简单移动平均
输出M60:C的60日简单移动平均
输出M30:C的30日简单移动平均,NODRAW
输出M120:C的120日简单移动平均,NODRAW
V55赋值:V的55日简单移动平均
V33赋值:V的33日简单移动平均
V3赋值:V的4日简单移动平均
TJ0赋值:V33>V55
TJ1赋值:C>O
TJ2赋值:C>C的55日简单移动平均
TJ3赋值:统计1日满足V3上穿V33的天数=1 AND TJ2 AND TJ1 AND TJ0
TJ4赋值:统计1日满足V/V33>2.2的天数=1 AND TJ1 AND TJ2
DRAWTEXT(TJ3 OR TJ4,(C+O)/2,'<-放量'),画黄色
{关键涨停K提示,突破55平台第一天涨停}
GTJ0赋值:33
GTJ1赋值:统计GTJ0日满足ZT的天数=1
GTJ2赋值:C=GTJ0日内H最高值
当满足条件GTJ1 AND GTJ2时,在M60和'<-关键涨停K线'位置书写文字
当满足条件GTJ1 AND GTJ2时,在L和0之间画柱状线
}
{关键突破}
TP1赋值:COUNT(C>33日内H最高值,33)=1
TP2赋值:V/V的33日简单移动平均>1.8
当满足条件TP1 AND TP2时,在H和'<-关键突破'位置书写文字
价格振幅 := (H-L)/L*100
换手率 := DYNAINFO(37)*100
SZ := IF(CODELIKE('000') OR CODELIKE('002') OR CODELIKE('300'),1,0)
指数涨跌 := (INDEXC - 1日前的INDEXC)/1日前的INDEXC*100
个股涨跌 := (C-1日前的C)/1日前的C*100
如果个股涨跌>9.7返回10否则返回 个股涨跌
涨跌幅偏离SH := 个股涨跌 - 指数涨跌
{指数3日涨跌幅赋值: (INDEXC - 3日前的INDEXC)/3日前的INDEXC*100
个股3日涨跌幅赋值: (C-3日前的C)/3日前的C*100
三日涨跌幅偏离赋值: 个股3日涨跌幅-指数3日涨跌幅的绝对值
}
三日涨跌幅SZ赋值: 涨跌幅偏离SZ + 1日前的涨跌幅偏离SZ+ 2日前的涨跌幅偏离SZ的绝对值
三日涨跌幅SH赋值: 涨跌幅偏离SH + 1日前的涨跌幅偏离SH+ 2日前的涨跌幅偏离SH的绝对值
{DRAWTEXT(ISLASTBAR AND 三日涨跌幅偏离 >= 20,H*1.04, VARCAT('3日涨跌幅振幅偏离达到20%: ',VAR2STR(三日涨跌幅偏离,1))),画红色
}
DRAWTEXT(ISLASTBAR AND SZ=1 AND 三日涨跌幅SZ >= 20, H*1.04,VARCAT('3日涨跌幅振幅偏离累计达到20%:',VAR2STR(三日涨跌幅SZ,1))),画红色
DRAWTEXT(ISLASTBAR AND SZ=0 AND 三日涨跌幅SH >= 20, H*1.04,VARCAT('3日涨跌幅振幅偏离累计达到20%:',VAR2STR(三日涨跌幅SH,1))),画红色
DRAWTEXT(ISLASTBAR AND 价格振幅 >= 15,H, VARCAT('当日价格振幅达到15%: ',VAR2STR(价格振幅,1))),DRAWABOVE,画红色
DRAWTEXT(ISLASTBAR AND 换手率 >= 20, (H+L)/2, VARCAT('当日换手率达到20%: ',VAR2STR(换手率,1))),画黄色
DRAWTEXT(ISLASTBAR AND SZ=1 AND 涨跌幅偏离SZ的绝对值>7, L,VARCAT('当日涨跌幅偏离值达到±7%:',VAR2STR(涨跌幅偏离SZ,1))),画红色
DRAWTEXT(ISLASTBAR AND SZ=0 AND 涨跌幅偏离SH的绝对值>7, L,VARCAT('当日涨跌幅偏离值达到±7%:',VAR2STR(涨跌幅偏离SH,1))),画红色
{龙虎榜}
LHB赋值:SIGNALS_USER(490,0)-SIGNALS_USER(491,0)
{龙虎榜净买入额}
DRAWTEXT(LHB>0 AND LHB<10000,L*0.99,VARCAT(VARCAT('●',VAR2STR(LHB,2)),'万')),画洋红色
DRAWTEXT(LHB>10000,L*0.99,VARCAT(VARCAT('●',VAR2STR(LHB/10000,2)),'亿')),画洋红色
DRAWTEXT(LHB<0 AND LHB>-10000,L*0.99,VARCAT(VARCAT('○',VAR2STR(LHB,2)),'万')),画绿色
DRAWTEXT(LHB<-10000,L*0.99,VARCAT(VARCAT('○',VAR2STR(LHB/10000,2)),'亿')),画绿色
{大宗成交额}
{大宗赋值:SIGNALS_USER(588,0)*SIGN(SIGNALS_USER(588,0)),NODRAW
DRAWTEXT(大宗>0,(H+L)/2,VARCAT(VARCAT('---大宗',VAR2STR(大宗,0)),'万')),画黄色
}
