原帖由 logoslogos 于 2013-7-14 10:08 发表 ![]()
`( I. x. W( ] X1 h' {. u! @) oY兄,还有一个思路,能否实现再编写一个:
) |, F |5 I' }- [1.准许设定开始的日期(日,周,月)% l( N9 j+ t# I9 q
2.能否搞个用于5分钟图的,并且开始点能否让自如输入设定?这样就可以用于期货的日内短线了。。。我的意思您能明白吧? 万分感谢
" p2 j; K5 g$ Q$ Q2 L ...
( D. m8 [# t T) t+ w
, {% J7 S3 {* ^% d有二法可编之
5 R0 S: k% W2 S3 E3 f第一法:是输入日期如:
1 q5 }7 c2 ?& {" [" W" F( y2 i
7 T' @5 ~4 W4 K- p- q1010924 -----> 20010924& Q' a9 n1 h+ c
20130124------>公式给入1130124- {) v5 {- \/ q( i1 M2 I! J. X
这是日K线情形,至于周或月飞狐似乎无直接可引用的函数, 在周或月可用第二法
# Z, M5 }/ j& T7 |+ K4 l, v/ I日期长度超过,可自行加上drawnumber函数
% ^ @4 G. W9 J5 t5 O! x) y----------------------------------------------------------------------------------9 N" o2 n% i w3 d9 K$ Q2 P
+ C! }3 Q, d' S+ r* x8 idat1:=barslast(date=1010924);
; i% a6 X6 q# A) B# a( {stickline(mod(dat1,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color00ffff,pointdot;
. K2 e6 S0 |/ h$ ^9 M1 adrawnumber(dat1<=360 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1,0),colorff00ff,shift1;$ B3 t; [* W7 j; {- K
drawnumber(dat1>360 and dat1<720 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-360,0),colorff00ff,shift1;1 ?0 n6 M/ d9 p5 O @) v* s& C3 }$ o
drawnumber(dat1>720 and dat1<1080 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-720,0),colorff00ff,shift1;1 V0 L8 e8 l1 H* |$ I
drawnumber(dat1>1080 and dat1<1440 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1080,0),colorff00ff,shift1;$ Z- A1 D A: t
drawnumber(dat1>1440 and dat1<11800 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1440,0),colorff00ff,shift1;0 b7 J+ p* ^6 B+ S
. m- R- x- D! D8 D
第二法:是移动飞狐老鼠十字光标到目标日期K线(日周月均可):" g+ E+ X* J2 @: M! l. B
% i8 w- O2 W: G- M- n
此法是直接沟通公式与老鼠十字光标,应用到sysparam函数,所以执行极慢& e% q0 N; `3 k
: T) k/ x9 h/ P" r4 i* h) r; Rdat2:=barslast(barpos=sysparam(1));
8 H) H9 q. d. X' i* [/ sstickline(mod(dat2,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color0000ff,pointdot;
( o# L- D% ~' E4 v) Jdrawnumber(dat2<=360 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2,0),colorffffff,shift1;
* c# b X$ l! b9 v& X* |2 @+ O+ hdrawnumber(dat2>360 and dat2<720 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-360,0),colorffffff,shift1;* n* s4 I+ ]1 a0 M t! P% z1 N
drawnumber(dat2>720 and dat2<1080 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-720,0),colorffffff,shift1;
# z0 ^4 {* d% v/ O' H$ }' kdrawnumber(dat2>1080 and dat2<1440 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1080,0),colorffffff,shift1;
# j, Z$ I& B5 N4 Bdrawnumber(dat2>1440 and dat2<11800 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1440,0),colorffffff,shift1;9 M# ?; a3 h7 G7 |0 Y
8 A/ l b3 _4 H9 f% b/ z2 J我自用的是公式直接自动定位波浪高低点起位,但此法未曾外给 (这与先前说过的含二个理念无关)6 D! c5 Z2 E$ ^) p
至于5分钟的分时公式,抱歉未编过,你可以用上面公式商请会编分时公式的朋友依样修改
. Z* V4 r1 v7 U7 Y, l% {) ^) H4 H
# m9 N; J0 D' |2 m- Q6 v[ 本帖最后由 ycng 于 2013-7-14 16:52 编辑 ] |