看到前辈的飞狐指标,用通达信改编了,请鉴赏。 周框图 {周} 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; |
