通达信情绪复盘看板指标公式|量价预判与仓位策略工具

{--- 0. 全局行情数据抓取 ---}
A1:=INDEXC;
A2:="399001$C";
A3:="399006$C";
A4:="000688$C";
B1:=(A1-REF(A1,1))/REF(A1,1)*100;
B2:=(A2-REF(A2,1))/REF(A2,1)*100;
B3:=(A3-REF(A3,1))/REF(A3,1)*100;
B4:=(A4-REF(A4,1))/REF(A4,1)*100;
C1:=(INDEXA + "399001$AMOUNT")/100000000;
{--- 1. 指数表现分析 ---}
D1:=MA(INDEXC,20);
E1:=IF(INDEXC>D1,'守住20日线','跌破20日线');
F1:=IF(C1>REF(MA(C1,5),1),'放量','缩量');
G1:=IF(ABS(B1)<0.5,'横盘震荡','波动加大');
H1:=STRCAT(STRCAT(STRCAT(E1,'，'),F1),G1);
{--- 2. 涨跌数据统计 ---}
I1:=INDEXADV;
J1:=INDEXDEC;
K1:=I1/J1;
{--- 3. 明日走势预判逻辑 (简易量价模型) ---}
L1:=IF(B1>0.5 AND F1='放量','看涨：量价齐升',
IF(B1<-0.5 AND F1='放量','看跌：恐慌杀跌',
IF(B1>0.3 AND F1='缩量','谨慎：诱多嫌疑',
IF(B1<-0.3 AND F1='缩量','磨底：跌势减缓','震荡：等待方向'))));
{--- 4. 情绪定性 ---}
M1:=IF(K1>1.5 AND INDEXC>D1, '【情绪亢奋】',
IF(K1<0.7 OR INDEXC<D1, '【情绪冰点】', '【情绪转强】'));
{--- 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(B1,2),'%'))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.25,0.05,0,STRCAT('深证: ',STRCAT(CON2STR(B2,2),'%'))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.38,0.05,0,STRCAT('创业: ',STRCAT(CON2STR(B3,2),'%'))),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.51,0.05,0,STRCAT('科创: ',STRCAT(CON2STR(B4,2),'%'))),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.02,0.25,0,'[量能数据]'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.12,0.25,0,STRCAT('两市成交额: ',STRCAT(CON2STR(C1,0),' 亿'))),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.38,0.25,0,STRCAT('涨/跌: ',STRCAT(CON2STR(I1,0),STRCAT('/',CON2STR(J1,0))))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.58,0.25,0,STRCAT('指数: ',STRCAT(CON2STR(A1,2),''))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.02,0.45,0,'[状态评价]'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.12,0.45,0,H1),COLORLIGRAY;
DRAWTEXT_FIX(ISLASTBAR,0.38,0.45,0,M1),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,L1),COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.04,0.88,0,'策略提示：参考两市成交额与20日线得失'),COLORGRAY;
情绪线:K1,COLORRED,LINETHICK2;
中轴:1,DOTLINE,COLORWHITE;
{--- 6. 仓位策略引擎 ---}
N1:=IF(INDEXC>D1, 50, 0);
O1:=IF(C1>REF(C1,1), 20, -10);
P1:=IF(K1<0.5, 10, IF(K1>2.5, -20, 0));
Q1:=N1 + O1 + P1;
R1:=IF(Q1>100, 100, IF(Q1<0, 0, Q1));
{--- 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,R1),COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.82,0.75,0,'%'),COLOR00FFFF;
S1:=IF(R1>=80,'仓位饱满，持股待涨',
IF(R1>=50,'中位仓位，滚动操作',
IF(R1>=20,'轻仓试错，防守第一','空仓观望，等待信号')));
DRAWTEXT_FIX(ISLASTBAR,0.52,0.88,0,STRCAT('建议行动：',S1)),COLORCYAN;