通达信次日涨停价–当日倍量主图指标公式源码

次日涨停价:=IF(NAMELIKE(‘ST’) OR NAMELIKE(‘*ST’) OR NAMELIKE(‘SST’)OR NAMELIKE(‘S*ST’) OR NAMELIKE(‘S ST’) ,C*1.05,IF((CODELIKE(‘688’) OR (CODELIKE(‘300’) AND DATE>=1200824)),C*1.2,C*1.1));
{次日涨停价赋值:如果模糊匹配品种名称或NAMELIKE(‘*ST’)或NAMELIKE(‘SST’)或NAMELIKE(‘S*ST’)或NAMELIKE(‘SST’),返回收盘价*1.05,否则返回如果(模糊匹配品种代码或(模糊匹配品种代码和DATE>=1200824)),返回收盘价*1.2,否则返回收盘价*1.1;}

DRAWTEXT_FIX(1,0.85,0.03,0,STRCAT(‘次日涨停价：’,CON2STR(次日涨停价,2))),COLORYELLOW;
{当满足条件1时,在横轴0.85纵轴0.03位置书写文字,画黄色;}

DRAWTEXT_FIX(1,0.02,0,0,’所属行业：’)COLOR0080FF;
{当满足条件1时,在横轴0.02纵轴0位置书写文字颜色:0080FF;}

DRAWTEXT_FIX(1,0.10,0,0,HYBLOCK)COLOR0080FF;
{当满足条件1时,在横轴0.10纵轴0位置书写文字颜色:0080FF;}

DRAWTEXT_FIX(C>O,0,0.9,0,’分析家公式网HTTP://WWW.70822.COM’),COLOR222222;
{当满足条件收阳线时,在横轴0纵轴0.9位置书写文字,颜色:222222;}

DIFF:=EMA(CLOSE,9)-EMA(CLOSE,26);
{DIFF赋值:收盘价的9日指数移动平均-收盘价的26日指数移动平均;}

DEAA:=EMA(DIFF,12);
{DEAA赋值:DIFF的12日指数移动平均;}

MACDD:=(DIFF-DEAA)*2;
{MACDD赋值:(DIFF-DEAA)*2;}

CTBC5:MA(C,5);
{输出CTBC5:收盘价的5日简单移动平均;}

CTBC10:MA(C,10);
{输出CTBC10:收盘价的10日简单移动平均;}

CTBC20:MA(C,20);
{输出CTBC20:收盘价的20日简单移动平均;}

MA60:MA(C,60);
{输出MA60:收盘价的60日简单移动平均;}

ZT:=IF(CODELIKE(’68’) OR CODELIKE(’30’),ZTPRICE(REF(C,1),0.2),IF(CODELIKE(‘8’),ZTPRICE(REF(C,1),0.3),IF((NAMELIKE(‘ST’) OR NAMELIKE(‘*’)),ZTPRICE(REF(C,1),0.05),ZTPRICE(REF(C,1),0.1))));
{ZT赋值:如果模糊匹配品种代码或CODELIKE(’30’),返回计算涨停价,否则返回如果模糊匹配品种代码,返回计算涨停价,否则返回如果(模糊匹配品种名称或NAMELIKE(‘*’)),返回计算涨停价,否则返回计算涨停价;}

CTA1:=BARSCOUNT(CLOSE)>=10;
{CTA1赋值:收盘价的有效数据周期数>=10;}

CTA2:=EMA((3*CLOSE+HIGH+LOW+OPEN)/6,20),COLORBLUE,LINETHICK2;
{CTA2赋值:(3*收盘价+最高价+最低价+开盘价)/6的20日指数移动平均,画蓝色,线宽为2;}

CTA3:=HHV(CTA2,5),LINETHICK2,COLORGREEN;
{CTA3赋值:5日内CTA2的最高值,线宽为2,画绿色;}

CTA5:=CTA2-(CTA3-CTA2),LINETHICK2,COLORRED;
{CTA5赋值:CTA2-(CTA3-CTA2),线宽为2,画红色;}

CTA6:=CTA3=CTA5 AND REF(CTA3,1)>REF(CTA5,1);
{CTA6赋值:CTA3=CTA5 和 1日前的CTA3>1日前的CTA5;}

CTA:=FILTER(CTA3=CTA5 AND BARSLAST(CTA6) <=4 AND CTA1 AND C>=O AND V>=REF(V,1)*2 AND C/REF(C,1)>1.03 ,5);
{CTA赋值:CTA3=CTA5和BARSLAST(CTA6)<=4和CTA1和C>=O和V>=1日前的成交量(手)*2和C/1日前的收盘价>1.03的5日过滤;}

STICKLINE(CTA,O,C,2.2,0),COLORMAGENTA ;
{当满足条件CTA时,在开盘价和收盘价位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,画洋红色 ;}

CTA6倍量:=V>=REF(V,1)*2 AND C>=O;
{CTA6倍量赋值:成交量(手)>=1日前的成交量(手)*2 和 收盘价>=开盘价;}

STICKLINE(CTA6倍量 AND NOT(CTA),O,C,2.2,0),COLORYELLOW;
{当满足条件CTA6倍量和NOT(CTA)时,在开盘价和收盘价位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,画黄色;}

DRAWTEXT(CTA6倍量 AND NOT(CTA),L*1,’ ★当日倍量’),COLORYELLOW;
{当满足条件CTA6倍量和NOT(CTA)时,在最低价*1位置书写文字,画黄色;}

DRAWICON(CTA6倍量 AND NOT(CTA),L*1,1);
{当满足条件CTA6倍量和NOT(CTA)时,在最低价*1位置画1号图标;}