Tarea 8
Tarea 8
Tarea 8
Pseudocdigo
INICIO
Leer interruptor X
Si conta=0
desactiva interruptor
leer otro interruptor
Si interruptor=0
activado
repite hasta puerto D se desactive
FIN
Programa
.NOLIST
.INCLUDE "8515def.inc"
.LIST
rjmp inicio
inicio:
ser r16
out DDRB,r16
clr r16
out DDRD,r16
loop:
sbi PORTB,7
ldi r30,3
retraso1:
dec r30
breq sigue1
rjmp retraso1
sigue1:
cbi PORTB,7
cbi PORTB,5
sbi PORTB,4
ldi r30,3
retraso4:
dec r30
breq sigue4
rjmp retraso4
sigue4:
cbi PORTB,4
sbi PORTB,3
ldi r30,3
retraso5:
dec r30
breq sigue5
cbi PORTB,3
sbi PORTB,2
ldi r30,3
retraso6:
dec r30
breq sigue6
rjmp retraso6
sigue6:
cbi PORTB,2
sbi PORTB,1
ldi r30,3
retraso7:
dec r30
breq sigue7
rjmp retraso7
sigue7:
cbi PORTB,1
sigue:
in r16,PIND
andi r16,0b00000001
brne loop
fin:
rjmp fin