'Tracer Program. Search Matrix.Tracer = "<RED PILL>" & Trim(Ucase(UserSentence)) & "<BLUE PILL>"Question = Array("?", "QUESTION", "")ProNoun = Array("<RED PILL>WHO<BLUE PILL>", "<RED PILL>WHAT<BLUE PILL>", "<RED PILL>WHEN<BLUE PILL>", "<RED PILL>WHERE<BLUE PILL>", "<RED PILL>WHY<BLUE PILL>", "<RED PILL>HOW<BLUE PILL>", "" & _ "<RED PILL>WHO ", "<RED PILL>WHAT ", "<RED PILL>WHEN ", "<RED PILL>WHERE ", "<RED PILL>WHY ", "<RED PILL>HOW ", "" & _ " WHO ", " WHAT ", " WHEN ", " WHERE ", " WHY ", " HOW ", "" & _ " WHO<BLUE PILL>", " WHAT<BLUE PILL>", " WHEN<BLUE PILL>", " WHERE<BLUE PILL>", " WHY<BLUE PILL>", " HOW<BLUE PILL>", "") 'for true statements.OperatorA = Array(" IS ", " ARE ", " CAN ", " WILL ", " SHOULD ", " WOULD ", " COULD ", "")'Operator Questions.OperatorQ = Array("<RED PILL>IS ", "<RED PILL>ARE ", "<RED PILL>CAN ", "<RED PILL>WILL ", "<RED PILL>SHOULD ", "<RED PILL>WOULD ", "<RED PILL>COULD ", "" & _ " IS<BLUE PILL>", " ARE<BLUE PILL>", " CAN<BLUE PILL>", " WILL<BLUE PILL>", " SHOULD<BLUE PILL>", " WOULD<BLUE PILL>", " COULD<BLUE PILL>", "")No = Array("<RED PILL>NO<BLUE PILL>", "<RED PILL>NO ", " NO ", " NO<BLUE PILL>", "")Yes = Array("<RED PILL>YES<BLUE PILL>", "<RED PILL>YES ", " YES ", " YES<BLUE PILL>", "")'Continued, Reloaded.