I unfortunately don't have time to check the link Brian provided, but we have this setup at WREX. Basically, I determined what we would use to denote a game as being "final," and we settled on "F." This is important to do, because in the script I'm about to provide, if something is listed as being in the "fourth" instead of the "4th," it can cause it to misbehave.
So if "F" is entered, the game is over. Here's the script:
dim Toptext as xpTextObject
dim Bottomtext as xpTextObject
dim Topinteger as Integer
dim Bottominteger as Integer
dim status as xpTextObject
dim Topwinner as xpBaseObject
dim Bottomwinner as xpBaseObject
Self.GetObjectByName("Top Score", Toptext)
Self.GetObjectByName(Bottom Score", Bottomtext)
Topinteger=Cint(Toptext.Text)
Bototminteger=Cint(Bototmtext.Text)
Self.GetObjectByName("Game Status", status)
Self.GetObjectByName("Top Winner Quad", Topwinner)
Self.GetObjectByName("Bottom Winner Quad", Bottomwinner)
if InStr(status.Text, "F") = 1 and Topinteger > Bottominteger then
Topwinner.Visible = True
Bottomwinner.Visible = False
elseif InStr(status.Text, "F") = 1 and Bottominteger > Topinteger then
Bottomwinner.Visible = True
Topwinner.Visible = False
else
Topwinner.Visible = False
Bottomwinner.Visible = False
end if
That was done rough and off the top of my head, so take it with a grain of salt, but the idea is in there.
#XPression