Var:Massimo,Minimo,contaMassimo,contaMinimo,minimoRel,massimoRel;
Input:Periodo(10);
massimoRel= HHV(H, Periodo);
minimoRel= LLV(L, Periodo);
IF isfirstbarbegin then
Massimo=H;
Minimo=L;
ENDIF;
IF Massimo>massimoREL THEN
Massimo=H;
contaMassimo=0;
else
contaMassimo=contaMassimo+1;
ENDIF;
IF Minimo<minimoRel THEN
Minimo=L;
contaMinimo=0;
else
contaMinimo=contaMinimo+1;
ENDIF;
IF contaMassimo<contaMinimo THEN
//fai quello che vuoi
ENDIF;