原帖由 logoslogos 于 2013-7-14 10:08 发表 ![]()
4 w; [* A, j8 W. ~/ H3 P/ PY兄,还有一个思路,能否实现再编写一个:3 D0 h! P+ d! [1 C, A/ Z
1.准许设定开始的日期(日,周,月)$ P! e d9 u) k- i) f
2.能否搞个用于5分钟图的,并且开始点能否让自如输入设定?这样就可以用于期货的日内短线了。。。我的意思您能明白吧? 万分感谢
. d5 x9 f" E* [3 X3 ] ... % x2 T8 I3 b7 @& s' Y- I
2 C% x- b7 x K2 P2 [. w
有二法可编之" ~7 q) ^1 ~: `5 e3 F" b
第一法:是输入日期如:
9 Z. K5 X6 ?+ u# F/ F* Q8 t! U1 O
3 _- X& |1 {: M+ F3 R) x( d1 U1010924 -----> 20010924 Y7 P; n( z9 I: x9 d g6 ]
20130124------>公式给入11301241 s O1 {9 u* d' w E0 ]/ X
这是日K线情形,至于周或月飞狐似乎无直接可引用的函数, 在周或月可用第二法
9 F. k2 c) E6 v% G5 o: n8 `$ T日期长度超过,可自行加上drawnumber函数( R a1 @7 o' E1 m# z
----------------------------------------------------------------------------------( N' J' k1 Q& j$ F& [, A( m
- L7 a3 `: t* s: B8 z( _
dat1:=barslast(date=1010924);
; b% ?- U* G; i* @: D& wstickline(mod(dat1,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color00ffff,pointdot;) r( F k! t* w3 F
drawnumber(dat1<=360 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1,0),colorff00ff,shift1;
! E- P9 A( {# T$ d! Ddrawnumber(dat1>360 and dat1<720 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-360,0),colorff00ff,shift1;" `9 q5 X* a" O1 Q" D# l
drawnumber(dat1>720 and dat1<1080 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-720,0),colorff00ff,shift1;, i( } Y+ f4 H' p; }# T
drawnumber(dat1>1080 and dat1<1440 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1080,0),colorff00ff,shift1;
; j+ S3 ?+ y: q$ k2 `" n3 jdrawnumber(dat1>1440 and dat1<11800 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1440,0),colorff00ff,shift1;
: ?" E) F& I% A; i- t1 K. c
% |" f- L6 A/ m" G7 h2 r第二法:是移动飞狐老鼠十字光标到目标日期K线(日周月均可):
! @, e% c. E( B# k
9 K' d6 ?+ q, Z) h0 u' p# Z' Q1 _此法是直接沟通公式与老鼠十字光标,应用到sysparam函数,所以执行极慢. @* [3 a% {" t
/ W7 t4 t6 o H. t0 k( |9 M
dat2:=barslast(barpos=sysparam(1));* H8 D' I( a; U# Q0 V, B
stickline(mod(dat2,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color0000ff,pointdot;
/ v5 n; n" y! idrawnumber(dat2<=360 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2,0),colorffffff,shift1;
+ p* |, x+ B4 v! y" n' s7 Fdrawnumber(dat2>360 and dat2<720 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-360,0),colorffffff,shift1;- P6 O' w( o+ R
drawnumber(dat2>720 and dat2<1080 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-720,0),colorffffff,shift1;; H: ]6 l6 V) E8 e+ F& t6 p. Q
drawnumber(dat2>1080 and dat2<1440 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1080,0),colorffffff,shift1;
1 ]* {3 w/ o1 _1 \drawnumber(dat2>1440 and dat2<11800 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1440,0),colorffffff,shift1;
' B+ G, i5 J# Q! C3 Y" o+ v! N( H
" y6 m1 G+ d" C我自用的是公式直接自动定位波浪高低点起位,但此法未曾外给 (这与先前说过的含二个理念无关); N6 x8 \) |1 P o
至于5分钟的分时公式,抱歉未编过,你可以用上面公式商请会编分时公式的朋友依样修改
( B, h: R% I5 J2 \! P% ?" C$ b
0 E% w0 P* [7 P$ y[ 本帖最后由 ycng 于 2013-7-14 16:52 编辑 ] |