郎少 发表于 2010-1-6 10:51
{估短 KDJ}<BR><BR>{界文KD 修改带提示版}<BR>N1:=7;N2:=27;<BR>STICKLINE(C>0,40,60,10,0),COLORGRAY;<BR>RSV:=(CLOSE-LLV(LOW,N1))/(HHV(HIGH,N1)-LLV(LOW,N1))*100;<BR>短K:SMA(RSV,3,1),COLORF580F5,LINETHICK0;<BR>短D:SMA(短K,3,1),COLORCCDD33,LINETHICK0;<BR>RSV1:=(CLOSE-LLV(LOW,N2))/(HHV(HIGH,N2)-LLV(LOW,N2))*100;<BR>中K:SMA(RSV1,5,1),COLORRED,LINETHICK0;<BR>中D:SMA(中K,10,1),COLOR33AA33,LINETHICK0;<BR>底线:10,COLORWHITE;<BR>顶线:90,{COLOR00FFFF;},COLORWHITE;<BR>STICKLINE(短K>短D,短K,短D,3,1),COLORF580F5;<BR>STICKLINE(短K<=短D,短K,短D,3,1),COLORCCDD33;<BR>STICKLINE(中K>中D,中K,中D,2,0),COLOR0000EF;<BR>STICKLINE(中K<=中D,中K,中D,2,0),COLOR33AA33;<BR>中J:=3*中K-2*中D,COLORFF00FF;<BR>超跌:IF(中J<0,10,0),COLORLIGREEN;<BR>BDDD:=LLV(中J,2)=LLV(中J,8);<BR>重启:IF(CROSS(中J,REF(中J+0.01,1)) AND BDDD AND 中J<20,10,-10),COLORLIRED;<BR>加码:IF(CROSS(中J,REF(中J+0.01,1)) AND BDDD AND BETWEEN(中J,20,60),1,0),COLORRED,NODRAW;<BR>BDGD:=HHV(中J,2)=HHV(中J,8) AND 中J>80;<BR>小心:IF(CROSS(REF(中J-0.01,1),中J) AND REF(BDGD,1),90,120),COLORYELLOW;<BR>DRAWICON(加码,中J,1);<BR><BR>{J线共振 修改彩带版}<BR>RSV1A:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;<BR>K1:=SMA(RSV1,5,1);<BR>D1:=SMA(K1,5,1);<BR>J1:=3*K1-2*D1;<BR>AA1:=EMA(J1,5);<BR>AA2:=REF(AA1,1);<BR>DRAWBAND(AA1,RGB(255,255,0),AA2,RGB(0,255,0));<BR>RSV2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;<BR>K2:=SMA(RSV2,3,1);<BR>D2:=SMA(K2,3,1);<BR>J2:=3*K2-2*D2;<BR>BB1:=EMA(J2,5);<BR>BB2:=REF(BB1,1);<BR>DRAWBAND(BB1,RGB(255,0,0),BB2,RGB(0,0,255));<BR>DD:=AA1>AA2 AND BB1>BB2;<BR>注意买入:DD AND NOT(REF(DD,1)) AND (AA1<50 OR BB1<50) ,LINETHICK0;<BR>DRAWICON(注意买入,-5,1);<BR>注意卖出:REF(DD,1)=1 AND NOT(DD),LINETHICK0;<BR>DRAWICON(注意卖出,105,2);<BR>银行 发表于 2010-1-6 19:57
ddddddddddddddddddddddddddd不再抄底 发表于 2010-1-13 09:19
<P>谢谢,这个真不错,</P><P>为什么非要俺打上十个字符呢?为什么非要俺打上十个字符呢?为什么非要俺打上十个字符呢?</P>
<P>为什么非要俺打上十个字符呢?为什么非要俺打上十个字符呢?</P>
<P>为什么非要俺打上十个字符呢?</P>
<P> </P>
亚家欣 发表于 2010-1-20 19:44
ddddddddddddddddddddddddddddddd
页:
[1]