阳光飞狐

【阳光飞狐__与财富同行】

 找回密码
 手机注册

手机动态码快速登录

手机号快速注册登录

查看: 3432|回复: 16
打印 上一主题 下一主题

有没有显示缺口的公式?

[复制链接]
跳转到指定楼层
1#
发表于 2009-11-1 18:43:05 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
如题!那位朋友可以上传一个谢谢!
2#
发表于 2009-11-1 18:45:26 | 只看该作者
没有。
* E% n8 M* ?3 A/ y" n1 x不过我知道通达信里,可以设置一下,显示最新的缺口。
3#
发表于 2009-11-1 19:34:29 | 只看该作者
缺口公式多了去了
4#
发表于 2009-11-1 19:40:13 | 只看该作者
你看这个行吗

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?手机注册 手机动态码快速登录

x
5#
 楼主| 发表于 2009-11-1 19:52:34 | 只看该作者
原帖由 我赢8888 于 2009-11-1 19:40 发表 5 W; W% k& P: _. M# V# N
你看这个行吗

; n& o! A0 R2 X% X9 A非常不错;公式可以上传吗?
6#
发表于 2009-11-1 20:23:38 | 只看该作者
到公式区里收一下,多了去了

评分

1

查看全部评分

7#
 楼主| 发表于 2009-11-1 20:26:40 | 只看该作者
原帖由 CASDAQ 于 2009-11-1 20:23 发表 6 U/ S9 S1 B; A7 b5 i& ^9 n
到公式区里收一下,多了去了

- c  b, s5 I" O4 S5 F2 ?) w
8#
 楼主| 发表于 2009-11-1 20:39:48 | 只看该作者
