原帖由 logoslogos 于 2013-7-14 10:08 发表 # d% H+ K$ s& o
Y兄,还有一个思路,能否实现再编写一个:
0 l% q! z2 z& S! E2 B0 a1.准许设定开始的日期(日,周,月)) T1 A* k- j+ u& \2 w4 e: z$ X, Q6 E2 ~
2.能否搞个用于5分钟图的,并且开始点能否让自如输入设定?这样就可以用于期货的日内短线了。。。我的意思您能明白吧? 万分感谢
. A: \. `) x, t; c; ]9 [5 ], d ... ! \- D) m( D' |: g
7 g& f, y9 ?/ v* A5 _- V# ?) R有二法可编之' o3 i: k3 l" B: [9 S
第一法:是输入日期如:
$ u* h" U9 n# X8 g6 V) t6 w0 O5 a5 A4 T* y/ v
1010924 -----> 20010924
0 j) \$ g1 m; W8 W7 Z20130124------>公式给入11301240 J' j1 h2 w+ a- ^& g! I
这是日K线情形,至于周或月飞狐似乎无直接可引用的函数, 在周或月可用第二法5 B. \* F& v1 y; E
日期长度超过,可自行加上drawnumber函数& R1 \! w) j2 |, `. [. a; i
----------------------------------------------------------------------------------
6 ?6 @6 d! u0 K) f
3 |: D0 z3 {9 r j4 ?! [dat1:=barslast(date=1010924);- ]! C' Z7 Q9 }: _. s$ z- i
stickline(mod(dat1,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color00ffff,pointdot;
1 A( l" }7 M! }drawnumber(dat1<=360 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1,0),colorff00ff,shift1;
. \2 [) c, b8 n& i2 bdrawnumber(dat1>360 and dat1<720 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-360,0),colorff00ff,shift1;7 M5 {. y4 Q P9 h) f0 M
drawnumber(dat1>720 and dat1<1080 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-720,0),colorff00ff,shift1;6 W7 m+ P( w: w8 \2 P4 o8 w
drawnumber(dat1>1080 and dat1<1440 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1080,0),colorff00ff,shift1;
* x% K4 H7 j+ h4 Sdrawnumber(dat1>1440 and dat1<11800 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1440,0),colorff00ff,shift1;% Q! f3 U! l% t" ~5 a5 d
: g j3 L0 ?& i第二法:是移动飞狐老鼠十字光标到目标日期K线(日周月均可):( X' s: L% F+ f. Z& J( D
0 ]8 I' z5 S7 i2 ]4 P6 _2 Q
此法是直接沟通公式与老鼠十字光标,应用到sysparam函数,所以执行极慢
' @* ^: ^3 f% W& s9 V
2 u& q& R1 a/ L; I8 ]dat2:=barslast(barpos=sysparam(1));
9 Q# X" F3 f* C. zstickline(mod(dat2,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color0000ff,pointdot;, A# F1 C, ?( J) x: T
drawnumber(dat2<=360 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2,0),colorffffff,shift1;
) D7 |! \$ t/ x/ e) ^drawnumber(dat2>360 and dat2<720 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-360,0),colorffffff,shift1;
/ t0 ~" d+ d# P Sdrawnumber(dat2>720 and dat2<1080 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-720,0),colorffffff,shift1;
6 o" V" P( _* I% Bdrawnumber(dat2>1080 and dat2<1440 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1080,0),colorffffff,shift1;
3 J) y% h7 h0 R6 cdrawnumber(dat2>1440 and dat2<11800 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1440,0),colorffffff,shift1;
" T# r, ?( @' m# { % y( b2 i" `+ O X$ ~
我自用的是公式直接自动定位波浪高低点起位,但此法未曾外给 (这与先前说过的含二个理念无关)# I# A: A. Q" v" A
至于5分钟的分时公式,抱歉未编过,你可以用上面公式商请会编分时公式的朋友依样修改
2 g# m' x% V9 M2 @) U' N
+ e9 D5 `+ O: j6 j$ u[ 本帖最后由 ycng 于 2013-7-14 16:52 编辑 ] |