Printing pronouns - KVonGit/zil-stuff GitHub Wiki

<ROUTINE GET-PRONOUN (OBJ)
  <COND
    (<FSET? .OBJ ,PLURALBIT> 
      <RETURN "them">)
    (<FSET? .OBJ ,FEMALEBIT>
      <RETURN "her">)
    (<FSET? .OBJ ,PERSONBIT>
      <RETURN "him">)
    (T
      <RETURN "it">)>>

<ROUTINE PRINT-PRONOUN (OBJ)
  <TELL <GET-PRONOUN ,OBJ>>>

---

If there is a way to do this in Zilf, I haven't found it, but I will update this info if I do find it.