Sokoban game for HP Prime

[patrice]

I have 1 more change to allow Esc to abort the game.

Code:

          IF TYPE(Ky) == 0 THEN
            IF Ky == 2 THEN DY:=-1; DX:=0; END;
            IF Ky == 7 THEN DY:=0; DX:=-1; END;
            IF Ky == 8 THEN DY:=0; DX:=1; END;
            IF Ky ==12 THEN DY:=1; DX:=0; END;
            IF Ky ==4 THEN abortgame(); END;
          END;