[Bargest]

press_cnt := Abs(press_cnt-1);

Ну можно и попроще:

Код:

press_cnt := 1 - press_cnt;