程序化指标智能分析系统指标源码

行情A:=INDEXC;

行情B:="399001$C";

行情C:="399006$C";

行情D:="000688$C";

SH_ZF:=(行情A-REF(行情A,1))/REF(行情A,1)*100;

SZ_ZF:=(行情B-REF(行情B,1))/REF(行情B,1)*100;

CYB_ZF:=(行情C-REF(行情C,1))/REF(行情C,1)*100;

KCB_ZF:=(行情D-REF(行情D,1))/REF(行情D,1)*100;

取值:=(INDEXA + "399001$AMOUNT")/100000000;

EXP_MA20:=MA(INDEXC,20);

指数线:=IF(INDEXC>EXP_MA20,'守住20日线','跌破20日线');

量能:=IF(取值>REF(MA(取值,5),1),'放量','缩量');

走势:=IF(ABS(SH_ZF)< 0.5,'横盘震荡','波动加大');

评指数:=STRCAT(STRCAT(STRCAT(指数线,'，'),量能),走势);

上涨家数:=INDEXADV;

下跌家数:=INDEXDEC;

涨跌比:=上涨家数/下跌家数;

明日预判:=IF(SH_ZF>0.5 AND 量能='放量','看涨：量价齐升', IF(SH_ZF< -0.5 AND 量能='放量','看跌：恐慌杀跌', IF(SH_ZF>0.3 AND 量能='缩量','谨慎：诱多嫌疑', IF(SH_ZF< -0.3 AND 量能='缩量','磨底：跌势减缓','震荡：等待方向'))));

情绪评分:=IF(涨跌比>1.5 AND INDEXC>EXP_MA20, '【情绪亢奋】', IF(涨跌比< 0.7 OR INDEXC< EXP_MA20, '【情绪冰点】', '【情绪转强】'));

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(取值,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(行情A,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;

量化趋势:=IF(INDEXC>EXP_MA20, 50, 0);

量化量能:=IF(取值>REF(取值,1), 20, -10);

量化情绪:=IF(涨跌比< 0.5, 10, IF(涨跌比>2.5, -20, 0));

建议仓位:=量化趋势 + 量化量能 + 量化情绪;

最终仓位:=IF(建议仓位>100, 100, IF(建议仓位< 0, 0, 建议仓位));

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;