Simple question

[n0dy]

Hi Guys.

Can anyone answer me if "Or" function works in AutoIt? Because i have some code to use with "Or" function. As it is below in code.When i use my script without using or and only for 1 option, it works. But when adding below code using "Or" function, it doesnt work.

Dim $var
While 1
If ControlGetText ( "SOK Chatpoint++", "", "ThunderRT6TextBox5") = "Room" or ":d" or "no" Then
    ControlSetText("SOK Chatpoint++", "", "ThunderRT6TextBox6", "/mmm" )
    sleep (10)
    ControlClick("SOK Chatpoint++", "", 12)
    Exit
EndIf
WEnd

Help please. Maybe i am wrong.

Regards,

n0dy

[picea892]

You need to spell it all out again.

Dim $var
While 1
If ControlGetText ( "SOK Chatpoint++", "", "ThunderRT6TextBox5") = "Room" or ControlGetText ( "SOK Chatpoint++", "", "ThunderRT6TextBox5") = ":d" or ControlGetText ( "SOK Chatpoint++", "", "ThunderRT6TextBox5") = "no" Then
    ControlSetText("SOK Chatpoint++", "", "ThunderRT6TextBox6", "/mmm" )
    sleep (10)
    ControlClick("SOK Chatpoint++", "", 12)
    Exit
EndIf
WEnd

[Melba23]

n0dy,

Maybe i am wrong

Yup!

$sText = ControlGetText ( "SOK Chatpoint++", "", "ThunderRT6TextBox5") ; We get the value here to save space on the line below
If $stext = "Room" Or $stext = ":d" Or $stext = "no" Then ; Otherwise we have to use the whole ControlGetText 3 times here!
    ControlSetText("SOK Chatpoint++", "", "ThunderRT6TextBox6", "/mmm" )
    sleep (10)
    ControlClick("SOK Chatpoint++", "", 12)
    Exit
Endif

But you could use a Switch structure to simplify matters:

Switch ControlGetText ( "SOK Chatpoint++", "", "ThunderRT6TextBox5")
    Case "Room", ":d", "no"
        ControlSetText("SOK Chatpoint++", "", "ThunderRT6TextBox6", "/mmm" )
        sleep (10)
        ControlClick("SOK Chatpoint++", "", 12)
        Exit
EndSwitch

M23

[PsaltyDS]

You can use Switch/Case that way:

Switch ControlGetText("SOK Chatpoint++", "", "ThunderRT6TextBox5")
        Case "Room", ":d", "no"
            ; Do stuff on match
        Case Else
            ; Do stuff on no match
    EndSwitch

[n0dy]

Ok thanks alot for help Buddy.

Please help me some more.

If i set text condition as "Round #2: Peoples !d DRAW your card. 20seconds."

When it is retrieved from control, its not doing the next things. Why? Because this is the conditional text i want to set, so in script how should i fix it as conditional set text.

This is the code.

Dim $var
While 1
If ControlGetText ( "SOK Chatpoint++", "", "ThunderRT6TextBox5") = "Round #2: Peoples !d DRAW your card. 20seconds." Then
    ControlSetText("SOK Chatpoint++", "", "ThunderRT6TextBox6", "/mmm" )
    sleep (10)
    ControlClick("SOK Chatpoint++", "", 12)
    Exit
EndIf
WEnd

I think maybe i have to add something else also with that text in script so that it will work?Please help.

Edited January 24, 2010 by n0dy

[n0dy]

Maybe the set text i want have spaces and special characters like # and ! and it is long text?Is that the problem?

[n0dy]

Anyone can help please? Why cant i set text with spaces and characters like ! and #

[n0dy]

Why its not working guys?

[n0dy]

here is my code

While 1
Switch ControlGetText ( "SOK Chatpoint++", "", "ThunderRT6TextBox5")
    Case "ROUND #1: Players, !d to DRAW. 20 seconds.", "ROUND #2: Players, !d to DRAW. 20 seconds.", "ROUND #3: Players, !d to DRAW. 20 seconds."
        ControlSetText("SOK Chatpoint++", "", "ThunderRT6TextBox6", "oh no :d" )
        sleep (10)
        ControlClick("SOK Chatpoint++", "", 12)
        Exit
EndSwitch
        WEnd

[somdcomputerguy]

Maybe the set text i want have spaces and special characters like # and ! and it is long text?Is that the problem?

I don't know for sure, I'm shooting in the dark here, but try changing ExpandVarStrings from default (0) to 1

Function AutoItSetOption

[n0dy]

Where should i add Opt("ExpandEnvStrings",1) in my code? PLEASE HELP Code is already given Above.

[n0dy]

Anyone There to Help and share any solution to fix this?

[Melba23]

n0dy,

Please only bump your own topic once every 24 hrs - not every 24 mins!

M23

[somdcomputerguy]

Where should i add Opt("ExpandEnvStrings",1) in my code? PLEASE HELP Code is already given Above.

In the code you have displayed, I would put it before the While 1.