Program Care Anunta Cand Bateria E Incarcata?

[+robotboy]

Salutare, astazi o ruda (mai in varsta) m-a intrebat daca cunosc vreun program care sa il instiinteze cand bateria laptopului (are un HP) a fost incarcata. Mai exact, doreste sa ii fie afisata o fereastra pe ecran care sa ii spuna ca bateria a fost incarcata complet, pentru a scoate laptopul din priza. Laptopul dispune de un beculet care indica cand bateria se incarca sau cand aceasta este descarcata insa el ar dori un program care sa faca ceea ce am scria mai sus. Pentru ca eu nu am stiut un asemenea program m-am gandit sa intreb si pe aici.

Cunoasteti/exista un asemenea program?

Multumesc!

[+GodsOtherHand]

windows 8, 7, vista,xp, 98, 95, 3.1 ? OS X? Linux? freeBSD, openBSD? MenuetOS?

 

pe win7 aveai wingeturi dealea care te instintau cata baterie ai.

sau vrea ceva gen ca un warning? ( adica sa apara deasupra ferestrelor active) 

[+robotboy]

Are Windows 7. Imi poti spune despre ce widget-uri e vorba?

Din ce am inteles il intereseaza o instiintare de tip fereastra pop-up, asemeni celei care ii spune ca bateria e descarcata si ca necesita conectarea incarcatorului, insa orice sfat este bun.

[+GodsOtherHand]

sincer nu mai stiu..click dreapta pe desktop si era ceva acolo.. nam mai folosit de mult.

 

alta idee momentan nam.. 

[+GodsOtherHand]

Codul e luat de pe http://blogs.technet.com/b/jhoward/archive/2013/04/24/get-an-alert-when-my-battery-reaches-95.aspx si doar ajustat. 
(sper sa mearga ok.. sincer nush cum face programu ce face exact, prima oara cand vad asta:)) )

 set oLocator = CreateObject("WbemScripting.SWbemLocator")
 
set oServices = oLocator.ConnectServer(".","rootwmi")
set oResults = oServices.ExecQuery("select * from batteryfullchargedcapacity")
for each oResult in oResults
   iFull = oResult.FullChargedCapacity
next
 
while (1)
  set oResults = oServices.ExecQuery("select * from batterystatus")
  for each oResult in oResults
    iRemaining = oResult.RemainingCapacity
    bCharging = oResult.Charging
  next
  iPercent = ((iRemaining / iFull) * 100) mod 100
  if  bCharging and (iPercent > 99) Then
   Wscript.echo "Baterie plina"
  end if
  wscript.sleep 40000
  
wend 

ups, acu ca ma uit..am sters, si am scris inapoi cam aceasi chestie doar ca mai urat mda, tare. poti sa iei si codu direct din linku de mai sus. face aceasi chestie.
app, in ultimele randuri... iPercent>99 zice cat sa fie bateria.
wscript.sleep 40000 zice cat sa astepte ( ~6 minute asa) intre verificari.

[+robotboy]

Copiez codul de mai sus intr-un notepad, dupa care salvez ca fisier .vbs si il rulez de fiecare data cand pornesc calculatorul (sau il pun la startup), nu?

[gaby]

Exact. Sunt curios daca merge .