今天我也來(lái)發(fā)一個(gè)指標(biāo)-----kma日表周-------日線逐日顯示周均線,周k線(副圖),不含未來(lái)數(shù)據(jù).其特點(diǎn)是每日k線顯示的不是當(dāng)日k線,而是本周的周k線;每日均線顯示的不是當(dāng)日均線,而是本周的周均線;且數(shù)據(jù)不會(huì)隨時(shí)間推移發(fā)生改變;參數(shù)用來(lái)調(diào)節(jié)均線周期.我發(fā)源碼,

附源碼(分析家):
 {名稱: KMA日表周
 描述:日線逐日顯示周均線,周k線  }

input:n1(5,2,1000,1),n2(8,2,1000,1),n3(13,2,1000,1),n4(21,2,1000,1);
 ZC:=IF(BARPOS=1,1,DAYS1970-DAYS1970[1]<>WEEKDAY-WEEKDAY[1]);
    {上市第一日Z(yǔ)C取1,每周初交易日取1,其他交易日取0 }
 M:=BARSLAST(ZC)+1;   { 最后一周交易日 }
周初標(biāo)記:DAYS1970-DAYS1970[1]<>WEEKDAY-WEEKDAY[1],color00ffff,linethick0,PRECIS0;
 A:=IF(BARPOS=1,1,周初標(biāo)記);
STICKLINE(周初標(biāo)記 ,l*0.95 ,l*0.97 ,2 ,0 ),color00ffff;
       { 標(biāo)記每周第一個(gè)交易日 }
周開(kāi)盤(pán):if(m=1,o,ref(o,m-1)),colorffffff,linethick0,PRECIS2;
周收盤(pán):c,colorffffff,linethick0,PRECIS2;
周最高:if(m=1,h,hhv(h,m-1)),colorffffff,linethick0,PRECIS2;
周最低:if(m=1,l,llv(l,m-1)),colorffffff,linethick0,PRECIS2;
 stickline(c>周開(kāi)盤(pán),
         llv(l,m),周最高,1,1),color0000ff;
 stickline(c>周開(kāi)盤(pán),周開(kāi)盤(pán),c,6,1),color0000ff;
 stickline(c<=周開(kāi)盤(pán),周最低,周最高,1,0),colorffff00;
 stickline(c<=周開(kāi)盤(pán),周開(kāi)盤(pán),c,6,0),colorffff00;

 B:=IF(A=1,REF(C,1),0);
 T1:=SUMBARS(A,N1-1);
 T2:=SUMBARS(A,n2-1);
 T3:=SUMBARS(A,n3-1);
 T4:=SUMBARS(A,n4-1);

 MA1:(SUM(B,T1)+C)/N1,color00ffff;
 MA2:(SUM(B,T2)+C)/n2,colorff00ff;
 MA3:(SUM(B,T3)+C)/n3,color00ff00;
 MA4:(SUM(B,T4)+C)/n4,coloraaaaaa;