Analyseur de plasma (utilisation de mscchart)

Soyez le premier à donner votre avis sur cette source.

Vue 3 414 fois - Téléchargée 287 fois

Description

Voilà une source un peu plus interressante que mes dernières! Ce petit logiciel est en cours de construction donc il n'y a pas grand chose qui marche, l'objectif final étant de saisir par l'intermédiaire d'une carte d'acquisition les signaux issus d'un analyseur de plasma (sans vouloir entrer dans les détails).
Si vous voulez le tester :
1) Lancer le logiciel et cliquer sur "Agrégation classique" -> "Acquisition"
(l'acquisition est simulée par des signaux sinus comme tous le monde n'a pas une carte d'acquisition chez lui)
2) Une fois l'acquisition terminée, vous pouvez ensuite calculer différents
paramètres tels que la latence, la vélocité, l'agrégation...

Source / Exemple :


'Dans le ZIP

Conclusion :


Je n'ai pas bcp de méthode, donc l'écriture du code est loin d'être rigoureuse. En plus, j'ai fais plein de bidouilles alors n'hésitez pas à rectifier, critiquer, commenter...
La plus grosse bidouille est au niveau de l'affichage des curseurs dans la "vélocité manuelle" et la "latence". Jettez un petit coup d'oeil SVP, donnez moi un petit coup de pouce. Merci d'avance

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
20
Date d'inscription
vendredi 21 avril 2006
Statut
Membre
Dernière intervention
19 octobre 2009

j'ai été voir sur cé site effectivement c'est bien ce qu'il me fallait. mais il me manke encor le code pr pîloter la carte
dc j'ai appellé le fournisseur il m'a dit kil me trouverai un exmple pour dm1 matin donc on vera.bref
je te remercie encor et je te tien o courant
a+
Messages postés
36
Date d'inscription
mardi 21 octobre 2003
Statut
Membre
Dernière intervention
25 avril 2006

Je pense avoir trouvé quelquechose qui pourrai t'intéresser.
Normalement tu as du installer sur ton PC l'application "pci-1002_win2k.exe". Cette installation a placé la DLL "P100X.DLL" à l'emplacement : "C:\DAQPro\PCI-1002_WIN2K\Driver". Il y a également d'autres fichiers comme le fichier *.ocx (Contrôle ActiveX) que je ne connais pas du tout.
Il y a pas mal d'info ici -> http://www.icpdas.com/download/pci/1002/
Tu y trouveras les manuels d'utilisation hard et soft (que tu dois déjà avoir), les drivers de ta carte en fonction de ton SE mais surtout des exemples en VB6 utilisant cette DLL -> http://ftp.icpdas.com/pub/cd/iocard/pci/napdos/pci/pci-1002/dll_ocx/demo/
Si vraiment tu ne t'en sors pas, n'hésite pas à contacter le fournisseur de la carte, en général ils sont assez serviables surtout si ton projet aboutit et que ça leur permet de revendre d'autres cartes par la suite.
Messages postés
20
Date d'inscription
vendredi 21 avril 2006
Statut
Membre
Dernière intervention
19 octobre 2009

je te remercie d'abord de me répondre c'est trés sympa de ta part.
oui la DLL j'ai fini par la trouvé( comme je suis dans une société et comme ce n'étais pas moi qui avais installé le visual studio 2005, la personne avait oublié de l'installé mais je ne le savais pas donc c'est comme chercher une aiguille dans une boite de foins) j'ai passé d'ailleur toutes la journée hier a la cherchern mais le probleme c'est que je n'arrive pas a trouver d'exemples d'utilisation de la carte. il y a juste un exemple donnée dans le catalogue livré avec la carte mais il est en C++ un language que je ne coonais absolument pas. donc tu n'aurais pas une idée de la démarche a prendre dans ce cas.
je te remercie encore
cordialement
Messages postés
36
Date d'inscription
mardi 21 octobre 2003
Statut
Membre
Dernière intervention
25 avril 2006

