Italian Lettura inclinazione telefono e collegamento alla rete.

[Luciano Veneziano]

Buongiorno a tutti.
Vorrei implementare, per mio piacere, un'app che quando il telefono è sotto carica ed ha una certa inclinazione mi lasci lo schermo acceso. (mi serve perché a lavoro ho un piccolo supporto inclinato)
mi serve solo qualche link con degli esempi per leggere l'angolo e lo status della presa usb.

Grazie a tutti.

 

[sirjo66]

ho fatto una semplice ricerca con le parole "b4x status battery" ed ho trovato che:
nella libreria Phone esiste un evento chiamato BatteryChanged, dagli un'occhiata, il parametro Plugged ti dirà se è sotto carica

per l'altro problema cosa hai cercato/trovato ???

 

[Star-Dust]

Usa la libreria Phone per sapere se é sotto carica

Sub Process_Globals
    'These global variables will be declared once when the application starts.
    'These variables can be accessed from all modules.
    Dim Pe As PhoneEvents
End Sub

Sub Globals
    'These global variables will be redeclared each time the activity is created.
    'These variables can only be accessed from this module.

End Sub

Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    'Activity.LoadLayout("Layout1")
    Pe.Initialize("Pe")
End Sub

Sub PE_BatteryChanged (Level As Int, Scale As Int, Plugged As Boolean, Intent As Intent)
    If Plugged Then
        'on charge
    End If
End Sub

A suo tempo feci un App che controllava se c'era un BlackOut e avvisava son un SMS
Era per un mio amico che quando partiva in viaggio temeva che mancasse l'energia elettrica e l'ossigenatore dell'acquario si fermasse

 

[Star-Dust]

Per l'inclinazione... sempre Phone Library

Sub Process_Globals
    'These global variables will be declared once when the application starts.
    'These variables can be accessed from all modules.
    Dim P As PhoneAccelerometer
End Sub

Sub Globals
    'These global variables will be redeclared each time the activity is created.
    'These variables can only be accessed from this module.

End Sub

Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    'Activity.LoadLayout("Layout1")
    P.StartListening("P")
End Sub

Sub P_AccelerometerChanged (X As Float, Y As Float, Z As Float)
   
End Sub

Questo l'ho usato per un antifurto per un trattore.... appena sentiva il movimento inviava un sms..
Si sono rubati il trattore e il telefono
Non c'era linea

 

[Luciano Veneziano]

Grazie sirio66, Star-Dust (in ordine di apparizione).

 

[Luciano Veneziano]

Per l'altro ho trovato questo: https://www.b4x.com/android/forum/threads/orientation-and-accelerometer.6647/

devo vedere se è possibile adattare il codice.