通达信缠论选股一二三买点（指标 选股/副图贴图）
{ 以下为无 DLL 替代版本，使用 ZIG 近似模拟笔和中枢 }
{ 注意：ZIG 为未来函数，信号会漂移，仅供学习参考 }
笔类型:=1; { 参数保留但不再使用 }
顶底分型:=1; { 参数保留但不再使用 }
{ 使用 ZIG 识别转折，参数 3 表示收盘价，1 表示 1% 的转向幅度 }
ZIGVAL := ZIG(3, 1); { 之字转向值 }
ZIGUP := ZIGVAL > REF(ZIGVAL, 1); { 当前为向上转折 }
ZIGDN := ZIGVAL < REF(ZIGVAL, 1); { 当前为向下转折 }
{ 模拟笔方向：笔向上为 -1，笔向下为 1 }
VAR2 := IF(ZIGUP, -1, IF(ZIGDN, 1, 0)); { 0 表示非笔端点 }
{ 模拟笔端点位置（笔尾）}
笔尾日 := BARSLAST(VAR2 <> 0); { 最近一次笔端点距当前周期数 }
{ 获取最近的高低点（笔的起点/终点）}
高点价 := PEAK(3, 1, 1); { 最近的一个向上峰顶 }
低点价 := TROUGH(3, 1, 1); { 最近的一个向下谷底 }
高点半距 := PEAKBARS(3, 1, 1); { 距最近峰顶的周期数 }
低点半距 := TROUGHBARS(3, 1, 1); { 距最近谷底的周期数 }
{ 近似中枢：取最近两个同向笔的重叠区间，此处简化为最近峰谷的均值 }
ZSZG := HHV(高点价, 10); { 简化：10日内最高 }
ZSZD := LLV(低点价, 10); { 简化：10日内最低 }
ZSZZ := (ZSZG + ZSZD) / 2; { 中枢中轴 }
中枢UP := ZSZG; { 中枢上沿 }
中枢DN := ZSZD; { 中枢下沿 }
{ 其余变量沿用原逻辑，但依赖 VAR2 等已重新定义 }
{ MACD 指标 }
SHORT:=12; LONG:=26; MID1:=9;
DIF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:=EMA(DIF,MID1);
MACD:=(DIF-DEA)*2,COLORSTICK;
{ 笔涨日/跌日（按 VAR2 变化）}
笔涨日:=BARSLAST(VAR2=-1),NODRAW;
笔跌日:=BARSLAST(VAR2=1),NODRAW;
{ 有效红绿柱、面积等 }
有效红柱:=IF(笔涨日<笔跌日 AND MACD>0, MACD, 0);
有效绿柱:=IF(笔涨日>笔跌日 AND MACD<0, MACD, 0);
红面积:=SUM(有效红柱, 笔涨日),NODRAW;
绿面积:=SUM(有效绿柱, 笔跌日),NODRAW;
{ 背驰相关——使用最近一个笔端点的高低点比较 }
LAST底:=IF(VAR2=-1, REF(L, REF(笔涨日,1)+1), DRAWNULL),NODRAW;
LAST顶:=IF(VAR2=1, REF(H, REF(笔跌日,1)+1), DRAWNULL),NODRAW;
创新低:=VAR2=-1 AND L<LAST底,NODRAW;
创新高:=VAR2=1 AND H>LAST顶,NODRAW;
创新低日:=BARSLAST(创新低=1),NODRAW;
创新高日:=BARSLAST(创新高=1),NODRAW;
{ 背驰判断（简化）}
LD底背:=L<REF(L,REF(创新低日,1)+1) AND 创新低,COLORMAGENTA,NODRAW;
X底背:=L<REF(L,REF(创新低日,1)+1) AND DIF>REF(DIF,REF(创新低日,1)+1) AND 创新低,COLORMAGENTA,NODRAW;
Z底背:=L<REF(L,REF(创新低日,1)+1) AND MACD>REF(MACD,REF(创新低日,1)+1) AND 创新低,COLORMAGENTA,NODRAW;
M底背:=L<REF(L,REF(创新低日,1)+1) AND 绿面积>REF(绿面积,REF(创新低日,1)+1) AND 创新低,COLORMAGENTA,NODRAW;
大底背:=X底背 OR Z底背 OR M底背;
LD顶背:=H>REF(H,REF(创新高日,1)+1) AND 创新高,COLORCYAN,NODRAW;
X顶背:=H>REF(H,REF(创新高日,1)+1) AND DIF<REF(DIF,REF(创新高日,1)+1) AND 创新高,COLORCYAN,NODRAW;
Z顶背:=H>REF(H,REF(创新高日,1)+1) AND MACD<REF(MACD,REF(创新高日,1)+1) AND 创新高,COLORCYAN,NODRAW;
M顶背:=H>REF(H,REF(创新高日,1)+1) AND 红面积<REF(红面积,REF(创新高日,1)+1) AND 创新高,COLORCYAN,NODRAW;
大顶背:=X顶背 OR Z顶背 OR M顶背;
{ 小背驰（简化）}
X小底背:=大底背=0 AND L<REF(L,REF(笔涨日,1)+1) AND DIF>REF(DIF,REF(笔涨日,1)+1) AND 创新低,COLORMAGENTA,NODRAW;
Z小底背:=大底背=0 AND L<REF(L,REF(笔涨日,1)+1) AND MACD>REF(MACD,REF(笔涨日,1)+1) AND 创新低,COLORMAGENTA,NODRAW;
M小底背:=大底背=0 AND L<REF(L,REF(笔涨日,1)+1) AND 绿面积>REF(绿面积,REF(笔涨日,1)+1) AND 创新低,COLORMAGENTA,NODRAW;
X小顶背:=大顶背=0 AND H>REF(H,REF(笔跌日,1)+1) AND DIF<REF(DIF,REF(笔跌日,1)+1) AND 创新高,COLORCYAN,NODRAW;
Z小顶背:=大顶背=0 AND H>REF(H,REF(笔跌日,1)+1) AND MACD<REF(MACD,REF(笔跌日,1)+1) AND 创新高,COLORCYAN,NODRAW;
M小顶背:=大顶背=0 AND H>REF(H,REF(笔跌日,1)+1) AND 红面积<REF(红面积,REF(笔跌日,1)+1) AND 创新高,COLORCYAN,NODRAW;
大底背数:=X底背+Z底背+M底背,COLORMAGENTA,NODRAW;
大顶背数:=X顶背+Z顶背+M顶背,COLORCYAN,NODRAW;
小底背数:=X小底背+Z小底背+M小底背,COLORMAGENTA,NODRAW;
小顶背数:=X小顶背+Z小顶背+M小顶背,COLORCYAN,NODRAW;
{ 买卖点（沿用原逻辑）}
三买:=VAR2=-1 AND L>中枢UP AND SUM(VAR2=-1 AND L>中枢UP,笔尾日)=1,COLORMAGENTA;
三卖:=VAR2=1 AND H<中枢DN AND SUM(VAR2=1 AND H<中枢DN,笔尾日)=1,COLORCYAN;
三卖日:=BARSLAST(三卖),NODRAW;
三买日:=BARSLAST(三买),NODRAW;
一买:三卖日<三买日 AND 创新低 AND 大底背数>0,COLORWHITE;
二买:三卖日<三买日 AND VAR2=-1 AND L>LAST底 AND REF(创新低日,1)=REF(笔涨日,1),COLORRED;
STICKLINE(一买,0,100,1,0),LINETHICK5,COLORWHITE;
STICKLINE(二买,0,100,1,0),LINETHICK5,COLORRED;
STICKLINE(三买,0,100,1,0),LINETHICK5,COLORMAGENTA;
一卖:=三卖日>三买日 AND 创新高 AND 大顶背数>0,COLORCYAN;
二卖:=三卖日>三买日 AND VAR2=1 AND H<LAST顶 AND REF(创新高日,1)=REF(笔跌日,1),COLORCYAN;
未来函数检测结果如下：
该公式包含未来函数:ZIG
该公式包含未来函数:PEAK
该公式包含未来函数:PEAKBARS
该公式包含未来函数:TROUGH
该公式包含未来函数:TROUGHBARS
定制指标公式、软件请联系QQ或微信同号：88652583
顶底分型赋值:1
MACHINETIME1赋值:如果当前系统的时间>0,返回当前系统的时间,否则返回第5号DLL*10000
VAR1赋值:第5号DLL
VAR2赋值:第5号DLL
VAR3赋值:第5号DLL
VAR4赋值:第5号DLL
ZSKSLAST赋值:第5号DLL
ZSJSLAST赋值:第5号DLL
ZSZD赋值:第5号DLL
ZSZG赋值:第5号DLL
ZSZZ赋值:第5号DLL
BILAST赋值:第5号DLL
DUANLAST赋值:第5号DLL
VAR22赋值:第5号DLL
VAR23赋值:第5号DLL
VAR24赋值:第5号DLL
VAR25赋值:第5号DLL
ZSLXZSJSLAST赋值:第5号DLL
ZSLXZSKSLAST赋值:第5号DLL
ZSLXZSZD赋值:第5号DLL
ZSLXZSZG赋值:第5号DLL
VAR30赋值:第5号DLL
VIP赋值:1
SHORT赋值:12
LONG赋值:26
MID1赋值:9
DIF赋值:收盘价的SHORT日指数移动平均-收盘价的LONG日指数移动平均
DEA赋值:DIF的MID1日指数移动平均
MACD赋值:(DIF-DEA)*2,COLORSTICK
笔尾日赋值:上次ZSJSLAST=1距今天数
中枢UP赋值:笔尾日日前的ZSZG,画绿色
中枢MID赋值:ZSZZ,画白色,NODRAW
中枢DN赋值:笔尾日日前的ZSZD,画绿色
笔涨日赋值:上次VAR2=-1距今天数,NODRAW
笔跌日赋值:上次VAR2=1距今天数,NODRAW
有效红柱赋值:如果笔涨日<笔跌日ANDMACD>0,返回MACD,否则返回0
有效绿柱赋值:如果笔涨日>笔跌日ANDMACD<0,返回MACD,否则返回0
红面积赋值:有效红柱的笔涨日日累和,NODRAW
绿面积赋值:有效绿柱的笔跌日日累和,NODRAW
LAST底赋值:如果VAR2=-1,返回1日前的笔涨日+1日前的最低价,否则返回无效数,NODRAW
LAST顶赋值:如果VAR2=1,返回1日前的笔跌日+1日前的最高价,否则返回无效数,NODRAW
创新低赋值:VAR2=-1 AND 最低价创新高赋值:VAR2=1 AND 最高价>LAST顶,NODRAW
创新低日赋值:上次创新低=1距今天数,NODRAW
创新高日赋值:上次创新高=1距今天数,NODRAW
LD底背赋值:最低价<1日前的创新低日+1日前的最低价 AND 创新低,画洋红色,NODRAW
X底背赋值:最低价<1日前的创新低日+1日前的最低价 AND DIF>1日前的创新低日+1日前的DIF AND 创新低,画洋红色,NODRAW
Z底背赋值:最低价<1日前的创新低日+1日前的最低价 AND MACD>1日前的创新低日+1日前的MACD AND 创新低,画洋红色,NODRAW
M底背赋值:最低价<1日前的创新低日+1日前的最低价 AND 绿面积>1日前的创新低日+1日前的绿面积 AND 创新低,画洋红色,NODRAW
大底背赋值:X底背 OR Z底背 OR M底背
LD顶背赋值:最高价>1日前的创新高日+1日前的最高价 AND 创新高,画青色,NODRAW
X顶背赋值:最高价>1日前的创新高日+1日前的最高价 AND DIF<1日前的创新高日+1日前的DIF AND 创新高,画青色,NODRAW
Z顶背赋值:最高价>1日前的创新高日+1日前的最高价 AND MACD<1日前的创新高日+1日前的MACD AND 创新高,画青色,NODRAW
M顶背赋值:最高价>1日前的创新高日+1日前的最高价 AND 红面积<1日前的创新高日+1日前的红面积 AND 创新高,画青色,NODRAW
大顶背赋值:X顶背 OR Z顶背 OR M顶背
X小底背赋值:大底背=0 AND 最低价<1日前的笔涨日+1日前的最低价 AND DIF>1日前的笔涨日+1日前的DIF AND 创新低,画洋红色,NODRAW
Z小底背赋值:大底背=0 AND 最低价<1日前的笔涨日+1日前的最低价 AND MACD>1日前的笔涨日+1日前的MACD AND 创新低,画洋红色,NODRAW
M小底背赋值:大底背=0 AND 最低价<1日前的笔涨日+1日前的最低价 AND 绿面积>1日前的笔涨日+1日前的绿面积 AND 创新低,画洋红色,NODRAW
X小顶背赋值:大顶背=0 AND 最高价>1日前的笔跌日+1日前的最高价 AND DIF<1日前的笔跌日+1日前的DIF AND 创新高,画青色,NODRAW
Z小顶背赋值:大顶背=0 AND 最高价>1日前的笔跌日+1日前的最高价 AND MACD<1日前的笔跌日+1日前的MACD AND 创新高,画青色,NODRAW
M小顶背赋值:大顶背=0 AND 最高价>1日前的笔跌日+1日前的最高价 AND 红面积<1日前的笔跌日+1日前的红面积 AND 创新高,画青色,NODRAW
大底背数赋值:X底背+Z底背+M底背,画洋红色,NODRAW
大顶背数赋值:X顶背+Z顶背+M顶背,画青色,NODRAW
小底背数赋值:X小底背+Z小底背+M小底背,画洋红色,NODRAW
小顶背数赋值:X小顶背+Z小顶背+M小顶背,画青色,NODRAW
输出三买:VAR2=-1 AND 最低价>中枢UP AND VAR2=-1ANDL>中枢UP的笔尾日日累和=1,画洋红色
三卖赋值:VAR2=1 AND 最高价<中枢DN AND VAR2=1ANDH<中枢DN的笔尾日日累和=1,画青色
三卖日赋值:上次三卖距今天数,NODRAW
三买日赋值:上次三买距今天数,NODRAW
输出一买:三卖日<三买日 AND 创新低 AND 大底背数>0,画白色
输出二买:三卖日<三买日 AND VAR2=-1 AND 最低价>LAST底 AND 1日前的创新低日=1日前的笔涨日,画红色
当满足条件一买时,在0和100位置之间画柱状线,宽度为1,0不为0则画空心柱.,线宽为5,画白色
当满足条件二买时,在0和100位置之间画柱状线,宽度为1,0不为0则画空心柱.,线宽为5,画红色
当满足条件三买时,在0和100位置之间画柱状线,宽度为1,0不为0则画空心柱.,线宽为5,画洋红色
一卖赋值:三卖日>三买日 AND 创新高 AND 大顶背数>0,画青色
二卖赋值:三卖日>三买日 AND VAR2=1 AND 最高价
