AnssiR66 / AlanStdLib

The Standard Library for ALAN Interactive Fiction Language
Other
5 stars 2 forks source link

Fix Bug in Wear Verb #62

Closed tajmone closed 5 years ago

tajmone commented 5 years ago

Fix Bug in Wear Verb

A bug in the wear verb was not setting items being taken AND worn as donned and in wearing set of Hero (only items simply worn were):

    ELSIF wear_flag OF hero = 1
      THEN
        LOCATE THIS IN worn.  --> OK
                              --> missing: MAKE THIS donned. !
                              --> missing: INCLUDE THIS IN wearing OF hero. !
        "You pick up" SAY THE THIS.

        IF THIS IS NOT plural
          THEN "and put it on."
          ELSE "and put them on."
        END IF.

    ELSE
      LOCATE THIS IN worn.              --> OK
      MAKE THIS donned.                 --> OK
      INCLUDE THIS IN wearing OF hero.  --> OK
      "You put on" SAY THE THIS. "."

Now fixed to:

      ELSE
        -- -----------------------------
        -- The clothing item can be worn
        -- -----------------------------
        MAKE THIS donned.
        LOCATE THIS IN worn.
        INCLUDE THIS IN wearing OF hero.
        IF wear_flag OF hero = 1
          THEN
            -- --------------------------
            -- The item is taken and worn
            -- --------------------------
            "You pick up" SAY THE THIS.
            IF THIS IS NOT plural
              THEN "and put it on."
              ELSE "and put them on."
            END IF.
          ELSE
            -- -----------------------
            -- The item is simply worn
            -- -----------------------
            "You put on" SAY THE THIS. "."
          END IF.
    END IF.