Sub Globals
Dim P as Phone
End Sub
Sub Activity_Create(FirstTime As Boolean)
P.Initialize("P")
End Sub
Sub P_BatteryChanged (Level As Int, Scale As Int, Plugged As Boolean, Intent As Intent)
Log("BatteryChanged: Level = " & level & ", Scale = " & scale & ", Plugged = " & Plugged)
End Sub