原帖由 logoslogos 于 2013-7-14 10:08 发表 3 z) z% x$ H& \( t5 m
Y兄,还有一个思路,能否实现再编写一个:
- ]$ @& ~7 ^5 Q1.准许设定开始的日期(日,周,月)
Y5 B9 N6 b8 ^9 y* S2.能否搞个用于5分钟图的,并且开始点能否让自如输入设定?这样就可以用于期货的日内短线了。。。我的意思您能明白吧? 万分感谢
?- g, t6 ~7 w- e0 l- r* W ... 2 G7 F3 u, h) X
/ o3 ?4 b2 E& L& ^
有二法可编之
; z2 z8 b! d$ O; B' V+ V( y* R第一法:是输入日期如:
* T$ D! C$ v, P: i/ y1 y/ f
- M0 |* }# b4 [, ?& A; x1010924 -----> 200109249 G; h5 N' Q3 B/ z2 a
20130124------>公式给入1130124
) }+ L# b( Q4 T, \% E0 v/ O这是日K线情形,至于周或月飞狐似乎无直接可引用的函数, 在周或月可用第二法
: H$ _( L2 K" ~. A日期长度超过,可自行加上drawnumber函数
2 t7 e( V4 @7 s. G* V% A----------------------------------------------------------------------------------
' A1 r% J- M2 j: k7 N * `+ A' H. g5 \: w# A
dat1:=barslast(date=1010924);
4 k# z6 @" e# n A: h9 V# hstickline(mod(dat1,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color00ffff,pointdot;* {7 i9 Z) s% S) x z& W% r8 L
drawnumber(dat1<=360 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1,0),colorff00ff,shift1;
5 X" R) M5 ~3 M8 y5 Ddrawnumber(dat1>360 and dat1<720 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-360,0),colorff00ff,shift1;- f. D- |: E+ {; r G$ \
drawnumber(dat1>720 and dat1<1080 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-720,0),colorff00ff,shift1;
: n: G) l/ W" _/ F7 x7 j% Idrawnumber(dat1>1080 and dat1<1440 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1080,0),colorff00ff,shift1;
+ [4 G( G' k, Q) A' Adrawnumber(dat1>1440 and dat1<11800 and mod(dat1,15)=0,hhv(h,count(c,0)),dat1-1440,0),colorff00ff,shift1;
) }& D U5 l: ~6 o L+ q/ W+ \ U. O) w* M- I
第二法:是移动飞狐老鼠十字光标到目标日期K线(日周月均可):
" \9 a) Y, \5 ^& }) K
+ |4 Y' y; a, w! A4 @" R: j/ q) r此法是直接沟通公式与老鼠十字光标,应用到sysparam函数,所以执行极慢7 X) O+ s9 ^ B0 } s n
( _2 D) i$ H% `# D; V4 q" t# Y B# i. ~( d
dat2:=barslast(barpos=sysparam(1));/ h ]4 T0 c, b/ O* k
stickline(mod(dat2,15)=0,hhv(h,count(c,0)),llv(L,count(c,0)),1,0),color0000ff,pointdot;
+ `8 G+ q" V# {drawnumber(dat2<=360 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2,0),colorffffff,shift1;' B; e E/ u; B9 v9 x* \
drawnumber(dat2>360 and dat2<720 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-360,0),colorffffff,shift1;
, Q; k5 k% s' t4 \' ]5 zdrawnumber(dat2>720 and dat2<1080 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-720,0),colorffffff,shift1;
' N9 S# H# h1 j. L# v6 s, @drawnumber(dat2>1080 and dat2<1440 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1080,0),colorffffff,shift1;' P1 n; I; h ~) b
drawnumber(dat2>1440 and dat2<11800 and mod(dat2,15)=0,hhv(h,count(c,0)),dat2-1440,0),colorffffff,shift1;
3 C) L- H. T$ Z0 {9 Q
& ~' r1 I9 j% H/ Z+ }( |/ j7 A我自用的是公式直接自动定位波浪高低点起位,但此法未曾外给 (这与先前说过的含二个理念无关)
- ]2 w( {/ v9 V5 x! x至于5分钟的分时公式,抱歉未编过,你可以用上面公式商请会编分时公式的朋友依样修改2 w1 e2 U# `; U) o5 ?; ~7 t, P
# b( y' t+ V M) ?8 R[ 本帖最后由 ycng 于 2013-7-14 16:52 编辑 ] |