{════════════════════════════════════════════════════════════}
{ 海底捞月 · 环境强度「非全A平均」写法存档 (2026-10-21 路线B) }
{ 口径: HJC 不用 880003(全A平均股价), 改读个股所属大盘指数 INDEXC }
{       沪票读上证指数, 深票读深成指; 两平台同一写法 }
{ 阈值: 已按上证口径分位重标定, 与 880003 版不同(见下) }
{════════════════════════════════════════════════════════════}

【版本A · 二值事件版(主副图内嵌, 10-21 路线B)】
{环境强度HJ2预计算｜变量完整保留，B/G标记正常使用}
{2026-10-21 路线B: HJC 改 INDEXC(个股所属大盘指数; 沪票=上证 深票=深成指), 两平台同一写法}
{阈值按上证口径重标定(分位匹配): HJ20 -10/-5 改 -8/-4, HJD -18/-10 改 -15/-8}
HJC:=INDEXC;
HJ20:=(HJC/REF(HJC,20)-1)*100;
HJD:=(HJC/HHV(HJC,120)-1)*100;
HJ2:=IF(HJ20<=-8,2,IF(HJ20<=-4,1,0))+IF(HJD<=-15,2,IF(HJD<=-8,1,0));

【现行版对照(880003 全A平均股价, 生产在用)】
HJC:=("880003$CLOSE");
HJ20:=(HJC/REF(HJC,20)-1)*100;
HJD:=(HJC/HHV(HJC,120)-1)*100;
HJ2:=IF(HJ20<=-10.5,2,IF(HJ20<=-5.5,1,0))+IF(HJD<=-18.5,2,IF(HJD<=-10.5,1,0));

【底部扁柱(两版通用, y=-2.0到-1.5, 宽2 空心)】
STICKLINE(HJ2=4,-2.0,-1.5,2,1),COLOR4E3BFF;
STICKLINE(HJ2=3,-2.0,-1.5,2,1),COLOR2ECBFF;
STICKLINE(HJ2=2,-2.0,-1.5,2,1),COLORAAAAAA;
STICKLINE(HJ2=1,-2.0,-1.5,2,1),COLORAAAAAA;
STICKLINE(HJ2=0,-2.0,-1.5,2,1),COLORAAAAAA;

【同花顺对应写法】
HJC:=INDEXC;   {同花顺退回"对应指数"; 用全A平均时写 INDEXDATA("883957",&CLOSE)}

【版本B · 五档变色线(10-20 环境线独立文件 G 段)】
{位置: 深度门槛(y=10)上方 y=10.2 一根粗线, 按当日环境变色}
{红=极端(可重仓) 金=重点 紫=可做 灰=观察 墨绿=禁做}
{口径: 指数20日跌幅分5档; 反弹降级(20日跌且5日已涨>=2% 回退一档); 深回撤加分(距60日高点<=-20% 升一档)}
HJ20:=(INDEXC/REF(INDEXC,20)-1)*100;
HJ5:=(INDEXC/REF(INDEXC,5)-1)*100;
HJDD:=(INDEXC/HHV(INDEXC,60)-1)*100;
HJ0:=IF(HJ20>=3,0,IF(HJ20>=-4,1,IF(HJ20>=-8,2,IF(HJ20>=-12,3,4))));
HJ1:=IF(HJ20<=-4 AND HJ5>=2,MAX(HJ0-1,1),HJ0);
HJ2:=IF(HJDD<=-20 AND HJ1<4,HJ1+1,HJ1);
HJY:=10.2;
环境4:IF(HJ2=4,HJY,DRAWNULL),COLOR4E3BFF,LINETHICK2;
环境3:IF(HJ2=3,HJY,DRAWNULL),COLOR2ECBFF,LINETHICK2;
环境2:IF(HJ2=2,HJY,DRAWNULL),COLORBA4DFFF,LINETHICK2;
环境1:IF(HJ2=1,HJY,DRAWNULL),COLORAAAAAA,LINETHICK2;
环境0:IF(HJ2=0,HJY,DRAWNULL),COLOR00D68F,LINETHICK2;

【注意】
1. 跨市场不横比: 沪票读上证, 深票读深成指, 同一只票在不同市场档位不可直接对比。
2. 真·行业板块指数(880xxx/881xxx)在通达信里只能按代码写死, 无法动态取"当前股票所属板块"的指数。
3. 880003/883957 版与 INDEXC 版阈值不同, 换写法必须同时换阈值, 否则档位整体偏移。