周框图、主图、源码、说明

看到前辈的飞狐指标，用通达信改编了，请鉴赏。

周框图

{周}

AQ:=O#WEEK;

B:=C#WEEK;

AAQ:=H#WEEK;

BB:=L#WEEK;

STICKLINE(WEEKDAY=1,AAQ,BB,0,-1),COLORLIGRAY;

STICKLINE(WEEKDAY=6-1,AAQ,BB,0,-1),COLORLIGRAY;

BZ:=WEEKDAY;

TT:=BARSCOUNT(C)=1;

{ZB:=DATE IFF(REF(DATE,1),DATE)>BZ-REF(BZ,1) OR  BARSLAST=1;}

ZC:=WEEKDAY<REF(WEEKDAY,1)OR TT;

ZM:=REFX(ZC,1) ;

DRAWLINE(B>=AQ AND (ZC OR TT ),AAQ,B>=AQ AND (ZM OR ISLASTBAR),AAQ,0),COLOR9999DD;

DRAWLINE(B>=AQ AND (ZC OR TT ),BB,B>=AQ AND (ZM OR ISLASTBAR),BB,0),COLOR9999DD;

DRAWLINE(B<AQ AND (ZC OR TT ),AAQ,B<AQ AND (ZM OR ISLASTBAR),AAQ,0),COLORDDAA88;

DRAWLINE(B<AQ AND (ZC OR TT ),BB,B<AQ AND (ZM OR ISLASTBAR),BB,0),COLORDDAA88;

 

p201410105412018983.jpg