Automatisme avec un PIC...

**Raphael2** · 08/02/2007, 09h37

Bonjour,
j'aimerais réaliser un petit projet avec un PIC 16f628 en langage assembleur ( qui n'a que cette tache a effectuée )
le system est composer :
-du PIC
-d'un relais1
-d'un relais2
-d'une LED1
-d'une LED2
-d'une LED3
-d'un interrupteur1
-d'un interrupteur2

je vous explique :
le pic est alimenter en permanence ( jour et nuit )
1_si il détecte qu'un interrupteur1 ( relier au pic ) qui est normalement ouvert ce ferme.
2_il colle un relais1 et allume une LED1 qui se trouveraient sur une sortie du pic ( par exemple RB3…) pendent 5 minutes.
3_puis si après ce délais un deuxième interrupteur2 ( ici un poussoir ) n'a pas été appuyée.
4_il colle un deuxième relais2 ( donc qui se trouveraient sur autre sortie du pic ) et allume une deuxième LED2 pendent de nouveau 5 minutes( donc à ce moment là les deux relais sont collés et les deux LEDs sont allumés )
5_puis passer ce délais si l'interrupteur2 n'a toujours pas été appuyée.
6_le relais2 ce décolle et la LED2 s'éteint.
7_quand l' interupteur2 est appuyer le relais1 ce décolles la LED1 s'éteint
8_une LED3 s'allume tant que l'interrupteur1 est n'est pas en position ouvert.
9_quand l'interrupteur1 est ouvert ( donc en état de repos ) le system est prés à redémarré un processus ( si l'interrupteur1 ce ferme de nouveau ).

Si aux étapes 3 ou 5 l'interrupteur2 est appuyer les Relais1, Relais2 se décollent et les LED1, LED2 s'éteignent. Et on passe directement à l'étape 8.

Je pense que ce n'est pas très compliquer à réaliser parce que le PIC n'a pas de calcules à faire. J'aimerais bien que vous m'aidiez pour la programmation en m'expliquant les codes à inscrire et l'architecture du programme…

Si vous avez des questions sur le system ou si je n'est pas été très clair et que vous avez besoin de précisions, poser moi des questions.

Je vous remercie beaucoup pour votre aide

**abracadabra75** · 08/02/2007, 10h20

Bonjour.
Prends le cours de l' incontournable Maître des PIC's: Bigonoff. (Google-un-coup).
Tu sauras faire tout ça (et encore plus) quand tu auras assimilé son cours.
Bon courage.
A+

**Raphael2** · 08/02/2007, 11h18

salut, je connais son cour, j'ai deja reussi à faire clignoter une led!
mais peut-tu m'aider à faire cela ?
merci

**marmotte** · 08/02/2007, 11h33

Envoyé par Raphael2

salut, je connais son cour, j'ai deja reussi à faire clignoter une led!
mais peut-tu m'aider à faire cela ?
merci

Si tu as lu son court je ne vois pas ce qui te genes dans la programmation d un tel algo somme toute assez simple, tu as uniquement un timer a mettre en oeuvre (2 pour les appuis sur boutons poussoirs si tu fais un anti rebond logiciel), le restant etant de la scrutation de port, et la mise a 1 ou 0 des sorties correspondantes en fonction des actions reconnues en entrée.

En gros je ferai de la sorte:

