原帖由 logoslogos 于 2013-7-14 10:08 发表 & U9 c' e4 @1 F4 a0 [
Y兄,还有一个思路,能否实现再编写一个:
% A: j9 N% B* N6 W2 L3 c1.准许设定开始的日期(日,周,月)
0 h' J# M7 ~6 O6 X2 ?2 c& l2.能否搞个用于5分钟图的,并且开始点能否让自如输入设定?这样就可以用于期货的日内短线了。。。我的意思您能明白吧? 万分感谢; j9 ?- f! o# v G8 R
... 0 }" _. N b( B: s/ S
4 @/ \$ G+ q- s* T
有二法可编之
+ h3 U% i% Y, i" |5 p; y第一法:是输入日期如:
0 r9 ^) D- T2 j1 }( A
& G/ {/ S, o+ L9 }. S5 j1010924 -----> 20010924+ U. a. Z. q$ _
20130124------>公式给入1130124
, {! D( q: `/ E* T这是日K线情形,至于周或月飞狐似乎无直接可引用的函数, 在周或月可用第二法
" N; K: p& L/ ?6 E日期长度超过,可自行加上drawnumber函数
, _% |7 y% v* `% A, |) s1 k! X----------------------------------------------------------------------------------
7 _) v2 L0 o, T" b. X, J 0 T$ ]* b9 A! j* {
dat1:=barslast(date=1010924);
/ u# N' S/ J. ustickline(mod(dat1,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color00ffff,pointdot;' Y; [8 M9 {* U# A6 g% v5 w. K0 Z
drawnumber(dat1<=360 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1,0),colorff00ff,shift1;
1 k) \3 ^ S$ |( B# Wdrawnumber(dat1>360 and dat1<720 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-360,0),colorff00ff,shift1;* |8 z1 _) @+ v7 _
drawnumber(dat1>720 and dat1<1080 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-720,0),colorff00ff,shift1;
+ Z" o8 z+ M0 f; |# X" @7 Odrawnumber(dat1>1080 and dat1<1440 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1080,0),colorff00ff,shift1; A- T/ `, ?; l( G, X! B
drawnumber(dat1>1440 and dat1<11800 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1440,0),colorff00ff,shift1;3 g; X% s+ R5 N# F5 y
5 E7 d4 h% Q% i第二法:是移动飞狐老鼠十字光标到目标日期K线(日周月均可):# h) C g- h1 p3 S E
j9 A$ W7 g2 h
此法是直接沟通公式与老鼠十字光标,应用到sysparam函数,所以执行极慢1 L% p. ^- p1 \4 G
/ ~3 L" N% e; Y3 G y7 Bdat2:=barslast(barpos=sysparam(1));/ a! j8 G9 Y3 V( F
stickline(mod(dat2,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color0000ff,pointdot;
2 x& v. t, J j7 @8 e. t' Cdrawnumber(dat2<=360 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2,0),colorffffff,shift1;4 H: \# @* w7 j) V& d9 @; c
drawnumber(dat2>360 and dat2<720 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-360,0),colorffffff,shift1;* T, N: L3 f) R
drawnumber(dat2>720 and dat2<1080 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-720,0),colorffffff,shift1;. a* S% \! A$ q( M) r: c
drawnumber(dat2>1080 and dat2<1440 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1080,0),colorffffff,shift1;
( `$ M/ J# C2 ^; u" v, Y8 kdrawnumber(dat2>1440 and dat2<11800 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1440,0),colorffffff,shift1;& _, y' U- E% ~+ k& P) `9 a7 g
5 k% ^; D6 E3 ~8 H5 z
我自用的是公式直接自动定位波浪高低点起位,但此法未曾外给 (这与先前说过的含二个理念无关)1 p0 T" q" c0 e7 \( f) G2 F# C
至于5分钟的分时公式,抱歉未编过,你可以用上面公式商请会编分时公式的朋友依样修改& m- {8 l: `- t7 c+ f4 T3 |
* b- f$ _. }/ f) h- s
[ 本帖最后由 ycng 于 2013-7-14 16:52 编辑 ] |