通达信〖游资控盘监测〗将趋势资金控盘度等多个维度信号集中呈现源码
该指标是一套集成化的盘中看盘面板，将趋势、资金、控盘度等多个维度的信号集中呈现在同一张图上，便于快速判断个股强弱。
功能说明：
它把复杂行情转化为多条彩色柱线。上方柱线侧重观察大方向，例如趋势是否转强、上涨动能是否充足、主力资金是否入场；下方柱线侧重观察短线节奏，例如是否出现超卖、可把握反弹，或是否上涨过热、面临回调。左下角同步显示当日开盘涨跌幅及盘中波动情况。
使用思路：
当上方代表趋势和资金的柱线同步变色时，通常意味着个股进入强势多头阶段，适合持股或顺势跟进；当下方代表短线超卖的柱线变色时，往往对应急跌后的反弹机会，适合短线快进快出。相反，若出现代表过热的信号，则需注意回调风险。
DRAWRECTREL(1500,990,0,0,RGB(10,0,0));
DBA01:=SUM(AMOUNT*CLOSE,1)/SUM(AMOUNT,1);
DBA02:=EMA(DBA01,5);
DBA03:=(DBA01-DBA02)*100/DBA01,NODRAW,COLORRED;
DBA04:=DBA03!=DRAWNULL;
DBA05:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
DBA06:=SMA(DBA05,4,1);
DBA07:=SMA(DBA06,3,1);
DBA08:=(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100;
DBA09:=SMA(DBA08,6,1);
DBA10:=SMA(DBA09,3,1);
DBA11:=EMA(CLOSE,17);
DBA12:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
DBA13:=SMA(DBA12,3,1);
DBA14:=SMA(DBA13,3,1);
DBA15:=3*DBA13-2*DBA14;
DBA16:=DBA15>=95;
DBA17:=REF(CLOSE,1);
DBA18:=SMA(MAX(CLOSE-DBA17,0),9,1)/SMA(ABS(CLOSE-DBA17),9,1)*100;
DBA19:=DBA18>=75;
DBA20:=FORCAST(EMA(CLOSE,5),6);
DBA21:=FORCAST(EMA(CLOSE,8),6);
DBA22:=FORCAST(EMA(CLOSE,11),6);
DBA23:=FORCAST(EMA(CLOSE,14),6);
DBA24:=FORCAST(EMA(CLOSE,17),6);
DBA25:=DBA20+DBA21+DBA22+DBA23-4*DBA24;
DBA26:=EMA(DBA25,2);
DBA27:=EMA(EMA(CLOSE,9),9);
DBA28:=100*WINNER(CLOSE*0.95);
DBA29:=DBA09>DBA10&&DBA10>REF(DBA10,1)&&DBA04,NODRAW,COLORYELLOW;
DBA30:=DBA26>REF(DBA26,1),NODRAW,COLORRED;
DBA31:=DBA16||DBA19,NODRAW,COLORLIMAGENTA;
DBA32:=DBA03>0&&CLOSE>DBA11&&DBA11>REF(DBA11,1),NODRAW,COLOR0080FF;
DBA33:=CLOSE>=OPEN&&CROSS(DBA06,DBA07)&&DBA07<=50&&DBA04,NODRAW,COLORFF00FF;
DBA34:=(DBA27-REF(DBA27,1))/REF(DBA27,1)*1000;
DBA35:=CROSS(DBA34,0);
DBA36:=IF(DBA34< 0,DBA34,0),NODRAW,COLORWHITE;
DBA37:=IF(DBA35,5,0),NODRAW,COLORBROWN;
DBA38:=IF(DBA34>REF(DBA34,1)&&DBA34>0,DBA34,0),NODRAW,COLORRED;
DBA39:=IF(DBA28>50&&COST(85)< CLOSE&&DBA34>0,DBA34,0),NODRAW,COLORFF00FF;
DBA40:=IF(DBA34< REF(DBA34,1)&&DBA34>0,DBA34,0),NODRAW,COLOR00FF00;
STICKLINE(DBA29>0,84,100,2,0),COLOR22B4EE;
STICKLINE(DBA29=0,84,100,2,1),COLORGRAY;
STICKLINE(DBA30>0,68,78,2,0),COLOR22B4EE;
STICKLINE(DBA30=0,68,78,2,1),COLORGRAY;
STICKLINE(DBA31>0,54,64,2,0),COLOR22B4EE;
STICKLINE(DBA31=0,54,64,2,1),COLORGRAY;
STICKLINE(DBA32>0,36,46,2,0),COLOR22B4EE;
STICKLINE(DBA32=0,36,46,2,1),COLORGRAY;
STICKLINE(DBA33>0,22,32,2,0),COLORFF00FF;
STICKLINE(DBA33=0,22,32,2,1),COLORGRAY;
STICKLINE(DBA36,0,16,3,0),COLORWHITE;
STICKLINE(DBA37,0,16,3,0),COLORBROWN;
STICKLINE(DBA38,0,16,3,0),COLORRED;
STICKLINE(DBA39,0,16,3,0),COLORFF00FF;
STICKLINE(DBA40,0,16,3,0),COLOR00FF00;
DBA41:=93,NODRAW;
DBA42:=72,NODRAW;
DBA43:=58,NODRAW;
DBA44:=41,NODRAW;
DBA45:=26,NODRAW;
DBA46:=8,NODRAW;
DRAWTEXT(ISLASTBAR,DBA41,'趋势'),COLOR22B4EE;
DRAWTEXT(ISLASTBAR,DBA42,'动能'),COLOR22B4EE;
DRAWTEXT(ISLASTBAR,DBA43,'加速'),COLOR22B4EE;
DRAWTEXT(ISLASTBAR,DBA44,'资金'),COLOR22B4EE;
DRAWTEXT(ISLASTBAR,DBA45,'异动'),COLOR22B4EE;
DRAWTEXT(ISLASTBAR,DBA46,'控盘'),COLOR22B4EE;
DBA47:=EMA(C,8)-EMA(C,13);
DBA48:=EMA(DBA47,5);
DBA49:=(DBA47>DBA48);
DBA50:=IF(DBA49,1,0);
DBA51:=(C-LLV(L,8))/(HHV(HIGH,8)-LLV(L,8))*100;
DBA52:=SMA(DBA51,3,1);
DBA53:=SMA(DBA52,3,1);
DBA54:=(DBA52>DBA53);
DBA55:=IF(DBA54,2,0);
DBA56:=REF(C,1);
DBA57:=SMA(MAX(C-DBA56,0),5,1)/SMA(ABS(C-DBA56),5,1)*100;
DBA58:=SMA(MAX(C-DBA56,0),13,1)/SMA(ABS(C-DBA56),13,1)*100;
DBA59:=(DBA57>DBA58);
DBA60:=IF(DBA59,3,0);
DBA61:=(-(HHV(HIGH,13)-C))/(HHV(HIGH,13)-LLV(L,13))*100;
DBA62:=SMA(DBA61,3,1);
DBA63:=SMA(DBA62,3,1);
DBA64:=DBA62>DBA63;
DBA65:=IF(DBA64,4,0);
DBA66:=(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4;
DBA67:=C>DBA66;
DBA68:=IF(DBA67,5,0);
DBA69:=C-REF(C,1);
DBA70:=100*EMA(EMA(DBA69,5),3)/EMA(EMA(ABS(DBA69),5),3);
DBA71:=100*EMA(EMA(DBA69,13),8)/EMA(EMA(ABS(DBA69),13),8);
DRAWICON((DBA47>DBA48),14,34);
DRAWICON((DBA47< DBA48),14,2);
DRAWICON((DBA52>DBA53),33,34);
DRAWICON((DBA52< DBA53),33,2);
DRAWICON((DBA57>DBA58),48,34);
DRAWICON((DBA57< DBA58),48,2);
DRAWICON((DBA62>DBA63),65,34);
DRAWICON((DBA62< DBA63),65,2);
DRAWICON(C>DBA66,80,34);
DRAWICON(C< DBA66,80,2);
DRAWICON(DBA70>DBA71,98,34);
DRAWICON(DBA70< DBA71,98,2);
DRAWRECTREL(150,990,0,0,RGB(10,0,0));
DBA72:=HIGH;
DBA73:=LOW;
DBA74:=(H-L)/L*100;
DBA75:=(C-L)/L*100;
DBA76:=DBA75/DBA74*100;
DRAWRECTREL(40,850,70,150,RGB(0,255,0));
DRAWRECTREL(70,CONST(850-DBA76*7),40,850,RGB(255,0,0));
DRAWRECTREL(70,150,40,850,RGB(0,0,0));
DRAWTEXT_FIX(1,0.09,0.3,0,STRCAT(CON2STR(DBA74-DBA75,2),'%')),COLORRED;
DRAWTEXT_FIX(1,0.09,0.6,0,STRCAT(CON2STR(DBA75,2),'%')),COLORGREEN;
DRAWTEXT_FIX(1,0.09,0.8,0,STRCAT(STRCAT('高低：',CON2STR(DBA74,2)),'％')),COLORWHITE;
DBA77:=(OPEN-REFV(C,1))/REFV(C,1)*100,COLORWHITE,NODRAW;
DRAWTEXT_FIX(1,0.09,0.05,0,STRCAT(STRCAT('开盘：',CON2STR(DBA77,2)),'％')),COLORWHITE;
未来函数检测结果- 该公式包含未来函数:WINNER
- 该公式包含未来函数:COST
定制指标公式、软件请联系QQ或微信同号：88652583
相对位置上画矩形
DBA01赋值:成交额(元)*收盘价的1日累和/成交额(元)的1日累和
DBA02赋值:DBA01的5日指数移动平均
DBA03赋值:(DBA01-DBA02)*100/DBA01,NODRAW,画红色
DBA04赋值:DBA03不等于无效数
DBA05赋值:(收盘价-13日内最低价的最低值)/(13日内最高价的最高值-13日内最低价的最低值)*100
DBA06赋值:DBA05的4日[1日权重]移动平均
DBA07赋值:DBA06的3日[1日权重]移动平均
DBA08赋值:(收盘价-30日内最低价的最低值)/(30日内最高价的最高值-30日内最低价的最低值)*100
DBA09赋值:DBA08的6日[1日权重]移动平均
DBA10赋值:DBA09的3日[1日权重]移动平均
DBA11赋值:收盘价的17日指数移动平均
DBA12赋值:(收盘价-9日内最低价的最低值)/(9日内最高价的最高值-9日内最低价的最低值)*100
DBA13赋值:DBA12的3日[1日权重]移动平均
DBA14赋值:DBA13的3日[1日权重]移动平均
DBA15赋值:3*DBA13-2*DBA14
DBA16赋值:DBA15>=95
DBA17赋值:1日前的收盘价
DBA18赋值:收盘价-DBA17和0的较大值的9日[1日权重]移动平均/收盘价-DBA17的绝对值的9日[1日权重]移动平均*100
DBA19赋值:DBA18>=75
DBA20赋值:收盘价的5日指数移动平均的6日线性回归预测值
DBA21赋值:收盘价的8日指数移动平均的6日线性回归预测值
DBA22赋值:收盘价的11日指数移动平均的6日线性回归预测值
DBA23赋值:收盘价的14日指数移动平均的6日线性回归预测值
DBA24赋值:收盘价的17日指数移动平均的6日线性回归预测值
DBA25赋值:DBA20+DBA21+DBA22+DBA23-4*DBA24
DBA26赋值:DBA25的2日指数移动平均
DBA27赋值:收盘价的9日指数移动平均的9日指数移动平均
DBA28赋值:100*以收盘价*0.95计算的获利盘比例
DBA29赋值:DBA09>DBA10并且DBA10>1日前的DBA10并且DBA04,NODRAW,画黄色
DBA30赋值:DBA26>1日前的DBA26,NODRAW,画红色
DBA31赋值:DBA16或者DBA19,NODRAW,画淡洋红色
DBA32赋值:DBA03>0并且收盘价>DBA11并且DBA11>1日前的DBA11,NODRAW,COLOR0080FF
DBA33赋值:收盘价>=开盘价并且DBA06上穿DBA07并且DBA07<=50并且DBA04,NODRAW,COLORFF00FF
DBA34赋值:(DBA27-1日前的DBA27)/1日前的DBA27*1000
DBA35赋值:DBA34上穿0
DBA36赋值:如果DBA34<0,返回DBA34,否则返回0,NODRAW,画白色
DBA37赋值:如果DBA35,返回5,否则返回0,NODRAW,画棕色
DBA38赋值:如果DBA34>1日前的DBA34并且DBA34>0,返回DBA34,否则返回0,NODRAW,画红色
DBA39赋值:如果DBA28>50并且获利盘为85%的成本分布<收盘价并且DBA34>0,返回DBA34,否则返回0,NODRAW,COLORFF00FF
DBA40赋值:如果DBA34<1日前的DBA34并且DBA34>0,返回DBA34,否则返回0,NODRAW,COLOR00FF00
当满足条件DBA29>0时,在84和100位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR22B4EE
当满足条件DBA29=0时,在84和100位置之间画柱状线,宽度为2,1不为0则画空心柱.,画深灰色
当满足条件DBA30>0时,在68和78位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR22B4EE
当满足条件DBA30=0时,在68和78位置之间画柱状线,宽度为2,1不为0则画空心柱.,画深灰色
当满足条件DBA31>0时,在54和64位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR22B4EE
当满足条件DBA31=0时,在54和64位置之间画柱状线,宽度为2,1不为0则画空心柱.,画深灰色
当满足条件DBA32>0时,在36和46位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR22B4EE
当满足条件DBA32=0时,在36和46位置之间画柱状线,宽度为2,1不为0则画空心柱.,画深灰色
当满足条件DBA33>0时,在22和32位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFF00FF
当满足条件DBA33=0时,在22和32位置之间画柱状线,宽度为2,1不为0则画空心柱.,画深灰色
当满足条件DBA36时,在0和16位置之间画柱状线,宽度为3,0不为0则画空心柱.,画白色
当满足条件DBA37时,在0和16位置之间画柱状线,宽度为3,0不为0则画空心柱.,画棕色
当满足条件DBA38时,在0和16位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
当满足条件DBA39时,在0和16位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFF00FF
当满足条件DBA40时,在0和16位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR00FF00
DBA41赋值:93,NODRAW
DBA42赋值:72,NODRAW
DBA43赋值:58,NODRAW
DBA44赋值:41,NODRAW
DBA45赋值:26,NODRAW
DBA46赋值:8,NODRAW
当满足条件是否最后一个周期时,在DBA41位置书写文字,COLOR22B4EE
当满足条件是否最后一个周期时,在DBA42位置书写文字,COLOR22B4EE
当满足条件是否最后一个周期时,在DBA43位置书写文字,COLOR22B4EE
当满足条件是否最后一个周期时,在DBA44位置书写文字,COLOR22B4EE
当满足条件是否最后一个周期时,在DBA45位置书写文字,COLOR22B4EE
当满足条件是否最后一个周期时,在DBA46位置书写文字,COLOR22B4EE
DBA47赋值:收盘价的8日指数移动平均-收盘价的13日指数移动平均
DBA48赋值:DBA47的5日指数移动平均
DBA49赋值:(DBA47>DBA48)
DBA50赋值:如果DBA49,返回1,否则返回0
DBA51赋值:(收盘价-8日内最低价的最低值)/(8日内最高价的最高值-8日内最低价的最低值)*100
DBA52赋值:DBA51的3日[1日权重]移动平均
DBA53赋值:DBA52的3日[1日权重]移动平均
DBA54赋值:(DBA52>DBA53)
DBA55赋值:如果DBA54,返回2,否则返回0
DBA56赋值:1日前的收盘价
DBA57赋值:收盘价-DBA56和0的较大值的5日[1日权重]移动平均/收盘价-DBA56的绝对值的5日[1日权重]移动平均*100
DBA58赋值:收盘价-DBA56和0的较大值的13日[1日权重]移动平均/收盘价-DBA56的绝对值的13日[1日权重]移动平均*100
DBA59赋值:(DBA57>DBA58)
DBA60赋值:如果DBA59,返回3,否则返回0
DBA61赋值:(-(13日内最高价的最高值-收盘价))/(13日内最高价的最高值-13日内最低价的最低值)*100
DBA62赋值:DBA61的3日[1日权重]移动平均
DBA63赋值:DBA62的3日[1日权重]移动平均
DBA64赋值:DBA62>DBA63
DBA65赋值:如果DBA64,返回4,否则返回0
DBA66赋值:(收盘价的3日简单移动平均+收盘价的6日简单移动平均+收盘价的12日简单移动平均+收盘价的24日简单移动平均)/4
DBA67赋值:收盘价>DBA66
DBA68赋值:如果DBA67,返回5,否则返回0
DBA69赋值:收盘价-1日前的收盘价
DBA70赋值:100*DBA69的5日指数移动平均的3日指数移动平均/DBA69的绝对值的5日指数移动平均的3日指数移动平均
DBA71赋值:100*DBA69的13日指数移动平均的8日指数移动平均/DBA69的绝对值的13日指数移动平均的8日指数移动平均
当满足条件(DBA47>DBA48)时,在14位置画34号图标
当满足条件(DBA47当满足条件(DBA52>DBA53)时,在33位置画34号图标
当满足条件(DBA52当满足条件(DBA57>DBA58)时,在48位置画34号图标
当满足条件(DBA57当满足条件(DBA62>DBA63)时,在65位置画34号图标
当满足条件(DBA62当满足条件收盘价>DBA66时,在80位置画34号图标
当满足条件收盘价当满足条件DBA70>DBA71时,在98位置画34号图标
当满足条件DBA70相对位置上画矩形
DBA72赋值:最高价
DBA73赋值:最低价
DBA74赋值:(最高价-最低价)/最低价*100
DBA75赋值:(收盘价-最低价)/最低价*100
DBA76赋值:DBA75/DBA74*100
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
当满足条件1时,在横轴0.09纵轴0.3位置书写文字,画红色
当满足条件1时,在横轴0.09纵轴0.6位置书写文字,画绿色
当满足条件1时,在横轴0.09纵轴0.8位置书写文字,画白色
DBA77赋值:(开盘价-1日前的(平滑处理)收盘价)/1日前的(平滑处理)收盘价*100,画白色,NODRAW
当满足条件1时,在横轴0.09纵轴0.05位置书写文字,画白色
