1. Accueil
  2. Visual Basic / VB.NET
  3. Sources Visual Basic / VB.NET
  4. Sources API
  5. Détecteur de mouvement

Détecteur de mouvement

5/5 (25 avis)

Vue 15 978 fois - Téléchargée 3 485 fois


Télécharger le projet
Commenter

Description

Le but de ce programme est de transformer votre PC équipé d'une WebCam en détecteur de mouvements. Vous trouverez des appels aux fonctions API de capture d'image . C'est une version beta, il reste beaucoup de chose à faire avec en premier lieu l'ajout de filtre pour éviter un déclenchement intempestif (ben oui c'est comme les alarmes de voiture , toujours à ce déclencher au moindre mouvement). Les fichiers son de l'archive proviennent du site : http://www.audiard.net/
l'origine de ce dévellopement est un site anglais avec pas mal d'exemple sur le traitement d'images
http://www.fuzzgun.btinternet.co.uk/Downloads.htm A voir absolument.

Merci de bien vouloir me retourner une copie de vos sources si vous modifiez cette version.

Arvis !
Télécharger le projet

Codes Sources

A voir également

Ajouter un commentaire Commentaires
poldere Messages postés 69 Date d'inscription samedi 14 mai 2005 Statut Membre Dernière intervention 12 août 2007
16 mars 2006 à 20:02
Merci MalcolMz mais je n'ai aucun mérite vu que je ne fais que du copier-coller de différentes sources. MErci aux créateurs. Mais bon , depuis le cerveau du robot détecte les visages et reconnait les personnes dans une base de données. J'apprend doucement . . . .
MalcolMZ Messages postés 110 Date d'inscription jeudi 4 juillet 2002 Statut Membre Dernière intervention 2 octobre 2006
15 mars 2006 à 23:25
très bon travail...
poldere Messages postés 69 Date d'inscription samedi 14 mai 2005 Statut Membre Dernière intervention 12 août 2007
31 janv. 2006 à 00:54
Merci de la part de quelqu'un qui ne sait pas programmer. Je cherchais quelque chose pour gérer la webcam que je compte mettre sur un ordi portable pour faire un robot autonome ( à partir de cette base http://www.evolution.com/er1/r_rcc.pdf sur ce site http://www.evolution.com/er1/ et ton programme est coooooooollllllllll.
J'ai modifier à tatonement; voici mes petites modifs ( rigolez pas je vous rappelle que je ne sais pas programmer )

Private Sub Form_Load()
Dim numDriver As Long
' ------------------> ma commande pour le port com 2 : 4 lignes ajoutées aucunes vérif je sais
MSComm1.CommPort = 2
MSComm1.PortOpen = True
' 9600 baud, no parity, 8 data, and 1 stop bit.
MSComm1.Settings = "9600,N,8,1"

'initialise
Resolution = 30
SeuilDeclanchement = Val(TxtSeuilDeclanchement)
Call Reinit_Deplacement

'Detection drivers materiel
numDriver = DriversVideo(Me)

End Sub

et à cet endroit là

Call Comparaison_Image(PictImageActuelle, PictImagePrecedente, PictImageAnalyse)
' Calcul du point principale de modification
Call CentreDeDeplacement(PictImageAnalyse, CentreX, CentreY, PictImageActuelle, PictImageZones)
' ------------------> ma commande pour détecter les bords droit et gauche 4 lignes ajoutées
If CentreX 0 Then MSComm1.Output "R" ' R = rien
If CentreX > 5 And CentreX < 20 Then MSComm1.Output = "R"
If CentreX < 5 Then MSComm1.Output "G" ' G gauche
If CentreX > 20 Then MSComm1.Output "D" ' D droite

Conclusion :
quand j'arrive trop à droite ça envoie au robot l'ordre d'aller à gauche et vice et versa pour l'autre bord. J'ai pas encore trouver comment mettre la détection au milieu à l'initialisation dans ton prog et centreX se trouve toujours à 0 voilà pourquoi :
If CentreX 0 Then MSComm1.Output "R"
Si par hasard vous savez comment gérer la détection de couleur ( juste le rouge, juste le vert ou autre ) je suis preneur ou sinon je chercherais encore 1 semaine.
Merci au forum et programmeurs
zonebleue Messages postés 73 Date d'inscription samedi 15 janvier 2005 Statut Membre Dernière intervention 16 octobre 2007
31 oct. 2005 à 17:43
10/10 c'est super ! mais ma webcam fait plein de points noirs sur l'écran alors il détecte tout le temps des intrusions!
TheTiger Messages postés 89 Date d'inscription mercredi 2 avril 2003 Statut Membre Dernière intervention 2 novembre 2010
5 août 2005 à 00:59
C'est domage je cherche à récupérer au plus vite la capture de la webcam dans un tableau pour un analyse en RDF y a une source qui le fait mais c trop lent je voudais avoir direct la capture dans le tableau la RDF étant déjà bien longue
Afficher les 25 commentaires
S'inscrire maintenant

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.

Du même auteur (cuq)