原帖由 logoslogos 于 2013-7-14 10:08 发表 ![]()
( w* R; p5 [7 HY兄,还有一个思路,能否实现再编写一个:
5 ^) ]0 f6 V& a7 `* R# ^/ k5 V1.准许设定开始的日期(日,周,月)
; O8 k! X& C5 e0 M6 C2.能否搞个用于5分钟图的,并且开始点能否让自如输入设定?这样就可以用于期货的日内短线了。。。我的意思您能明白吧? 万分感谢
) ^) Z, V/ f; I7 D ... 8 W7 b5 {# n, W7 E# G- D5 z0 \! E
3 q3 C7 z; |0 L: y4 V/ I C有二法可编之5 V. D/ E: z. a, G1 i- l# D
第一法:是输入日期如:
2 A* G% O. r3 }& {% k' L& `
9 o9 v8 T+ p% l* c3 Z/ U+ J4 ~1010924 -----> 20010924
3 X" U) s) }( ]20130124------>公式给入1130124
2 a5 R5 i0 P$ r' s$ B0 M4 M: H4 l这是日K线情形,至于周或月飞狐似乎无直接可引用的函数, 在周或月可用第二法
# ?& U* {2 o7 Q9 S9 t+ k7 ]日期长度超过,可自行加上drawnumber函数
7 c0 k$ m/ T, G9 a( o! N----------------------------------------------------------------------------------! N. `) }8 j$ s N% F
& X9 T) r, O+ Q
dat1:=barslast(date=1010924);
& ?- X2 @, E; N% g- d( @+ Xstickline(mod(dat1,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color00ffff,pointdot;3 y# [' J D6 a/ B% o' |0 o
drawnumber(dat1<=360 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1,0),colorff00ff,shift1;) O! f( u$ r( r; C* v
drawnumber(dat1>360 and dat1<720 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-360,0),colorff00ff,shift1;
; c% @3 _7 r; Q6 D5 y& I! Kdrawnumber(dat1>720 and dat1<1080 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-720,0),colorff00ff,shift1;, o2 a0 N2 o9 G$ F3 A0 s$ G
drawnumber(dat1>1080 and dat1<1440 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1080,0),colorff00ff,shift1;
1 B5 W' B5 s% h; I6 V$ v# V+ E3 ]drawnumber(dat1>1440 and dat1<11800 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1440,0),colorff00ff,shift1;
' Y8 k: L- ]4 L- ~7 b1 k 1 z' P0 W3 _0 A' T' q: g# S/ F, x: d
第二法:是移动飞狐老鼠十字光标到目标日期K线(日周月均可):$ c2 S9 B' ]% d0 j7 `( J3 x& U4 J6 o) l+ y
3 I& T* b" A, V, ]$ x此法是直接沟通公式与老鼠十字光标,应用到sysparam函数,所以执行极慢
) O" |9 p. ~) [2 w7 U1 m- h 2 T v* D N/ r% Q; K! [9 o
dat2:=barslast(barpos=sysparam(1));( P( g4 w! e* d4 q# ]: m
stickline(mod(dat2,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color0000ff,pointdot;
; y# Y4 h& p: R2 @8 U' S1 adrawnumber(dat2<=360 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2,0),colorffffff,shift1;% [) T9 G. z% w" v0 z4 @) e
drawnumber(dat2>360 and dat2<720 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-360,0),colorffffff,shift1;
' P% \: H' K, [7 {2 wdrawnumber(dat2>720 and dat2<1080 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-720,0),colorffffff,shift1;
_, Q& V2 i1 \0 adrawnumber(dat2>1080 and dat2<1440 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1080,0),colorffffff,shift1;
( K3 M; o" P' ]; z) Cdrawnumber(dat2>1440 and dat2<11800 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1440,0),colorffffff,shift1;
9 p9 j% m3 E0 q- M& J' U 7 E5 _# {7 J" q; h
我自用的是公式直接自动定位波浪高低点起位,但此法未曾外给 (这与先前说过的含二个理念无关)# n K4 r9 b1 D
至于5分钟的分时公式,抱歉未编过,你可以用上面公式商请会编分时公式的朋友依样修改% U5 g T( X* G3 y1 M2 h$ }
: }' z1 i$ a; E! n[ 本帖最后由 ycng 于 2013-7-14 16:52 编辑 ] |