RE: Get Battery Voltage

[Nick Hammond]

Mike,

>Does anyone know how to get the battery voltage and percent left? 
Following is what I used.

Regards, Nick

static Boolean GetPwrInfo()
{  // get power system info and write to form fields and display form
   char buffer[48];
   char *strpt = &buffer[0];
   UInt vbattery, vwarning, vcritical, maxticks;
   SysBatteryKind batkind;
   Byte batpercent;
   Boolean pluggedin;
   FormPtr form = FrmGetActiveForm();
   // get battery data
   vbattery = SysBatteryInfo(FALSE, &vwarning, &vcritical,
                  &maxticks, &batkind, &pluggedin, &batpercent);
   // battery type
   switch (batkind)
   {
      case sysBatteryKindAlkaline:
         StrCopy(strpt,"Alkaline");
         break;
      case sysBatteryKindNiCad:
         StrCopy(strpt,"NiCad");
         break;
      case sysBatteryKindLithium:
         StrCopy(strpt,"Lithium");
         break;
      default:
         StrCopy(strpt,"Unknown");
         break;
   }
   strpt = FieldSet(form, FLD_BAT_TYPE, strpt);
   // battery voltage
   MakeVoltStr(strpt, vbattery);
   strpt = FieldSet(form, FLD_BAT_VOLTAGE, strpt);
   // battery power remaining
   MakePercentStr(strpt, batpercent);
   strpt = FieldSet(form, FLD_BAT_PERCENT, strpt);
   // warning voltage
   MakeVoltStr(strpt, vwarning);
   strpt = FieldSet(form, FLD_BAT_VWARN, strpt);
   // critical voltage
   MakeVoltStr(strpt, vcritical);
   strpt = FieldSet(form, FLD_BAT_VCRIT, strpt);
   // external power
   StrCopy(strpt, (pluggedin) ? "Yes" : "No");
   strpt = FieldSet(form, FLD_BAT_EXTERN, strpt);
   // display form
   FrmDrawForm(form);
   SayTime();
   return TRUE;
}



-----Original Message-----
From: McCollister, Mike [mailto:[EMAIL PROTECTED]]
Sent: Sunday, 19 December 1999 12:33
To: '[EMAIL PROTECTED]'
Subject: Get Battery Voltage


Hi,

Does anyone know how to get the battery voltage and percent left? I want to
add a battery meter to one of my applications.

Thanks,

Mike McCollister