Public Sub CheckAction As Boolean
If Relationship.IsUpset(GirlFriend.Mood) = True then
   Try
      Conversation.Backoff()
   Catch ex As Exception
      Conversation.Mouth.Zip()
   End Try
Else
   On Error Goto Flee
   Conversation.Debate.Continue()
End If
Return True 
Exit Sub 
Flee:
Conversation.Current.Abort()
Conversation.Debate.Abort(oprKillAllProcess)
GirlFriend.Compromise(byAnyMeans)
Return False
End Sub




 
			
 

 
 
 
 






 
Good Program . :P How about program to check status of BoyFriend ?
How would I know .. I have only one girlfriend and I dun have any boyfriend in my whole life ... lol