由于原贴周K线显示在主图并靠左侧，且不易区分，为方便看盘，故将周K线做成副图并加上了周均线，实测一模一样。源码中含有月K线，需要的同学自行修改。
 
1、新建引用公式“AA”
C1:C;
O1:O;
H1:H;
L1:L;
V1:V;
ZF:(C-REF(C,1))/REF(C,1);
DT1:BARSCOUNT(C);
ZH:CURRBARSCOUNT;
SJ:IF(ISLASTBAR,DATE,0);{最后一天时间};

2、再建公式“三周期K线”
{周K线}
PPP:=0;{设定从倒数第PP根K线结束显示周线}
Q11:=90;{设定周K线显示根数为Q11}
Q12:=00;{设定月K线显示根数为Q12}
CCC:=AA.C1#WEEK;HHH:=AA.H1#WEEK;LLL:=AA.L1#WEEK;OO:=AA.O1#WEEK;
ZQZ:=TOTALBARSCOUNT;
ZQC:=BARSCOUNT(C);
KX1:=ZQZ-ZQC;{周K线显示开始位置}

K6:=AA.DT1#WEEK;{周K线周期}
Q:=IF(CONST(K6) PP:=IF(ZQZ K7:=K6>REF(K6,1);{周K线更后}
K8:=SUM(K7,0);{当前周K线位置}
K9:=CONST(K8)-K8;
W2:=KX1 ZH:=ISLASTBAR;
SU:=IF(ZH,0,SUMBARS(K7,KX1-K9)-1);
C1:=REF(CCC,SU);O1:=REF(OO,SU);H1:=REF(HHH,SU);L11:=REF(LLL,SU);
RC:=REFX(C1,PP);RO:=REFX(O1,PP);RH:=REFX(H1,PP);RL:=REFX(L11,PP);
TJ4:=RC>=REF(RC,1); TJ5:=RC STICKLINE(W2 AND  TJ4,RH,RL,0,0),COLORRED;
STICKLINE(W2 AND   TJ5,RH,RL,0,0),COLORLIBLUE;
STICKLINE(W2 AND  TJ4,RC,RO,2,1),COLORRED;
STICKLINE(W2 AND  TJ5,RC,RO,2,0),COLORLIBLUE;

HH1:=AA.H1#MONTH;LL1:=AA.L1#MONTH;
OO1:=AA.O1#MONTH;CCC1:=AA.C1#MONTH;
KK6:=AA.DT1#MONTH;{月K线周期}
P12:=PP-Q12-3;{设定从周K线结束位置隔3天开始显示月K线}
Q1:=IF(PP