Added wrapper for g->choose_adjacent.

Very useful for iuse function.

To test this, type the following in the lua command prompt:
```lua
game.choose_adjacent(player.posx, player.posy)
```