Rank: Member
Groups: Registered
Joined: 3/13/2020(UTC) Posts: 25 Location: Stockholm Thanks: 2 times
|
Originally Posted by: doggy Originally Posted by: Salleman
NOPE! I'm to stupid to fix this, I give up!
What ever I try just get error so I need to find someone thats working on commission to help me.
Allready giving up with al the info available (forum, Google search etc) to learn? ;-) Code:dim teststring as string =""
teststring = Input.Find("Green.gtzip").Text("Headline.Text")
If teststring .Contains(":") Then
Input.Find("Green.gtzip").Text("Description.Text")= "Clock"
Else If teststring .Contains("-") and teststring .Contains("(") Then
Input.Find("Green.gtzip").Text("Description.Text")= "Start"
Else If teststring .Contains("-") Then
Input.Find("Green.gtzip").Text("Description.Text")= "Final"
Else
Input.Find("Green.gtzip").Text("Description.Text")= "Nothing"
End If
WHY could I not see that??? So simple when you put it like that! Many thanks and now it works perfectly: Code:
dim oldresult001 as string = ""
dim Serie1G1Result as string = ""
do while true
Serie1G1Result = Input.Find("SERIE1").Text("G1Result.Text")
If Serie1G1Result .Contains(":") Then
API.Function("SetTextVisibleOn", Input:="GoalService", Value:="Background", SelectedName:="Nedsläpp.Text")
API.Function("SetTextVisibleOff", Input:="GoalService", Value:="Background", SelectedName:="Mål.Text")
API.Function("SetTextVisibleOff", Input:="GoalService", Value:="Background", SelectedName:="Slutresultat.Text")
Else If Serie1G1Result .Contains("-") and Serie1G1Result .Contains("(") Then
API.Function("SetTextVisibleOn", Input:="GoalService", Value:="Background", SelectedName:="Mål.Text")
API.Function("SetTextVisibleOff", Input:="GoalService", Value:="Background", SelectedName:="Nedsläpp.Text")
API.Function("SetTextVisibleOff", Input:="GoalService", Value:="Background", SelectedName:="Slutresultat.Text")
Else If Serie1G1Result .Contains("-") Then
API.Function("SetTextVisibleOn", Input:="GoalService", Value:="Background", SelectedName:="Slutresultat.Text")
API.Function("SetTextVisibleOff", Input:="GoalService", Value:="Background", SelectedName:="Nedsläpp.Text")
API.Function("SetTextVisibleOff", Input:="GoalService", Value:="Background", SelectedName:="Mål.Text")
Else
API.Function("SetTextVisibleOff", Input:="GoalService", Value:="Background", SelectedName:="Nedsläpp.Text")
API.Function("SetTextVisibleOff", Input:="GoalService", Value:="Background", SelectedName:="Mål.Text")
API.Function("SetTextVisibleOff", Input:="GoalService", Value:="Background", SelectedName:="Slutresultat.Text")
end if
if not (Serie1G1Result = oldresult001)
API.Function("SetImageVisibleOn", Input:="SERIE1-GoalService", Value:="Serie1Game1", SelectedName:="G1HomeLogo.Source")
API.Function("SetImageVisibleOn", Input:="SERIE1-GoalService", Value:="Serie1Game1", SelectedName:="G1AwayLogo.Source")
API.Function("SetTextVisibleOn", Input:="SERIE1-GoalService", Value:="Serie1Game1", SelectedName:="G1Result.Text")
API.Function("Play", Input:="Goal-Pling")
sleep(300)
API.Function("OverlayInput4In", Input:="GoalServiceTitle")
sleep(5000)
API.Function("OverlayInput4Out", Input:="GoalServiceTitle")
sleep(500)
API.Function("SetImageVisibleOff", Input:="SERIE1-GoalService", Value:="Serie1Game1", SelectedName:="G1HomeLogo.Source")
API.Function("SetImageVisibleOff", Input:="SERIE1-GoalService", Value:="Serie1Game1", SelectedName:="G1AwayLogo.Source")
API.Function("SetTextVisibleOff", Input:="SERIE1-GoalService", Value:="Serie1Game1", SelectedName:="G1Result.Text")
oldresult001 = Serie1G1Result
end if
loop
|