Une boucle Main qui scrute tes deux entrées BP, dès qu un changement de niveau est détécté tu rentres dans ta routine de gestion des sorties (routine suivant l'algo que tu nous as ecrit)

Bon courage

A voir en vidéo sur Futura · Aujourd'hui

**Raphael2** · 08/02/2007, 13h05

Salut, merci
Les cours de Bigonoff sont pour un 16f84 et moi je vais utiliser un 16f628
Et j'ai relu ces cours mais je ne comprend pas quels commandes je doit utilisés et je ne sais pas bien par ou commencer…
Peut-tu m'éclairer ?
Merci encore

**marmotte** · 08/02/2007, 13h23

Envoyé par Raphael2

Salut, merci
Les cours de Bigonoff sont pour un 16f84 et moi je vais utiliser un 16f628
Et j'ai relu ces cours mais je ne comprend pas quels commandes je doit utilisés et je ne sais pas bien par ou commencer…
Peut-tu m'éclairer ?
Merci encore

Si tu sais programmer un 16F84, tu sais programmer un 16F628!

Il ne suffit pas le "lire" ses cours, mais de les comprendre

. Je ne vois pas qu'est ce que je peux faire de plus pour toi a part te faire ton programme, tu as tous les outils necessaires.

Si tu ne donnes pas de bout de code a debugger, ou un debut de solution on ne peut rien faire, a part je repette ecrire le programme...

D'ailleurs, pourquoi un 16f628 specialement et pas un 16f84?

**freepicbasic** · 08/02/2007, 14h17

Application faite avec FreePicbasic
Compilé, mais non testé a partir du cahier des charges donné sur le post 1
Compilateur;
http://perso.orange.fr/pat.deaubonne...asic/index.htm
http://perso.orange.fr/pat.deaubonne/pic/index.htm

Voir si la logique correspond exactement et la configuration des bits , car aucun plan n'est fourni.

J'en déduit ce Cablage;
quartz 4mhz
mclr actif donc au + avec resistance

RB0 = inter1
RB1 = inter2
RB2 = relais 1
RB3 = Led1
RB4 = relais 2
RB5 = Led 2
RB6 = Led 3

Ne pas oublier les diodes de "roue libre" sur les transistors de commande relais.

A+
pat

fichier Bas

Code:

	' 	Nom du processeur
	device	16f628
	'	define le type entrée ou Sortie 0 pour sortie

asm { __CONFIG 03F09H }
' OSC XT
' CP OFF
' WD OFF
' PWRT OFF
' MCLR ON
' BOD OFF

dim mn,sec

INIT PORTA 11111111
INIT PORTB 11000011


START:
' remise a zéro départ
PORTB=0 ' éteind tout

WaitInter1:

	BTFSC PORTB,0	' inter1 ?
	goto WaitInter1	' non

	BSF	PORTB,2	' relais 1
	BSF	PORTB,4	' relais 2

' attente de 5 minutes
	for mn=1 to 150  ' 150  fois  x 2 secondes
		for sec=1 to 100  ' attente de 2 sec
			delayms(20)

			BTFSS PORTB,0 ' inter 1?
			BSF PORTB,6   ' oui alumé LED3

			BTFSS PORTB,1 ' inter 2	?
			goto Start	  ' oui redémarre !	
		next mn
	next sec

' attente de 5 minutes
	BSF	PORTB,3	' relais 2
	BSF	PORTB,5	' LED 2

	for mn=1 to 150  ' 150  fois  x 2 secondes
		for sec=1 to 100  ' attente de 2 sec
			delayms(20)

			BTFSS PORTB,0 ' inter 1?
			BSF PORTB,6   ' oui alumé LED3

			BTFSS PORTB,1 ' inter 2
			goto Start	  ' oui arreté
		next mn
	next sec

	BCF	PORTB,3 ' relais 2 off
	BCF	PORTB,5 ' led2 off

WaitEndInter1:
	BTFSC PORTB,0		' inter1 ?
	goto WaitEndInter1	' oui alors attendre

	' redémarre et eteind tout
	goto start
end

fichier ASM

Code:

;*******************************************
;* PICBASIC.EXE version 3.18 (Win32 Console)  du 12/02/2006
;*         Compatible Basic Stamp
;* Auteur: Deaubonne Patrick 
;* Email:  Pat.Deaubonne@wanadoo.fr
;* url:
;*   http://perso.wanadoo.fr/pat.deaubonne
;*        ' '              /pic/index.htm
;*******************************************
;* C:\PIC\PICBASIC\automat.ASM
;*******************************************

W	equ	00
F	equ	01

CY	equ	00
Z	equ	02
;-------- '       Nom du processeur --------
;-------- device  16f628 --------

	List	p=16F628 ,r=DEC

#include <P16F628.INC>

bnk0	macro
	bcf	STATUS,RP0
	bcf	STATUS,RP1
	endm

bnk1	macro
	bsf	STATUS,RP0
	bcf	STATUS,RP1
	endm

bnk2	macro
	bcf	STATUS,RP0
	bsf	STATUS,RP1
	endm

bnk3	macro
	bsf	STATUS,RP0
	bsf	STATUS,RP1
	endm

w_temp  	EQU 071H ; svg registre W
status_temp	EQU 072H ; svg status swappé
FSR_temp	EQU 073H ; svg FSR
PCLATH_temp	EQU 074H ; svg PCLATH

	goto _START_PIC
	nop
	nop
	nop
	GOTO _INT_PIC
_START_PIC
;-------- '       define le type entrée ou Sortie 0 pour sortie --------
;-------- asm { __CONFIG 03F09H } --------
 __CONFIG 03F09H 
;' OSC XT
;' CP OFF
;' WD OFF
;' PWRT OFF
;' MCLR ON
;' BOD OFF
;-------- dim mn,sec --------
MN	equ	48
SEC	equ	49
;-------- INIT PORTA 11111111 --------
	bsf	STATUS,RP0
	movlw	255
	movwf	TRISA
	bcf	STATUS,RP0
;-------- INIT PORTB 11000011 --------
	bsf	STATUS,RP0
	movlw	195
	movwf	TRISB
	bcf	STATUS,RP0
;-------- START:  --------
START
;' remise a zéro départ
;-------- PORTB = 0 ' éteind tout --------
	clrw
	movwf	PORTB
;-------- WaitInter1:  --------
WAITINTER1
;-------- BTFSC PORTB,0   ' inter1 ? --------
	btfsc	PORTB,0
;-------- goto WaitInter1         ' non --------
	goto	WAITINTER1
;-------- BSF     PORTB,2         ' relais 1 --------
	bsf	PORTB, 2
;-------- BSF     PORTB,4         ' relais 2 --------
	bsf	PORTB, 4
;' attente de 5 minutes
;-------- for mn = 1 to 150  ' 150  fois  x 2 secondes --------
	movlw	1
	movwf	MN
pb_lab1
;-------- for sec = 1 to 100  ' attente de 2 sec --------
	movlw	1
	movwf	SEC
pb_lab2
;-------- delayms( 20 ) --------
	movlw	20
	call	_DELAYMS
;-------- BTFSS PORTB,0 ' inter 1? --------
	btfss	PORTB,0
;-------- BSF PORTB,6   ' oui alumé LED3 --------
	bsf	PORTB, 6
;-------- BTFSS PORTB,1 ' inter 2         ? --------
	btfss	PORTB,1
;-------- goto Start        ' oui redémarre !      --------
	goto	START
;-------- next mn --------
	incf	MN,F
	movlw	150
	movwf	32
	movf	MN,W
	subwf	32,W
	btfss	STATUS,Z
	goto	pb_lab1
;-------- next sec --------
	incf	SEC,F
	movlw	100
	movwf	32
	movf	SEC,W
	subwf	32,W
	btfss	STATUS,Z
	goto	pb_lab2
;' attente de 5 minutes
;-------- BSF     PORTB,3         ' relais 2 --------
	bsf	PORTB, 3
;-------- BSF     PORTB,5         ' LED 2 --------
	bsf	PORTB, 5
;-------- for mn = 1 to 150  ' 150  fois  x 2 secondes --------
	movlw	1
	movwf	MN
pb_lab4
;-------- for sec = 1 to 100  ' attente de 2 sec --------
	movlw	1
	movwf	SEC
pb_lab5
;-------- delayms( 20 ) --------
	movlw	20
	call	_DELAYMS
;-------- BTFSS PORTB,0 ' inter 1? --------
	btfss	PORTB,0
;-------- BSF PORTB,6   ' oui alumé LED3 --------
	bsf	PORTB, 6
;-------- BTFSS PORTB,1 ' inter 2 --------
	btfss	PORTB,1
;-------- goto Start        ' oui arreté --------
	goto	START
;-------- next mn --------
	incf	MN,F
	movlw	150
	movwf	32
	movf	MN,W
	subwf	32,W
	btfss	STATUS,Z
	goto	pb_lab4
;-------- next sec --------
	incf	SEC,F
	movlw	100
	movwf	32
	movf	SEC,W
	subwf	32,W
	btfss	STATUS,Z
	goto	pb_lab5
;-------- BCF     PORTB,3 ' relais 2 off --------
	bcf	PORTB, 3
;-------- BCF     PORTB,5 ' led2 off --------
	bcf	PORTB, 5
;-------- WaitEndInter1:  --------
WAITENDINTER1
;-------- BTFSC PORTB,0           ' inter1 ? --------
	btfsc	PORTB,0
;-------- goto WaitEndInter1      ' oui alors attendre --------
	goto	WAITENDINTER1
;-------- ' redémarre et eteind tout --------
;-------- goto start --------
	goto	START
;-------- end --------
;****** Library Area Page 3 ******
;*********************************
;
;****** Library Area ******
;**************************
;
	sleep
	goto	_START_PIC
;**************************
;****** Library Area ******
_RAM equ 32
_RAM1 equ 33
_RAM2 equ 34
_RAM3 equ 35
_RAM4 equ 36
_RAM5 equ 37
_RAM6 equ 38
_RAM7 equ 39
_FLAGS equ 40
_PIN equ 41
_DELAYMS
	movwf	_RAM1
	clrf	_RAM
pb_lab7
	nop
	nop
	decfsz	_RAM,F
	goto	pb_lab7
	decfsz	_RAM1,F
	goto	pb_lab7
	retlw	0
;****** Library Area ******
;**************************
;

;
;***************************
;******* PRINT AREA *******
;******* PRINT AREA *******
;******* STRING AREA *******
;=======  No String  =======
;******* STRING AREA *******
;***************************
;

_INT_PIC
	RETFIE
	end

fichier HEX

Code:

:10000000052800000000000055288316FF308500F9
:1000100083128316C33086008312000186000618FF
:100020000F28061506160130B0000130B10014305B
:100030004C20061C0617861C0D28B00A9630A0001E
:1000400030082002031D1528B10A6430A0003108D1
:100050002002031D1728861586160130B0000130D6
:10006000B10014304C20061C0617861C0D28B00A5F
:100070009630A00030082002031D2F28B10A6430FA
:10008000A00031082002031D3128861186120618AF
:1000900047280D2863000528A100A00100000000EA
:0C00A000A00B4E28A10B4E2800340900D4
:02400E00093F68
:00000001FF

**Raphael2** · 08/02/2007, 17h42

Merci beaucoup pour ce programme, j'essail de comprendre l'Assembleur mais je voi pas ou sont les routines de temporisation...
je comprend pas trop...
donc pour que sa marche il faut un Quartz externe ?
et je doit faire des anti-rebons ?
merci encore

**Raphael2** · 08/02/2007, 18h45

J'ai fait le schéma peut-tu me dire si c'est ok,
Je ne sais pas ou relier les interrupteurs, au plus? Au moin? Avec un anti-rebond ?
Et comment doit ton alimenter le PIC ?
Merci beaucoup pour toute ton aide

**Raphael2** · 08/02/2007, 18h53

voila: http://img265.imageshack.us/my.php?image=essail2fv6.gif

**freepicbasic** · 08/02/2007, 20h20

pour l'anti rebond vu l'algorythme cela ne semble pas nécessaire, puisque chaque étape est déclenchée pour 5 minutes.
Pour le schema il manque le quartz et ses 2 capas.
5 Volts pour le Pic, le datasheet spécifie de 3 à 5.5 volts.

**freepicbasic** · 08/02/2007, 20h25

Pour les tempos il y a des boucles avec un "delayMs(20)" de base soit 20ms
20ms x 100 = 2000ms soit 2 secondes
2 secondes x 150 = 300 secondes = 5 minutes

Pendant ce temps on fait un pooling des boutons afin de réagir aussitot.

**freepicbasic** · 08/02/2007, 20h31

verifier le code apparement mon commentaire ne correspond pas au code j'ai mis dans le code;
RB0 = inter1
RB1 = inter2
RB2 = relais1
RB3 = relais2
RB4 = LED1
RB5 = LED2
RB6 = LED3
donc reprendre le prog ou adapter le schéma .

**Raphael2** · 09/02/2007, 11h22

Merci pour ces précision!
J'ai compris pour le DelayMs(20) !
Je ne sais pas où connecter le Quartz de 4Mhz.
je ne sais pas ou connecter les alimentation pour le pic,
les interrupteurs vont à la masse ou au + ?
et c'est bon pour mes relais avec la diode ?
Désoler de te poser toutes ces questions...
Je te remercie

**freepicbasic** · 09/02/2007, 14h11

pin 15, 16 quartz et 2 x 33pf entre pin 15 et masse ,16 et masse
+5V pin 14
gnd pin 5

pour les inters;
pin 7,6 mettre une 10 k au plus et un contact avec la masse

Le mode RBPU pourrait fonctionner sans les 10K

relais diodes 0K

**Raphael2** · 09/02/2007, 19h22

merci, super!
donc j'ai rectifier mon dessin :
http://img106.imageshack.us/my.php?image=essail2jq1.gif
par contre je suis pas sur pour les interupteurs, et pour la resistance qui est entre la PIN4 et le + je met quel valeur ?
je te remercie encore

**freepicbasic** · 09/02/2007, 22h55

pour les inter mettre une 10k sur chaque pin du pic (7 et 6) et le + (pull up)
connecter les inter un coté masse l'autre sur 7 et l'autre 6

**Raphael2** · 10/02/2007, 11h08

Ok, merci encore une fois
donc je crois que c'est bon, j'ai rectifié comme ça :

mais il me reste une dernière question quelle valeur je doits mettre pour la résistance que j'ai colorée en vert ?
merci

**freepicbasic** · 10/02/2007, 11h17

pas de resistance en vert sur le schema !

Le Mclr 10k on standardise...
pour les leds 330 ohms pour ~ <10ma ,ou 1k pour faible luminosité et économie.

Attention le pic est limité à 30ma au total !
330 ohms est donc deja un maximum pour 3 leds allumées et 2 relais (4.7K sur le schéma).

**Raphael2** · 10/02/2007, 11h52

Dacord, donc je ne met pas de resistance " vert " je relie direct au +5Vcc, le Mclr c'est bien la pin 4 ?
oui tu a raison, il faut que je fasse atention à la conso. total!
merci

**Gérard** · 10/02/2007, 12h01

Je trouve que FreePicBasic a beaucoup de mérite, tout ce qu'il t'a dit est dans les cours de Bigonoff.
Les as-tu vraiment lu ? Au vu de tes questions, j'en doute.
Il ne faut pas tout attendre des autres et montrer ce que tu sais faire.

**Raphael2** · 10/02/2007, 12h32

Envoyé par Gérard

Je trouve que FreePicBasic a beaucoup de mérite, tout ce qu'il t'a dit est dans les cours de Bigonoff.
Les as-tu vraiment lu ? Au vu de tes questions, j'en doute.
Il ne faut pas tout attendre des autres et montrer ce que tu sais faire.

salut, oui je remercie beaucoup FreePicBasic pour son aide,
j'ai lu les cours de Bigonoff, mais ne n'arrive pas à realiser un programme, je connais quelques phrases mais je ne sais pas trop bien comment m'en servir...

**DavidDB** · 10/02/2007, 19h51

Salut Freepicbasic,

Pour la consommation maximale sur le 16F628 c'est :

25mA max par I/O, 200mA max par PORT et 200mA max pour les PORTA et PORTB combinés...

David.

**Raphael2** · 10/02/2007, 20h15

Merci pour ta precision DaviDB, es-ce que le schema que j'ai posté en #20 est correcte ? il ne manque rien ?
merci

**Gérard** · 10/02/2007, 20h40

Je mettrais encore une capa de 100nF au plus près des broches d'alim du PIC.

Attention aussi au cablage, la commutation des relais risque de perturber le fonctionnement du PIC.

**freepicbasic** · 10/02/2007, 20h57

pas de resistance en vert sur le schema !

Je voulais dire par là que le schéma affiché chez moi , il n'y a pas de vert, donc la résistance verte, je ne sais pas laquelle c'était.
Apparement la bonne , coup de bol , LOL

25mA max par I/O, 200mA max par PORT et 200mA max pour les PORTA et PORTB combinés...

Effectivement j' étais resté avec les valeurs du Pic16F84.
Décidément ce 628 me surprend souvent.
Ce méfier aussi du mclr programmable et du portA en AN comme sur le 876.

Je mettrais encore une capa de 100nF au plus près des broches d'alim du PIC.

Oui , il manquait ça aussi, en mettre aussi sur le régulateur.

Attention aussi au cablage, la commutation des relais risque de perturber le fonctionnement du PIC.

oui, Mettre un chimique de 330µf 6,3v sur le 5V

**Raphael2** · 11/02/2007, 11h03

Merci pour ta réponse,

Je voulais dire par là que le schéma affiché chez moi , il n'y a pas de vert, donc la résistance verte, je ne sais pas laquelle c'était.
Apparement la bonne , coup de bol , LOL

A ok, lol je n'avais pas compris.. sa tombe bien si c'est la bonne que j'ai enlevée!

Oui , il manquait ça aussi, en mettre aussi sur le régulateur 7805.

Ok, j'ai rajouter des condos, sur les broches d'alim. du PIC mais tu dit qu'il faut que j'en mette sur le régulateur mais où ? à la sortie +5Vcc et au - commun ?

oui, Mettre un chimique de 330µf 6,3v sur le 5V

je le met à la sortie +5Vcc du 7805, c'est sa ?

merci encore

**Gérard** · 11/02/2007, 11h31

Tu ne dois pas alimenter le PIC au travers de 2 condos !
Le +5V broche 14, le 0V broche 5 et un condo de 100nF entre 5 et 14.
Ce que tu as dessiné n'est pas conforme.

**Raphael2** · 11/02/2007, 12h07

Ok, merci! donc voila ce que j'ai fait ( c'est vrais c'est pas tres corecte comme schéma...)

le chimique de 330µf 6,3v sur le 5V je le met à la sortie +5Vcc du 7805, c'est sa ?
merci

**freepicbasic** · 11/02/2007, 12h16

le chimique de 330µf 6,3v sur le 5V je le met à la sortie +5Vcc du 7805, c'est sa ?
merci

oui , entre pin 5 et 14 ainsi que le 100nf lui le plus près possible du pic, le chimique peu être plus loin.
Pour le 7805 100nf entre l'entrée et la masse et entre la sortie et la masse au plus près des pins .
Les 7805 ont tendance à osciller si on ne les découplent pas...

Automatisme avec un PIC...

Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Re : Automatisme avec un PIC...

Discussions similaires

Pb avec vitesse de quartz avec montage PIC

Probleme avec pic

programmer en CCS(pic c) un échantillonneur bloqueur reliée avec pic 16f877

PIC avec CAN

Pb avec un pic