Versuch es mal so:

<>FORK Optn: Hero - Up Face Direct
<>Move Event...: this Event, Up
<>
:END Case

<>FORK Optn: Hero - Right Face Direct
<>Move Event...: this Event, Right
<>
:END Case

<>FORK Optn: Hero - Left Face Direct
<>Move Event...: this Event, Left
<>
:END Case

<>FORK Optn: Hero - Down Face Direct
<>Move Event...: this Event, Down
<>
:END Case