有没有显示缺口的公式？

axcqy

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

samyongq

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

我赢8888

缺口公式多了去了

我赢8888

你看这个行吗

axcqy

原帖由 我赢8888 于 2009-11-1 19:40 发表
" p1 Q8 u+ q! V$ f! I' d: w你看这个行吗

! A! h9 }' }- c& |( _- D3 s$ P$ h6 L非常不错；公式可以上传吗？

CASDAQ

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

axcqy

原帖由 CASDAQ 于 2009-11-1 20:23 发表
- }8 |; j  z1 j  F7 j到公式区里收一下，多了去了

axcqy

已解决；谢谢！

我赢8888

给你原码
# `! p. d# p2 U! ]
% Q! K! P1 ~0 x0 Qif datacount<3 then exit;
dw:=IF(STKTYPE=0 or STKTYPE=13,c*1/500,MINDIFF);
  x0 c$ q( |: ]4 G上突缺口:=l>REF(c,1)+dw,COLORRED,LINETHICK0;
下突缺口:=h<REF(c,1)-dw,COLORCYAN,LINETHICK0;
DRAWICON(上突缺口 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));
: x/ c1 [8 i; s* r7 B$ P; Sfor i=datacount-1 downto 2 do begin
  if LL<pL then pL:=LL;
  if HH>pH then pH:=HH;
5 Y* \( T: h2 a, \4 j, j  if tk=1 and pL<=HH[i-1] then tk:=0;
' {$ E* q3 b9 ~. {8 M: K  if tk=-1 and pH>=LL[i-1] then tk:=0;
end;
DRAWTEXT(tk=1,REF(c,1),'未补')COLORRED;
' R" i/ m0 D- ?1 }7 E8 ]DRAWTEXT(tk=-1,REF(c,1),'未补')COLORCYAN;
DRAWSL(tk=1,REF(c,1),0,0,0)COLORRED;
* f  @  U# r5 o7 L& U2 S5 e! HDRAWSL(tk=-1,REF(c,1),0,0,0)COLORCYAN;
向上跳空未回补:count(tk=1,0),linethick0;
7 R( l- J2 e6 z向下跳空未回补:count(tk=-1,0),linethick0

axcqy

原帖由 我赢8888 于 2009-11-1 20:44 发表
* B1 ~; j1 D5 V3 f给你原码

$ r8 H4 T8 P3 t" M1 M6 C+ S+ v9 W8 Sif datacountREF(c,1)+dw,COLORRED,LINETHICK0;
下突缺口:=h

1 Y2 u6 z5 d& P# T* h

axcqy

原帖由 我赢8888 于 2009-11-1 20:44 发表
* ?6 B) e% n( v) q: O% ~: A给你原码
. T' h9 E& f+ T) D( X
if datacountREF(c,1)+dw,COLORRED,LINETHICK0;
4 _% i& j3 A1 U3 Q下突缺口:=h

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

笨奔

缺口是很重要的,
黄为向上跳空缺口,兰向下跳空缺口
- o4 K0 H* ]- U$ `. A  `
[ 本帖最后由 笨奔 于 2009-11-1 21:27 编辑 ]

xmhenry

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

shongshu

fh:=h;fl:=l;
for p=datacount-1 downto 1 do begin
* g5 K% h0 s9 l  if fh[p]<fh[p+1] then
: _6 N) c( z$ y     fh[p]:=fh[p+1];
  if fl[p]>fl[p+1] then
     fl[p]:=fl[p+1];
; G- j( C9 q; x  ]! A# [) Uend;
8 k" Y- _3 Z/ ?: J9 y3 n1 nqk:=l>ref(h,1)OR H<ref(L,1);
( g$ |2 v5 f% j0 p+ U# y* aG:=IF(l>ref(h,1),L,IF(H<ref(L,1),ref(L,1),0));
# i) Q- V6 a6 g/ _( m" ?" tD:=IF(l>ref(h,1),ref(H,1),IF(H<ref(L,1),H,0));
S:=IF(l>ref(h,1),2,IF(H<ref(L,1),1,0));
' d# j; O! }1 c- c( Z# f& ~tj:=s=2 and fL<=G AND fL>=D OR s=1 and fH<G AND fH>=D ;
w:=BARSSINCE(BACKSET(BARSTATUS=2,BARSLAST(TJ*BARPOS=BARPOS)+1))+1;
) z6 R- C" j7 xDD:=DATE;
  W/ }# F5 F$ y9 Z8 O8 d1 m最近缺口日:REF(DD,W-1)+19000000,LINETHICK0,COLORAAFF33;
