成本线限时通达信公式 副图 源码附图
XS:=1;
{涨停};
ZT:=C/REF(C,1)>1.096 AND C=H;
STICKLINE(ZT,O,C,2,0),COLORYELLOW;
{跌停};
DT:=C/REF(C,1)<0.913 AND C=L;
STICKLINE(DT,O,C,2,0),COLORGREEN;
{均价压力支撑};
CBX:=(EMA(C,5)+EMA(C,10)+EMA(C,20)+EMA(C,30)+EMA(C,60))/5;
成本线:EMA(CBX,5)*XS,COLORMAGENTA,LINETHICK2;
BB05:=ATAN((成本线/REF(成本线,1)-1)*100)*180/3.1416;
IF(BB05>30 AND 成本线>REF(成本线,1),成本线,DRAWNULL)*XS,LINETHICK2,COLORRED;
IF(BB05<0 AND 成本线<REF(成本线,1), 成本线,DRAWNULL)*XS,LINETHICK2,COLORGREEN;
压1:EMA(HHV(HIGH,10),5)*XS,COLORBLUE,DOTLINE;
压2:EMA(HHV(C,10),5)*XS,COLORBLUE;
撑1:EMA(LLV(C,10),5)*XS,COLORYELLOW;
撑2:EMA(LLV(LOW,10),5)*XS,COLORYELLOW,DOTLINE;
{现价画直线}
现价:DRAWLINE(CURRBARSCOUNT=TOTALBARSCOUNT,CONST(C),CURRBARSCOUNT=1,C,3),DOTLINE,COLORLIGRAY;
{所属板块};
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0.78,0,STRCAT(Z3,GNBLOCK)),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0,0.85,0,FGBLOCK),COLORLIMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0,0.90,0,EXTERNSTR(0,3)),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0,0.95,0,EXTERNSTR(0,6)),COLORLIBLUE;
DRAWTEXT_FIX(ISLASTBAR,0,100,0,EXTERNSTR(0,12)),COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0,100,0,EXTERNSTR(0,1)),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.02,1-0.05,0,STRCAT(STRCAT('流通市值：',CON2STR((FINANCE(40)/100000000),2)),'亿')),COLORWHITE;
成交额:=IF(DYNAINFO(10)>99999999,STRCAT(CON2STR(DYNAINFO(10)/100000000,2),'亿'),STRCAT(CON2STR(DYNAINFO(10)/10000,0),'万'));
DRAWTEXT_FIX(1,0.26,1-0.05,0,成交额),COLORF4E202;
DRAWTEXT_FIX(ISLASTBAR,0.36,1-0.05,0,STRCAT('换手率: ', CON2STR(DYNAINFO(37)*100,2))),COLORGREEN;
{筹码};
庄筹线:=EMA(WINNER(C)*81,5)*XS;
散筹线:=EMA((WINNER(C*1.1)-WINNER(C*0.91))*72,3)*XS;
DRAWICON(庄筹线<REF(庄筹线,1),HIGH*1.0088,2);
DRAWICON(庄筹线>REF(庄筹线,1),LOW*1,1);
未来函数检测结果如下：
该公式包含未来函数:WINNER
该公式包含未来函数:DYNAINFO
该公式包含未来函数:FINANCE
解密、编写股票、期货策略请联系QQ或微信同号：88652583
相关股票指标公式
原理解析：
XS赋值:1
{涨停}
ZT赋值:C/1日前的C>1.096 AND C=H
当满足条件ZT时,在O和C之间画柱状线
{跌停}
DT赋值:C/1日前的C<0.913 AND C=L
当满足条件DT时,在O和C之间画柱状线
{均价压力支撑}
CBX赋值:(C的5日指数移动平均+C的10日指数移动平均+C的20日指数移动平均+C的30日指数移动平均+C的60日指数移动平均)/5
输出成本线:CBX的5日指数移动平均*XS,画洋红色, 线宽为2
BB05赋值:ATAN((成本线/1日前的成本线-1)*100)*180/3.1416
IF(BB05>30 AND 成本线>1日前的成本线,成本线,DRAWNULL)*XS, 线宽为2,画红色
IF(BB05<0 AND 成本线<1日前的成本线, 成本线,DRAWNULL)*XS, 线宽为2,画绿色
输出压1:E10日内最高价最高值的5日简单移动平均*XS, 画蓝色,DOTLINE
输出压2:E10日内C最高值的5日简单移动平均*XS, 画蓝色
输出撑1:E10日内C最低值的5日简单移动平均*XS,画黄色
输出撑2:E10日内最低价最低值的5日简单移动平均*XS,画黄色,DOTLINE
输出{现价画直线}
现价:DRAWLINE( 到最后交易的周期=TOTALBARSCOUNT,CONST(C), 到最后交易的周期=1,C,3),DOTLINE,COLORLIGRAY
{所属板块}
Z1赋值:STRCAT(HYBLOCK,' ')
Z2赋值:STRCAT(Z1,DYBLOCK)
Z3赋值:STRCAT(Z2,' ')
DRAWTEXT_FIX(ISLASTBAR,0,0.78,0,STRCAT(Z3,GNBLOCK)),COLORLIRED
当满足条件ISLASTBAR时,在横轴0纵轴0.85位置书写文字
DRAWTEXT_FIX(ISLASTBAR,0,0.90,0,EXTERNSTR(0,3)),画白色
DRAWTEXT_FIX(ISLASTBAR,0,0.95,0,EXTERNSTR(0,6)),COLORLIBLUE
DRAWTEXT_FIX(ISLASTBAR,0,100,0,EXTERNSTR(0,12)),COLORLIGREEN
DRAWTEXT_FIX(ISLASTBAR,0,100,0,EXTERNSTR(0,1)),画黄色
DRAWTEXT_FIX(ISLASTBAR,0.02,1-0.05,0,STRCAT(STRCAT('流通市值：',CON2STR((FINANCE(40)/100000000),2)),'亿')),画白色
成交额赋值:IF(DYNAINFO(10)>99999999,STRCAT(CON2STR(DYNAINFO(10)/100000000,2),'亿'),STRCAT(CON2STR(DYNAINFO(10)/10000,0),'万'))
当满足条件1时,在横轴0.26纵轴1-0.05位置书写文字
输出DRAWTEXT_FIX(ISLASTBAR,0.36,1-0.05,0,STRCAT('换手率: ', CON2STR(DYNAINFO(37)*100,2))),画绿色
{筹码}
庄筹线赋值:EMA(C计算的获利盘比例*81,5)*XS
散筹线赋值:EMA((C*1.1计算的获利盘比例-WINNER(C*0.91))*72,3)*XS
DRAWICON(庄筹线<1日前的庄筹线,最高价*1.0088,2)
DRAWICON(庄筹线>1日前的庄筹线,最低价*1,1)
