Script:Onduleur

Un article de MacodaWiki.

Les onduleurs APS (modèle ?) peuvent être branchés sur le PC via le port série. Lors des coupures courants ou autres surtension, il peut prévenir le PC.

Voici le sciprt a installer dans Homeseer :

sub main()
  dim result

  hs.WriteLog "Info","Mise en place de la surveillance de l'onduleur"
  result = hs.OpenComPort(2,"2400,N,8,1",0,"Onduleur_mise_en_place_surveillance.vbs","apc_event")
  if result <> "" then
	    hs.WriteLog "ONDULEUR","Error opening COM port for UPS: "&result
  end if
end sub


' PROCEDURE APPELE SUR LE DECLENCHEMENT DU COM 
sub apc_event(data)
hs.WriteLog "ONDULEUR","  Appel à apc_event !!!"

if data = 1001 then
	hs.SendEmail "domotique@macoda.com","domotique@macoda.com","[HOMESEER] ONDULEUR Data = Perte électricité","rien"
  	hs.WriteLog "ONDULEUR","!!!!   PERTE DE L'ELECTRICITE !!!!!"
 else
	hs.SendEmail "domotique@macoda.com","domotique@macoda.com","[HOMESEER] ONDULEUR Data = "&cstr(data),"rien"
 end if

end sub

• Valeurs captéee par le code

• Débranche port série : Plusieurs data =5
• Débranche courant data =1001 Data=1001 data =2
• Perte fictive de données (homeseer le voit alors qu’il n’y a rien) data =1001 data =2 data = 1001
• Onduleur non branché sur le port série. Allumage du PC => Data=3