通达信『连板接力共振系统』优化版！全套源码安排！

{--- 1. 环境择时模块 ---}

DAPANDI:=MA(INDEXC,5);

HJ_SAFE:=INDEXC>DAPANDI; 

{--- 2. 基础动能 (数值已固定：量比1.8, 实体3) ---}

V_5:=MA(V,5);

V_10:=MA(V,10);

ST_BL:=(MAX(C,O)-MIN(C,O))/MIN(C,O)*100;

ZF_BL:=(C-REF(C,1))/REF(C,1)*100;

F_YZB:=H>L OR C=O;

KP_CJ:=DYNAINFO(4)>REF(C,1)*0.98;

GJ_DN:=V/REF(MA(V,5),1)>1.8 AND ST_BL>3;

{--- 3. 核心启动逻辑 ---}

A_1:=V>REF(HHV(V,2),1) AND RANGE(V_5,V_10,V) AND UPNDAY(V_5,2);

A_2:=H>REF(HHV(H,2),1) AND C>O;

A_3:=C>REF(HHV(MAX(C,O),2),1);

QD_SIGNAL:=A_1 AND A_2 AND A_3 AND F_YZB AND GJ_DN AND KP_CJ AND HJ_SAFE;

{--- 4. 强度线与接力确认 ---}

A_5:=BARSLAST(QD_SIGNAL=1);

涨停强度:IF(A_5>=0,REF(HHV(H,A_5+1),BARSLAST(QD_SIGNAL)),DRAWNULL),DOTLINE,COLORYELLOW;

JL_QR:=CROSS(C,涨停强度) AND ZF_BL>3 AND F_YZB AND HJ_SAFE;

{--- 5. 胜率统计 (无未来函数，封顶100%) ---}

T_TOTAL:=COUNT(QD_SIGNAL,30);

T_SUCC:=COUNT(QD_SIGNAL AND (REF(H,1)>C*1.05 OR REF(H,2)>C*1.05 OR REF(H,3)>C*1.05),30);

T_RATE:=IF(T_TOTAL>0, (T_SUCC/T_TOTAL)*100, 0);

FINAL_RATE:=IF(T_RATE>100, 100, T_RATE);

{--- 6. 绘图视觉 ---}

STICKLINE(QD_SIGNAL,OPEN,CLOSE,3,0),COLORMAGENTA; 

STICKLINE(JL_QR,OPEN,CLOSE,3,0),COLORRED;     

DRAWICON(QD_SIGNAL,L*0.98,11);

DRAWICON(JL_QR,L*0.96,9);

DRAWTEXT(QD_SIGNAL,L*0.98,'  预警启动'),COLORYELLOW;

DRAWTEXT(JL_QR,L*0.95,'  ★连板接力'),COLORRED;

{--- 7. 信息看板 ---}

DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT('监控周期: ','30 天 (历史实战回测)')),COLORWHITE;

DRAWTEXT_FIX(ISLASTBAR,0,0.05,0,STRCAT('信号总数: ',CON2STR(T_TOTAL,0))),COLORCYAN;

DRAWTEXT_FIX(ISLASTBAR,0,0.10,0,STRCAT('主图胜率: ',STRCAT(CON2STR(FINAL_RATE,2),'%'))),COLORMAGENTA;

DRAWTEXT_FIX(ISLASTBAR,0,0.15,0,STRCAT('环境状态: ',IF(HJ_SAFE,'◆狩猎期(风险低)','◇休战期(风险高)'))),COLORRED;

DRAWTEXT_FIX(1,0,0.02,0,'公式平台，公式源码 http://www.gspt.com'),COLOR333333;

{--- 1. 环境择时 ---}

DAPANDI:=MA(INDEXC,5);

HJ_SAFE:=INDEXC>DAPANDI;

{--- 2. 趋势背景 ---}

C_A1:=(CLOSE-MA(CLOSE,55))/MA(CLOSE,55)*100;

T_T:MA(C_A1,20),COLORWHITE,LINETHICK2;

DRAWBAND(C_A1,RGB(150,0,0),T_T,RGB(0,80,0)); 

{--- 3. 筹码锁定 (数值已固定：密度30, 持仓75) ---}

C_TAB7:=COST(85)-COST(15);

C_TAB8:=(COST(85)+COST(15))/2;

DF_MJ:=C_TAB7/C_TAB8*100 < 30; 

B_5:=C/REF(C,1)>1.045;

ZL_CC:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3) >= 75; 

{--- 4. 共振爆点 ---}

C_A5:=ABS((CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*100);

QB_TJ:=ZL_CC AND DF_MJ AND WINNER(C)>=0.91 AND B_5;

GZ_BAO:=CROSS(C_A5,10) AND QB_TJ AND HJ_SAFE;

{--- 5. 胜率统计 (封顶100%) ---}

T_TOTAL:=COUNT(GZ_BAO,30);

T_SUCC:=COUNT(GZ_BAO AND (REF(H,1)>C*1.05 OR REF(H,2)>C*1.05 OR REF(H,3)>C*1.05),30);

T_RATE:=IF(T_TOTAL>0, (T_SUCC/T_TOTAL)*100, 0);

FINAL_RATE:=IF(T_RATE>100, 100, T_RATE);

{--- 6. 绘图视觉 ---}

STICKLINE(C_A1-T_T>0,C_A1,T_T,1,0),COLORRED;

STICKLINE(C_A1-T_T<=0,C_A1,T_T,1,0),COLORCYAN;

P_P:MA(C_A1,5),COLORFFFF00,LINETHICK2;

K_K:MA(C_A1,3),COLORWHITE,LINETHICK1;

DRAWICON(GZ_BAO,T_T,34); 

DRAWTEXT(GZ_BAO,T_T*1.2,'  ★强势共振'),COLORYELLOW;

{--- 7. 看板 ---}

DRAWTEXT_FIX(ISLASTBAR,0.5,0,0,STRCAT('副图胜率: ',STRCAT(CON2STR(FINAL_RATE,2),'%'))),COLORMAGENTA;

DRAWTEXT_FIX(ISLASTBAR,0.5,0.08,0,STRCAT('筹码状态: ',IF(DF_MJ,'◆高度密集','◇筹码分散'))),COLORCYAN;

DRAWTEXT_FIX(ISLASTBAR,0.5,0.16,0,IF(HJ_SAFE,'◆大盘安全','◇大盘风险')),COLORRED;

DRAWTEXT_FIX(1,0,0.02,0,'公式平台，公式源码 http://www.gspt.com'),COLOR333333;