IF
InParty(Myself)
Global("CoranMatch","GLOBAL",1)
Global("CoranFriend","GLOBAL",1)
Global("CFlirtTalk","GLOBAL",0)
THEN
RESPONSE #100
RealSetGlobalTimer("CFlirtTalkTime","GLOBAL",10)
SetGlobal("CFlirtTalk","GLOBAL",1)
END

IF
InParty(Myself)
CombatCounter(0)
Global("CFlirtTalk","GLOBAL",1)
RealGlobalTimerExpired("CFlirtTalkTime","GLOBAL")
!Global("CoranRomanceInactive","GLOBAL",1)
!Global("CoranDisableFlirts","GLOBAL",1)
Global("CoSunrise","GLOBAL",0)
AreaType(FOREST)
TimeOfDay(MORNING)
PartyRested()
THEN
RESPONSE #100
RealSetGlobalTimer("CFlirtyTalkTime","GLOBAL",10)
IncrementGlobal("CoSunrise","GLOBAL",1)
Dialogue(Player1)
END

IF 
InParty(Myself)
RealGlobalTimerExpired("CFlirtyTalkTime","GLOBAL")
Global("CoSunrise","GLOBAL",1)
THEN
RESPONSE #100
IncrementGlobal("CoSunrise","GLOBAL",1)
RealSetGlobalTimer("CFlirtTalkTime","GLOBAL",1800)
END

IF
InParty(Myself)
CombatCounter(0)
Global("CFlirtTalk","GLOBAL",1)
RealGlobalTimerExpired("CFlirtTalkTime","GLOBAL")
!Global("CoranRomanceInactive","GLOBAL",1)
!Global("CoranDisableFlirts","GLOBAL",1)
Global("CoRain","GLOBAL",0)
GlobalGT("CoranLover","GLOBAL",0)
!AreaType(DUNGEON)
OR(3)
 AreaType(OUTDOOR)
 AreaType(WEATHER)
 AreaType(FOREST)
THEN
RESPONSE #100
Weather(RAIN)
RealSetGlobalTimer("CoWeatherChange","GLOBAL",10)
IncrementGlobal("CoRain","GLOBAL",1)
END

IF
InParty(Myself)
CombatCounter(0)
Global("CFlirtTalk","GLOBAL",1)
RealGlobalTimerExpired("CoWeatherChange","GLOBAL")
!Global("CoranRomanceInactive","GLOBAL",1)
!Global("CoranDisableFlirts","GLOBAL",1)
Global("CoRain","GLOBAL",0)
GlobalGT("CoranLover","GLOBAL",0)
!AreaType(DUNGEON)
OR(3)
 AreaType(OUTDOOR)
 AreaType(WEATHER)
 AreaType(FOREST)
THEN
RESPONSE #100
RealSetGlobalTimer("CFlirtyTalkTime","GLOBAL",10)
IncrementGlobal("CoRain","GLOBAL",1)
Dialogue(Player1)
END

IF 
InParty(Myself)
RealGlobalTimerExpired("CFlirtyTalkTime","GLOBAL")
Global("CoRain","GLOBAL",2)
THEN
RESPONSE #100
IncrementGlobal("CoRain","GLOBAL",1)
RealSetGlobalTimer("CFlirtTalkTime","GLOBAL",1800)
END



