软件名称：[B]自用组合的三组KDJ 日周月KDJ 看长做短,长短配合[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：11.0 KB
官方主页：Home Page
更新时间：2010-04-13 10:51:18
软件简介:
自用组合的三组KDJ 日周月KDJ 看长做短,长短配合
日周月KDJ
{大智慧 自用日周月KDJ}
ar1:=REF(CLOSE,1);
ar2:=SMA(MAX(CLOSE-ar1,0),6,1)/SMA(ABS(CLOSE-ar1),6,1)*100;
ar3:=EMA(CLOSE,5)/EMA(EMA(CLOSE,9),16);
ar4:=1/WINNER(CLOSE);
ar5:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
ar6:=100-ABS(ar5);
ar7:=(CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100;
ar8:=SMA(ar7,20,1);
ar9:=SMA(ar8,15,1);
arA:=100-3*ar8+2*ar9;
arB:=((EMA(IF(arA>REF(arA,1),arA,arA-3),3)-50)*(-1)*2/2+50)/10;
arC:=EMA(AMOUNT,13)/EMA(VOL,13);
arD:=(arC/REF(arC,1)-1)*100;
arE:=VOL/CAPITAL*100;
arF:=(HIGH-LOW)/((HIGH+LOW)/2)*100;
ar10:=(arB+arE)*arF*arD;
ar11:=VOL/CAPITAL;
ar12:=VOL/700000000;
ar13:=IF(ar11=0,ar12,ar11);
ar14:=1.1*(MAX(HIGH,REF(CLOSE,1))/MIN(LOW,REF(CLOSE,1))-1);
ar15:=2.5*MAX(ar13,ar14);
ar16:=DMA(CLOSE,ar15);
ar17:=SMA(20*(ar16/REF(ar16,1)-1),2,1);
ar18:=EMA(ar17,2);
ar19:=0.17;
ar1A:=CLOSE>=REF(CLOSE,1);
ar1B:=VOL/CAPITAL;
ar1C:=VOL/700000000;
ar1D:=IF(ar1B=0,ar1C,ar1B);
ar1E:=1.1*(MAX(HIGH,REF(CLOSE,1))/MIN(LOW,REF(CLOSE,1))-1);
ar1F:=2.5*MAX(ar1D,ar1E);
ar20:=DMA(CLOSE,ar1F);
ar21:=SMA(20*(ar20/REF(ar20,1)-1),2,1);
ar22:=EMA(ar21,2);
STICKLINE(ar22>=0.003,-7,-2,8,0),linethick3 ,colorred ;
STICKLINE(BETWEEN(ar22,0.003,0),-7,-2,8,0),linethick3,COLORYELLOW ;
STICKLINE(BETWEEN(ar22,0,-0.003),-7,-2,8,0),linethick3,COLORBLUE ;
STICKLINE(ar22<=-0.003,-7,-2,8,0),linethick3 ,colorgreen;
RSV:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
K1:EMA(EMA(EMA(K,2),2),2),COLOR90A697,LINETHICK2;
D1:EMA(EMA(EMA(D,2),2),2),COLOR90A697,LINETHICK2;
J1:EMA(EMA(EMA(J,2),2),2),COLOR90A697,LINETHICK2;
VAR3:=MA(CLOSE,13);
VAR4:=100-ABS(((CLOSE-VAR3)/(VAR3))*(100));
VAR5:=LLV(LOW,75);
VAR6:=HHV(HIGH,75);
VAR7:=(VAR6-VAR5)/(100);
VAR8:=SMA((CLOSE-VAR5)/(VAR7),20,1);
VAR9:=SMA((OPEN-VAR5)/(VAR7),20,1);
VARA:=(3)*(VAR8)-(2)*(SMA(VAR8,15,1));
VARB:=(3)*(VAR9)-(2)*(SMA(VAR9,15,1));
VARC:=100-VARB;
VARD:=(REF(LOW,1))*(0.89999997);
VARE:=(LOW)*(0.89999997);
VARF:=((VARE)*(VOL)+(VARD)*(CAPITAL-VOL))/(CAPITAL);
VAR10:=EMA(VARF,30);
VAR11:=CLOSE-REF(CLOSE,1);
VAR12:=MAX(VAR11,0);
VAR13:=ABS(VAR11);
VAR14:=((SMA(VAR12,7,1))/(SMA(VAR13,7,1)))*(100);
VAR15:=((SMA(VAR12,13,1))/(SMA(VAR13,13,1)))*(100);
VAR16:=BARSCOUNT(CLOSE);
VAR17:=((SMA(MAX(VAR11,0),6,1))/(SMA(ABS(VAR11),6,1)))*(100);
VAR18:=(((-200))*(HHV(HIGH,60)-CLOSE))/(HHV(HIGH,60)-LLV(LOW,60))+100;
VAR19:=((CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15)))*(100);
VAR1A:=SMA((SMA(VAR19,4,1)-50)*(2),3,1);
VAR1B:=((INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14)))*(100);
VAR1C:=SMA(VAR1B,4,1);
VAR1D:=SMA(VAR1C,3,1);
VAR1E:=((HHV(HIGH,30)-CLOSE)/(CLOSE))*(100);
VAR1F:=((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100);
VAR20:=REVERSE(VAR1F);
VAR21:=SMA(VAR1F,3,1);
趋势:SMA(VAR21,3,1),COLOR0000FF,LINETHICK2;
人气:SMA(趋势,3,1),COLOR0000FF,LINETHICK2;
J36:3*趋势-2*人气,COLOR0000FF,LINETHICK2;
出击:IF(CROSS(趋势,人气) AND (趋势<30),22,0),COLOR0000FF,LINETHICK2;
短卖:IF(CROSS(人气,趋势) AND (人气>75),85,100),COLOR008000,LINETHICK2;
DRAWTEXT(出击,25,'入'),COLORMAGENTA;
周1:=WEEKDAY>REF(WEEKDAY,1);
周2:=WEEKDAY<REF(WEEKDAY,1);
上周收盘价:=REF(C,SUMBARS(周2,1));
上周开盘价:=REF(O,SUMBARS(周2,1));
上周交易天数:=SUMBARS(周2,2)-SUMBARS(周2,1);
上周最高价:=REF(H,SUMBARS(周2,1));
上周最低价:=REF(L,SUMBARS(周2,1));
ZRSV:=(CLOSE-MIN(LLV(LOW,SUMBARS(周2,1)),LLV(上周最低价,SUMBARS(周2,5))))
/(MAX(HHV(HIGH,SUMBARS(周2,1)),HHV(上周最高价,SUMBARS(周2,5)))-
MIN(LLV(LOW,SUMBARS(周2,1)),LLV(上周最低价,SUMBARS(周2,5))))*100;
周K1:SMA(ZRSV,SUMBARS(周2,3)-SUMBARS(周2,1),1),COLORYELLOW,LINETHICK3;
周D1:SMA(周K1,SUMBARS(周2,3)-SUMBARS(周2,1),1),COLORYELLOW,LINETHICK3;
周J1:3*周K1-2*周D1,COLORYELLOW,LINETHICK3;
月Ｋ:="KDJ.K#MONTH"(9,3,3);
月Ｄ:="KDJ.D#MONTH"(9,3,3);
周Ｋ:="KDJ.K#WEEK"(9,3,3);
周Ｄ:="KDJ.D#WEEK"(9,3,3);
周金叉:IF(CROSS(周Ｋ,周Ｄ),30,0),COLORYELLOW,linethick2;
DRAWTEXT(周金叉,33,'周'),COLORYELLOW;
月金叉:IF(CROSS(月Ｋ,月Ｄ),40,0),COLORMAGENTA,linethick2;
DRAWTEXT(月金叉,45,'月'),COLORMAGENTA;
[url=http://www.70822.com/soft/sort013/sort03/down-18660.html]自用组合的三组KDJ 日周月KDJ 看长做短,长短配合[/url]