周框图源码附图
以下是周框图源码附图(无源码的请下载附件导入)
先建立引用公式:
{引用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;}