As promised here is the code I wrote at the Gold Coast User Group:
This code displays the score on the button, launches the timeline below that is the XAML which contains the definitions for the two buttons, the timeline and the triggers for the timelines and the bezier i used as the obstacles.
Imports
Namespace
Partial Public Class Scene1
Public Sub New()
MyBase.New()
End Sub
Dim x As Boolean
Dim y As Integer
Private Sub ButtonClick(ByVal sender As Object, ByVal e As RoutedEventArgs) Handles Button1.Click
If x Then
Button1.Background = Windows.Media.Brushes.Aquamarine
Else
Button1.Background = Windows.Media.Brushes.Red
End If
x = Not x
y = y + 1
Button2.Content = y.ToString
End Class
End Namespace
Below is the XAML
<
xmlns:d="http://schemas.microsoft.com/expression/interactivedesigner/2005"
c:Ignorable="d"
Background="#FFFFFFFF"
</