SYSTEM_POWER_STATUS_EX est composé de

        ACLineStatus est un entier sur 1 octet

        batteryflag est un entier sur 1 octet

        batterylifepercent est un entier sur 1 octet

        reserved1 est un entier sur 1 octet

        batterylifetime est un entier

        batteryfulllifetime est un entier

        reserved2 est un entier sur 1 octet

        backupbatteryflag est un entier sur 1 octet

        backupbatterylifepourcent est un entier sur 1 octet

        reserved3 est un entier sur 1 octet

        backupbatterylifetime est un entier

        backupbatteryfulllifetime est un entier

        FIN

SI API("coredll.dll","GetSystemPowerStatusEx",&SYSTEM_POWER_STATUS_EX,True) ALORS

        RENVOYER SYSTEM_POWER_STATUS_EX.batterylifepercent

SINON

        RENVOYER -1

FIN