|
|
//日线有效/交易日和自然日序号/ G) c6 E! @0 a5 ]$ Y; g2 Z8 ~
DD:=DATE;
; K! f9 T& I: u' |! u, FWWDAY:=WEEKDAY;
/ \2 {% {$ v. Y: O5 G6 L1 q
1 _" D3 {! T1 _) T- o8 LDAYS0:=BARSLAST(BARPOS=1);
+ T4 r; b$ s; J3 r2 P- N* ^DAYS1:=DATEDIFF(REF(DATE,DAYS0),DATE)+1;
+ P) q) O7 {/ V! R! R8 F/ I$ v+ ~1 VDAYSW:=MAX(0,CEILING((DAYS1-8+WWDAY[1])/7))+1; 1 ]2 n3 b `3 q- W* I' [
DAYSWP:="分钟引用日线数据.DAYS0#week"+1;6 i" N+ ?: v: f; C/ ^
" }9 `+ o9 h6 N0 V
自然日:DAYS1,COLORYELLOW,LINETHICK0;
7 }& @, q- R9 ^交易日:DAYS0+1,COLORmagenta,LINETHICK0;
3 [0 t4 ^( m3 a4 v4 D自然周:DAYSW,coloryellow,linethick0;* O a: `0 T6 B0 @+ `' b$ L. l R
交易周:DAYSWp,colormagenta,linethick0;
$ m+ `4 \9 B; Q) j2 ^6 T------------------------------------4 [# [/ O) r* U
//被引用公式代码
- I0 p( ~6 G2 O//分钟引用日线数据# }" e* w+ D/ D8 V5 t5 D
CUR:=BARPOS=1;
9 n% M2 A# m7 j8 _DAYS0:BARSLAST(CUR=1);8 K, r- N/ O7 t+ U6 G
$ S! [# [/ X; g" ^% \2 s. D5 H
[ 本帖最后由 xmhenry 于 2010-10-28 22:28 编辑 ] |
评分
-
4
查看全部评分
-
|