下面给你**通达信常用筹码集中度（SCR类）源码**，直接复制可用，合规无违规内容。

---

### 一、通达信自带 SCR 筹码集中度（标准）
```pascal
P1:=90;
A:=P1/2;
B:=100-P1/2;
CC:=COST(A);
DD:=COST(B);
SCR:(CC-DD)/(CC+DD)*100/2;
```
- 含义：**90%筹码宽度/平均成本→归一化百分比**
- 用法：**SCR越小，筹码越集中；一般<10为高度集中**

---

### 二、90%+70%筹码集中度（副图，常用）
```pascal
{90%筹码集中度}
A1:=COST(95)-COST(5);
B1:=(COST(95)+COST(5))/2;
集中度90:(A1/B1)*100,COLORYELLOW,LINETHICK2;

{70%筹码集中度}
A2:=COST(85)-COST(15);
B2:=(COST(85)+COST(15))/2;
集中度70:(A2/B2)*100,COLORMAGENTA,LINETHICK2;
```
- 集中度90：**<15% 集中；<10% 高度集中**
- 集中度70：**<10% 强集中**

---

### 三、怎么导入通达信
1. 通达信 → 按 **Ctrl+F**（公式管理器）
2. 选 **技术指标公式→其他类型→新建**
3. 粘贴源码，命名（如“筹码集中度”）→ 确定
4. 个股K线 → 副图 → 选该指标即可

---

要不要我把“集中度90<10”的**选股公式**也写给你，直接可以盘中筛选？