通达信〖机构多维侦察〗核心从七个关键维度入手进行系统性量化评分源码
这套指标是一套多维度的股票综合评估工具，其核心在于从机构成本、趋势结构、量能活跃度、动量强度、筹码抬升、资金斜率以及风险背离共七个关键维度入手，对个股进行系统性的量化评分。
在实际操作中，建议重点关注“综合得分”的变化：如果多数维度同步出现红色信号，且整体评分处于较高水平，往往意味着主力资金正在介入、走势保持健康，且量价配合较为理想，此时更适合考虑买入或继续持有。反之，当绿色警示信号频繁出现，尤其是伴随风险背离或资金面转弱的迹象时，通常说明上行动力正在衰减，此时应果断考虑降低仓位，以规避潜在风险。
成本周期:=26;
趋势周期:=21;
量能周期:=13;
动量周期:=8;
TYP:=(H+L+C)/3;
机构成本:=SUM(VOL*TYP,成本周期)/SUM(VOL,成本周期);
成本达标:=C>机构成本 AND 机构成本>REF(机构成本,2);
成本恶化:=C< 机构成本 OR 机构成本< REF(机构成本,2);
EMA快:=EMA(C,趋势周期/2);
EMA慢:=EMA(C,趋势周期);
趋势达标:=EMA快>EMA慢 AND EMA慢>REF(EMA慢,3);
趋势恶化:=EMA快< EMA慢 OR EMA慢< REF(EMA慢,3);
量能均值:=MA(V,量能周期);
量能达标:=V>量能均值*0.95 AND V>REF(V,1)*0.8;
量能恶化:=V< 量能均值*0.7;
动量线:=EMA(C/REF(C,1)-1,动量周期)*100;
动量达标:=动量线>0 AND 动量线>REF(动量线,1);
动量恶化:=动量线< 0 OR 动量线< REF(动量线,2);
筹码抬升:=EMA(C,5)-EMA(C,13);
抬升达标:=筹码抬升>0 AND 筹码抬升>REF(筹码抬升,1);
抬升恶化:=筹码抬升< 0;
成交额均值:=MA(AMOUNT,11);
资金达标:=AMOUNT>成交额均值 AND C>REF(C,1);
资金恶化:=AMOUNT< 成交额均值 AND C< REF(C,1);
RSI6:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;
背离恶化:=C>REF(C,1) AND RSI6< REF(RSI6,1);
Y1:=70;
Y2:=60;
Y3:=50;
Y4:=40;
Y5:=30;
Y6:=20;
Y7:=10;
DRAWTEXT(成本达标,Y1,'■'),COLORRED;
DRAWTEXT(成本恶化,Y1,'■'),COLORGREEN;
DRAWTEXT(NOT(成本达标) AND NOT(成本恶化),Y1,'-'),COLORGRAY;
DRAWTEXT(趋势达标,Y2,'■'),COLORRED;
DRAWTEXT(趋势恶化,Y2,'■'),COLORGREEN;
DRAWTEXT(NOT(趋势达标) AND NOT(趋势恶化),Y2,'-'),COLORGRAY;
DRAWTEXT(量能达标,Y3,'■'),COLORRED;
DRAWTEXT(量能恶化,Y3,'■'),COLORGREEN;
DRAWTEXT(NOT(量能达标) AND NOT(量能恶化),Y3,'-'),COLORGRAY;
DRAWTEXT(动量达标,Y4,'■'),COLORRED;
DRAWTEXT(动量恶化,Y4,'■'),COLORGREEN;
DRAWTEXT(NOT(动量达标) AND NOT(动量恶化),Y4,'-'),COLORGRAY;
DRAWTEXT(抬升达标,Y5,'■'),COLORRED;
DRAWTEXT(抬升恶化,Y5,'■'),COLORGREEN;
DRAWTEXT(NOT(抬升达标) AND NOT(抬升恶化),Y5,'-'),COLORGRAY;
DRAWTEXT(资金达标,Y6,'■'),COLORRED;
DRAWTEXT(资金恶化,Y6,'■'),COLORGREEN;
DRAWTEXT(NOT(资金达标) AND NOT(资金恶化),Y6,'-'),COLORGRAY;
DRAWTEXT(背离恶化,Y7,'■'),COLORGREEN;
DRAWTEXT(NOT(背离恶化),Y7,'-'),COLORGRAY;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.08,0,'风险背离'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.18,0,'资金斜率'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.28,0,'筹码抬升'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.38,0,'动量强度'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.48,0,'量能活跃'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.58,0,'趋势结构'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.68,0,'机构成本'),COLORWHITE;
红箭头总数:=IF(成本达标,1,0)+IF(趋势达标,1,0)+IF(量能达标,1,0)+IF(动量达标,1,0)+IF(抬升达标,1,0)+IF(资金达标,1,0);
综合得分:红箭头总数,NODRAW;
DRAWTEXT_FIX(ISLASTBAR,0.22,0.01,0,'综合得分：'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.32,0.01,0,CON2STR(综合得分,0)),COLORYELLOW;
STICKLINE(1,10,70,0,0),COLORGRAY;
STICKLINE(1,20,20,0,0),COLORGRAY;
STICKLINE(1,30,30,0,0),COLORGRAY;
STICKLINE(1,40,40,0,0),COLORGRAY;
STICKLINE(1,50,50,0,0),COLORGRAY;
STICKLINE(1,60,60,0,0),COLORGRAY;
STICKLINE(1,70,70,0,0),COLORGRAY;
未来函数检测结果
成本周期赋值:26
趋势周期赋值:21
量能周期赋值:13
动量周期赋值:8
TYP赋值:(最高价+最低价+收盘价)/3
机构成本赋值:成交量(手)*TYP的成本周期日累和/成交量(手)的成本周期日累和
成本达标赋值:收盘价>机构成本 AND 机构成本>2日前的机构成本
成本恶化赋值:收盘价< 机构成本 OR 机构成本< 2日前的机构成本
EMA快赋值:收盘价的趋势周期/2日指数移动平均
EMA慢赋值:收盘价的趋势周期日指数移动平均
趋势达标赋值:EMA快>EMA慢 AND EMA慢>3日前的EMA慢
趋势恶化赋值:EMA快< EMA慢 OR EMA慢< 3日前的EMA慢
量能均值赋值:成交量(手)的量能周期日简单移动平均
量能达标赋值:成交量(手)>量能均值*0.95 AND 成交量(手)>1日前的成交量(手)*0.8
量能恶化赋值:成交量(手)< 量能均值*0.7
动量线赋值:收盘价/1日前的收盘价-1的动量周期日指数移动平均*100
动量达标赋值:动量线>0 AND 动量线>1日前的动量线
动量恶化赋值:动量线< 0 OR 动量线< 2日前的动量线
筹码抬升赋值:收盘价的5日指数移动平均-收盘价的13日指数移动平均
抬升达标赋值:筹码抬升>0 AND 筹码抬升>1日前的筹码抬升
抬升恶化赋值:筹码抬升< 0
成交额均值赋值:成交额(元)的11日简单移动平均
资金达标赋值:成交额(元)>成交额均值 AND 收盘价>1日前的收盘价
资金恶化赋值:成交额(元)< 成交额均值 AND 收盘价< 1日前的收盘价
RSI6赋值:收盘价-1日前的收盘价和0的较大值的6日[1日权重]移动平均/收盘价-1日前的收盘价的绝对值的6日[1日权重]移动平均*100
背离恶化赋值:收盘价>1日前的收盘价 AND RSI6< 1日前的RSI6
Y1赋值:70
Y2赋值:60
Y3赋值:50
Y4赋值:40
Y5赋值:30
Y6赋值:20
Y7赋值:10
当满足条件成本达标时,在Y1位置书写文字,画红色
当满足条件成本恶化时,在Y1位置书写文字,画绿色
当满足条件取反ANDNOT(成本恶化)时,在Y1位置书写文字,画深灰色
当满足条件趋势达标时,在Y2位置书写文字,画红色
当满足条件趋势恶化时,在Y2位置书写文字,画绿色
当满足条件取反ANDNOT(趋势恶化)时,在Y2位置书写文字,画深灰色
当满足条件量能达标时,在Y3位置书写文字,画红色
当满足条件量能恶化时,在Y3位置书写文字,画绿色
当满足条件取反ANDNOT(量能恶化)时,在Y3位置书写文字,画深灰色
当满足条件动量达标时,在Y4位置书写文字,画红色
当满足条件动量恶化时,在Y4位置书写文字,画绿色
当满足条件取反ANDNOT(动量恶化)时,在Y4位置书写文字,画深灰色
当满足条件抬升达标时,在Y5位置书写文字,画红色
当满足条件抬升恶化时,在Y5位置书写文字,画绿色
当满足条件取反ANDNOT(抬升恶化)时,在Y5位置书写文字,画深灰色
当满足条件资金达标时,在Y6位置书写文字,画红色
当满足条件资金恶化时,在Y6位置书写文字,画绿色
当满足条件取反ANDNOT(资金恶化)时,在Y6位置书写文字,画深灰色
当满足条件背离恶化时,在Y7位置书写文字,画绿色
当满足条件取反时,在Y7位置书写文字,画深灰色
当满足条件是否最后一个周期时,在横轴0.01纵轴0.08位置书写文字,画白色
当满足条件是否最后一个周期时,在横轴0.01纵轴0.18位置书写文字,画白色
当满足条件是否最后一个周期时,在横轴0.01纵轴0.28位置书写文字,画白色
当满足条件是否最后一个周期时,在横轴0.01纵轴0.38位置书写文字,画白色
当满足条件是否最后一个周期时,在横轴0.01纵轴0.48位置书写文字,画白色
当满足条件是否最后一个周期时,在横轴0.01纵轴0.58位置书写文字,画白色
当满足条件是否最后一个周期时,在横轴0.01纵轴0.68位置书写文字,画白色
红箭头总数赋值:如果成本达标,返回1,否则返回0+如果趋势达标,返回1,否则返回0+如果量能达标,返回1,否则返回0+如果动量达标,返回1,否则返回0+如果抬升达标,返回1,否则返回0+如果资金达标,返回1,否则返回0
输出综合得分:红箭头总数,NODRAW
当满足条件是否最后一个周期时,在横轴0.22纵轴0.01位置书写文字,画白色
当满足条件是否最后一个周期时,在横轴0.32纵轴0.01位置书写文字,画黄色
当满足条件1时,在10和70位置之间画柱状线,宽度为0,0不为0则画空心柱.,画深灰色
当满足条件1时,在20和20位置之间画柱状线,宽度为0,0不为0则画空心柱.,画深灰色
当满足条件1时,在30和30位置之间画柱状线,宽度为0,0不为0则画空心柱.,画深灰色
当满足条件1时,在40和40位置之间画柱状线,宽度为0,0不为0则画空心柱.,画深灰色
当满足条件1时,在50和50位置之间画柱状线,宽度为0,0不为0则画空心柱.,画深灰色
当满足条件1时,在60和60位置之间画柱状线,宽度为0,0不为0则画空心柱.,画深灰色
当满足条件1时,在70和70位置之间画柱状线,宽度为0,0不为0则画空心柱.,画深灰色
