YAY !!!
GOT IT ...
It's actually quite silly that it doesn't work the way we tried originally, but I ended up finding a solution ...
Don't ask why it is the way it is ... it just is ... lol
I've done it so that you can just copy and paste the scripts into the objects ...
Here you go ...
------------------------------
VOLUME UP CONTROL------------------------------
Dim sysvol
sysvol = System.Volume
Sub Object_OnMouseEnter
sysvol = System.Volume
Object.SetTimer 1, 1
End Sub
Sub Object_OnMouseLeave
Object.KillTimer 1
End Sub
Sub Object_OnTimer1
If sysvol < 100 Then
sysvol = sysvol + 1
System.Volume = sysvol
Else
Object.KillTimer 1
End If
End Sub
Sub Object_OnScriptExit
Object.KillTimer 1
End Sub
------------------------------
VOLUME DOWN CONTROL------------------------------
Sub Object_OnMouseEnter
Object.SetTimer 1, 1
End Sub
Sub Object_OnMouseLeave
Object.KillTimer 1
End Sub
Sub Object_OnTimer1
If System.Volume > 0 Then
System.Volume = System.Volume - 1
Else
Object.KillTimer 1
End If
End Sub
Sub Object_OnScriptExit
Object.KillTimer 1
End Sub
------------------------------
I hope it works on your side too !! ... and it's really a pleasure !!
Let me know if it works ...
Thanks,
HaemOGObliN