Discussion :

[ENSIBS_Olivier]

Bonjour à toute la communauté de developpez.com,

Dans le cadre d'un projet je dois utiliser une carte ni-6009 pour acquérir des signaux analogiques et en générer.
Comme j'utilise en parallèle une base de données, je programme sous Windev.

Voici mon problème :
- Je n'arrive pas à générer un signal analogique constant de +3V sur le port Dev1/ai0. Ce dernier servira à alimenter un capteur.

Mon code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
//Mes variables

eTaskhandle1 est un entier sans signe
eTaskhandle2 est un entier sans signe
eErreur est un entier
chPortin, ChPortout est une chaîne
Data est un réel
ENbrEchEcrit est un entier sans signe

//Définitions

chPortin = "Dev1/ai0"
ChPortout="Dev1/ao0"
Data=3
eTaskhandle1=0
eTaskhandle2=0
ENbrEchEcrit=0

//Création de la tâche
eErreur=AppelDLL32("nicaiu.dll","DAQmxCreateTask","U_gen",&eTaskhandle2)
//Lancement
eErreur=AppelDLL32("nicaiu.dll","DAQmxStartTask",&eTaskhandle2)
//Je définie le port comme une sortie analogique
eErreur = AppelDLL32("nicaiu.dll","DAQmxCreateAOVoltageChan",eTaskhandle2,ChPortout,"",0.0,5.0,10348,"")
//J'écris 3V
eErreur = AppelDLL32("nicaiu.dll","DAQmxWriteAnalogF64",&eTaskhandle2,1,1,10.0,"DAQmx_Val_GroupByChannel",&Data,&ENbrEchEcrit,Null)
//Je supprime la tâche une fois finie
eErreur=AppelDLL32("nicaiu.dll","DAQmxClearTask",&eTaskhandle2)

Seule la ligne rouge ne fonctionne pas. Le compilateur me dit que le nombre de paramètre de la fonction est trop grand, mais la doc National Instrument précise bien qu'il y en a 8.

Merci d'avance pour votre aide.

[jurassic pork]

Bonjour,
je n'utilise pas la dll de Ni mais il me semble qu'il y a déjà des erreurs dans ton code avant la ligne en rouge :
tu récupères un handle avec le CreateTask mais ensuite tu l'utilises parfois avec le & (l'adresse) ce qui je pense n'est pas correct. DAQmx_Val_GroupByChannel est normalement une constante qui vaut 0.
Data est un tableau de réels.

tu peux faire une tentative (sans garantie car je ne peux pas faire d'essai) avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
/Mes variables
// quelques constantes NI 
// DAQmx_Val_Volts = 10348
// DAQmx_Val_Rising = 10280
// DAQmx_Val_FiniteSamps = 10178
// DAQmx_Val_GroupByChannel = 0
 
eTaskhandle1 est un entier sans signe
eTaskhandle2 est un entier sans signe
eErreur est un entier
chPortin, ChPortout est une chaîne
Data est un tableau de réel
ENbrEchEcrit est un entier sans signe
 
//Définitions
 
chPortin = "Dev1/ai0"
ChPortout="Dev1/ao0"
 
eTaskhandle1=0
eTaskhandle2=0
ENbrEchEcrit=0
 
//Création de la tâche
eErreur=AppelDLL32("nicaiu.dll","DAQmxCreateTask","U_gen",&eTaskhandle2)
//Lancement
eErreur=AppelDLL32("nicaiu.dll","DAQmxStartTask",eTaskhandle2)
//Je définie le port comme une sortie analogique
eErreur = AppelDLL32("nicaiu.dll","DAQmxCreateAOVoltageChan",eTaskhandle2,ChPortout,"",0.0,5.0,10348,Null)
 
//J'écris 3V
ajoute(Data, 3.0)
eErreur = AppelDLL32("nicaiu.dll","DAQmxWriteAnalogF64",eTaskhandle2,1,1,10.0,0,&Data,&ENbrEchEcrit,Null)
//Je supprime la tâche une fois finie
eErreur=AppelDLL32("nicaiu.dll","DAQmxClearTask",eTaskhandle2)

Ami calmant, J.P ;-)

[ENSIBS_Olivier]

Bonjour,
je n'utilise pas la dll de Ni mais il me semble qu'il y a déjà des erreurs dans ton code avant la ligne en rouge :
tu récupères un handle avec le CreateTask mais ensuite tu l'utilises parfois avec le & (l'adresse) ce qui je pense n'est pas correct. DAQmx_Val_GroupByChannel est normalement une constante qui vaut 0.
Data est un tableau de réels.

...


Ami calmant, J.P ;-)

Merci beaucoup J.P pour ton aide. Ton code fonctionne bien; et me voila débloqué. Par contre, si tu me le permets j'aimerai te poser une autre question.

La tension générée de 3V reste malgré la fermeture du programme. En effet je ne parviens pas exécuter ces deux fonctions.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
eErreur=AppelDLL32("nicaiu.dll","DAQmxStartTask",&eTaskhandle1)
eErreur=AppelDLL32("nicaiu.dll","DAQmxStartTask",&eTaskhandle2)
 
eErreur=AppelDLL32("nicaiu.dll","DAQmxStopTask",&eTaskhandle1)
eErreur=AppelDLL32("nicaiu.dll","DAQmxStopTask",&eTaskhandle2)

La valeur renvoyée par l'entier eErreur est négative.

Aurais-tu une idée ?

[ENSIBS_Olivier]

Le problème est résolu, je passais en paramètre l'adresse du taskhandle, alors qu'il ne fallait pas. Par contre même la "tâche nettoyée" la sortie reste a 3V. J'ai rajouter une requête d'écriture à 0V à la fermeture de la fenêtre pour corriger cela.

Merci à vous !