有没有显示缺口的公式？

axcqy

如题！那位朋友可以上传一个谢谢！

samyongq

没有。
不过我知道通达信里，可以设置一下，显示最新的缺口。

我赢8888

缺口公式多了去了

我赢8888

你看这个行吗

axcqy

原帖由 我赢8888 于 2009-11-1 19:40 发表
" ]: Y! d! |& b+ g你看这个行吗

+ q2 K# f  u# M0 O6 G  t非常不错；公式可以上传吗？

CASDAQ

到公式区里收一下，多了去了

axcqy

原帖由 CASDAQ 于 2009-11-1 20:23 发表
到公式区里收一下，多了去了

axcqy

已解决；谢谢！

我赢8888

给你原码

! J9 P$ B* h: i8 z# t0 Aif datacount<3 then exit;
dw:=IF(STKTYPE=0 or STKTYPE=13,c*1/500,MINDIFF);
+ D" R4 L; @% z- n: K3 `) u( u上突缺口:=l>REF(c,1)+dw,COLORRED,LINETHICK0;
0 o  m# l) C0 N: c3 Z下突缺口:=h<REF(c,1)-dw,COLORCYAN,LINETHICK0;
" o1 ?8 m2 N4 Q9 K% d$ IDRAWICON(上突缺口 and SYSPARAM(3)-SYSPARAM(2)<300,l,4);
DRAWICON(下突缺口 and SYSPARAM(3)-SYSPARAM(2)<300,h,5);
HH:=H;
LL:=L;
pL:=LL[datacount]; pH:=0;
tk:=if(上突缺口,1,if(下突缺口,-1,0));
for i=datacount-1 downto 2 do begin
( B/ c# U+ T0 J9 t. R( j  if LL<pL then pL:=LL;
  if HH>pH then pH:=HH;
  if tk=1 and pL<=HH[i-1] then tk:=0;
* a) |3 _4 X" d% o% B  if tk=-1 and pH>=LL[i-1] then tk:=0;
end;
DRAWTEXT(tk=1,REF(c,1),'未补')COLORRED;
: l9 {" U3 A: HDRAWTEXT(tk=-1,REF(c,1),'未补')COLORCYAN;
DRAWSL(tk=1,REF(c,1),0,0,0)COLORRED;
DRAWSL(tk=-1,REF(c,1),0,0,0)COLORCYAN;
向上跳空未回补:count(tk=1,0),linethick0;
8 R  |* E8 T  v- k* }' L7 Q3 E0 T向下跳空未回补:count(tk=-1,0),linethick0

axcqy

原帖由 我赢8888 于 2009-11-1 20:44 发表
给你原码

if datacountREF(c,1)+dw,COLORRED,LINETHICK0;
下突缺口:=h

axcqy

原帖由 我赢8888 于 2009-11-1 20:44 发表
给你原码

$ @) k! O% B3 F. s, O- z2 rif datacountREF(c,1)+dw,COLORRED,LINETHICK0;
- Y$ W) W1 E* @% p; d下突缺口:=h

行12  语法错误；不知是什原因

笨奔

缺口是很重要的,
黄为向上跳空缺口,兰向下跳空缺口

+ _- B% D/ O4 C[ 本帖最后由 笨奔 于 2009-11-1 21:27 编辑 ]

xmhenry

在副图里显示缺口比较好. 例如, 30MIN图里就可把本周期/日线周期/周线的缺口大小/高/低点都表示出来

shongshu

fh:=h;fl:=l;
for p=datacount-1 downto 1 do begin
  if fh[p]<fh[p+1] then
/ t; q) V: c' Q7 \: W8 s     fh[p]:=fh[p+1];
  if fl[p]>fl[p+1] then
, h9 U5 n4 ~& H  q     fl[p]:=fl[p+1];
end;
+ `, i4 \" ]4 x. [4 Hqk:=l>ref(h,1)OR H<ref(L,1);
G:=IF(l>ref(h,1),L,IF(H<ref(L,1),ref(L,1),0));
9 U, l/ J6 d) F. ]. h7 WD:=IF(l>ref(h,1),ref(H,1),IF(H<ref(L,1),H,0));
; f) `; R* R* v/ o4 F% l! QS:=IF(l>ref(h,1),2,IF(H<ref(L,1),1,0));
tj:=s=2 and fL<=G AND fL>=D OR s=1 and fH<G AND fH>=D ;
  h: Q, t4 d! W4 C" v. F: Ww:=BARSSINCE(BACKSET(BARSTATUS=2,BARSLAST(TJ*BARPOS=BARPOS)+1))+1;
