IF
InParty("xan")
AreaCheck("AR8800")
Global("P#Rain","GLOBAL",3)
THEN
RESPONSE #100
SetGlobal("P#Rain","GLOBAL",4)
SetGlobalTimer("X#XanNoticeRain","GLOBAL",10)
WEATHER(RAIN)
END

IF
InParty("xan")
AreaCheck("AR8800")
GlobalTimerExpired("X#XanNoticeRain","GLOBAL")
Global("P#Rain","GLOBAL",4)
THEN
RESPONSE #100
SetGlobal("P#Rain","GLOBAL",5)
StartDialogueNoSet(Player1)
END
