Newbie creating object but stops spinning when I set properties to play sound

I am a newbie to this, I created a small image object which rotates and ZOOms on mouseover. I changed the properties to play a sound when mouse pressed, All works BUT!! The object stops rotateing when the the object is clicked.

script is as follows. What am I doin wrong ?

Dim ulrotate
Dim H

Dim W
'Called when the script is executed
Sub Object_OnScriptEnter

H = object.height
W = object.width
object.SetTimer 123,75

bOpen = False
End Sub

Sub Object_Ontimer123
ulrotate = ulrotate+5
object.Rotation = ulrotate
End Sub

'Called when the script is terminated
Sub Object_OnScriptExit

End Sub
Sub Object_OnMouseEnter()
object.height = object.height + 10
object.width = object.width + 10
object.height = object.height + 10
object.width = object.width + 10
object.height = object.height + 10
object.width = object.width + 10
object.height = object.height + 10
object.width = object.width + 10
End Sub

Sub Object_OnMouseLeave()

 object.height = object.height - 10
object.width = object.width - 10
object.height = object.height - 10
object.width = object.width - 10
object.height = object.height - 10
object.width = object.width - 10
object.height = object.height - 10
object.width = object.width - 10
ulrotate = 0
End Sub