原帖由 logoslogos 于 2013-7-14 10:08 发表 ![]()
' U% w2 y) a$ Q8 o0 u8 {, P. S' `5 mY兄,还有一个思路,能否实现再编写一个:
4 b; k. i# ^# S5 z9 |# Y/ c a5 I0 ~1.准许设定开始的日期(日,周,月)
. z' L0 t' j$ r- a/ m R2.能否搞个用于5分钟图的,并且开始点能否让自如输入设定?这样就可以用于期货的日内短线了。。。我的意思您能明白吧? 万分感谢4 C, b! Z4 i/ f
... " j/ }6 r9 r# Q
9 R" m7 @+ k* H2 ?$ ~8 F
有二法可编之
3 T9 H' u" X' w5 g4 O2 i3 {$ Y第一法:是输入日期如:. a% H5 l ~7 A
Z8 X& l+ g, Z$ d; b1010924 -----> 20010924
5 i/ I* [- [) { v( H' W* d20130124------>公式给入1130124; a A' V4 T6 j( [% M* W1 ` o
这是日K线情形,至于周或月飞狐似乎无直接可引用的函数, 在周或月可用第二法
! h9 y/ `' Y6 s( [6 T* a日期长度超过,可自行加上drawnumber函数
! T+ a7 L) h! U. j/ F) B% L----------------------------------------------------------------------------------2 \2 q& n. O7 ~( J& x* f
* u4 s: P) B z7 O( ~6 adat1:=barslast(date=1010924);* c3 `+ X4 E& X; t9 G& T
stickline(mod(dat1,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color00ffff,pointdot;: k* k# L; b5 v
drawnumber(dat1<=360 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1,0),colorff00ff,shift1;
6 f. N) w3 S3 }drawnumber(dat1>360 and dat1<720 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-360,0),colorff00ff,shift1;. M8 H2 I: l/ k s: r
drawnumber(dat1>720 and dat1<1080 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-720,0),colorff00ff,shift1;/ f* g( R" m; t: w8 q7 T8 i$ q
drawnumber(dat1>1080 and dat1<1440 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1080,0),colorff00ff,shift1;# J: Y0 u- j g A
drawnumber(dat1>1440 and dat1<11800 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1440,0),colorff00ff,shift1;
9 K1 P, i7 F6 {/ B' {
2 P; t7 v! E; O4 T第二法:是移动飞狐老鼠十字光标到目标日期K线(日周月均可):
; k# V5 x0 q: e! J: Y$ y5 D& d2 q; [
此法是直接沟通公式与老鼠十字光标,应用到sysparam函数,所以执行极慢
+ n$ w3 ]+ v3 E* T; H 4 J5 M- F: S: Z# F
dat2:=barslast(barpos=sysparam(1));
. Y$ V# ]1 x# l0 U& ]) Pstickline(mod(dat2,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color0000ff,pointdot; M0 k! H. Z2 l( z8 z
drawnumber(dat2<=360 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2,0),colorffffff,shift1;
3 p U3 T3 ^: N* d/ O! odrawnumber(dat2>360 and dat2<720 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-360,0),colorffffff,shift1;
" b& J/ J; W( Y. u& R! Ldrawnumber(dat2>720 and dat2<1080 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-720,0),colorffffff,shift1;+ h2 h* [5 r- ~2 D: ^9 H) _/ s
drawnumber(dat2>1080 and dat2<1440 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1080,0),colorffffff,shift1;
( j$ X; T3 n8 |. s' @! c5 v4 Gdrawnumber(dat2>1440 and dat2<11800 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1440,0),colorffffff,shift1;9 F. Z! d1 D+ U4 z& `7 L
7 d8 Y/ a7 U3 c( l7 C& X
我自用的是公式直接自动定位波浪高低点起位,但此法未曾外给 (这与先前说过的含二个理念无关), @$ s" v4 b: o; u) ?
至于5分钟的分时公式,抱歉未编过,你可以用上面公式商请会编分时公式的朋友依样修改
0 l- I" K/ }. C7 W: l9 {
, }# R5 b" y8 b) m[ 本帖最后由 ycng 于 2013-7-14 16:52 编辑 ] |