有庄财神通达信公式 副图 源码附图
VAR1:=((CLOSE - LLV(LOW,50))/(HHV(HIGH,50) - LLV(LOW,50)))*(100);
VAR2:=REVERSE(VAR1);
VAR3:=SMA(VAR1,6,1);
K:=SMA(VAR3,4,1);
D:=SMA(K,4,1);
STICKLINE((K >= D),K,D,6,0),COLOR0000A8;
STICKLINE((K >= D),K,D,5,0),COLOR0000C0;
STICKLINE((K >= D),K,D,4,0),COLOR0000E0;
STICKLINE((K >= D),K,D,3,0),COLOR0000F0;
STICKLINE((K >= D),K,D,2,0),COLOR0000D0;
STICKLINE((K >= D),K,D,1,0),COLOR8080FF;
STICKLINE((K <= D),K,D,6,0),COLOR008800;
STICKLINE((K <= D),K,D,5,0),COLOR009900;
STICKLINE((K <= D),K,D,4,0),COLOR00AA00;
STICKLINE((K <= D),K,D,3,0),COLOR00BB00;
STICKLINE((K <= D),K,D,2,0),COLOR00CC00;
STICKLINE((K <= D),K,D,1,0),COLOR00DD00;
AA5:=STRCAT(STRCAT('【 高位跌幅 : ',CON2STR((HHV(C,240)-CONST(C))/CONST(C)*100,2)),'﹪ 】');
DRAWTEXT_FIX(C>0,0.06,0.85,0,AA5),COLORWHITE;
AA6:=STRCAT(STRCAT('【 低位涨幅 : ',CON2STR((CONST(C)-LLV(C,240))/LLV(C,240)*100,2)),'﹪ 】');
DRAWTEXT_FIX(C>0,0.27,0.85,0,AA6),COLORWHITE;
AA7:=STRCAT(STRCAT('【 个股振幅 : ',CON2STR(DYNAINFO(13)*100,2)),'﹪ 】');
DRAWTEXT_FIX(C>0,0.50,0.85,0,AA7),COLORWHITE;
AA8:=STRCAT(STRCAT('【 双重跑道费 : ',CON2STR(C*0.006,2)),'元 】');
DRAWTEXT_FIX(C>0,0.75,0.85,0,AA8),COLORWHITE;
{==============}
敢死队:= (EXPMA(CLOSE,500)-REF(EXPMA(CLOSE,500),1))/REF(EXPMA(CLOSE,500),1)*100, COLORSTICK;
DRAWICON(CROSS(EXPMA(敢死队,120)-0.0004,EXPMA(敢死队,200)),45,11);
DRAWTEXT(CROSS(EXPMA(敢死队,120)-0.0004,EXPMA(敢死队,200)),40,'敢死队'),COLORRED;
{=========}
VAR18:=EMA(EMA(CLOSE,13),13);
控盘:=(VAR18-REF(VAR18,1))/REF(VAR18,1)*1000;
财:=(EMA(CLOSE,8)-EMA(CLOSE,55))*10,COLORRED,LINETHICK1;
神:=EMA(财,3),COLORGREEN,LINETHICK1;
BTJ1:=(C-DYNAINFO(11))/DYNAINFO(11)<-0.03;
BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;
BTJ3:=CROSS(财,神) AND 财<-0.3;
庄:= BTJ1 AND BTJ2 AND BTJ3;
有庄:=FILTER(庄,55),COLORWHITE;
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);
DRAWICON(BTJ81,40,17);
DRAWTEXT(BTJ81,30,'盘中有庄'),COLORYELLOW;
{===========}{}
VAR23:=HHV(CLOSE,90);
VAR24:=LLV(CLOSE,90);
VAR25:=VAR23-VAR24;
VAR26:=EMA((CLOSE-VAR24)/VAR25-0.5,14);
ZLSP:=VAR26*20;{}
VAR27:=REF(HHV(CLOSE,66),2);
VAR28:=CROSS(CLOSE,VAR27) AND (HHV(CLOSE,110)/LLV(CLOSE,110)-1)*100<45 AND ZLSP<5.666;
VAR31:=15*FILTER(VAR28,41)>10;
主力扫盘:VAR31*50,COLORMAGENTA;
DRAWTEXT(VAR31,60,'主力扫盘'),COLORYELLOW;
DRAWICON(主力扫盘=50,50,18);
未来函数检测结果如下：
该公式包含未来函数:DYNAINFO
解密、编写股票、期货策略请联系QQ或微信同号：88652583
相关股票指标公式
原理解析：
VAR1赋值:((收盘价 - 50日内最低价最低值)/(50日内最高价最高值 - 50日内最低价最低值))*(100)
VAR2赋值:VAR1的相反数
VAR1的6日[1日权重]移动平均
VAR3的4日[1日权重]移动平均
K的4日[1日权重]移动平均
STICKLINE((K >= D),K,D,6,0),COLOR0000A8
STICKLINE((K >= D),K,D,5,0),COLOR0000C0
STICKLINE((K >= D),K,D,4,0),COLOR0000E0
STICKLINE((K >= D),K,D,3,0),COLOR0000F0
STICKLINE((K >= D),K,D,2,0),COLOR0000D0
STICKLINE((K >= D),K,D,1,0),COLOR8080FF
STICKLINE((K <= D),K,D,6,0),COLOR008800
STICKLINE((K <= D),K,D,5,0),COLOR009900
STICKLINE((K <= D),K,D,4,0),COLOR00AA00
STICKLINE((K <= D),K,D,3,0),COLOR00BB00
STICKLINE((K <= D),K,D,2,0),COLOR00CC00
STICKLINE((K <= D),K,D,1,0),COLOR00DD00
AA5:=STRCAT(STRCAT('【 高位跌幅 : ',CON2STR((240日内C最高值-CONST(C))/CONST(C)*100,2)),'﹪ 】')
当满足条件C>0时,在横轴0.06纵轴0.85位置书写文字
AA6:=STRCAT(STRCAT('【 低位涨幅 : ',CON2STR((CONST(C)-240日内C最低值)/240日内C最低值*100,2)),'﹪ 】')
当满足条件C>0时,在横轴0.27纵轴0.85位置书写文字
AA7:=STRCAT(STRCAT('【 个股振幅 : ',CON2STR(DYNAINFO(13)*100,2)),'﹪ 】')
当满足条件C>0时,在横轴0.50纵轴0.85位置书写文字
AA8:=STRCAT(STRCAT('【 双重跑道费 : ',CON2STR(C*0.006,2)),'元 】')
当满足条件C>0时,在横轴0.75纵轴0.85位置书写文字
{==============}
敢死队赋值: (收盘价的500日指数移动平均-1日前的收盘价的500日指数移动平均)/1日前的收盘价的500日指数移动平均*100, COLORSTICK
DRAWICON(敢死队的120日指数移动平均-0.0004上穿敢死队的200日指数移动平均,45,11)
DRAWTEXT(敢死队的120日指数移动平均-0.0004上穿敢死队的200日指数移动平均,40,'敢死队'),COLORRED
{=========}
VAR18:=收盘价的13日指数移动平均,13)
控盘赋值:(VAR18-1日前的VAR18)/1日前的VAR18*1000
财赋值:(收盘价的8日指数移动平均-收盘价的55日指数移动平均)*10,COLORRED,LINETHICK1
神赋值:财的3日指数移动平均,画绿色,LINETHICK1
BTJ1赋值:(C-DYNAINFO(11))/DYNAINFO(11)<-0.03
BTJ2赋值:控盘>1日前的控盘 AND 控盘<-0.2
BTJ3赋值:财上穿神 AND 财<-0.3
庄赋值: BTJ1 AND BTJ2 AND BTJ3
有庄赋值:庄的55过滤,画白色
BTJ81赋值:BTJ1 AND BTJ2 AND BTJ3的13过滤
当满足条件BTJ81时,在40和17之间画图标
当满足条件BTJ81时,在30和'盘中有庄'位置书写文字
{===========}{}
VAR23:=90日内收盘价最高值
VAR24:=90日内收盘价最低值
VAR25:=VAR23-VAR24
VAR26:=EMA((收盘价-VAR24)/VAR25-0.5,14)
ZLSP赋值:VAR26*20
{}
VAR27:=REF(66日内收盘价最高值,2)
VAR28:=收盘价上穿VAR27 AND (110日内收盘价最高值/110日内收盘价最低值-1)*100<45 AND ZLSP<5.666
VAR31:=15*VAR28的41过滤>10
输出主力扫盘:VAR31*50,画洋红色
当满足条件VAR31时,在60和'主力扫盘'位置书写文字
当满足条件主力扫盘=50时,在50和18之间画图标
