IF
Global("FHAveryLetter","GLOBAL",1)
See("Nath")
InParty("Nath")
!StateCheck("Nath",CD_STATE_NOTVALID)
THEN
RESPONSE #100
SetGlobal("FHAveryLetter","GLOBAL",2)
MoveToObject("Nath")
StartDialogueNoSet(Player1)
END

IF
Global("FHAveryLetter","GLOBAL",1)
!See("Nath")
InParty("Nath")
THEN
RESPONSE #100
MoveToObject("Nath")
END

IF
!InParty("Nath")
THEN
RESPONSE #100
EscapeArea()
END
