%
% battery value tracking
%
%%% _Sim.BatHex ^"0x0" 0 add &"%"
_Sim.Engine zeronull 0xFF and 0x02 sub
dup negative
{
 pop "0"
}
{
 1.25 0x7C div
 mul
 11.0 add
 5 left
} ifelse
%%%"engine battery " log)(
!Sim.Bat

 "eng_" &_Sim.UniqueName text
 ofconn
 dup exists
 {
  _Sim.Bat 11.5 lt
  {
   pop
  }
  {
   del
  } ifelse
 }
 {
  _Sim.Bat 11.5 lt
  {
   empty
   "Sim.Bat" sval
   "Sim.Engine" sval
   Time.Now !Sim.Ealert
   "Sim.Ealert" sval
   exch write
  }
  {
   pop
  } ifelse
 } ifelse