收盘上穿成本:CROSS(C,COST(70)),NODRAW;
STICKLINE(收盘上穿成本, 0,0.5, 0.2, 0),COLORWHITE;
{ 90%筹码集中度 }
A90 := (COST(95) - COST(5)) / (COST(95) + COST(5)) * 100;
DRAWTEXT_FIX(ISLASTBAR, 0.007, 0.30, 0, STRCAT('90%筹码集中度：', STRCAT(CON2STR(A90, 2), '%'))), COLORYELLOW;
A70 := (COST(85) - COST(15)) / (COST(85) + COST(15)) * 100;
DRAWTEXT_FIX(ISLASTBAR, 0.007, 0.60, 0, STRCAT('70%筹码集中度：', STRCAT(CON2STR(A70, 2), '%'))), COLORYELLOW;
{低位筹码峰}
集中度 := A90 < 10 AND A70 < 6; { 同时满足90%和70%集中 }
获利比例:=WINNER(CLOSE)*100 > 90;
横盘突破10:=C>REF(HHV(H,10),1);
筹码峰中位数:=(COST(90)+COST(10))/2; { 计算90%筹码的价格中位数 }
低位条件 := CLOSE < 筹码峰中位数 * 1.5;
筹码集中 := (WINNER(C*1.1) - WINNER(C*0.9)) * 100 > 50;
筹码持续集中:= A90 < REF(A90, 20) * 0.8; {比20日前改善20%以上}
低集中度:集中度 AND 筹码集中 AND 筹码持续集中,COLORRED;
{ 信号输出 }
低位筹码单峰: (集中度 AND 获利比例 AND 横盘突破10 ) OR 筹码持续集中, DOTLINE;
{DRAWTEXT(低位筹码单峰, 0.8, '低位单峰'), COLORMAGENTA;}
STICKLINE(低位筹码单峰, 0, 0.5, 1, 0),COLORMAGENTA;
UU11:=VOL/CAPITAL*100;
UU111:=IF(CODELIKE('688'),0,1);
UU112:=COST(85);
UU113:=COST(15);
UU114:=UU112-UU113;
UU115:=(UU112+UU113)/2;
TDXLFXJ1:=UU114/UU115*100< 30,LINETHICK0;
UU116:=HHV(H,250);
UU117:=LLV(LOW,250);
UU118:=UU116-UU117;
UU119:=UU115-UU117;
TDXLFXJ2:=UU115< (UU118*4+UU117),LINETHICK0;
TDXLFXJ3:=TDXLFXJ1 AND TDXLFXJ2;
UU1110:=C/REF(C,1)>1.04;
TDXLFXJ4:=EMA(100*(C-LLV(LOW,30))/(HHV(H,30)-LLV(LOW,30)),3);
TDXLFXJ5:=TDXLFXJ4>=75 AND C>0 AND C>O;
单峰密集:=FILTER(TDXLFXJ5 AND TDXLFXJ3 AND UU119 AND WINNER(C)>=0.90 AND UU1110 AND C/REF(C,1)>1.092 AND C=H AND C< 40 AND UU111 AND UU11< 20 ,10);
单峰密集共振:低位筹码单峰 AND 单峰密集;
DRAWTEXT(单峰密集共振,0.9,' 单峰密集共振'),COLORMAGENTA,LINETHICK3;
{ 定义涨停判断函数（涨幅>9.7%视为涨停） }
ZT:= C / REF(C, 1) > 1.097;
{ 获取最近涨停日期 }
D3:= REF(ZT, 3); { 3天前涨停 }
D4:= REF(ZT, 4); { 4天前涨停 }
D5:= REF(ZT, 5); { 5天前涨停 }
D8:= REF(ZT, 8); { 7天前涨停 }
D13:= REF(ZT, 13); { 12天前涨停 }
D21:= REF(ZT, 21); { 20天前涨停 }
{ 计算各周期1/2位价 }
HALF3:= REF(C, 3) * 0.5; { 3天前涨停板1/2位 }
HALF4:= REF(C, 4) * 0.5; { 4天前涨停板1/2位 }
HALF5:= REF(C, 5) * 0.5; { 5天前涨停板1/2位 }
HALF8:= REF(C, 8) * 0.5; { 8天前涨停板1/2位 }
HALF13:= REF(C, 13) * 0.5;{ 13天前涨停板1/2位 }
HALF21:= REF(C, 21) * 0.5;{ 21天前涨停板1/2位 }
{ 条件A：三日回踩 }
COND_A:= D3 AND L >= HALF3;
{ 条件A：三日回踩 }
COND_A4:= D4 AND L >= HALF4;
{ 条件B：五日回踩 }
COND_B:= D5 AND L >= HALF5;
{ 条件C：八日回踩}
COND_C:= D8 AND L >= HALF8;
{ 条件D：十三日回踩}
COND_D:= D13 AND L >= HALF13;
{ 条件E：二十一日回踩 }
COND_E:= D21 AND L >= HALF21;
{ 条件F：当前涨幅小于3% }
COND_F:= (C / REF(C, 1) - 1) * 100 <5;
{ 条件H：今日量比大于1 }
COND_H:=V/REF(V,1) < 1; {今日成交量小于昨日成交量，量比小于1}
MA5:=MA(C,5);
MA10:=MA(C,10);
MA20:=MA(C,20),COLORWHITE;
MA30:=MA(C,30),COLORFF00FF;
MA60:=MA(C,60),COLORYELLOW;
MA120:=MA(C,120),COLORYELLOW;
最高均线:=MAX(MAX(MA5,MA10),MA60);
最低均线:=MIN(MIN(MA5,MA10),MA60);
均线趋势:=EVERY(MA(C,60)>REF(MA(C,60),1),3) AND EVERY(MA(C,120)>REF(MA(C,120),1),2) AND MA(C,5)>MA(C,60) AND MA(C,10)>MA(C,60);
均线粘合:=最高均线/最低均线<1.03 AND 均线趋势;
{判断单条均线连续3天递增（向上）}
MA10_UP:= MA10 > REF(MA10, 1) AND REF(MA10, 1) > REF(MA10, 2) AND REF(MA10, 2) > REF(MA10, 3);
MA20_UP:= MA20 > REF(MA20, 1) AND REF(MA20, 1) > REF(MA20, 2) AND REF(MA20, 2) > REF(MA20, 3);
MA30_UP:= MA30 > REF(MA30, 1) AND REF(MA30, 1) > REF(MA30, 2) AND REF(MA30, 2) > REF(MA30, 3);
MA60_UP:= MA60 > REF(MA60, 1) AND REF(MA60, 1) > REF(MA60, 2) AND REF(MA60, 2) > REF(MA60, 3);
{所有均线同时连续3天向上}
ALLMA_UP:=MA10_UP AND MA20_UP AND MA30_UP AND MA60_UP AND MA5/MA60<1.18;
{ 综合信号：满足任一突破条件且F/G/H同时成立 }
SIGNAL := (COND_A OR COND_B OR COND_C OR COND_D OR COND_E) AND COND_F AND COND_H AND ALLMA_UP;
STICKLINE(SIGNAL, 0, 0.8, 2, 0), COLORRED;
DRAWTEXT(SIGNAL, 0.6, '回踩'), COLORYELLOW;
{ 可选：单独标记不同类型回踩 }
DRAWTEXT(COND_A AND SIGNAL, 0.9, '3'), COLORRED;
DRAWTEXT(COND_A4 AND SIGNAL, 0.9, '4'), COLORRED;
DRAWTEXT(COND_B AND SIGNAL, 0.9, '5'), COLORGREEN;
DRAWTEXT(COND_C AND SIGNAL, 0.9, '8'), COLORMAGENTA;
DRAWTEXT(COND_D AND SIGNAL, 0.9, '13'), COLORBLUE;
DRAWTEXT(COND_E AND SIGNAL, 0.9, '21'), COLORYELLOW;
{游资秘技}
VARR1:=V;
VARR2:=VARR1>MA(V,89);
VARR3:=EXPMA(C,5);
VARR4:=EXPMA(C,29);
VARR5:=VARR3>VARR4;
LC:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),56,1)/SMA(ABS(CLOSE-LC),56,1)*100;
VARR6:=RSI1>RSI2 AND VARR5 AND VARR2;
VASS1:=HHV(H,30);
VASS2:=LLV(L,30);
VASS3:=REF((VASS1/VASS2-1)*100<=30,1);
……
……
……通达信单峰密集共振选股
收盘上穿成本:=CROSS(C,COST(70));
A90 := (COST(95) - COST(5)) / (COST(95) + COST(5)) * 100;
A70 := (COST(85) - COST(15)) / (COST(85) + COST(15)) * 100;
集中度 := A90 < 10 AND A70 < 6; { 同时满足90%和70%集中 }
获利比例:=WINNER(CLOSE)*100 > 90;
横盘突破10:=C>REF(HHV(H,10),1);
筹码峰中位数:=(COST(90)+COST(10))/2; { 计算90%筹码的价格中位数 }
低位条件 := CLOSE < 筹码峰中位数 * 1.5;
筹码集中 := (WINNER(C*1.1) - WINNER(C*0.9)) * 100 > 50;
筹码持续集中:= A90 < REF(A90, 20) * 0.8; {比20日前改善20%以上}
低集中度:=集中度 AND 筹码集中 AND 筹码持续集中,COLORRED;
低位筹码单峰:=(集中度 AND 获利比例 AND 横盘突破10 ) OR 筹码持续集中;
UU11:=VOL/CAPITAL*100;
UU111:=IF(CODELIKE('688'),0,1);
UU112:=COST(85);
UU113:=COST(15);
UU114:=UU112-UU113;
UU115:=(UU112+UU113)/2;
TDXLFXJ1:=UU114/UU115*100< 30,LINETHICK0;
UU116:=HHV(H,250);
UU117:=LLV(LOW,250);
UU118:=UU116-UU117;
UU119:=UU115-UU117;
TDXLFXJ2:=UU115< (UU118*4+UU117),LINETHICK0;
TDXLFXJ3:=TDXLFXJ1 AND TDXLFXJ2;
UU1110:=C/REF(C,1)>1.04;
TDXLFXJ4:=EMA(100*(C-LLV(LOW,30))/(HHV(H,30)-LLV(LOW,30)),3);
TDXLFXJ5:=TDXLFXJ4>=75 AND C>0 AND C>O;
单峰密集:=FILTER(TDXLFXJ5 AND TDXLFXJ3 AND UU119 AND WINNER(C)>=0.90 AND UU1110 AND C/REF(C,1)>1.092 AND C=H AND C< 40 AND UU111 AND UU11< 20 ,10);
XG1:=低位筹码单峰 AND 单峰密集;
VARR1:=V;
VARR2:=VARR1>MA(V,89);
VARR3:=EXPMA(C,5);
VARR4:=EXPMA(C,29);
VARR5:=VARR3>VARR4;
LC:=REF(CLOSE,1);
……
……
……