Partie 1. Script basique.

Pré requis :
Disposer d’un port RS232 libre sur votre serveur HomeSeer
Disposer des commandes spécifiques à votre matériel

Pour notre exemple nous nous utiliserons un amplificateur PIONEER VSX-LX 70

Découvrez SmartHome Europe !

Fichier de descriptif des commandes RS232 du constructeur:
VSX92TXH_RS232C_Protocols.pdf

Le PIONEER VSX-LX 70 utilise les mêmes commandes que le VSX-92 THX

Port RS232 utilisé : COM2

Système : Windows Home Server

L’envoi de commandes sur un port RS232 depuis HomeSeer nécessite l’ouverture de ce port et son utilisation exclusive jusqu’à sa fermeture.

L’exemple présente un script unique qui ouvre le port RS232, envoi une commande puis referme le port RS232.

Il est bien sûr possible dans le cadre d’une exploitation complète d’exécuter la commande d’ouverture du port RS232 dans le script de démarrage de HomeSeer et d’exécuter la commande de fermeture du port dans le script de fermeture de HomeSeer.

La commande d’ouverture d’un port RS232 est la suivante :

OpenComPort port, « baud rate,parity,data bits,stop bits »

Il est nécessaire de vous conformer aux pré requis du constructeur du matériel, sur lesquels doit être calquée la configuration Windows de votre port RS232 et la configuration du script dans HomeSeer.

Dans notre exemple, PIONEER indique les valeurs suivantes :
Configuration RS232 PIONEER

Ces valeurs sont celles configurées pour notre port RS232 sous Windows.

Configuration RS232 Windows

*Dans le gestionnaire de périphériques, propriété du port com

La fonction d’ouverture du port sera donc la suivante :

hs.OpenComPort 2, »9600,N,8,1″,1, » », » »

La fonction pour envoyer une commande est la suivante :

SendToComPort port,data

La documentation des commandes PIONEER indique la commande suivant pour allumer l’amplificateur :

PO<CR>

PO est la commande
<CR> est un retour chariot, à remplacer par Chr(13) dans le script.

La commande est donc la suivante :

hs.SendToComPort 2, »PO » & Chr(13)

La fonction pour fermer le port com est la suivante :

CloseComPort(port)

Soit dans notre cas

CloseComPort(2)

Script complet :

Option explicit
Const ComPort = 2
sub main()
hs.OpenComPort ComPort, »9600,N,8,1″,1, » », » »
hs.SendToComPort ComPort, »PO » & Chr(13)
hs.CloseComPort(ComPort)
end sub

L’exécution de ce script allume l’amplificateur PIONEER.

Vous pouvez maintenant commander votre matériel disposant d’un port RS232 de façon beaucoup plus précise et fiable qu’avec de l’infrarouge.

Partagez cet article !

A propos de l'auteur

Passionné de nouvelles technologies et bien sûr de domotique, je suis le CEO de Domadoo. Je teste donc également de nombreuses choses à mes heures perdues...

Laisser une réponse