Normalement tu dois avoir une DLL fournie avec ta carte? Et des exemples utilisant cette DLL?
Dans mon cas, j'avai une DLL : "pcilabnt.dll" contenant plusieurs fonctions. Tout ça devait être déclaré en début de prog :
---------------------------------------------------------------
' *** FONCTIONS ANALOGIQUES CARTE ACQUISITION ***
' Entrée analogique - Une valeur, une voie
Private Declare Function Ainf Lib "pcilabnt.dll" Alias "_Ainf@28" (valeur_ad As Single, ByVal voie_ad As Integer, ByVal gain As Integer, ByVal mode_ad As Integer, ByVal exts As Long, ByVal carte As Integer, ByVal adresse As Integer) As Integer

' Sortie analogique - Une valeur, une voie
Private Declare Function Aoutf Lib "pcilabnt.dll" Alias "_Aoutf@24" (ByVal valeur_da As Single, ByVal voie_da As Integer, ByVal mode_da As Integer, ByVal exts As Long, ByVal carte As Integer, ByVal adresse As Integer) As Integer

' Entrée analogique - Plusieurs valeurs, plusieurs voies (tampon)
Private Declare Function Ainfscan Lib "pcilabnt.dll" Alias "_Ainfscan@48" (ByVal voie_tampon As Integer, ByVal voie_ad As Integer, ByVal n_voies_tampon As Integer, ByVal n_voies_ad As Integer, gains As Integer, ByVal n_val As Long, frequence As Long, ByVal mode As Integer, adata As Single, ByVal ext As Long, ByVal carte As Integer, ByVal adresse As Integer) As Integer

' Sortie analogique - Plusieurs valeurs, plusieurs voies (tampon)
Private Declare Function Aoutfscan Lib "pcilabnt.dll" Alias "_Aoutfscan@52" (ByVal voie_tampon As Integer, ByVal voie_da As Integer, ByVal n_voies_tampon As Integer, ByVal n_voies_da As Integer, ByVal n_val As Long, frequence As Long, ByVal tint As Integer, ByVal mode As Integer, polarite As Integer, adata As Single, ByVal ext As Long, ByVal carte As Integer, ByVal adresse As Integer) As Integer

' Reset de la carte
Private Declare Function Reset_carte Lib "pcilabnt.dll" Alias "_Reset_carte@16" (ByVal mode As Integer, ByVal ext As Long, ByVal carte As Integer, ByVal adresse As Integer) As Integer

' Sorties numériques
Private Declare Function WriteRegister Lib "pcilabnt.dll" Alias "_WriteRegister@8" (ByVal port_out As Integer, ByVal valeur_write As Integer) As Integer

' Entrées numériques
Private Declare Function ReadRegister Lib "pcilabnt.dll" Alias "_ReadRegister@8" (ByVal port_in As Integer, adata As Integer) As Integer
---------------------------------------------------------------

Voilà ça fait 7 fonctions de disponible mais il me semble en avoir utilisé que 2, le reset et l'acquisition d'une entrée analogique.
ça donnait quelquechose dans ce goût là :

---------------------------------------------------------------
Private Sub Command1_Click()

carte = 520 ' Numéro de la carte
adresse = 0
voie_ad = 0
gain = 0
mode_ad = H8010

x = Reset_carte(0, 0, carte, adresse)
x = Ainf(adata(0), voie_ad, gain, mode_ad, 0, carte, adresse)

Label1.Caption = adata(0)

End Sub
---------------------------------------------------------------

ça c'est bien pour un seul point de mesure mais pour faire l'acquisition de plusieurs points à une certaine fréquence, il faut utiliser l'horloge de ta carte et stocker les données dans le tampon sauf si la fréquence d'acquisition est très basse alors elle peut être cadencée par le PC.
mais bon la première question est as-tu une DLL avec ta carte?
Messages postés
20
Date d'inscription
vendredi 21 avril 2006
Statut
Membre
Dernière intervention
19 octobre 2009

en fait ce n'était pas ton programme que j'avais utiliser mais tu poura peut etre m'aider
en effet, j'essaie de piloter une carte PCI 1002 avec le nouveau visual studio 2005. et la question méthode je n'y arrive pas il me manques des outils de VS 2005 que je ne connais pas
donc si tu peux m'aider sa serait parfait.
je te remercie d'avance
Afficher les 8 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.