通达信抓启动初期股票（源码）

{LONG     26   1   100   1   

SHORT    12   1   100   1   

M         9   1   100   1}   

DIF:=EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);   

DEA:=EMA(DIF,M);   

MACD:=2*(DIF-DEA);   

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;   

K:=SMA(RSV,3,1);   

D:=SMA(K,3,1);   

J:=3*K-2*D;   

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

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

周Ｊ:=MA("KDJ.J#WEEK"(9,3,3) ,5);   

周金:CROSS("KDJ.K#WEEK"(9,3,3),"KDJ.D#WEEK"(9,3,3)) and MACD;