Gestion moteur pas a pas...

Question

Bjrs,
je suis lycéen et je ne programme plu depuis pluqieures années... :s
pour la fin de l'année, je doit trouver un moyen de piloter un moteur pas a pas via un pc... fleche de droite moteur tourne a droite <=> flèche de gauche moteur tourne a gauche...
cependant je n'ait plus les connaissances requises pour faire ce petit programme...
qqu'un pourrait il m'aider ??? svp
la... je recontre un vrai probleme... :s
j'aimerai bien que l'on puisse le diriger via un port usb ou, la solution la plus simple, via un port parallele...
est ce que qq'un aurait t'il des informations a ce sujet?
merci d'avance et @++

AnteManoclis · Answer

Salut darkneo68,

  Pour passer par le port usb, je ne te suis d'aucune utilité, en revanche pour le port parallèle, c'est du tout cuit (expression années 80's...)
  Il faut d'abord avoir la dll qui permet l'accés aux registres (http://sitelec.free.fr/download/inpout32.zip).
  Ensuite, il faut savoir que les port parallèles sont organisés de la manière suivante:
LPT1:
  Adresse 378h -> Données (D7...D0)
  Adresse 379h -> Etat du port (Busy\, Ack, PE, Select, Error\,x,x,x)
  Adresse 37Ah -> Contrôle (x,x,Bit Ctrl, IRQ Enabled, Select In, Init\, Auto Feed, Strobe\)

LPT2:                                               LPT3:
  Adresse 278h -> Données            Adresse 3BCh -> Données
  Adresse 279h -> Etat du port       Adresse 3BDh -> Etat du port
  Adresse 27Ah -> Contrôle            Adresse 3BEh -> Contrôle

(si tu veux plus de détails: http://www.beyondlogic.org/spp/parallel.htm)

  Voilà, donc ensuite, en supposant que tu veuilles utiliser le port LPT1, ton programme ressemblera à quelque chose comme ça:

Public Declare Function Inp Lib "InpOut32.dll" Alias "Inp32" (ByVal PortAddress As Integer) As Integer

Public Declare Sub Out Lib "InpOut32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)

  Public const LPT1_d as integer = &h378

  Dim ValeurAEnvoyer as byte 'Variable contenant le code de rotation droite/gauche

  ValeurAEnvoyer=....
  call out(LPT1_d,ValeurAEnvoyer)

  Voilà j'espère que j'aurais pu t'être utile, tchô  ;) 
AnteManoclis

darkneo68 · Answer

Lut,
je suis desolé mais j'ai rien compris ... :s
pourait tu m'expliquer a quoi correspondent les differentes commandes???
merci et @+

AnteManoclis · Answer

Wép, alors c'est parti...

Public Declare Function Inp Lib "InpOut32.dll" Alias "Inp32" (ByVal PortAddress As Integer) As Integer
   -> Déclare la fonction externe de lecture d'un registre (inutilisée dans notre cas)

Public Declare Sub Out Lib "InpOut32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)
   -> Déclare la fonciton d'écriture dans un registre (dans notre cas, ceux du port parallèle)

Public const LPT1_d as integer = &h378
   -> Déclare la variable qui va contenir l'adresse du registre de données du port parallèle

Dim ValeurAEnvoyer as byte 
  -> Déclare la variable (8bits) à envoyer sur le port parallèle

ValeurAEnvoyer=....
  -> Tu mets la valeur que u souhaites dans ta variable

call out(LPT1_d,ValeurAEnvoyer)
  -> Envoi ta variable sur le port parallèle.

  Un peu plus clair  :big)  :question) 
  tchô  ;) 
AnteManoclis

darkneo68 · Answer

ok,
la ca me parait un peu plus clair...
je verrai ca avecun pot demain
et je mettrai mes apreciations sur le forum...
encore merci et @+ ;)

vlemieux · Answer

