A simple MUD game in ::SHE+ILA:: [$55]

More about A simple MUD game in ::SHE+ILA:: [$55]

Room <:: (name, description, contents, N=0, S=0, E=0, W=0, NE=0, SE=0, SW=0, NW=0, UP=0, DOWN=0, IN=0, OUT=0, HELP=0);
Object <:: (name, description, location=0, inventory, value=10, weight=100, stamina=10);
PortFactory <::- Object; PortFactory [0,1] << (2, 1) $\ ("Command"; &{Command}); // Transpose, so as to insert in symbol table also;
PortFactory [0,1] << (2,1) $\ ("IP", "0.0.0.0");
Port1 <::- Port2 <::- Port3 <::- Port4 <::- PortFactory;
Port1.IP <:: "192.168.137.1"; Port2.IP <:: "192.168.137.2";
Port3.IP <:: "192.168.137.3"; Port4.IP <:: "192.168.137.4";
Start <::- Room; Start.W <:: &Game;
Start.description <:: "Welcome to a simple MUD (Multi-User Dungeon) game";
Start.contents << Port1 <<Port2 << Port3 << Port4;
{! Port1.Command; Port2.Command; Port3.Command; Port4.Command !}; // To be continued ??? ;