Android Question How to turn accelerometer in live wallpaper on/off?

Sub Process_Globals
Dim ps As PhoneSensors
end sub

Sub Service_Create
If accel=True Then'accel=True enables accelerometer, false disables
ps.Initialize(ps.TYPE_ACCELEROMETER)
ps.StartListening("Sensor")
Else
ps.StopListening'I added this after, hoping it will help, but it didn't
End If
end sub

Sub servise_destroy
ps.StopListening
End Sub 

Sub Sensor_SensorChanged (Values() As Float)
    accx=Values(0)'global variables
    accy=Values(1)
end sub

Sub Process_Globals
Dim Accelerometer As PhoneAccelerometer
end sub

Sub Service_Create
If accel=True Then'accel=True enables accelerometer, false disables
Accelerometer.StartListening("Accelerometer")
End If
end sub

Sub servise_destroy
Accelerometer.StopListening
end sub

Sub Accelerometer_AccelerometerChanged (Xx As Float, Yy As Float, Zz As Float)
   accx=Xx
   accy=Yy
end if