bLigneCom1 est un booléen
bLigneCom1 = sOuvre(1, 20000, 2000,sTimeoutDéfaut,Vrai)
SI bLigneCom1 = Vrai ALORS
// Paramétrage de COM1 : Taux 9600, parité paire,
// 8 bits de données, 1 bit de stop
sFixeParamètre(1, 9600, 0, 8, 0)
// Suite traitement...
// Le port est ouvert. Récupère le nombre d'octets en attente
// dans le buffer d'entrée de COM1 et fait une lecture.
//Détection de caractères sur le port COM1
sEvénement(1,sEveCaractèreReçu,"LectureCOM1")
SINON
Erreur("Erreur d'ouverture de COM1")
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=18&topic_id=5527&post_id=22725