Bonjour,
J'ai conçu une carte 8 relais pilotée par l'USB.
Elle est décrite dans un livre consacré à l'USB  : "L'USB pour tous" aux editions Dunod/ETSF.
Le sommaire est sur mes pages perso : http://home.nordnet.fr/~vlemieux/
Il y a aussi une photo de la carte
Cordialement.
V.Le Mieux

cs_seb496 · Answer

Bonjour
je cherche à utiliser l'inpout32.dll , mais à chaque fois que je lance le prog , windows 2000 me génère une erreur et ferme mon application ( quelque soit le source utilisé ). Merci de m'indiquer une solution à mon problème.

AnteManoclis · Answer

Salut seb,

  J'ai Windows98, donc, peut-être cela ne va pas t'aider, mais peut-être est-ce dans la déclaration qu'il y'a un problème, au cas où, j'te copie mes déclarations, en espèrant qua ça puisse t'aider.

Public Declare Function Inp Lib "InpOut32.dll" Alias "Inp32" (ByVal PortAddress As Integer) As Integer

Public Declare Sub Out Lib "InpOut32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)

  Tchô  ;) 
AnteManoclis

cs_lnel · Answer

salut 

je suis a la rechercher du meme programme ,
as tu trouver ?

merci

cs_seb496 · Answer

seb :big)  merci à tous.
je viens de trouver les réponses à mes questions (mais également testé ...). L'inpout32.dll n'est valable que sous win 95 et win 98. 
Pour winNT ; win2000 et winXP , il faut utiliser une dll différente qui est .................. la DLPortIO.dll (dlportio.dll).

les déclarations sont les suivantes:

Public Declare Function Inp Lib "dlportio.dll" Alias "DlPortReadPortUchar" (ByVal Port As Long) As Byte

Public Declare Sub Out Lib "dlportio.dll" Alias "DlPortWritePortUchar" (ByVal Port As Long, ByVal Value As Byte)

testé sur mes machines avec chenillard et moteur , tout est ok, bon courage à tous. Seb

cs_dodalson · Answer

slt les vbnautes,

je suis sur un projet un peu identique et je souhaitai savoir o&#249; je pouvais trouver ce DLPortIO.dll

Merci

cs_dodalson · Answer

slt les vbnautes,

je suis sur un projet un peu identique et je souhaitai savoir o&#249; je pouvais trouver ce DLPortIO.dll

Merci

cs_dodalson · Answer

slt les vbnautes,

je suis sur un projet un peu identique et je souhaitai savoir o&#249; je pouvais trouver ce DLPortIO.dll

Merci

cs_dodalson · Answer

slt les vbnautes,

je suis sur un projet un peu identique et je souhaitai savoir o&#249; je pouvais trouver ce DLPortIO.dll

Merci

AnteManoclis · Answer

Yop !

http://www.driverlinx.com/ftp/unsupported/port95nt.exe

Tch&#244; 
AnteManoclis

cs_dodalson · Answer

salut,

Merci bcp AnteManoclis pour le lien

je voulais savoir en meme temps si personne n'avait un programme sous VB6 pour
piloter un port // juste &#233;criture et lecture du port.

Et si possible comment connaitre en h&#233;xa l'adresse du port // de mon PC (enfin le PC demon IUT) lol 
ainsi je vous remercie de votre aide 

cordialement dodalson,

AnteManoclis · Answer

Salut dodalson, 

Les adresses des ports parall&#232;les sont pr&#233;d&#233;fines, &#224; savoir:
LPT1: 0x378
LPT2: 0x278
LPT3: 0x3BC

Autrement dit, si tu n'as qu'un port parall&#232;le, sont adresse est 0x378

Ces adresses sont les adresses de base, sur lesquelles tu trouveras le registre de donn&#233;es. Le registre d'&#233;tat est &#224; l'adresse suivante, celui de contr&#244;le encore apr&#232;s.

Pour &#233;crire sur le port parall&#232;le, rien de plus simple que la ligne de code suivante:

out(&H378, Ton_octet_a_ecrire)

