M1:=H>REF(H,1) AND L>REF(L,1);

M2:=H>REF(H,2) AND L>REF(L,2) AND H>REF(H,1) AND L<REF(L,1);

M3:=H>REF(H,3) AND L>REF(L,3) AND H>REF(H,2) AND L<REF(L,2) AND H>REF(H,1) AND L<REF(L,1);

MARK:=M1 OR M2 OR M3;

SET:=L<VALUEWHEN(MARK,L) AND H<VALUEWHEN(MARK,H) AND HHV(H,BARSLAST(MARK))<VALUEWHEN(MARK,H);

SIG:=IF(MARK,1,IF(SET,0,NULL));

CROSS(SIG=0,0.5);

//2:

M1:=H<REF(H,1) AND L<REF(L,1);

M2:=H<REF(H,2) AND L<REF(L,2) AND H>REF(H,1) AND L<REF(L,1);

M3:=H<REF(H,3) AND L<REF(L,3) AND H>REF(H,2) AND L<REF(L,2) AND H>REF(H,1) AND L<REF(L,1);

MARK:=M1 OR M2 OR M3;

SET:=L>VALUEWHEN(MARK,L) AND H>VALUEWHEN(MARK,H) AND LLV(L,BARSLAST(MARK))>VALUEWHEN(MARK,L);

SIG:=IF(MARK,1,IF(SET,0,NULL));

CROSS(SIG=0,0.5);

?

?來源:程序化99