6 p) S( D" W+ w( BDD:=DATE;
* ~) y+ c0 Z( u! r. N- B最近缺口日:REF(DD,W-1)+19000000,LINETHICK0,COLORAAFF33;
+ f7 A6 {6 g/ }+ b3 aS1:=IF(ref(S,W-1)=2,ref(fL,w-1),IF(ref(S,W-1)=1,ref(fH,w-1),0));
S2:=IF(ref(S,W-1)=2,ref(D,w-1),IF(ref(S,W-1)=1,ref(G,w-1),0));
! s, k7 t% f) c2 m' |A:=MAX(S1,S2);
B:=MIN(S1,S2);
缺口:B[datacount],COLORWHITE,LINETHICK,,PRECISION2;
, g6 x. q' K) |! Y1 N/ I7 \/ H→:A[datacount],COLORWHITE,LINETHICK,PRECISION2;
$ S; F! H4 ]1 N/ [! i' O5 y9 _STICKLINE(w,S1,S2,15,0),COLORGRAY;
DRAWTEXT(BARSTATUS=2,A,NUMTOSTR(B,2)+'-'+NUMTOSTR(A,2)),COLOR0099CC,ALIGN2;{显示缺口数字  可删除}
0 I5 h! Q2 D+ [( h$ phh:=h;LL:=L;DD:=DATE;
gb:=SYSPARAM(1);
2 n* d* i: P6 {上突缺口:=LOW>REF(HIGH,1),COLOR00EEFF,LINETHICK0;
下突缺口:=HIGH<REF(LOW,1),COLOREE9933,LINETHICK0;
XQS:=ubound(下突缺口),LINETHICK0;
s1:=SUMBARS(上突缺口,1);
s2:=SUMBARS(上突缺口,2);
) N: K0 O9 R8 I! D- |9 nx1:=SUMBARS(下突缺口,1);
x2:=SUMBARS(下突缺口,2);
  r+ A: O# |+ E" R$ {上突位置1:=gb-s1[gb]+1,LINETHICK0;
: ~6 U7 |! _& C, _下突位置1:=gb-x1[gb]+1,LINETHICK0;
( V5 k1 J1 ^5 `* {DRAWTEXT(下突缺口,h,'△'),COLOREE9933,PXUP15,ALIGN0;
7 g& g8 U0 `6 t) P6 zDRAWTEXT(下突缺口,ref(l,1),'▽'),COLOREE9933,ALIGN0;
- j2 Q, h5 B: e3 Z2 O( LDRAWTEXT(上突缺口,l,'▽'),COLOR00EEFF,ALIGN0;
DRAWTEXT(上突缺口,ref(h,1),'△'),COLOR00EEFF,PXUP15,ALIGN0;
XQ1:=LL[下突位置1-1];
; x( e- t8 ~' A$ v% e7 kXQD:=DD[下突位置1];
BXQ:=COUNT(RANGE(BARPOS,下突位置1,XQS) AND HH>XQ1,XQS-下突位置1)=1;
3 b1 c/ d) g5 a  ~3 d) r; xBXQ:=FILTER(BXQ,XQS-下突位置1);
6 f. q: C/ V0 q5 w+ `SQ1:=HH[上突位置1-1];
! Z5 f* _+ G; k/ DSQD:=DD[上突位置1];
上缺日:IF(XQD<SQD,SQD+19000000,0),LINETHICK0,COLOR00EEFF;
/ }( d' S6 I$ `下缺日:IF(SQD<XQD,XQD+19000000,0),LINETHICK0,COLOREE9933;
BSQ:=COUNT(RANGE(BARPOS,上突位置1,XQS) AND LL<SQ1,XQS-上突位置1)=1;BSQ:=FILTER(BSQ,XQS-上突位置1);
3 t# Z3 d" H" Y" w8 {% s. VDRAWTEXT(BSQ,(o+c)/2,' \n 补'+STRRIGHT(NUMTOSTR(SQD,0),6)+'\n 上突缺口\n '+numtostr(SQ1,2)),COLORFF99FF;
DRAWTEXT(BSQ,SQ1,'←'),ALIGN0,COLOR00EEEE;
* b! T* m& a+ `. zDRAWTEXT(BXQ,(o+c)/2,' \n 补'+STRRIGHT(NUMTOSTR(XQD,0),6)+'\n 下突缺口\n '+numtostr(XQ1,2)),COLOREEEE66;
& y9 x0 d! ~0 ^4 V  p  S5 d0 @% w! pDRAWTEXT(BXQ,XQ1,'←'),ALIGN0,COLOR00EEEE;
  P: y% Q, S3 ^  W! m6 Y//

8991000

缺口和角度线相关联很深

貔貅72

前几天我去照的，很不错。共享    http://bbs.88158.cn/thread-58273-1-1.html

shongshu

大盘最近没有缺口了 成了蜂窝了  呵呵