通达信30分钟60分钟日周月线共振副图指标 源码附图

原理解析：
DRAWGBK(C>0, RGB(1,1,1),RGB(1,1,1),0,'0',0)
输出DIF:收盘价的12日指数移动平均 - 收盘价的26日指数移动平均,LINETHICK0
输出DEA:DIF的9日指数移动平均,LINETHICK0
A1赋值:上次1日前的DIF上穿DEA距今天数
B1赋值:A1+1日前的C>C AND A1+1日前的DIF A2赋值:上次REF(CROSS("KDJ.K"(9,3,3距今天数,"KDJ.D"(9,3,3)),1))
B2赋值:A2+1日前的C>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS ("KDJ.K"(9,3,3),"KDJ.D"(9,3,3))
A3赋值:上次REF(CROSS("RSI.RSI1"(6,12,24距今天数,"RSI.RSI2"(6,12,24)),1))
B3赋值:A3+1日前的C>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS ("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24))
C1赋值:上次1日前的DEA上穿DIF距今天数
D1赋值:C1+1日前的CDIF AND DEA上穿DIF
C2赋值:上次REF(CROSS("KDJ.D"(9,3,3距今天数,"KDJ.K"(9,3,3)),1))
D2赋值:C2+1日前的C"KDJ.K"(9,3,3) AND CROSS
("KDJ.D"(9,3,3),"KDJ.K"(9,3,3))
C3赋值:上次REF(CROSS("RSI.RSI2"(6,12,24距今天数,"RSI.RSI1"(6,12,24)),1))
D3赋值:C3+1日前的C"RSI.RSI1"(6,12,24) AND CROSS
("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24))
当满足条件B1>0时,在130和120之间画柱状线
DRAWTEXT((B1>0),124.5,' MACD底背离'),COLORRED
当满足条件D1>0时,在130和120之间画柱状线
DRAWTEXT((D1>0),124.5,' MACD顶背离'),COLORFF8000
当满足条件B2>0时,在0和-10之间画柱状线
DRAWTEXT((B2>0),-6,' KDJ底背离'),COLORFA00FA
当满足条件D2>0时,在0和-10之间画柱状线
DRAWTEXT((D2>0),-6,' KDJ顶背离'),COLORGREEN
当满足条件B3>0时,在-20和-10之间画柱状线
DRAWTEXT((B3>0),-15,' RSI底背离'),画黄色
当满足条件D3>0时,在-20和-10之间画柱状线
DRAWTEXT((D3>0),-15,' RSI顶背离'),COLORCYAN
RSV赋值:(收盘价-9日内最低价最低值)/(9日内最高价最高值-9日内最低价最低值)*100
RSV的9日[3日权重]移动平均
K的9日[3日权重]移动平均
输出J:3*K-2*D,LINETHICK0
{A赋值:DIF上穿DEA AND K上穿D AND J上穿D
当满足条件A时,在0和100之间画柱状线
当满足条件A时,在92和25之间画图标
当满足条件A时,在42和25之间画图标
当满足条件A时,在93和' ★MACD_KDJ金叉'位置书写文字
当满足条件A时,在43和' ★KDJ_MACD金叉'位置书写文字
}
DIF30:=收盘价的12/8日指数移动平均-收盘价的26/8日指数移动平均
DEA30:=DIF30的9/4日指数移动平均
当满足条件DIF30>=DEA30时,在100和105之间画柱状线
当满足条件DIF30当满足条件ISLASTBAR时,在102和' 30M'位置书写文字
DIF60:=收盘价的12/4日指数移动平均-收盘价的26/4日指数移动平均
DEA60:=DIF60的9/2日指数移动平均
当满足条件DIF60>=DEA60时,在90和95之间画柱状线
当满足条件DIF60当满足条件ISLASTBAR时,在92和' 60M'位置书写文字
日DIF赋值:"MACD.DIF#DAY"
日DEA赋值:"MACD.DEA#DAY"
当满足条件日DIF<日DEA时,在80和85之间画柱状线
当满足条件日DIF>日DEA时,在80和85之间画柱状线
当满足条件ISLASTBAR时,在82和' 日M'位置书写文字
周DIF赋值:"MACD.DIF#WEEK"(12,26,9)
周DEA赋值:"MACD.DEA#WEEK"(12,26,9)
当满足条件周DIF<周DEA时,在70和75之间画柱状线
当满足条件周DIF>周DEA时,在70和75之间画柱状线
当满足条件ISLASTBAR时,在72和' 周M'位置书写文字
月DIF赋值:"MACD.DIF#MONTH"(12,26,9)
月DEA赋值:"MACD.DEA#MONTH"(12,26,9)
当满足条件月DIF<月DEA时,在60和65之间画柱状线
当满足条件月DIF>月DEA时,在60和65之间画柱状线
当满足条件ISLASTBAR时,在62和' 月M'位置书写文字
N赋值:1
月输出K:KDJ.K#MONTH,NODRAW,画白色,LINETHICK0
月输出D:KDJ.D#MONTH,NODRAW,画黄色,LINETHICK0
月输出J:KDJ.J#MONTH,NODRAW,COLORMAGENTA,LINETHICK0
周输出K:KDJ.K#WEEK,NODRAW,画白色,LINETHICK0
周输出D:KDJ.D#WEEK,NODRAW,画黄色,LINETHICK0
周输出J:KDJ.J#WEEK,NODRAW,COLORMAGENTA,LINETHICK0
日输出K:KDJ.K,NODRAW,画白色,LINETHICK0
日输出D:KDJ.D,NODRAW,画黄色,LINETHICK0
日输出J:KDJ.J,NODRAW,COLORMAGENTA,LINETHICK0
{K日金叉赋值:日K上穿日D AND (日D<40 OR 日D>60)
K周金叉赋值:周K上穿周D AND (周D<40 OR 周D>60)
K月金叉赋值:月K上穿月D AND (月D<40 OR 月D>60)
共振KDJ赋值:(K周金叉 AND K日金叉) OR (K周金叉 AND K月金叉) OR (K日金叉 AND K月金叉)OR (K日金叉 AND
K周金叉 AND K月金叉)
当满足条件共振KDJ时,在0和50之间画柱状线
当满足条件共振KDJ时,在42和25之间画图标
{DRAWTEXT((K周金叉 AND K日金叉) OR (K周金叉 AND K月金叉) OR (K日金叉 AND K月金叉)OR (K日金叉 AND
K周金叉 AND K月金叉),42,' ★KDJ(日/周/月)共振'),画黄色
如果N=3返回月K否则返回DRAWNULL
如果N=3返回月D否则返回DRAWNULL
如果N=3返回月J否则返回DRAWNULL
如果N=2返回周K否则返回DRAWNULL
如果N=2返回周D否则返回DRAWNULL
如果N=2返回周J否则返回DRAWNULL
如果N=1返回日K否则返回DRAWNULL
如果N=1返回日D否则返回DRAWNULL
如果N=1返回日J否则返回DRAWNULL

57,画黄色,LINETHICK2

RSV30:=(收盘价-18日内最低价最低值)/(18日内最高价最高值-18日内最低价最低值)
RSV30的3日[1日权重]移动平均
K30的3日[1日权重]移动平均
当满足条件K30>= D30时,在50和55之间画柱状线
当满足条件K30 < D30时,在50和55之间画柱状线
当满足条件ISLASTBAR时,在49和' 30K'位置书写文字
RSV60:=(收盘价-36日内最低价最低值)/(36日内最高价最高值-36日内最低价最低值)
RSV60的3日[1日权重]移动平均
K60的3日[1日权重]移动平均
当满足条件K60>= D60时,在40和45之间画柱状线
当满足条件K60 < D60时,在40和45之间画柱状线
当满足条件ISLASTBAR时,在39和' 60K'位置书写文字
当满足条件日K>=日D时,在30和35之间画柱状线
当满足条件日K< 日D时,在30和35之间画柱状线
当满足条件ISLASTBAR时,在29和' 日K'位置书写文字
当满足条件周K>=周D时,在20和25之间画柱状线
当满足条件周K< 周D时,在20和25之间画柱状线
当满足条件ISLASTBAR时,在19和' 周K'位置书写文字
当满足条件月K>=月D时,在10和15之间画柱状线
当满足条件月K< 月D时,在10和15之间画柱状线
当满足条件ISLASTBAR时,在9和' 月K'位置书写文字
{AAAA:=( 日DIF>日DEA AND 周DIF>周DEA AND 月DIF>月DEA AND 日K>=日D AND 周K>=周D AND 月K>=月D)
当满足条件AAAA时,在95和1之间画图标
当满足条件AAAA时,在99和1之间画图标
当满足条件AAAA时,在103和1之间画图标
如果>日DEA AND 周D>周DEA AND 月D>月DEA AND 日K>=日D AND 周K>=周D AND 月K>=月D 返回10否则返回85
{0,LINETHICK1,DOTLINE,画白色
50,LINETHICK1,画白色
100,LINETHICK1,DOTLINE,画白色
}
{DRAWRECTREL(0,0,180,990,RGB(250,0,250))
DRAWTEXT_FIX(ISLASTBAR,0.111,0.03,0,'KDJ(日/周/月)'),COLOR00FFFF
当满足条件ISLASTBAR时,在横轴0.101纵轴0.18位置书写文字
当满足条件ISLASTBAR时,在横轴0.140纵轴0.18位置书写数字
当满足条件ISLASTBAR时,在横轴0.101纵轴0.31位置书写文字
当满足条件ISLASTBAR时,在横轴0.140纵轴0.31位置书写数字
当满足条件ISLASTBAR时,在横轴0.101纵轴0.44位置书写文字
当满足条件ISLASTBAR时,在横轴0.140纵轴0.44位置书写数字
当满足条件ISLASTBAR时,在横轴0.101纵轴0.57位置书写文字
当满足条件ISLASTBAR时,在横轴0.140纵轴0.57位置书写数字
当满足条件ISLASTBAR时,在横轴0.101纵轴0.70位置书写文字
当满足条件ISLASTBAR时,在横轴0.140纵轴0.70位置书写数字
当满足条件ISLASTBAR时,在横轴0.101纵轴0.83位置书写文字
当满足条件ISLASTBAR时,在横轴0.140纵轴0.83位置书写数字
DRAWRECTREL(0,0,90,990,RGB(220,0,0))
DRAWTEXT_FIX(ISLASTBAR,0.023,0.03,0,'MACD(日/周/月)'),COLOR00FFFF
当满足条件ISLASTBAR时,在横轴0.01纵轴0.18位置书写文字
当满足条件ISLASTBAR时,在横轴0.05纵轴0.18位置书写数字
当满足条件ISLASTBAR时,在横轴0.01纵轴0.31位置书写文字
当满足条件ISLASTBAR时,在横轴0.05纵轴0.31位置书写数字
当满足条件ISLASTBAR时,在横轴0.01纵轴0.44位置书写文字
当满足条件ISLASTBAR时,在横轴0.05纵轴0.44位置书写数字
当满足条件ISLASTBAR时,在横轴0.01纵轴0.57位置书写文字
当满足条件ISLASTBAR时,在横轴0.05纵轴0.57位置书写数字
当满足条件ISLASTBAR时,在横轴0.01纵轴0.70位置书写文字
当满足条件ISLASTBAR时,在横轴0.05纵轴0.70位置书写数字
当满足条件ISLASTBAR时,在横轴0.01纵轴0.83位置书写文字
当满足条件ISLASTBAR时,在横轴0.05纵轴0.83位置书写数字
}