Pour la lecture, je pourrais dire qu'une ligne du m&#234;me genre suffrait, cela dit, je crois avoir lu quelque part qu'il fallait pr&#233;ciser la lecture dans un registre...

En esp&#233;rant que &#231;a aura pu t'aider

Tch&#244; 
AnteManoclis

cs_seb496 · Answer

salut,
tu peux &#233;galement connaitre l'adresse de ton port en allant dans le panneau de configuration , dans systeme , onglet mat&#233;riel , gestionnaires de p&#233;riph&#233;rique; s&#233;l&#233;ctionnaire ton port concern&#233; ( dans ton cas : lpt1), fait un clique droit puis propri&#233;t&#233; et enfin s&#233;l&#233;ctionne l'onglet ressource.
bon courage

seb

Le mirage · Answer

OU je peux t&#233;lecharg&#233;  DLPortIO.dll

fx4sky · Answer

Bonjour,

J'aimerai réaliser un scanner (effet lumineux pour light jokey)
Avec les fonctions Tilt (axe X), pan (Axe Y), couleurs, gobos
Pour celà j'aimerai pouvoir piloter 4 moteurs de manière simultanée ou indépendante.
Je suis nul en éléctronique et en programation, j'ai quelques notions en visual basic c'est pourquoi je voudrai pouvoir développer une petite appli avec ce logiciel.
Il me manque juste une carte d'interface avec les composants pour piloter ces 4 moteurs soit par le port // soit par le port USB.
J'ai vu les cartes comio et easy step qui correspondent presque à mes besoins mais je ne souhaite pas acheter 5 cartes differentes et depenser 100 ou 200?. Sinon il me suffit d'acheter le scan tout fait.

Est ce que quelqu'un possède le schéma et les composants ainsi qu'un début de programme simple pour piloter 4 moteurs pas à pas ???

j'ai vu tellement de cartes differentes sur le net : usb, parallele, de 30 à90 ? a programmer en delphi, en visual basic ...
http://www.gotronic.fr/catalog/micro/micro-frame.php?page_cible=interface.htm
http://www.ellipse.ch/Produit.aspx?Produit=79114
http://spt06.chez-alice.fr/pas05.gif


Laquelle faut il prendre ? comment faire le programme associé ??
Sinon j'ai même récupéré une vieille carte qui fonctionne sur le port // avec un circuit de type ADC0809CCN  que l'on peu programmer avec Visual basic mais je ne comprend pas du tout le fonctionnement.

Si quelqu'un peut m'aider en programmation et en éléctronique il sera le bienvenu :-)

No Fear !

AnteManoclis · Answer

Salut, 

S'il s'agit de piloter 4 moteurs pas à pas, ce n'est en soit pas très compliquer, mais à partir du moment où il y a une partie électronique, il faut tout de suite prendre en considération le fait qu'il va falloir mettre la main au porte feuille. Il y a des modules USB qui ne sont pas très chers chez lextronic.fr, après il faut penser qu'il y aura certainement un microcontrolleur, ou un PAL, ce qui veut dire qu'il te faudra un programmateur pour les programmer au moins une première fois, et pour finir pas mal de temps de câblage et d'essai. La programmation VB ou delphi devrait être la partie la plus simple de ton projet. Lequel choisir ? Celui que tu préféres, VB et Delphi sont sensiblement identiques.

Tchô AnteManoclis

cs_dbgt · Answer

salut,je veux piloter 3 moteur pas a pas ,on fait je suis pas forte en programation,je savais q pour communiqer avec le port il me faut une biblio inpout.dll.mais le probleme je sais comment l'utiliser,est c q je dois la telecharger et l'installer dans mon pc ou koi faire?si quelqu'un peut m'aider j'en serais tres reconnaissante.merci d'avance

cs_dbgt · Answer

pardon je veux dire je sais pas comment l'utiliser

Gestion moteur pas a pas...

22 réponses

Discussions similaires