通达信黑码初显 多指标共振副图指标源码
<p>以下是通达信黑码初显 多指标共振副图指标源码（无源码的请下载附件导入）</p>
<div class="con" id="rjsmad1"></div>
<p>DD11:0.95,COLORFF33FF;<br>
DD22:2,COLORGREEN;</p>
<p>{KDJ日金}<br>
日K:="KDJ.K#DAY"(9,3,3);<br>
日D:="KDJ.D#DAY"(9,3,3);<br>
DRAWICON(日K>日D,1,1);<br>
DRAWICON(日K<日D,1,2);<br>
DRAWTEXT(ISLASTBAR=1,1,'日K'),COLORFFFFFF;<br>
{MACD日金}<br>
日DIF:="MACD.DIF#DAY"(12,26,9);<br>
日DEA:="MACD.DEA#DAY"(12,26,9);<br>
DRAWICON(日DIF>日DEA,1.1,1);<br>
DRAWICON(日DIF<日DEA,1.1,2);<br>
DRAWTEXT(ISLASTBAR=1,1.1,'日M'),COLORFFFFFF;<br>
{RSI日}<br>
日RSI:="RSI.RSI1#DAY"(9);<br>
DRAWICON(日RSI>50,1.2,1);<br>
DRAWICON(日RSI<50,1.2,2);<br>
DRAWTEXT(ISLASTBAR=1,1.2,'日R'),COLORFFFFFF;<br>
{KDJ周金}<br>
周K:="KDJ.K#WEEK"(9,3,3);<br>
周D:="KDJ.D#WEEK"(9,3,3);<br>
DRAWICON(周K>周D,1.3,1);<br>
DRAWICON(周K<周D,1.3,2);<br>
DRAWTEXT(ISLASTBAR=1,1.3,'周K'),COLORFFFFFF;<br>
{MACD周金}<br>
周DIF:="MACD.DIF#WEEK"(12,26,9);<br>
周DEA:="MACD.DEA#WEEK"(12,26,9);<br>
DRAWICON(周DIF>周DEA,1.4,1);<br>
DRAWICON(周DIF<周DEA,1.4,2);<br>
DRAWTEXT(ISLASTBAR=1,1.4,'周M'),COLORFFFFFF;<br>
{RSI周}<br>
周RSI:="RSI.RSI1#WEEK"(9);<br>
DRAWICON(周RSI>50,1.5,1);<br>
DRAWICON(周RSI<50,1.5,2);<br>
DRAWTEXT(ISLASTBAR=1,1.5,'周R'),COLORFFFFFF;<br>
{KDJ月金}<br>
月K:="KDJ.K#MONTH"(9,3,3);<br>
月D:="KDJ.D#MONTH"(9,3,3);<br>
DRAWICON(月K>月D,1.6,1);<br>
DRAWICON(月K<月D,1.6,2);<br>
DRAWTEXT(ISLASTBAR=1,1.6,'月K'),COLORFFFFFF;<br>
{MACD月金}<br>
月DIF:="MACD.DIF#MONTH"(12,26,9);<br>
月DEA:="MACD.DEA#MONTH"(12,26,9);<br>
DRAWICON(月DIF>月DEA,1.7,1);<br>
DRAWICON(月DIF<月DEA,1.7,2);<br>
DRAWTEXT(ISLASTBAR=1,1.7,'月M'),COLORFFFFFF;<br>
{RSI月}<br>
月RSI:="RSI.RSI1#MONTH"(9);<br>
DRAWICON(月RSI>50,1.8,1);<br>
DRAWICON(月RSI<50,1.8,2);<br>
DRAWTEXT(ISLASTBAR=1,1.8,'月R'),COLORFFFFFF;</p>
<p>X1:=日K>日D;<br>
X2:=日DIF>日DEA;<br>
X3:=日RSI>50;<br>
X4:=周K>周D;<br>
X5:=周DIF>周DEA;<br>
X6:=周RSI>50;<br>
X7:=月K>月D;<br>
X8:=月DIF>月DEA;<br>
X9:=月RSI>50;<br>
黑码初显:=X1 AND X2 AND X3 AND X4 AND X5 AND X6 AND X7 AND X8 AND X9;<br>
STICKLINE(黑码初显,0.95,1.85,1,0),COLORBLUE;<br>
STICKLINE(黑码初显 AND C/REF(C,1)>1.095,0.95,1.85,2,0),COLORYELLOW;<br>
STICKLINE(黑码初显 AND C/REF(C,1)>1.095,0.95,1.85,1,0),COLORRED;<br>
DRAWTEXT(黑码初显,1.90,'黑'),COLORWHITE;</p>
<p></p>
页:
[1]