计了一个大盘复盘数据的副图,有明日大盘预测及仓位管理。对于投资者来说,时间就是生命,自动生成一个大盘数据的看板,等于写了投资日记。
指标是大盘情绪监控与仓位管理工具,实时追踪四大指数涨跌、两市成交额、涨跌家数比等核心数据。通过量价关系和均线位置判断市场状态,给出情绪评分、明日走势预判及仓位建议,帮助投资者把握整体市场节奏。
操作策略:
根据指标显示的仓位建议调整持仓比例。市场情绪好、量能充足时提高仓位持股待涨;情绪低迷、缩量时降低仓位防守观望。结合涨跌比和指数位置进行滚动操作,避免满仓或空仓极端操作。
{--- 0. 全局行情数据抓取 ---}
SH_C:=INDEXC; {上证}
SZ_C:="399001$C"; {深证}
CYB_C:="399006$C"; {创业板}
KCB_C:="000688$C"; {科创50}
SH_ZF:=(SH_C-REF(SH_C,1))/REF(SH_C,1)*100;
SZ_ZF:=(SZ_C-REF(SZ_C,1))/REF(SZ_C,1)*100;
CYB_ZF:=(CYB_C-REF(CYB_C,1))/REF(CYB_C,1)*100;
KCB_ZF:=(KCB_C-REF(KCB_C,1))/REF(KCB_C,1)*100;
{成交额计算:沪市额+深市额(含创业板)}
TOTAL_AMT:=(INDEXA + "399001$AMOUNT")/100000000; {单位:亿元}
{--- 1. 指数表现分析 ---}
EXP_MA20:=MA(INDEXC,20);
指数表现:=IF(INDEXC>EXP_MA20,'守住20日线','跌破20日线');
量能:=IF(TOTAL_AMT>REF(MA(TOTAL_AMT,5),1),'放量','缩量');
走势:=IF(ABS(SH_ZF)<0.5,'横盘震荡','波动加大');
指数评价:=STRCAT(STRCAT(STRCAT(指数表现,','),量能),走势);
{--- 2. 涨跌数据统计 ---}
上涨家数:=INDEXADV;
下跌家数:=INDEXDEC;
涨跌比:=上涨家数/下跌家数;
{--- 3. 明日走势预判逻辑 (简易量价模型) ---}
明日预判:=IF(SH_ZF>0.5 AND 量能='放量','看涨:量价齐升',
IF(SH_ZF<-0.5 AND 量能='放量','看跌:恐慌杀跌',
IF(SH_ZF>0.3 AND 量能='缩量','谨慎:诱多嫌疑',
IF(SH_ZF<-0.3 AND 量能='缩量','磨底:跌势减缓','震荡:等待方向'))));
{--- 4. 情绪定性 ---}
情绪评分:=IF(涨跌比>1.5 AND INDEXC>EXP_MA20, '【情绪亢奋】',
IF(涨跌比<0.7 OR INDEXC<EXP_MA20, '【情绪冰点】', '【情绪转强】'));
{--- 5. 绘图与文字显示 ---}
DRAWRECTREL(0,0,1000,1000,RGB(15,15,25)); {背景稍微调蓝一点,深沉稳重}
{第一行:四大指数行情}
DRAWTEXT_FIX(ISLASTBAR,0.02,0.05,0,'[指数行情]'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.12,0.05,0,STRCAT('上证: ',STRCAT(CON2STR(SH_ZF,2),'%'))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.25,0.05,0,STRCAT('深证: ',STRCAT(CON2STR(SZ_ZF,2),'%'))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.38,0.05,0,STRCAT('创业: ',STRCAT(CON2STR(CYB_ZF,2),'%'))),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.51,0.05,0,STRCAT('科创: ',STRCAT(CON2STR(KCB_ZF,2),'%'))),COLORCYAN;
{第二行:成交额与涨跌分布}
DRAWTEXT_FIX(ISLASTBAR,0.02,0.25,0,'[量能数据]'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.12,0.25,0,STRCAT('两市成交额: ',STRCAT(CON2STR(TOTAL_AMT,0),' 亿'))),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.38,0.25,0,STRCAT('涨/跌: ',STRCAT(CON2STR(上涨家数,0),STRCAT('/',CON2STR(下跌家数,0))))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.58,0.25,0,STRCAT('指数: ',STRCAT(CON2STR(SH_C,2),''))),COLORRED;
{第三行:指数评价与情绪}
DRAWTEXT_FIX(ISLASTBAR,0.02,0.45,0,'[状态评价]'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.12,0.45,0,指数评价),COLORLIGRAY;
DRAWTEXT_FIX(ISLASTBAR,0.38,0.45,0,情绪评分),COLORMAGENTA;
{第四行:核心亮点 - 明日预判}
DRAWRECTREL(20,700,450,950,RGB(50,50,0)); {给预判加个底色框}
DRAWTEXT_FIX(ISLASTBAR,0.04,0.75,0,'★ 明日走势预判:'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.22,0.75,0,明日预判),COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.04,0.88,0,'策略提示:参考两市成交额与20日线得失'),COLORGRAY;
{副图指标线}
情绪线:涨跌比,COLORRED,LINETHICK2;
中轴:1,DOTLINE,COLORWHITE;
{--- 6. 仓位策略引擎 ---}
VAR_趋势:=IF(INDEXC>EXP_MA20, 50, 0); {站稳20日线给50%底仓,否则0%}
VAR_量能:=IF(TOTAL_AMT>REF(TOTAL_AMT,1), 20, -10); {放量加20%,缩量减10%}
VAR_情绪:=IF(涨跌比<0.5, 10, IF(涨跌比>2.5, -20, 0)); {极度冰点博反弹+10%,极度亢奋落袋-20%}
建议仓位:=VAR_趋势 + VAR_量能 + VAR_情绪;
最终仓位:=IF(建议仓位>100, 100, IF(建议仓位<0, 0, 建议仓位)); {锁定在0-100%之间}
{--- 7. 显示仓位看板 ---}
DRAWRECTREL(500,700,950,950,RGB(0,40,40)); {右侧仓位框}
DRAWTEXT_FIX(ISLASTBAR,0.52,0.75,0,' 操盘仓位建议:'),COLORWHITE;
DRAWNUMBER_FIX(ISLASTBAR,0.75,0.75,0,最终仓位),COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.82,0.75,0,'%'),COLOR00FFFF;
{仓位文字提醒}
仓位提醒:=IF(最终仓位>=80,'仓位饱满,持股待涨',
IF(最终仓位>=50,'中位仓位,滚动操作',
IF(最终仓位>=20,'轻仓试错,防守第一','空仓观望,等待信号')));
DRAWTEXT_FIX(ISLASTBAR,0.52,0.88,0,STRCAT('建议行动:',仓位提醒)),COLORCYAN;