A simple MUD (Continued) in ::SHE+ILA:: [$56]

More about A simple MUD (Continued) in ::SHE+ILA:: [$56]

Command <:: &{ (input, verb, noun);
Sayget (IP, ("What now ", name, "? >"), &input);
(input, &verb, &noun) <:> table; // Unify input against table; };
table <:: (get=&Get, drop=&Drop, look=&Look, inventory=&Inventory, score=&Score, quit=&Quit);};
Get <:: &{Locate (noun, here.location); Move (noun, my.location);}
Drop <:: &{Locate(noun, my.location), Move (noun, here.location);}
Look <:: &{ttyout(IP, here.description, CRLF, here.contents.description; CRLF);};
Inventory <:: &{ ttyout(IP, "You are carrying: ", CRLF, my.contents.name);};
Score <:: &{ ttyout(IP, my.value, my.stamina, CRLF); };
Quit <:: &{ttyout(IP, "^D");}; // Remember all segments are automatically checkpointed -- no need to save :);
}; // Maybe more soon??? ;