hi all,
thanks for the input, the reason why didn't use the word choice, or choose is because it's already in the if then statement, here's a complete list of the entire statement.
'RESPOND: USER EXPRESSES AN EITHER-OR, OR MULTIPLE CHOICE
If InStr(UserSentence, "WHICH ") <> 0 AND InStr(UserSentence, " FAVORITE") <> 0 AND InStr(UserSentence, " OR") <> 0 Then MustChoose = True
If InStr(UserSentence, "WHICH ") <> 0 AND InStr(UserSentence, " PREFER") <> 0 AND InStr(UserSentence, " OR") <> 0 Then MustChoose = True
If InStr(UserSentence, "WHICH ") <> 0 AND InStr(UserSentence, " BETTER") <> 0 AND InStr(UserSentence, " OR") <> 0 Then MustChoose = True
If InStr(UserSentence, "WHICH ") <> 0 AND InStr(UserSentence, " LIKE") <> 0 AND InStr(UserSentence, " OR") <> 0 Then MustChoose = True
If InStr(UserSentence, "WHAT ") <> 0 AND InStr(UserSentence, " FAVORITE") <> 0 AND InStr(UserSentence, " OR") <> 0 Then MustChoose = True
If InStr(UserSentence, "WHAT ") <> 0 AND InStr(UserSentence, " PREFER") <> 0 AND InStr(UserSentence, " OR") <> 0 Then MustChoose = True
If InStr(UserSentence, "WHAT ") <> 0 AND InStr(UserSentence, " BETTER") <> 0 AND InStr(UserSentence, " OR") <> 0 Then MustChoose = True
If InStr(UserSentence, "WHAT ") <> 0 AND InStr(UserSentence, " LIKE") <> 0 AND InStr(UserSentence, " OR") <> 0 Then MustChoose = True
If InStr(UserSentence, "SELECT ") <> 0 AND InStr(UserSentence, " A") <> 0 AND InStr(UserSentence, " OR") <> 0 Then MustChoose = True
If InStr(UserSentence, "PICK ") <> 0 AND InStr(UserSentence, " A") <> 0 AND InStr(UserSentence, " OR") <> 0 Then MustChoose = True
'If InStr(UserSentence, " OR ") > 0 Then MustChoose = True <----"this is the line I remarked out, and replaced with the lines above."
If InStr(UserSentence, " EITHER ") > 0 Then MustChoose = True
If InStr(UserSentence, " CHOOSE ") > 0 Then MustChoose = True
If InStr(UserSentence, " CHOICE ") > 0 Then MustChoose = True
If InStr(UserSentence, " ALTERNATIVE ") > 0 Then MustChoose = True
If InStr(UserSentence, " VERSUS ") > 0 Then MustChoose = True
If InStr(UserSentence, " VS ") > 0 Then MustChoose = True
If Len(UserSentence) < 10 Then MustChoose = False
If MustChoose = True And NoChoosing = False Then
GetResponse = HalBrain.ChooseSentenceFromFile("choice") & " " & GetResponse
If Rnd * 100 > 50 Then GetResponse = Replace(GetResponse, "<MaybeName>", "<UserName>", 1, -1, vbTextCompare)
GetResponse = Replace(GetResponse, "<MaybeName>", "", 1, -1, vbTextCompare)
End If
HalBrain.DebugWatch GetResponse, "Multiple Choice"
the only thing that I was trying to correct was the or factor, without interfering with the rest of the function of the entirety of the whole.
Again thank you very much for your input, and if by chance you just happened to run across a selection of words that are used with the word "or" that would trigger a selection.
Please don't hesitate, to give your suggestion, and I apologize for not putting down the entire script in the beginning so not to confuse anyone.
Sincerely,
C load.