已解决;谢谢!
9#
发表于 2009-11-1 20:44:11 | 只看该作者
给你原码
8 s; s, V+ a/ i! A9 K6 G* |1 ~8 i0 Y) F7 I
if datacount<3 then exit;+ }3 z  g& p% j& y% }9 N
dw:=IF(STKTYPE=0 or STKTYPE=13,c*1/500,MINDIFF);/ n: C  t6 X% k1 A
上突缺口:=l>REF(c,1)+dw,COLORRED,LINETHICK0;/ a6 C: {4 t$ B
下突缺口:=h<REF(c,1)-dw,COLORCYAN,LINETHICK0;5 o+ Z. D* Q6 }6 I1 Z  P6 v- L
DRAWICON(上突缺口 and SYSPARAM(3)-SYSPARAM(2)<300,l,4);
5 E( s' Y4 T& o- FDRAWICON(下突缺口 and SYSPARAM(3)-SYSPARAM(2)<300,h,5);  E( @0 X! t! i6 @; f0 y' \* ?/ g
HH:=H;! ?7 _' e3 u, @5 M
LL:=L;( A* F4 {& D. j2 K( r
pL:=LL[datacount]; pH:=0;
9 I/ M9 W& m; D- V! \) K) Q$ [& K* dtk:=if(上突缺口,1,if(下突缺口,-1,0));
, `+ [0 P) x9 a6 [% ~for i=datacount-1 downto 2 do begin
9 Z$ e: |1 @; s6 k  g. ]  if LL<pL then pL:=LL;. G/ j" `0 U( S. ?
  if HH>pH then pH:=HH;
) J1 i8 R" W7 t& C4 M( D: ?$ n  if tk=1 and pL<=HH[i-1] then tk:=0;
% `0 Q$ s& E0 Y- E$ {  if tk=-1 and pH>=LL[i-1] then tk:=0;8 M3 d, q( w) E1 r
end;
: Y% N+ O: _" e! c' ]DRAWTEXT(tk=1,REF(c,1),'未补')COLORRED;
9 M, `% Z) h& p- }1 ?DRAWTEXT(tk=-1,REF(c,1),'未补')COLORCYAN;
8 o4 X& @7 E& a3 H, t3 I1 T3 UDRAWSL(tk=1,REF(c,1),0,0,0)COLORRED;0 V4 R; a) _- e' e5 A* X& r
DRAWSL(tk=-1,REF(c,1),0,0,0)COLORCYAN;2 I4 A; ~5 R9 g0 r* e, ~
向上跳空未回补:count(tk=1,0),linethick0;
5 F) N* E& m9 {# @+ Z# `* b+ ?向下跳空未回补:count(tk=-1,0),linethick0

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?手机注册 手机动态码快速登录

x
10#
 楼主| 发表于 2009-11-1 20:50:42 | 只看该作者
原帖由 我赢8888 于 2009-11-1 20:44 发表 # z$ ]8 a1 O) S! ~" b1 |
给你原码
9 I- o) X5 ~9 p7 f6 ?1 b# E/ H' @0 \% e0 J+ h  O' g
if datacountREF(c,1)+dw,COLORRED,LINETHICK0;( B- f  \" j, `
下突缺口:=h
7 x2 u! g0 ?0 H  x
11#
 楼主| 发表于 2009-11-1 20:58:00 | 只看该作者
原帖由 我赢8888 于 2009-11-1 20:44 发表 % x$ e( i: y- w" k
给你原码
( g- Q" H. ]! {* W/ ^: M3 L
" c" `" N2 d9 T5 D- m  E" Qif datacountREF(c,1)+dw,COLORRED,LINETHICK0;
+ h; x9 s3 K! H8 ~下突缺口:=h

+ U+ Z1 f2 k+ L4 v. ~; I+ \行12  语法错误;不知是什原因

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?手机注册 手机动态码快速登录

x
12#
发表于 2009-11-1 21:21:11 | 只看该作者
缺口是很重要的,
/ z0 x+ R3 z+ |! ~# ]7 h/ ?5 W. B黄为向上跳空缺口,兰向下跳空缺口
, g1 E% \- O  J3 Z0 P+ d
0 ^0 a( X( m/ E! b7 s5 Q0 g[ 本帖最后由 笨奔 于 2009-11-1 21:27 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?手机注册 手机动态码快速登录

x
13#
发表于 2009-11-1 22:07:00 | 只看该作者
在副图里显示缺口比较好. 例如, 30MIN图里就可把本周期/日线周期/周线的缺口大小/高/低点都表示出来
14#
发表于 2009-11-1 22:16:44 | 只看该作者

【飞狐】缺口跟踪

fh:=h;fl:=l;0 N0 X/ [- c# g. _' J! o. M$ Q9 O# P# r
for p=datacount-1 downto 1 do begin
1 Y9 X2 u9 _# Q! _  if fh[p]<fh[p+1] then
) }+ b* M; p2 B     fh[p]:=fh[p+1];6 R( v+ G6 s/ J' ~0 n: u
  if fl[p]>fl[p+1] then
6 m+ I- M1 H' Z2 \  Q& b     fl[p]:=fl[p+1];
% q% E: Z8 w5 k. U' uend;6 i5 u: S$ r" H' x- g  ]; G, B
qk:=l>ref(h,1)OR H<ref(L,1);
( D! |( d& c- \2 o4 ~G:=IF(l>ref(h,1),L,IF(H<ref(L,1),ref(L,1),0));
* e. E- G( J1 v9 c8 F: s+ L4 @D:=IF(l>ref(h,1),ref(H,1),IF(H<ref(L,1),H,0));7 t) U$ L6 R' V' ?4 K" D  n9 I
S:=IF(l>ref(h,1),2,IF(H<ref(L,1),1,0));
# S8 c5 \5 {* z2 z: Jtj:=s=2 and fL<=G AND fL>=D OR s=1 and fH<G AND fH>=D ;
. p& e0 V% b, Y- |w:=BARSSINCE(BACKSET(BARSTATUS=2,BARSLAST(TJ*BARPOS=BARPOS)+1))+1;  v. x9 C( B1 {1 l# c+ C, _
DD:=DATE;
2 a3 p( k% R+ o# y+ `最近缺口日:REF(DD,W-1)+19000000,LINETHICK0,COLORAAFF33;1 T, Q" z$ P3 h- Y
S1:=IF(ref(S,W-1)=2,ref(fL,w-1),IF(ref(S,W-1)=1,ref(fH,w-1),0));
- c- K9 t% E6 s7 B: ^" tS2:=IF(ref(S,W-1)=2,ref(D,w-1),IF(ref(S,W-1)=1,ref(G,w-1),0));4 Z! j  ~' t! v' |2 u* r/ p
A:=MAX(S1,S2);
( a3 S6 O6 x  O7 H" EB:=MIN(S1,S2);
7 `; V( [' ~' I4 j% f, D; Y缺口:B[datacount],COLORWHITE,LINETHICK,,PRECISION2;$ _( Q2 Z' L5 j& `1 D
→:A[datacount],COLORWHITE,LINETHICK,PRECISION2;# u+ D" e# A% s& f% p1 `4 f
STICKLINE(w,S1,S2,15,0),COLORGRAY;
1 ?! A) E# A2 J' nDRAWTEXT(BARSTATUS=2,A,NUMTOSTR(B,2)+'-'+NUMTOSTR(A,2)),COLOR0099CC,ALIGN2;{显示缺口数字  可删除}
- n/ _4 b1 n0 \( c, d; k0 w" Z6 I% Zhh:=h;LL:=L;DD:=DATE;
9 V9 N5 q/ ?& P7 h6 j  ]+ egb:=SYSPARAM(1);
% g3 O  S0 `5 A# g2 p! E3 z上突缺口:=LOW>REF(HIGH,1),COLOR00EEFF,LINETHICK0;- O4 K$ z, y* [" o3 B4 ^. a) L7 X
下突缺口:=HIGH<REF(LOW,1),COLOREE9933,LINETHICK0;
1 ~" ?3 [7 C9 ~1 KXQS:=ubound(下突缺口),LINETHICK0;
! A2 m+ D0 `  L+ Q0 ms1:=SUMBARS(上突缺口,1);
( n6 \/ `8 [& R( r) J  as2:=SUMBARS(上突缺口,2);; B' r: d- S$ L3 ?; r2 `1 B3 q/ q
x1:=SUMBARS(下突缺口,1);: [: I9 N& T, @3 ?2 w7 e8 U
x2:=SUMBARS(下突缺口,2);
! q& b9 ^" E' F* R上突位置1:=gb-s1[gb]+1,LINETHICK0;/ _1 `) V1 m4 ~' p0 M# l
下突位置1:=gb-x1[gb]+1,LINETHICK0;
1 U% C$ F5 K9 g4 a2 SDRAWTEXT(下突缺口,h,'△'),COLOREE9933,PXUP15,ALIGN0;
9 w8 C+ ~, E( o3 \DRAWTEXT(下突缺口,ref(l,1),'▽'),COLOREE9933,ALIGN0;
& w6 H6 W  Z& e. E( ^DRAWTEXT(上突缺口,l,'▽'),COLOR00EEFF,ALIGN0;" h4 F8 _3 |" D8 H7 ^' W  X3 \9 j) w+ q
DRAWTEXT(上突缺口,ref(h,1),'△'),COLOR00EEFF,PXUP15,ALIGN0;
8 O( h) t2 y  L3 FXQ1:=LL[下突位置1-1];
2 V4 a) Q% W9 @2 f" K! xXQD:=DD[下突位置1];
* d/ i5 N. I% D3 X9 hBXQ:=COUNT(RANGE(BARPOS,下突位置1,XQS) AND HH>XQ1,XQS-下突位置1)=1;
, a) ^1 L7 Z. F: b. e3 RBXQ:=FILTER(BXQ,XQS-下突位置1);. `% i( f* ~# `) P
SQ1:=HH[上突位置1-1];
0 v9 S% ?+ ~1 xSQD:=DD[上突位置1];: d5 J0 I1 f1 }1 @7 S
上缺日:IF(XQD<SQD,SQD+19000000,0),LINETHICK0,COLOR00EEFF;! Q# j- B3 f8 V5 u, D3 |. b: I6 Y
下缺日:IF(SQD<XQD,XQD+19000000,0),LINETHICK0,COLOREE9933;
; E3 N# M- I8 [; {3 M, |: \BSQ:=COUNT(RANGE(BARPOS,上突位置1,XQS) AND LL<SQ1,XQS-上突位置1)=1;BSQ:=FILTER(BSQ,XQS-上突位置1);" g) g6 w" V, r
DRAWTEXT(BSQ,(o+c)/2,' \n 补'+STRRIGHT(NUMTOSTR(SQD,0),6)+'\n 上突缺口\n '+numtostr(SQ1,2)),COLORFF99FF;: ?8 m& _5 v, Y. w" ~8 S
DRAWTEXT(BSQ,SQ1,'←'),ALIGN0,COLOR00EEEE;& f0 Z8 _! ~6 J+ p
DRAWTEXT(BXQ,(o+c)/2,' \n 补'+STRRIGHT(NUMTOSTR(XQD,0),6)+'\n 下突缺口\n '+numtostr(XQ1,2)),COLOREEEE66;
, q( T5 ?% |$ e6 `" S5 \DRAWTEXT(BXQ,XQ1,'←'),ALIGN0,COLOR00EEEE;. n2 c3 Q' n& F* v" e
//

评分

1

查看全部评分

15#
发表于 2009-11-1 22:37:09 | 只看该作者
缺口和角度线相关联很深
16#
发表于 2009-11-2 07:57:52 | 只看该作者
前几天我去照的,很不错。共享    http://bbs.88158.cn/thread-58273-1-1.html
17#
发表于 2009-11-2 10:21:30 | 只看该作者
大盘最近没有缺口了 成了蜂窝了  呵呵
您需要登录后才可以回帖 登录 | 手机注册 手机动态码快速登录

本版积分规则

QQ|小黑屋|手机版|Archiver|【阳光飞狐】 ( 网站ICP编号:京ICP备06013475号-7 )

GMT+8, 2026-7-22 09:28 , Processed in 0.158878 second(s), 21 queries .

Powered by Discuz! X3.2 Licensed

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表