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