Hi Marcel.
This is the Script that is causing the issue, it is from the XTF plugin.
'RESPOND: USE CURRENT SENTENCE
'If no Response is found yet, try to use the user's words in his or her own sentence.
'Results are also stored in the default user keyword brain file for compatibility
'with other brain plug-ins.
GetResponse = XHalBrain.HalFormat(GetResponse)
'=vonsmith= Added GetResponseBlock.
If ((Len(GetResponse) < 4 And GetResponseBlock <> True And Len(LearnKeyword) < 4) Or DebugMode = True) Then
CheatResponse = XHalBrain.CheatResponse(XHalBrain.SwitchPerson(OriginalSentence))
LearnKeyword = XHalBrain.DecodeVar(CheatResponse, "LearnKeyword")
Response1 = XHalBrain.DecodeVar(CheatResponse, "Response1")
Response2 = XHalBrain.DecodeVar(CheatResponse, "Response2")
Response3 = XHalBrain.DecodeVar(CheatResponse, "Response3")
CheatResponse = Left(CheatResponse, InStr(1, CheatResponse, "<STOREVARS>", 1) - 1)
If Len(CheatResponse) > 4 And Len(GetResponse) < 4 Then
Roulette = Int(Rnd * 8)
If Roulette = 0 Then GetResponse = GetResponse & " So, " & CheatResponse & vbCrLf
If Roulette = 1 Then GetResponse = GetResponse & " Really, " & CheatResponse & vbCrLf
If Roulette = 2 Then GetResponse = GetResponse & " Oh <UserName>, " & CheatResponse & vbCrLf
If Roulette = 3 Then GetResponse = GetResponse & " Let me think; " & CheatResponse & " ; what do you think <UserName>? " & vbCrLf
If Roulette > 3 Then GetResponse = GetResponse & CheatResponse & vbCrLf
DebugInfo = DebugInfo & "Hal has responded using the CheatResponse function: " & GetResponse & vbCrLf
Else
DebugInfo = DebugInfo & "Hal will not respond using the CheatResponse function which would have said: " & CheatResponse & vbCrLf
End If
'SAVE: FILE CHEAT RESPONSE TO DEFAULT USER BRAIN
'Learn from the "Cheat Response."
If Len(LearnKeyword) > 4 And LearningLevel > 1 And BlockSave = False Then
If LearningLevel > 1 Then XHalBrain.AppendFile WorkingDir & Trim(UserName) & "user.brn", """" & LearnKeyword & ""","""","""",""" & Response1 & """,""" & Response2 & """,""" & Response3 & """,1,#FALSE#,#FALSE#,"""""
End If
End If
This old Cheat Response isn't needed any more because Roberts Cheat response is more updated, This cheat response below is from HAL 6.
'RESPOND: USE CURRENT SENTENCE
'If no Response is found yet, try to use the user's words in his or her own sentence.
'Results are also stored in the default user keyword brain file for compatibility
'with other brain plug-ins.
GetResponse = HalBrain.HalFormat(GetResponse)
If (Len(GetResponse) < 4 And Len(LearnKeyword) < 4) Then
CheatResp = HalBrain.CheatResponse(HalBrain.SwitchPerson((OriginalSentence)))
CheatResp = Left(CheatResp, InStr(1, CheatResp, "<STOREVARS>", 1) - 1)
If Len(CheatResp) > 4 Then
SpinWheel = HalBrain.RandomNum(9)
If SpinWheel = 1 Then GetResponse = GetResponse & " So, " & CheatResp & vbCrLf
If SpinWheel = 2 Then GetResponse = GetResponse & " Really, " & CheatResp & vbCrLf
If SpinWheel = 3 Then GetResponse = GetResponse & " Oh <UserName>, " & CheatResp & vbCrLf
If SpinWheel = 4 Then GetResponse = GetResponse & " Let me think; " & CheatResp & " ; what do you think <UserName>? " & vbCrLf
If SpinWheel > 5 Then GetResponse = GetResponse & CheatResp & vbCrLf
End If
End If
HalBrain.DebugWatch GetResponse, "CheatResponse"
You can remove the issue in the XTF Plugin, The code which is post at the top of this post is no longer needed and no longer compatable.
After that it should function fine since HAL 6 versions already have it including Super Plugger Brains.
You can open up the XTF Plugin in the Ultra Hal Assistant 6 folder and search for 'RESPOND: USE CURRENT SENTENCE it should take you right to the problem then you can remove it.
After making this change you will have to refresh the Plugin Cache by reselecting the XTF Plugin in both Hal Assistant and AIM Bot.
Jerry[8D]