XProfan

Español

Descripción:

GetSystemPowerStatus liefert Informationen en Stromquellen des Rechners zurück. Diese Función no existe bajo WindowsNT.

Deklaration:

DEF @GetSystemPowerStatus(1) !kernel32,GetSystemPowerStatus

Parámetro:

1.Parámetro: SYSTEM_POWER_STATUS Struktur oder 12 Bytes große Bereichsvariable, el Informationen en Stromquellen aufnimmt. =>
Byte 0 = Flag el angibt, si el Rechner a una Steckdose angeschlossen es:
-0 = Nein
-1 = Sí
-255 = Ist unbekannt.
Byte 1 = Kombinationsflag, el el Ladestatus el Batterien zurückgibt:
-1 = Ladung hoch.
-2 = Ladung gering.
-4 = Ladung kritisch.
-8 = Batterie se geladen.
-128 = Keine Systembatterie disponible.
-255 = Unbekannter Ladestatus
Byte 2 = Prozentuale Ladung des Akkus:
-0 a 100 = Ladung en Prozent.
-255 = Ladung unbekannt.
Byte 3 = Reserviert, muss 0 ser.
Byte 4-7 = Ein LongIntwert el angibt, como viele Sekunden el Batterie todavía hält. Wenn hier $FFFFFFFF es, Es el Tiempo unbekannt.
Byte 8-11 = El Tiempo en Sekunden, el el Akku hält, si él voll aufgeladen es oder $FFFFFFFF, si la Tiempo unbekannt es.

Rückgabewert:

1 en erfolgreichem Auslesen, 0 en Fehler.

Beispiele:

Kompilieren Marca Separación

DEF @GetSystemPowerStatus(1) !"kernel32","GetSystemPowerStatus"
Declarar SystemPowerStaus#
Windowstyle 31
Windowtitle "Angeschlossene Hauptstromquelle"
Ventana 0,0-640,440

Mientras que 0=0

    sleep 10
    DIM SystemPowerStaus#,12
    @GetSystemPowerStatus(SystemPowerStaus#)

    IF @BYTE(SystemPowerStaus#,1)=0

        Drawtext 0,0,"Batterie                            "
        Startpaint %HDC
        drawtext 0,0,"Batterie                           "
        endpaint
        Startpaint %HDC2
        drawtext 0,0,"Batterie                            "
        endpaint

    elseIF @BYTE(SystemPowerStaus#,0)=1

        Drawtext 0,0,"Steckdose                            "
        Startpaint %HDC
        drawtext 0,0,"Steckdose                           "
        endpaint
        Startpaint %HDC2
        drawtext 0,0,"Steckdose                           "
        endpaint

    más

        Drawtext 0,0,"Stromquelle unbekannt"
        Startpaint %HDC
        drawtext 0,0,"Stromquelle unbekannt"
        endpaint
        Startpaint %HDC2
        drawtext 0,0,"Stromquelle unbekannt"
        endpaint

    endif

    Disponer SystemPowerStaus#

Wend