Pour commencer... ⇒ pico brasserie automatisée

[muntjac]

ça semble génial...
J'irai faire une formation du côté de la brasserie montoise si des projets de plus grande ampleur se concrétiqent un jour...

[papiknacki]

tu peux trouver des PT100 pas cher sur le site de conrad.
Mais je rejoins la question deja posée, il faut mettre un circuit "thermomètre" entre la carte et la sonde, sinon ça donne que dalle, meme avec une PT100 nan?
Oh ça me gonfle j'ai jamais rien pigé à ces foutues sondes!

en tout cas ça déchire, je vais me lancer là dedans aussi, pour le fun. J'avais dans l'idée de passer sur automate siemens, mais pilotage pc ça le fait plus je trouve!
Reste à voirla programmation... mais bon ça devrait le faire...

[mickey99]

moi je suis sur un plan pour acheter des vannes motorisées....
et ensuite une interface pour commander tout cela...

xavier (fainéant de nature)

[brasseriemontoise]

Oui, il faut un circuit secondaire qui va délivrer une tension proportionnelle à la température et mesurée par l'entrée analogique de la carte d'acquisistion.
J'avais récupéré un Siemens S300 (+sept7) mais j'ai jamais eu le cable de connection avec le PC

JP

[mickey99]

Si vous avez des plans pour du matos d'automatisation... je suis preneur....

[papiknacki]

ben pour l'élec va voir sur le site de conrad, et pour les vannes, sur e bay tu devrais trouver tout ce que tu veux... cherche vanne auto et fouille un peu... en général dans la présentation du produit y a la phrase magique "autres diametre ou quantités, me contacter"...

[edorus]

Bonjours,

J'aimerai aussi utiliser se genre d'interface sous windev mais je ne trouve pas les codes de la carte K8055 pour windev.

Vous serait-ils possible de m'aider ou d'orienter mes recherche ?

Cordialement.

[brasseriemontoise]

Bonjours,

J'aimerai aussi utiliser se genre d'interface sous windev mais je ne trouve pas les codes de la carte K8055 pour windev.

Vous serait-ils possible de m'aider ou d'orienter mes recherche ?

Cordialement.

sur le site de la carte, tu télécharges les API et dll que tu peux directement attaquer en windev. il y a aussi des exemples de codes qui sont egalement fourni

jp

[edorus]

Bonjour,

j'ai bien les DLL mais je n 'arrive a rien.

J'ai trouver ca comme code mais sa ne fonctionne pas.

Peut tu m'envoyer la source de ta fenêtre afin que je regarde ton code dans windev?

Code : Tout sélectionner

hDLL, RetDll, CardAdress est un entier
hDLL = ChargeDLL("C:\K8055D.DLL")
IF hDLL = -1 THEN
Erreur(ErreurInfo())
RETOUR
END

CardAdress = 0 // 0,1,2,3 =>voir le reglage des cavaliers SK5,SK6
RetDll = API("K8055.DLL", "OpenDevice", CardAdress)
IF RetDll = -1 THEN
Erreur("Carte non trouvée !")
DéchargeDLL(hDLL)
RETOUR
END

API("K8055.DLL", "CloseDevice", CardAdress)
DéchargeDLL(hDLL)

Cordialement

[edorus]

Bonjour,

Voila après plusieurs heures de prise de tête j'ai remarquer que rien ne fonctionné tout simplement car la carte n'ai pas compatible avec Windows 7 64 bits.

Donc voici le code qui fonctionne sous windows 7 32 Bits.

Code : Tout sélectionner

    --Déclarations globales de FEN_Fenêtre1
    Connexion, VCpt1 sont des entiers
    hDLL est un entier système
    Dll est une chaîne

    Dll = "C:\K8055D.dll"
    hDLL = ChargeDLL(Dll)
    IF hDLL=0 THEN
    Erreur("Chargement dll impossible")
       RETOUR
    ELSE
       DélaiAvantFermeture(2000)
       Info("Dll chargée en mémoire.")
    END
    Connexion = AppelDLL32(Dll,"OpenDevice",0)
    IF Connexion=-1 THEN   
        Erreur("Carte non trouvée..")
       RETOUR
    ELSE
       DélaiAvantFermeture(2000)
       Info("Connexion ouverte...")
    END

    -- Fermeture de Fen_Fenêtre1
    AppelDLL32(Dll,"CloseDevice")
    DéchargeDLL(hDLL)

    -- Clic sur BTN_ON_OFF
    SI MoiMême..Enfoncé=Vrai ALORS
    MoiMême..Libellé="ON"
    AppelDLL32(Dll,"SetAllDigital")
    SINON
    MoiMême..Libellé="OFF"
    AppelDLL32(Dll,"ClearAllDigital")
    FIN

Je n'ai pas la prétention d'avoir trouver ce code moi même mais je l'ai bien trouvé quelque part sur le net. Mais je pense qu'il est bon de l'ajouter dans ce topic.

Cordialement.

edorus