郎少 发表于 2011-1-6 09:31

<DIV class=t_msgfont id=firstpostcontent name="firstpostcontent">
<DIV class=t_msgfont id=postmessage_81772740>源码：<BR>{向下跳空缺口}<BR>I1:=0;<BR>flag1:=0;<BR>while I1&lt;BARSLAST(DISPSTATUS=1)-BARSLAST(DISPSTATUS=2)<BR>DO&nbsp;&nbsp;<BR>&nbsp; &nbsp;&nbsp; &nbsp;&nbsp;&nbsp;IF REF(H,I1)&lt;REF(L,I1+1) AND REF(L,I1+1)&gt;HHV(H,I1+1)<BR>&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp;&nbsp;THEN&nbsp; &nbsp;BEGIN&nbsp; &nbsp;&nbsp;&nbsp;FLAG1:=1;<BR>&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp; S1:=I1;<BR>&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp; I1:=BARSLAST(DISPSTATUS=1);&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;<BR>&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;END<BR>&nbsp; &nbsp;&nbsp; &nbsp;&nbsp;&nbsp;ELSE&nbsp;&nbsp;I1:=I1+1;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;<BR>&nbsp; &nbsp;STICKLINE(FLAG1,REF(L,S1+1),HHV(H,S1+1),(s1+1)*20,0),Colorfff00f,ALIGN1,LAYER7;<BR>&nbsp;&nbsp;DRAWTEXT(flag1,REF(L,s1+1),NUMTOSTRN(ref(h,s1+1),2)+'-'+NUMTOSTRN(hhV(h,S1+1),2)),ALIGN2,COLOR00ffff;<BR>{向上跳空缺口}<BR><BR>I:=0;<BR>flag:=0;<BR>while I&lt;BARSLAST(DISPSTATUS=1)-BARSLAST(DISPSTATUS=2)<BR>DO&nbsp;&nbsp;<BR>&nbsp; &nbsp;&nbsp; &nbsp;&nbsp;&nbsp;IF REF(L,I)&gt;REF(H,I+1) AND REF(H,I+1)&lt;LLV(LOW,I+1)<BR>&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp;&nbsp;THEN&nbsp; &nbsp;BEGIN&nbsp; &nbsp;&nbsp;&nbsp;FLAG:=1;<BR>&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp; S:=I;<BR>&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp; I:=BARSLAST(DISPSTATUS=1);&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;<BR>&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;END<BR>&nbsp; &nbsp;&nbsp; &nbsp;&nbsp;&nbsp;ELSE&nbsp;&nbsp;I:=I+1;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;&nbsp; &nbsp;<BR>&nbsp; &nbsp;STICKLINE(FLAG,REF(h,S+1),LLV(LOW,S+1),20*(s+1),500),Colorff000f,ALIGN1,LAYER7;<BR>DRAWTEXT(FLAG,REF(H,s+1),NUMTOSTRN(ref(h,s+1),2)+'-'+NUMTOSTRN(LLV(LOW,S+1),2)),ALIGN2,COLOR00ffff;</DIV></DIV>

牛熊不分 发表于 2011-1-6 11:16

顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶的顶顶顶顶顶

情有空谷 发表于 2011-1-6 11:43

怎么测试时没有定义呀?
页: [1]
查看完整版本: [大智慧] 跳空缺口源码