通达信多空日周平衡副图 源码分享 附图

{注：此指标因引用了周、月指标参数，当周末月末还未过去的日期内，可发生信号漂移现象}

 

{KDJ日金}

日K:="KDJ.K#DAY"(9,3,3);2,COLOR000000;

日D:="KDJ.D#DAY"(9,3,3);

DRAWICON(日K>日D,1,1);

DRAWICON(日K<日D,1,2);

{DRAWTEXT(ISLASTBAR=1,1,'日K'),COLORFFFFFF;}

{MACD日金}

日DIF:="MACD.DIF#DAY"(12,26,9);

日DEA:="MACD.DEA#DAY"(12,26,9);

DRAWICON(日DIF>日DEA,1.1,1);

DRAWICON(日DIF<日DEA,1.1,2);

{DRAWTEXT(ISLASTBAR=1,1.1,'日M'),COLORFFFFFF;}

{RSI日}

日RSI:="RSI.RSI1#DAY"(9);

DRAWICON(日RSI>50,1.2,1);

DRAWICON(日RSI<50,1.2,2);

{DRAWTEXT(ISLASTBAR=1,1.2,'日R'),COLORFFFFFF;}

{KDJ周金}

周K:="KDJ.K#WEEK"(9,3,3);

周D:="KDJ.D#WEEK"(9,3,3);

DRAWICON(周K>周D,1.3,1);

DRAWICON(周K<周D,1.3,2);

{DRAWTEXT(ISLASTBAR=1,1.3,'周K'),COLORFFFFFF;}

{MACD周金}

周DIF:="MACD.DIF#WEEK"(12,26,9);

周DEA:="MACD.DEA#WEEK"(12,26,9);

DRAWICON(周DIF>周DEA,1.4,1);

DRAWICON(周DIF<周DEA,1.4,2);

{DRAWTEXT(ISLASTBAR=1,1.4,'周M'),COLORFFFFFF;}

{RSI周}

周RSI:="RSI.RSI1#WEEK"(9);

DRAWICON(周RSI>50,1.5,1);

DRAWICON(周RSI<50,1.5,2);

{DRAWTEXT(ISLASTBAR=1,1.5,'周R'),COLORFFFFFF;}

{KDJ月金}

月K:="KDJ.K#MONTH"(9,3,3);

月D:="KDJ.D#MONTH"(9,3,3);

DRAWICON(月K>月D,1.6,1);

DRAWICON(月K<月D,1.6,2);

{DRAWTEXT(ISLASTBAR=1,1.6,'月K'),COLORFFFFFF;}

{MACD月金}

月DIF:="MACD.DIF#MONTH"(12,26,9);

月DEA:="MACD.DEA#MONTH"(12,26,9);

DRAWICON(月DIF>月DEA,1.7,1);

DRAWICON(月DIF<月DEA,1.7,2);

{DRAWTEXT(ISLASTBAR=1,1.7,'月M'),COLORFFFFFF;}

{RSI月}

月RSI:="RSI.RSI1#MONTH"(9);

DRAWICON(月RSI>50,1.8,1);

DRAWICON(月RSI<50,1.8,2);

{DRAWTEXT(ISLASTBAR=1,1.8,'月R'),COLORFFFFFF;}

{前一天涨停板??若出现全部金叉以后

第二天 开盘前挂单买进 }

选股:=IF(月RSI>50 AND 月DIF>月DEA AND 月K>月D AND 日RSI>50 AND 日DIF>日DEA AND 日K>日D AND 周RSI>50 AND 周DIF>周DEA AND 周K>周D,1,0);

STICKLINE(选股=1 ,1,1.88,1.5,1 ),COLORRED;

XG:IF(选股=1,0.8,0)COLORRED;

低买:IF((CROSS(XG,0.01)),1,0),COLOR00FFFF,LINETHICK3;

原理解析：
{注：此指标因引用了周、月指标参数，当周末月末还未过去的日期内，可发生信号漂移现象}

{KDJ日金}
日K赋值:"KDJ.K#DAY"(9,3,3)
2,COLOR000000
日D赋值:"KDJ.D#DAY"(9,3,3)
当满足条件日K>日D时,在1和1之间画图标
当满足条件日K<日D时,在1和2之间画图标
当满足条件ISLASTBAR=1时,在1和'日K'位置书写文字
}
{MACD日金}
日DIF:="MACD.DIF#DAY"(12,26,9)
日DEA:="MACD.DEA#DAY"(12,26,9)
当满足条件日DIF>日DEA时,在1.1和1之间画图标
当满足条件日DIF<日DEA时,在1.1和2之间画图标
当满足条件ISLASTBAR=1时,在1.1和'日M'位置书写文字
}
{RSI日}
日RSI赋值:"RSI.RSI1#DAY"(9)
当满足条件日RSI>50时,在1.2和1之间画图标
当满足条件日RSI<50时,在1.2和2之间画图标
当满足条件ISLASTBAR=1时,在1.2和'日R'位置书写文字
}
{KDJ周金}
周K赋值:"KDJ.K#WEEK"(9,3,3)
周D赋值:"KDJ.D#WEEK"(9,3,3)
当满足条件周K>周D时,在1.3和1之间画图标
当满足条件周K<周D时,在1.3和2之间画图标
当满足条件ISLASTBAR=1时,在1.3和'周K'位置书写文字
}
{MACD周金}
周DIF:="MACD.DIF#WEEK"(12,26,9)
周DEA:="MACD.DEA#WEEK"(12,26,9)
当满足条件周DIF>周DEA时,在1.4和1之间画图标
当满足条件周DIF<周DEA时,在1.4和2之间画图标
当满足条件ISLASTBAR=1时,在1.4和'周M'位置书写文字
}
{RSI周}
周RSI赋值:"RSI.RSI1#WEEK"(9)
当满足条件周RSI>50时,在1.5和1之间画图标
当满足条件周RSI<50时,在1.5和2之间画图标
当满足条件ISLASTBAR=1时,在1.5和'周R'位置书写文字
}
{KDJ月金}
月K赋值:"KDJ.K#MONTH"(9,3,3)
月D赋值:"KDJ.D#MONTH"(9,3,3)
当满足条件月K>月D时,在1.6和1之间画图标
当满足条件月K<月D时,在1.6和2之间画图标
当满足条件ISLASTBAR=1时,在1.6和'月K'位置书写文字
}
{MACD月金}
月DIF:="MACD.DIF#MONTH"(12,26,9)
月DEA:="MACD.DEA#MONTH"(12,26,9)
当满足条件月DIF>月DEA时,在1.7和1之间画图标
当满足条件月DIF<月DEA时,在1.7和2之间画图标
当满足条件ISLASTBAR=1时,在1.7和'月M'位置书写文字
}
{RSI月}
月RSI赋值:"RSI.RSI1#MONTH"(9)
当满足条件月RSI>50时,在1.8和1之间画图标
当满足条件月RSI<50时,在1.8和2之间画图标
当满足条件ISLASTBAR=1时,在1.8和'月R'位置书写文字
如果月RSI>50 AND 月D>月DEA AND 月K>月D AND 日RSI>50 AND 日D>日DEA AND 日K>日D AND 周RSI>50 AND 周D>周DEA AND 周K>周D返回1否则返回0
当满足条件选股=1 时,在1和1.88之间画柱状线
如果选股=1返回0.8否则返回0
输出低买:IF((XG上穿0.01),1,0),COLOR00FFFF, 线宽为3