周框图源码附图

先建立引用公式：

{引用4价}

C1:C;

O1:O;

H1:H;

L1:L;
 

{ 周框图}

WC:="引用4价.C1#WEEK",LINETHICK0;

Wo:="引用4价.o1#WEEK",;

WH:="引用4价.h1#WEEK",LINETHICK0;

WL:="引用4价.l1#WEEK",LINETHICK0;

●周开:WO,LINETHICK0,COLOR00AAFF;

●周收:WC,LINETHICK0,COLORFF00FF;

●周高:WH,LINETHICK0,COLORRED;

●周低:WL,LINETHICK0,COLOR00FFFF;

BZ:=WEEKDAY;ZB:=DATEDIFF(REF(DATE,1),DATE)<>BZ-REF(BZ,1) OR BARPOS=1;

ZC:=WEEKDAY<REF(WEEKDAY,1)or zb;ZM:=REFX(zc,1) ;

TT:=BARSCOUNT(C)=1;

{周影线}

{STICKLINE(WC>=WO AND WEEKDAY=3 OR (REF(WEEKDAY,1)<3 AND WEEKDAY=4),WL,WH,0.1,0),LINEDOT,,COLOR9999DD;

STICKLINE(WC<WO  AND WEEKDAY=3 OR (REF(WEEKDAY,1)<3 AND WEEKDAY=4),WL,WH,0.1,0),LINEDOT,,COLORDDAA88;}

STICKLINE(WC>=WO AND (ZC OR TT OR ZM OR ISLASTBAR) ,WL,WH,0.1,0),LINEDOT,COLOR9999DD;

STICKLINE(WC<WO  AND (ZC OR TT  OR ZM OR ISLASTBAR),WL,WH,0.1,0),LINEDOT,COLORDDAA88;

DRAWLINE(WC>=WO AND (ZC OR TT ),WH,WC>=WO AND (ZM OR ISLASTBAR) ,WH,0),LINEDOT,COLOR9999DD;

DRAWLINE(WC<WO AND (ZC OR TT ),WH,WC<WO AND (ZM OR ISLASTBAR) ,WH,0),LINEDOT,COLORDDAA88;

DRAWLINE(WC>=WO AND (ZC OR TT ),WL,WC>=WO AND (ZM OR ISLASTBAR) ,WL,0),LINEDOT,COLOR9999DD;

DRAWLINE(WC<WO AND (ZC OR TT ),WL,WC<WO AND (ZM OR ISLASTBAR) ,WL,0),LINEDOT,COLORDDAA88;

DRAWICON(h=wh,h*1.02,10);

DRAWICON(l=wl,l*0.98,12);

KLINE(O,H,L,C,0);

JC:=(REF(C,3)+REF(C,5)+REF(C,7)+REF(C,8)+REF(C,13)+REF(C,21))/6;

{参考价:SMA(JC,5,1), CIRCLEDOT,COLORGREEN,;

价:IF(C>=参考价,参考价,0),CIRCLEDOT,COLOR0000FF,LINETHICK0;}