通达信操盘寻牛主图指标 很有趣的DELTA理论与月球运动周期关联分析 源码
"操盘寻牛"主图指标基于DELTA理论与月球运动周期关联研究，市场预测能力依托技术分析应用与历史统计数据支撑。虽未经完整科学验证，但在金融技术分析领域已形成特色应用场景。
核心应用聚焦Delta时空密码识别：通过捕捉品种高低点转折的时间规律，可精准预判市场顶底形成周期。该时间序列分析方法在技术交易策略中具备独特参考价值。
DELTA理论采用四色周期标记体系辅助趋势判断：
红/绿/白/黄四色系对应不同市场阶段
日期编码锁定关键时间节点（如"红初六"指红色周期农历初六关键窗口）
时间间隔参数辅助定位买卖时机（如"绿前6"标识绿色阶段启动前6日信号）
该体系通过颜色周期与时间编码的矩阵组合，构建多维度市场分析框架，为技术派交易者提供可视化决策工具。
CSR:=3;
朔望月:=29.53058782;
RIC:=DATETODAY(DATE)+1;
IS:=INTPART((RIC+3)/朔望月);
YYS:=(((RIC+CSR)/朔望月-INTPART((RIC+CSR)/朔望月))*朔望月);
NLRI:IF(YYS< 1,ROUND(YYS+朔望月),INTPART(YYS)),NODRAW;
NUM:=MOD(IS,4);
ZYG:=IF(REF(NLRI,1)>=NLRI OR NLRI=1,1,0);
STICKLINE(ZYG AND NUM=1,C,H*5,0,-1),COLORRED;
STICKLINE(ZYG AND NUM=1,O,L*-5,0,-1),COLORRED;
STICKLINE(ZYG AND NUM=2,C,H*5,0,-1),COLORGREEN;
江恩日:BARSLAST(ZYG AND NUM=2)+1,NODRAW;
STICKLINE(ZYG AND NUM=2,O,L*-5,0,-1),COLORGREEN;
STICKLINE(ZYG AND NUM=3,C,H*5,0,-1),COLORWHITE;
STICKLINE(ZYG AND NUM=3,O,L*-5,0,-1),COLORWHITE;
STICKLINE(ZYG AND NUM=0,C,H*5,0,-1),COLORYELLOW;
STICKLINE(ZYG AND NUM=0,O,L*-5,0,-1),COLORYELLOW;
基准:=(DATETODAY(DATE)+2)/朔望月+0.0016,COLORYELLOW,NODRAW;
ISFIRSTA:=INTPART(基准);
SCOLORA:=IF((REF(基准,1)< ISFIRSTA AND (基准+0.1)>=ISFIRSTA)OR 基准=ISFIRSTA,1,0);
A0:=ZYG AND MOD(INTPART(基准+0.1),4)=1;
A1:=ZYG AND MOD(INTPART(基准+0.1),4)=2;
A2:=ZYG AND MOD(INTPART(基准+0.1),4)=3;
A3:=ZYG AND MOD(INTPART(基准+0.1),4)=0;
STICKLINE(A0,H*1.5,1,0,0),COLORRED,LINETHICK1;
STICKLINE(A1,H*1.5,1,0,0),COLORMAGENTA,LINETHICK1;
STICKLINE(A2,H*1.5,1,0,0),COLORYELLOW,LINETHICK1;
STICKLINE(A3,H*1.5,1,0,0),COLORBLUE,LINETHICK1;
STICKLINE(BARSLAST(A0)=5,L*0.98,1.3,0,-1),COLORCYAN,LINETHICK1;
STICKLINE(BARSLAST(A0)=13,H*1.02,H*1.3,0,-1),COLORCYAN,LINETHICK1;
STICKLINE(BARSLAST(A1)=0,L*0.98,1.3,0,-1),COLORCYAN,LINETHICK1;
STICKLINE(BARSLAST(A1)=7,H*1.02,H*1.3,0,-1),COLORCYAN,LINETHICK1;
STICKLINE(BARSLAST(A1)=10,L*0.98,1.3,0,-1),COLORCYAN,LINETHICK1;
STICKLINE(BARSLAST(A1)=14,H*1.02,H*1.3,0,-1),COLORCYAN,LINETHICK1;
STICKLINE(BARSLAST(A2)=3 ,L*0.98,1.3,0,-1),COLORCYAN,LINETHICK1;
STICKLINE(BARSLAST(A2)=7,H*1.02,H*1.3,0,-1),COLORCYAN,LINETHICK1;
STICKLINE(BARSLAST(A2)=14,L*0.98,1.3,0,-1),COLORCYAN,LINETHICK1;
STICKLINE(BARSLAST(A3)=5,H*1.02,H*1.3,0,-1),COLORCYAN,LINETHICK1;
STICKLINE(BARSLAST(A3)=9 ,L*0.98,1.3,0,-1),COLORCYAN,LINETHICK1;
STICKLINE(BARSLAST(A3)=15,H*1.02,H*1.3,0,-1),COLORCYAN,LINETHICK1;
DRAWTEXT(BARSLAST(A0)=5,L*0.9,'1'),COLORCYAN;
DRAWTEXT(BARSLAST(A0)=13,H*1.1,'2'),COLORCYAN;
DRAWTEXT(BARSLAST(A1)=0,L*0.9,'3'),COLORCYAN;
DRAWTEXT(BARSLAST(A1)=7,H*1.1,'4'),COLORCYAN;
DRAWTEXT(BARSLAST(A1)=10,L*0.9,'5'),COLORCYAN;
DRAWTEXT(BARSLAST(A1)=14,H*1.1,'6'),COLORCYAN;
DRAWTEXT(BARSLAST(A2)=3,L*0.9,'7'),COLORCYAN;
DRAWTEXT(BARSLAST(A2)=7 ,H*1.1,'8'),COLORCYAN;
DRAWTEXT(BARSLAST(A2)=14,L*0.9,'9'),COLORCYAN;
DRAWTEXT(BARSLAST(A3)=5,H*1.1,'10'),COLORCYAN;
DRAWTEXT(BARSLAST(A3)=9,L*0.9,'11'),COLORCYAN;
DRAWTEXT(BARSLAST(A3)=15,H*1.1,'12'),COLORCYAN;
STICKLINE(C>0,L*0.99,H*1.01,8,0),COLORBLACK;
DRAWKLINE(H,O,L,C);
DRAWTEXT_FIX(C>O,0,0.3,0,'指标公式网公式网HTTP://WWW.ZBGS3.COM'),COLOR222222;
DRAWTEXT_FIX(C>0,0.7,0.01,0,'（月域）白'),COLORFFFFFF;
DRAWTEXT_FIX(C>0,0.7,0.05,0,'1白6 2白10 3白17'),COLORFFFFFF;
DRAWTEXT_FIX(C>0,0.7,0.1,0,'4黄5 5黄10 6黄20 '),COLORYELLOW ;
DRAWTEXT_FIX(C>0,0.7,0.15,0,'7红6 8红12 9绿2'),COLOR0000FF;
DRAWTEXT_FIX(C>0,0.7,0.2,0,' 10绿8 11绿13 （11）绿16'),COLORGREEN;
DRAWTEXT_FIX(C>0,0.5,0.16,0,'（DERTA绿）'),COLORGREEN;
DRAWTEXT_FIX(C>0,0.5,0.2,0,'1红初六 2红十四 3绿三十'),COLOR0000FF;
DRAWTEXT_FIX(C>0,0.5,0.24,0,'1红后6 2绿前6 3绿处'),COLOR0000FF;
DRAWTEXT_FIX(C>0,0.5,0.3,0,'4绿初八 5绿十一 6绿后十五'),COLORGREEN;
DRAWTEXT_FIX(C>0,0.5,0.34,0,'4绿后8 5白前10 6白前6'),COLORGREEN;
DRAWTEXT_FIX(C>0,0.5,0.4,0,'7白初四 8白后初八 9白十五'),COLORFFFFFF;
DRAWTEXT_FIX(C>0,0.5,0.44,0,'7白前3 8白后8 9黄前5'),COLORFFFFFF;
DRAWTEXT_FIX(C>0,0.5,0.5,0,'10黄初六 11黄初十 12黄十六'),COLORYELLOW;
DRAWTEXT_FIX(C>0,0.5,0.54,0,'10黄后6 11黄后10 12红前4'),COLORYELLOW;
DRAWTEXT_FIX(1,0.00,0,0,'所属行业：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.07,0,0,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.14,0.0,0,'概念板块：'),COLORFF00FF;
DRAWTEXT_FIX(1,0.20,0.0,0,GNBLOCK),COLORFF00FF;
DRAWTEXT_FIX(1,0.00,0.04,0,'风格板块：'),COLOR0000FF;
DRAWTEXT_FIX(1,0.07,0.04,0,FGBLOCK),COLOR0000FF;
来函数检测结果如下：
该公式没有未来函数
解密、定制、编写公式指标请联系QQ或微信同号：88652583
置顶指标
相关指标公式
CSR赋值:3
朔望月赋值:29.53058782
RIC赋值:日期对应的转换天数+1
IS赋值:(RIC+3)/朔望月的整数部分
YYS赋值:(((RIC+CSR)/朔望月-(RIC+CSR)/朔望月的整数部分)*朔望月)
输出NLRI:如果YYS<1,返回对YYS+朔望月(进行)四舍五入,否则返回YYS的整数部分,NODRAW
NUM赋值:IS关于4的模
ZYG赋值:如果1日前的NLRI>=NLRIORNLRI=1,返回1,否则返回0
当满足条件ZYGANDNUM=1时,在收盘价和最高价*5位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画红色
当满足条件ZYGANDNUM=1时,在开盘价和最低价*-5位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画红色
当满足条件ZYGANDNUM=2时,在收盘价和最高价*5位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画绿色
输出江恩日:上次ZYGANDNUM=2距今天数+1,NODRAW
当满足条件ZYGANDNUM=2时,在开盘价和最低价*-5位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画绿色
当满足条件ZYGANDNUM=3时,在收盘价和最高价*5位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画白色
当满足条件ZYGANDNUM=3时,在开盘价和最低价*-5位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画白色
当满足条件ZYGANDNUM=0时,在收盘价和最高价*5位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画黄色
当满足条件ZYGANDNUM=0时,在开盘价和最低价*-5位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画黄色
基准赋值:(日期对应的转换天数+2)/朔望月+0.0016,画黄色,NODRAW
ISFIRSTA赋值:基准的整数部分
SCOLORA赋值:如果(1日前的基准=ISFIRSTA)OR基准=ISFIRSTA,返回1,否则返回0
A0赋值:ZYG AND 基准+0.1的整数部分关于4的模=1
A1赋值:ZYG AND 基准+0.1的整数部分关于4的模=2
A2赋值:ZYG AND 基准+0.1的整数部分关于4的模=3
A3赋值:ZYG AND 基准+0.1的整数部分关于4的模=0
当满足条件A0时,在最高价*1.5和1位置之间画柱状线,宽度为0,0不为0则画空心柱.,画红色,线宽为1
当满足条件A1时,在最高价*1.5和1位置之间画柱状线,宽度为0,0不为0则画空心柱.,画洋红色,线宽为1
当满足条件A2时,在最高价*1.5和1位置之间画柱状线,宽度为0,0不为0则画空心柱.,画黄色,线宽为1
当满足条件A3时,在最高价*1.5和1位置之间画柱状线,宽度为0,0不为0则画空心柱.,画蓝色,线宽为1
当满足条件上次A0距今天数=5时,在最低价*0.98和1.3位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画青色,线宽为1
当满足条件上次A0距今天数=13时,在最高价*1.02和最高价*1.3位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画青色,线宽为1
当满足条件上次A1距今天数=0时,在最低价*0.98和1.3位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画青色,线宽为1
当满足条件上次A1距今天数=7时,在最高价*1.02和最高价*1.3位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画青色,线宽为1
当满足条件上次A1距今天数=10时,在最低价*0.98和1.3位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画青色,线宽为1
当满足条件上次A1距今天数=14时,在最高价*1.02和最高价*1.3位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画青色,线宽为1
当满足条件上次A2距今天数=3时,在最低价*0.98和1.3位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画青色,线宽为1
当满足条件上次A2距今天数=7时,在最高价*1.02和最高价*1.3位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画青色,线宽为1
当满足条件上次A2距今天数=14时,在最低价*0.98和1.3位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画青色,线宽为1
当满足条件上次A3距今天数=5时,在最高价*1.02和最高价*1.3位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画青色,线宽为1
当满足条件上次A3距今天数=9时,在最低价*0.98和1.3位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画青色,线宽为1
当满足条件上次A3距今天数=15时,在最高价*1.02和最高价*1.3位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画青色,线宽为1
当满足条件上次A0距今天数=5时,在最低价*0.9位置书写文字,画青色
当满足条件上次A0距今天数=13时,在最高价*1.1位置书写文字,画青色
当满足条件上次A1距今天数=0时,在最低价*0.9位置书写文字,画青色
当满足条件上次A1距今天数=7时,在最高价*1.1位置书写文字,画青色
当满足条件上次A1距今天数=10时,在最低价*0.9位置书写文字,画青色
当满足条件上次A1距今天数=14时,在最高价*1.1位置书写文字,画青色
当满足条件上次A2距今天数=3时,在最低价*0.9位置书写文字,画青色
当满足条件上次A2距今天数=7时,在最高价*1.1位置书写文字,画青色
当满足条件上次A2距今天数=14时,在最低价*0.9位置书写文字,画青色
当满足条件上次A3距今天数=5时,在最高价*1.1位置书写文字,画青色
当满足条件上次A3距今天数=9时,在最低价*0.9位置书写文字,画青色
当满足条件上次A3距今天数=15时,在最高价*1.1位置书写文字,画青色
当满足条件收盘价>0时,在最低价*0.99和最高价*1.01位置之间画柱状线,宽度为8,0不为0则画空心柱.,画黑色
K线
当满足条件收阳线时,在横轴0纵轴0.3位置书写文字,COLOR222222
当满足条件收盘价>0时,在横轴0.7纵轴0.01位置书写文字,COLORFFFFFF
当满足条件收盘价>0时,在横轴0.7纵轴0.05位置书写文字,COLORFFFFFF
当满足条件收盘价>0时,在横轴0.7纵轴0.1位置书写文字,画黄色
当满足条件收盘价>0时,在横轴0.7纵轴0.15位置书写文字,COLOR0000FF
当满足条件收盘价>0时,在横轴0.7纵轴0.2位置书写文字,画绿色
当满足条件收盘价>0时,在横轴0.5纵轴0.16位置书写文字,画绿色
当满足条件收盘价>0时,在横轴0.5纵轴0.2位置书写文字,COLOR0000FF
当满足条件收盘价>0时,在横轴0.5纵轴0.24位置书写文字,COLOR0000FF
当满足条件收盘价>0时,在横轴0.5纵轴0.3位置书写文字,画绿色
当满足条件收盘价>0时,在横轴0.5纵轴0.34位置书写文字,画绿色
当满足条件收盘价>0时,在横轴0.5纵轴0.4位置书写文字,COLORFFFFFF
当满足条件收盘价>0时,在横轴0.5纵轴0.44位置书写文字,COLORFFFFFF
当满足条件收盘价>0时,在横轴0.5纵轴0.5位置书写文字,画黄色
当满足条件收盘价>0时,在横轴0.5纵轴0.54位置书写文字,画黄色
当满足条件1时,在横轴0.00纵轴0位置书写文字,画黄色
当满足条件1时,在横轴0.07纵轴0位置书写文字,画黄色
当满足条件1时,在横轴0.14纵轴0.0位置书写文字,COLORFF00FF
当满足条件1时,在横轴0.20纵轴0.0位置书写文字,COLORFF00FF
当满足条件1时,在横轴0.00纵轴0.04位置书写文字,COLOR0000FF
当满足条件1时,在横轴0.07纵轴0.04位置书写文字,COLOR0000FF
