X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;ds=sidebyside;f=main.c;h=0eab6e8d19bacb4b49d0e89a655fed530f4633e9;hb=87c6d3fb1e583e4d2fa6fd9532287b34b3948d77;hp=caa328d28e49767757e046f916293aec792ab126;hpb=5c30d6429f4f5e3d187d52b6ac623d61968738a4;p=open-adventure.git

diff --git a/main.c b/main.c
index caa328d..0eab6e8 100644
--- a/main.c
+++ b/main.c
@@ -968,7 +968,7 @@ static void listobjects(void)
 static bool do_command()
 /* Get and execute a command */
 {
-    static struct command_t command;
+    static command_t command;
 
     /*  Can't leave cave once it's closing (except by main office). */
     if (OUTSID(game.newloc) && game.newloc != 0 && game.closng) {
@@ -1051,18 +1051,30 @@ Lclearobj:
             game.knfloc = 0;
 
 	/* Preserve state from last command for reuse when required */
-	struct command_t preserve;
-	memcpy(&preserve, &command, sizeof(struct command_t));
+	command_t preserve;
+	memcpy(&preserve, &command, sizeof(command_t));
 
 	// Get command input from user
         if (!get_command_input(&command))
             return false;
 
 #ifdef GDEBUG
-	printf("Preserve: type1 = %u, id1 = %ld, type2 = %u, id2 = %ld\n",
-	       preserve.word[0].type, preserve.word[0].id, preserve.word[1].type, preserve.word[1].id);
-	printf("Command: type1 = %u, id1 = %ld, type2 = %u, id2 = %ld\n",
-	       command.word[0].type, command.word[0].id, command.word[1].type, command.word[1].id);
+	/* Needs to stay synced with enum word_type_t */
+	const char *types[] = {"NO_WORD_TYPE", "MOTION", "OBJECT", "ACTION", "NUMERIC"};
+	/* needs to stay synced with enum speechpart */
+	const char *roles[] = {"unknown", "intransitive", "transitive"};
+	printf("Preserve: role = %s type1 = %s, id1 = %ld, type2 = %s, id2 = %ld\n",
+	       roles[preserve.part],
+	       types[preserve.word[0].type],
+	       preserve.word[0].id,
+	       types[preserve.word[1].type],
+	       preserve.word[1].id);
+	printf("Command: role = %s type1 = %s, id1 = %ld, type2 = %s, id2 = %ld\n",
+	       roles[command.part],
+	       types[command.word[0].type],
+	       command.word[0].id,
+	       types[command.word[1].type],
+	       command.word[1].id);
 #endif
 
 	/* Handle of objectless action followed by actionless object */
@@ -1109,18 +1121,30 @@ Lclearobj:
                     command.word[0].id = ENTRANCE;
                 }
             }
-            if (!((command.word[0].id != WATER && command.word[0].id != OIL) || (command.word[1].id != PLANT && command.word[1].id != DOOR))) {
+            if ((command.word[0].id == WATER || command.word[0].id == OIL) && (command.word[1].id == PLANT || command.word[1].id == DOOR)) {
                 if (AT(command.word[1].id)) {
-                    command.word[1].id = POUR;
-                    command.word[1].type = ACTION;
-                    strncpy(command.word[1].raw, "POUR", LINESIZE - 1);
+		    memcpy(&command.word[1], &command.word[0],
+			   sizeof(command_word_t));
+		    command.word[0].id = POUR;
+                    command.word[0].type = ACTION;
+                    strncpy(command.word[0].raw, "pour", LINESIZE - 1);
                 }
             }
             if (command.word[0].id == CAGE && command.word[1].id == BIRD && HERE(CAGE) && HERE(BIRD)) {
                 command.word[0].id = CARRY;
                 command.word[0].type = ACTION;
-                strncpy(command.word[1].raw, "CATCH", LINESIZE - 1);
             }
+
+	    /* From OV to VO form */
+	    if (command.word[0].type==OBJECT && command.word[1].type==ACTION) {
+		command_word_t stage;
+		memcpy(&stage, &command.word[0],
+			   sizeof(command_word_t));
+		memcpy(&command.word[0], &command.word[1],
+			   sizeof(command_word_t));
+		memcpy(&command.word[1], &stage,
+			   sizeof(command_word_t));
+	    }
         }
 
 Lookup:
@@ -1167,6 +1191,9 @@ Lookup:
         case GO_TOP:
             continue;	/* back to top of main interpreter loop */
         case GO_WORD2:
+#ifdef GDEBUG
+	    printf("Word shift\n");
+#endif /* GDEBUG */
             /* Get second word for analysis. */
   	    command.word[0] = command.word[1];
 	    command.word[1] = empty_command_word;