% ag_server2a.erl - (Silver) Adventure Game Server -module(ag_server2a). -author('Alan G. Labouseur'). %-------- % Public %-------- -export([gameLoop/0]). gameLoop() -> receive {FromPid, 0, L} -> io:format("~p is standing west of a house carrying ~w.~n", [FromPid, L]), gameLoop(); {FromPid, 1, L} -> io:format("~p has come to the base of a large tree carrying ~w.~n", [FromPid, L]), gameLoop(); {FromPid, Other, L} -> io:format("~p is lost in unknown locale: ~p. Perhaps one of these items will help:~w.~n", [FromPid, Other, L]), gameLoop() end.