有没有显示缺口的公式？

axcqy

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

samyongq

没有。
" V! j& G! ~5 S4 B不过我知道通达信里，可以设置一下，显示最新的缺口。

我赢8888

缺口公式多了去了

我赢8888

你看这个行吗

axcqy

原帖由 我赢8888 于 2009-11-1 19:40 发表
" {* K9 W! b* n# B/ L. x你看这个行吗

非常不错；公式可以上传吗？

CASDAQ

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

axcqy

原帖由 CASDAQ 于 2009-11-1 20:23 发表
) S  G3 y$ u9 j% T" G到公式区里收一下，多了去了

4 z! s$ M7 g! Y1 h1 I

axcqy

已解决；谢谢！

我赢8888

给你原码

8 O, I+ k! M) tif datacount<3 then exit;
dw:=IF(STKTYPE=0 or STKTYPE=13,c*1/500,MINDIFF);
& t# \) {- D% s: W+ K$ W& Q# a上突缺口:=l>REF(c,1)+dw,COLORRED,LINETHICK0;
下突缺口:=h<REF(c,1)-dw,COLORCYAN,LINETHICK0;
DRAWICON(上突缺口 and SYSPARAM(3)-SYSPARAM(2)<300,l,4);
9 g4 l7 z: o" g. TDRAWICON(下突缺口 and SYSPARAM(3)-SYSPARAM(2)<300,h,5);
7 O% `( _/ O; l5 @. tHH:=H;
  i9 A& s, E9 b8 bLL:=L;
pL:=LL[datacount]; pH:=0;
* ?7 D* z- `) M- U  p' t6 \+ J$ Stk:=if(上突缺口,1,if(下突缺口,-1,0));
6 V# w$ o+ n; ofor i=datacount-1 downto 2 do begin
4 N) T; N% h. G' V8 \  if LL<pL then pL:=LL;
) `' O# S  U/ N  if HH>pH then pH:=HH;
  if tk=1 and pL<=HH[i-1] then tk:=0;
  if tk=-1 and pH>=LL[i-1] then tk:=0;
end;
DRAWTEXT(tk=1,REF(c,1),'未补')COLORRED;
* D2 b" p  N3 X) l  q: A6 s: zDRAWTEXT(tk=-1,REF(c,1),'未补')COLORCYAN;
/ [- D* j! m' }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;
向下跳空未回补:count(tk=-1,0),linethick0

axcqy

原帖由 我赢8888 于 2009-11-1 20:44 发表
; v' B  t* Y9 a% ~1 @0 T" d给你原码
; }* v. M7 B8 _# E' b+ O6 f
if datacountREF(c,1)+dw,COLORRED,LINETHICK0;
1 X* b) o0 g& Q# ^下突缺口:=h

axcqy

原帖由 我赢8888 于 2009-11-1 20:44 发表
1 i! s3 H/ U. {+ ^1 O1 d! W3 Z给你原码

) c  ?; I" A: z% j% zif datacountREF(c,1)+dw,COLORRED,LINETHICK0;
下突缺口:=h

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

笨奔

缺口是很重要的,
# w6 i/ S4 X4 R) ]2 w黄为向上跳空缺口,兰向下跳空缺口
, J; g* Z% b3 }3 S0 x8 t4 w
$ R2 J; B# q0 B0 N' ~! D3 S[ 本帖最后由 笨奔 于 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
     fh[p]:=fh[p+1];
  if fl[p]>fl[p+1] then
1 F& P/ L5 N/ v% g     fl[p]:=fl[p+1];
end;
* K3 \" R; o7 n) \* e% q- Zqk:=l>ref(h,1)OR H<ref(L,1);
" W/ @; z* t3 p8 yG:=IF(l>ref(h,1),L,IF(H<ref(L,1),ref(L,1),0));
8 C3 |6 r4 ?. L7 [" v- `7 tD:=IF(l>ref(h,1),ref(H,1),IF(H<ref(L,1),H,0));
" L/ x0 p) b3 p1 q, @! G- AS:=IF(l>ref(h,1),2,IF(H<ref(L,1),1,0));
+ F8 `% H% V% E, f, q7 I6 T- s- Ptj:=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;
  N1 X. |. m0 k. L7 ]' MDD:=DATE;
最近缺口日: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));
2 ?! K' X) T9 a" T2 R7 z7 x3 DS2:=IF(ref(S,W-1)=2,ref(D,w-1),IF(ref(S,W-1)=1,ref(G,w-1),0));
A:=MAX(S1,S2);
B:=MIN(S1,S2);
8 w) E+ O5 o8 ]6 N缺口:B[datacount],COLORWHITE,LINETHICK,,PRECISION2;
→:A[datacount],COLORWHITE,LINETHICK,PRECISION2;
STICKLINE(w,S1,S2,15,0),COLORGRAY;
DRAWTEXT(BARSTATUS=2,A,NUMTOSTR(B,2)+'-'+NUMTOSTR(A,2)),COLOR0099CC,ALIGN2;{显示缺口数字  可删除}
* C( L: k- T  }8 y; @hh:=h;LL:=L;DD:=DATE;
gb:=SYSPARAM(1);
  u3 u5 v4 M" a  l: k2 b7 X上突缺口:=LOW>REF(HIGH,1),COLOR00EEFF,LINETHICK0;
+ j1 S5 |6 E, ?4 f下突缺口:=HIGH<REF(LOW,1),COLOREE9933,LINETHICK0;
XQS:=ubound(下突缺口),LINETHICK0;
s1:=SUMBARS(上突缺口,1);
- \' d: D# h  ^s2:=SUMBARS(上突缺口,2);
x1:=SUMBARS(下突缺口,1);
, }0 U" s$ C4 v2 |x2:=SUMBARS(下突缺口,2);
" h# t; R1 ^% Z' F- q上突位置1:=gb-s1[gb]+1,LINETHICK0;
下突位置1:=gb-x1[gb]+1,LINETHICK0;
( x$ r; A) E$ v$ ~1 ^4 rDRAWTEXT(下突缺口,h,'△'),COLOREE9933,PXUP15,ALIGN0;
2 H0 r- R6 E7 E3 s( k6 t7 uDRAWTEXT(下突缺口,ref(l,1),'▽'),COLOREE9933,ALIGN0;
DRAWTEXT(上突缺口,l,'▽'),COLOR00EEFF,ALIGN0;
+ d. U: K& A8 G3 }. ?0 yDRAWTEXT(上突缺口,ref(h,1),'△'),COLOR00EEFF,PXUP15,ALIGN0;
XQ1:=LL[下突位置1-1];
XQD:=DD[下突位置1];
7 y& n7 h% b8 m  N( EBXQ:=COUNT(RANGE(BARPOS,下突位置1,XQS) AND HH>XQ1,XQS-下突位置1)=1;
BXQ:=FILTER(BXQ,XQS-下突位置1);
5 J# ?/ x% u: M+ l4 E, v6 ESQ1:=HH[上突位置1-1];
SQD:=DD[上突位置1];
上缺日:IF(XQD<SQD,SQD+19000000,0),LINETHICK0,COLOR00EEFF;
下缺日:IF(SQD<XQD,XQD+19000000,0),LINETHICK0,COLOREE9933;
: E( I7 O3 Q5 ~7 O- o8 F. |1 h, f' |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;
DRAWTEXT(BSQ,SQ1,'←'),ALIGN0,COLOR00EEEE;
$ u: e+ F( ?9 A/ d5 rDRAWTEXT(BXQ,(o+c)/2,' \n 补'+STRRIGHT(NUMTOSTR(XQD,0),6)+'\n 下突缺口\n '+numtostr(XQ1,2)),COLOREEEE66;
; \  m, }2 z( ~, M8 CDRAWTEXT(BXQ,XQ1,'←'),ALIGN0,COLOR00EEEE;
! J2 P9 y0 |. z1 J0 |5 u//

8991000

缺口和角度线相关联很深

貔貅72

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

shongshu

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