通达信箱体战法指标源代码（通达信箱体指标改进版）

根据您的需求，我会尝试将您提供的箱体指标转化为选股公式，并在通达信软件中运用。考虑到您的要求，我会尽量保持原文的风格特点，同时使内容生动、文体丰富。

选股公式一：箱体突破选股

以过去5个月为周期（参数可调整），当股价突破箱体高点，并且最近回调到最高点时的选股公式如下：

```plaintext

{设定参数}

N := 5月; {这里可以根据需求修改周期长度}

BoxTop := PEAK(CLOSE, N, 1) 0.98; {箱顶计算}

BoxBottom := TROUGH(CLOSE, N, 1) 1.02; {箱底计算}

BreakThrough := CROSS(CLOSE, REF(BoxTop, 1)); {股价突破箱顶}

RecentPullBack := CLOSE = REF(CLOSE, 1); {最近一天股价回调至前期最高点附近}

Select := BreakThrough AND RecentPullBack; {结合突破与回调条件进行选股}

{选股提示}

如果满足上述条件，系统将提示您该股票实现了箱体突破，适合进行选股操作。

```

选股公式二：济安线结合箱体指标选股

若想在通达信中结合济安线指标与箱体指标进行选股，可以如下编写：

```plaintext

{济安线计算}

AA := ABS((2CLOSE + HIGH + LOW) / 4 - MA(CLOSE, N)) / MA(CLOSE, N);

JianLine := DMA((2CLOSE + LOW + HIGH) / 4, AA); {济安线计算}

MA1 := MA((CLOSE / JianLine) (2CLOSE + HIGH + LOW) / 4, 3);

MAAA := ((MA1 - JianLine) / JianLine) / 3;

TMP := MA1 - MAAA MA1;

JPoint := IF(TMP <= JianLine, JianLine, DRAWNULL);

BoxBreakThrough := CROSS(CLOSE, REF(JPoint, 1)); {股价突破济安线代表的箱体顶部}

RecentPullBackSameLevel := CLOSE ≈ REF(CLOSE, 1); {最近回调至相同水平}

SelectSignal := BoxBreakThrough AND RecentPullBackSameLevel; {结合突破与回调进行选股提示}

```

请注意，以上公式仅为示例，实际使用前请仔细测试并调整参数以适应您的投资策略。由于股票市场的复杂性，任何公式都不能保证100%准确。希望这些公式能够满足您的需求，并祝您投资顺利。由于编写公式涉及复杂的逻辑和算法，建议您在实际使用前进行充分的测试与验证。