@32assassin i got it! well roth figured it out :) see below change
Sub DisplayTimer_Timer
Dim ChgLED,ii,num,chg,stat, obj, chg2, stat2
ChgLed = Controller.ChangedLEDs(&HFFFFFFFF, &HFFFFFFFF)
If Not IsEmpty(ChgLED) Then
‘ If not b2son Then For ii = 0 To UBound(chgLED)
num = chgLED(ii, 0) : chg = chgLED(ii, 1) : chg2 = chg: stat = chgLED(ii, 2):stat2 = stat
if (num < 80 ) then
For Each obj In Digits(num)
If chg And 1 Then obj.State = stat And 1
chg = chg\2 : stat = stat\2
Next
For Each obj In Digits2(num)
If chg2 And 1 Then obj.State = stat2 And 1
chg2 = chg2\2 : stat2 = stat2\2
Next
else
end if
next
‘ end if
end if
End Sub
********************************************************
Messing with the VPinball app and push notifications.
So if you haven't downloaded app yet what are you waiting for!?
for IOS and Android
********************************************************
********************************************************
Messing with the VPinball app and push notifications.
So if you haven't downloaded app yet what are you waiting for!?
for IOS and Android
********************************************************
You need to login in order to like this post: click here
