主题：请教一个计时的程序

试了下效果还行。条件a，b  你重新定义下。为了方便肉眼观察，我把a,b全输出在K上了。

此主题相关图片如下：temp.png


variable:markA:=0，markB:=0;
condA:c>o+10;
condB:c<o-10;

if CONDA then DRAWTEXT(1,c,'A');
if CONDB then DRAWTEXT(1,c,'B');
len:0;//记录a  b  条件跨度的值，b触发前为0
if condA  and markA=0 and not(condB) then markA:=1;
x:=BARSLAST(markA=0)-1;//这里需要减1,并且barslast不能在if下因此放在外面
if condB and markA=1 then
begin
markA:=0;//触发条件后重置markA值。
len:=x;
end

if condA and condB and markA=0 then len=0;//这是一种特殊情况，a b 同时触发在一个K上。

 variable:markA:=0，markB:=0;
condA:c>o+10;
condB:c<o-10;

if CONDA then DRAWTEXT(1,c,'A');
if CONDB then DRAWTEXT(1,c,'B');
len:0;//记录a  b  条件跨度的值，b触发前为0
if condA  and markA=0 and not(condB) then markA:=1;
x:=BARSLAST(markA=0)-1;//这里需要减1,并且barslast不能在if下因此放在外面

if markA=1 then len:=x;

if condB and markA=1 then
begin
markA:=0;//触发条件后重置markA值。
//len:=x;
end

if condA and condB and markA=0 then len=0;//这是一种特殊情况，a b 同时触发在一个K上。


略做修改即可。主要是掌握这种处理方式。