PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV 2024 → Comment envoyer un "retour chariot" sur le port série
Comment envoyer un "retour chariot" sur le port série
Iniciado por Vincent M., 08,feb. 2006 12:36 - 4 respuestas
Publicado el 08,febrero 2006 - 12:36
Bonjour, tout est dans le titre, j'aimerai savoir comment envoyer un Carriage return sur le port série apres ma chaine de caractere (voir code ci dessous)

Nombre est un entier
MessageLu est une chaîne
messageecrit est une chaîne
résultat est un booléen
messageecrit="AT"


résultat = sOuvre(3, 10, 10)
SI résultat = Vrai ALORS
// Paramétrage de COM1
sFixeParamètre(3, 2400, 0, 8, 1)
// Suite traitement...

sEcrit(3,messageecrit) //ENVOYER UN CR après la chaine de caractere
BOUCLE
SI sDansFileSortie(3) = 0 ALORS SORTIR
FIN
Nombre = sDansFileEntrée(3)
MessageLu = sLit(3, Nombre)
Info("Message lu : ", MessageLu)
// Fermeture de COM3
sFerme(3)
SINON
Erreur("Erreur d'ouverture de COM3")
sFerme(3)
FIN
Publicado el 08,febrero 2006 - 12:39
sEcrit(nPort,"chaine"+CRLF)

"Vincent M." <vmz@actl.be> a écrit dans le message de news:
43e9c972$1@news.pcsoft.fr...


Bonjour, tout est dans le titre, j'aimerai savoir comment envoyer un
Carriage return sur le port série apres ma chaine de caractere (voir code
ci dessous)

Nombre est un entier
MessageLu est une chaîne
messageecrit est une chaîne
résultat est un booléen
messageecrit="AT"


résultat = sOuvre(3, 10, 10)
SI résultat = Vrai ALORS
// Paramétrage de COM1
sFixeParamètre(3, 2400, 0, 8, 1)
// Suite traitement...

sEcrit(3,messageecrit) //ENVOYER UN CR après la chaine de caractere
BOUCLE
SI sDansFileSortie(3) = 0 ALORS SORTIR
FIN
Nombre = sDansFileEntrée(3)
MessageLu = sLit(3, Nombre)
Info("Message lu : ", MessageLu)
// Fermeture de COM3
sFerme(3)
SINON
Erreur("Erreur d'ouverture de COM3")
sFerme(3)
FIN
Publicado el 08,febrero 2006 - 13:44
Salut

As-tu essayé

sEcrit(3, RC)
ou
sEcrit(3, caract(13))


--
Ciao
Pat Biker
http://aaa.windev.free.fr/php/blog.php


On 8 Feb 2006 11:36:20 +0100, "Vincent M." <vmz@actl.be> wrote:
Bonjour, tout est dans le titre, j'aimerai savoir comment envoyer un Carriage return sur le port série apres ma chaine de caractere (voir code ci dessous)
Publicado el 08,febrero 2006 - 13:48
salut

un retour chariot est l'équivalent de caract(10)+caract(13) ou caract(13)+caract(10) je ne me rappelle jamais de l'ordre
Publicado el 08,febrero 2006 - 14:13
Bonjour,

Je me permet de corriger la réponse de YORK :

Retour chariot = Cariage Return = CR = Caract(13) ou Caract(0x0D)

Ligne suivante = Line Feed = LF = Caract(10) ou Caract(0x0A)

CRLF = Cariage return + Line feed = Caract(0x0D)+Caract(0x0A) c'est historiquement du aux machines à écrire, qui avait un chariot que l'on poussait à gauche et de la manivelle qui faisait avancer le papier d'une ligne. C'est bien deux caractéres différents. Sous MSDOS et WINDOWS CR+LF est utilisé comme fin de ligne d'un fichier TXT contrirement à UNIX qui utilise 0x0A uniquement...