hitsoncd Posted December 11, 2021 Share Posted December 11, 2021 Problem with removing part of text entered in input box and showing the rest of it in a message box. I am building a chatterbot, and I am trying to make it, to where, when I say, say i love you, it says I love you, or whatever I tell it to say, it says it. instead of saying say i love you, it says i love you. Here is the code that I put, that doesn't work. I am not super good at writing software on here, but I don't want to be spoon fed the code either, just pointed in the right direction. elseif StringInStr ($text, "say") then $RANDOM = Random(1,5,1) if $random = 1 then $text1 = "" $cool1 = $text1 shellexecute("Carrie.mp4") Sleep(Random(2270, 2271, 1)) BlockInput("say") MsgBox(4096, "Carrie:", ($cool1)) ;xxxxxxxxx call("main2") endif if $random = 2 then $text1 = "" $cool1 = $text1 shellexecute("Carrie.mp4") Sleep(Random(2270, 2271, 1)) BlockInput("say") MsgBox(4096, "Carrie:", ($cool1)) ;xxxxxxxxx call("main2") endif if $random = 3 then $text1 = "" $cool1 = $text1 shellexecute("Carrie.mp4") Sleep(Random(2270, 2271, 1)) BlockInput("say") MsgBox(4096, "Carrie:", ($cool1)) ;xxxxxxxxx call("main2") endif if $random = 4 then $text1 = "" $cool1 = $text1 shellexecute("Carrie.mp4") Sleep(Random(2270, 2271, 1)) BlockInput("say") MsgBox(4096, "Carrie:", ($cool1)) ;xxxxxxxxx call("main2") endif if $random = 5 then $text1 = "" $cool1 = $text1 shellexecute("Carrie.mp4") Sleep(Random(2270, 2271, 1)) BlockInput("say") MsgBox(4096, "Carrie:", ($cool1)) ;xxxxxxxxx call("main2") endif If you need to see more of the code let me know. Thanks. Link to comment Share on other sites More sharing options...
Luke94 Posted December 11, 2021 Share Posted December 11, 2021 Assigning an InputBox to a variable will store the string that was entered. Local $sText = InputBox('title', 'prompt') ConsoleWrite('You entered: ' & $sText) With the strong stored, you can check the variable to see what was entered. Then using an If statement, you can decide the output. If $sText = 'I love you' Then MsgBox(64, 'title', 'I love you too!') EndIf You could use Switch...Case...EndSwitch to neaten up your code. Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now