PORT PARALLÈLE : PILOTER UNE SIRÈNE D'ENTRÉE SORTIE D'OUVRIERS D'UNE USINE
thermo_nono
Messages postés
8
Date d'inscription
vendredi 13 août 2004
Statut
Membre
Dernière intervention
5 août 2006
-
5 août 2006 à 20:17
rami3b Messages postés 17 Date d'inscription mardi 27 juillet 2004 Statut Membre Dernière intervention 8 décembre 2008 - 13 août 2006 à 14:31
rami3b Messages postés 17 Date d'inscription mardi 27 juillet 2004 Statut Membre Dernière intervention 8 décembre 2008 - 13 août 2006 à 14:31
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/38941-port-parallele-piloter-une-sirene-d-entree-sortie-d-ouvriers-d-une-usine
https://codes-sources.commentcamarche.net/source/38941-port-parallele-piloter-une-sirene-d-entree-sortie-d-ouvriers-d-une-usine
13 août 2006 à 14:31
pour des mises à jours ou des informations sur le montage,veuillez consulter mon site http://rami3b.iquebec.com/vb.htm
vos commentaires sont les bienvenus
8 août 2006 à 04:14
6 août 2006 à 11:24
et une fonction pour gerer ta sirene style
private sub ActionAllumerEteindreSirene(iChoixTypeAction)
et aussi....
If dt = DateAdd("s", durnet, tps(14)) Then
PortAddress = &H378
Out PortAddress, 0
Beep
End If -> function VerifierTemps(TpsEnSeconde) as boolean ->
5 août 2006 à 21:51
pour le cablage, je ne le met pas ici car je voi que c 'est pas de la programmation mais de l'electronique.et comme je l'ai deja signalé, je le fourni sur demande par email
5 août 2006 à 20:17
ça a l'air sympa comme programme, mais ça aurait aussi été sympa de mettre le plan de cablage...