原帖由 logoslogos 于 2013-7-14 10:08 发表 ![]()
: o E: \1 x2 T7 _* zY兄,还有一个思路,能否实现再编写一个:
. {" g* e. N0 B# `# F7 Z. u0 q1.准许设定开始的日期(日,周,月) l1 _( t8 `( s7 m1 E& _
2.能否搞个用于5分钟图的,并且开始点能否让自如输入设定?这样就可以用于期货的日内短线了。。。我的意思您能明白吧? 万分感谢
' v2 P* ~6 j* L! I, j ... % ^' A0 x w% ]
2 I/ R( Z* w3 {3 d7 |; |有二法可编之! A2 ~7 W) q. i5 C
第一法:是输入日期如:
; l9 l$ ~9 ?; J! g
" J0 A N& \2 t3 Z" c1010924 -----> 200109244 G d9 A# }( B: a
20130124------>公式给入11301245 @5 G; [8 L7 s0 L
这是日K线情形,至于周或月飞狐似乎无直接可引用的函数, 在周或月可用第二法+ R& r2 \' {9 C' \
日期长度超过,可自行加上drawnumber函数
! L* w' A, ]# R----------------------------------------------------------------------------------% Q/ v7 R! k: }( o; ^
* U; y4 \9 Q. r4 I# o2 X2 C
dat1:=barslast(date=1010924);" T; R% Y9 ]$ S2 X: q5 {1 {' H' K0 ?
stickline(mod(dat1,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color00ffff,pointdot;8 q7 `6 j% h1 A. R
drawnumber(dat1<=360 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1,0),colorff00ff,shift1;7 [2 X+ s7 X6 r# Z2 f; }" n
drawnumber(dat1>360 and dat1<720 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-360,0),colorff00ff,shift1;
1 G5 C6 I' ~; X, a2 P" Q- Tdrawnumber(dat1>720 and dat1<1080 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-720,0),colorff00ff,shift1;9 q( d$ @) i l1 R
drawnumber(dat1>1080 and dat1<1440 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1080,0),colorff00ff,shift1;
4 E( ]5 s. m' U; R5 {1 Y9 Cdrawnumber(dat1>1440 and dat1<11800 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1440,0),colorff00ff,shift1;
3 |3 x+ [: Y. I, C- F8 [' E
7 q! L( A% H ?' y. g第二法:是移动飞狐老鼠十字光标到目标日期K线(日周月均可):6 s' S) q/ D5 z# Q; S! p. ^4 A I
) D- [. t I, _, o; D, N
此法是直接沟通公式与老鼠十字光标,应用到sysparam函数,所以执行极慢' E- k3 s/ j4 P* u# i9 l
) {+ t. P% M a+ f1 y+ r7 {
dat2:=barslast(barpos=sysparam(1));
$ p# r; c, J- e. S% [; ?; V3 C, s0 A! Xstickline(mod(dat2,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color0000ff,pointdot;, [) a' n% X% _$ Z' h8 O% c. x
drawnumber(dat2<=360 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2,0),colorffffff,shift1;% a$ i1 P. N+ l5 U9 V w! ^' Q
drawnumber(dat2>360 and dat2<720 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-360,0),colorffffff,shift1;
0 m$ ^) d" l" \9 Mdrawnumber(dat2>720 and dat2<1080 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-720,0),colorffffff,shift1;
2 _8 h* ]- e6 N5 v0 F! S" adrawnumber(dat2>1080 and dat2<1440 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1080,0),colorffffff,shift1;
. Y& z& w( I# i: Ldrawnumber(dat2>1440 and dat2<11800 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1440,0),colorffffff,shift1;
- P. o; C* E7 G+ h & D3 p+ e1 X f( Z- y" {
我自用的是公式直接自动定位波浪高低点起位,但此法未曾外给 (这与先前说过的含二个理念无关)3 d+ M4 Q P I& K+ h
至于5分钟的分时公式,抱歉未编过,你可以用上面公式商请会编分时公式的朋友依样修改
, Q) x9 }+ @5 \8 c( u$ R$ F9 v2 _ N! |7 G; f; G
[ 本帖最后由 ycng 于 2013-7-14 16:52 编辑 ] |