Thanks. This variant gives me the possibility better understand Dynamic[] command.
Thanks. It works. I wasted much time but didn't find this straightforward solution.
I myself find Dynamic mysterious. After playing around a bit I found that this variant works as intended:
Dynamic
Dynamic[If[y0 + u*t <= x0 + v*t, "Collision", "Separated"]]