S1:=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));
  O- N* P( G2 P6 s3 L$ \) ]A:=MAX(S1,S2);
+ l4 z2 ^0 h# J/ M, G7 {/ o* YB:=MIN(S1,S2);
缺口:B[datacount],COLORWHITE,LINETHICK,,PRECISION2;
8 k) L, V3 H: K) _5 ^) E→:A[datacount],COLORWHITE,LINETHICK,PRECISION2;
STICKLINE(w,S1,S2,15,0),COLORGRAY;
  H7 P  \- H+ c$ _! FDRAWTEXT(BARSTATUS=2,A,NUMTOSTR(B,2)+'-'+NUMTOSTR(A,2)),COLOR0099CC,ALIGN2;{显示缺口数字  可删除}
- w. h" h& S0 O5 n: hhh:=h;LL:=L;DD:=DATE;
6 B" @  u8 u0 M- g3 ngb:=SYSPARAM(1);
2 J. _9 \* c/ \8 R上突缺口:=LOW>REF(HIGH,1),COLOR00EEFF,LINETHICK0;
( I& D$ O0 o( g* Y下突缺口:=HIGH<REF(LOW,1),COLOREE9933,LINETHICK0;
$ s* |7 M( W( N* t9 xXQS:=ubound(下突缺口),LINETHICK0;
. b, }5 j2 A4 z7 I- Cs1:=SUMBARS(上突缺口,1);
. L& }7 s7 U: r. f5 {% es2:=SUMBARS(上突缺口,2);
$ m' \! Z6 r  zx1:=SUMBARS(下突缺口,1);
& f0 _/ I6 n; q: ex2:=SUMBARS(下突缺口,2);
* ?% h1 e# [" C" ~1 D/ R上突位置1:=gb-s1[gb]+1,LINETHICK0;
下突位置1:=gb-x1[gb]+1,LINETHICK0;
DRAWTEXT(下突缺口,h,'△'),COLOREE9933,PXUP15,ALIGN0;
9 T; }; g" i6 p& e4 NDRAWTEXT(下突缺口,ref(l,1),'▽'),COLOREE9933,ALIGN0;
DRAWTEXT(上突缺口,l,'▽'),COLOR00EEFF,ALIGN0;
! t# M; c- i! Z, ~) e+ rDRAWTEXT(上突缺口,ref(h,1),'△'),COLOR00EEFF,PXUP15,ALIGN0;
XQ1:=LL[下突位置1-1];
+ ~$ Q: b8 i% w; ?( u, VXQD:=DD[下突位置1];
BXQ:=COUNT(RANGE(BARPOS,下突位置1,XQS) AND HH>XQ1,XQS-下突位置1)=1;
! r1 t5 S# a/ g7 ]; ZBXQ:=FILTER(BXQ,XQS-下突位置1);
SQ1:=HH[上突位置1-1];
- Q4 X  I7 }" {SQD:=DD[上突位置1];
: _" E0 u5 T8 e. V, V上缺日:IF(XQD<SQD,SQD+19000000,0),LINETHICK0,COLOR00EEFF;
下缺日: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);
DRAWTEXT(BSQ,(o+c)/2,' \n 补'+STRRIGHT(NUMTOSTR(SQD,0),6)+'\n 上突缺口\n '+numtostr(SQ1,2)),COLORFF99FF;
7 ~# y' z! Z( o' H. ~2 y8 k( ZDRAWTEXT(BSQ,SQ1,'←'),ALIGN0,COLOR00EEEE;
. K" e  V7 S* p. ]1 L6 U2 l1 qDRAWTEXT(BXQ,(o+c)/2,' \n 补'+STRRIGHT(NUMTOSTR(XQD,0),6)+'\n 下突缺口\n '+numtostr(XQ1,2)),COLOREEEE66;
DRAWTEXT(BXQ,XQ1,'←'),ALIGN0,COLOR00EEEE;
//

8991000

缺口和角度线相关联很深

貔貅72

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

shongshu

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