Tarea 8

Descargar como docx, pdf o txt
Descargar como docx, pdf o txt
Está en la página 1de 4

TAREA 8 INSTRUCCIONES DE ENTRADA-SALIDA

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

TAREA 8 INSTRUCCIONES DE ENTRADA-SALIDA


sbi PORTB,6
ldi r30,3
retraso2:
dec r30
breq sigue2
rjmp retraso2
sigue2:
cbi PORTB,6
sbi PORTB,5
ldi r30,3
retraso3:
dec r30
breq sigue3
rjmp retraso3
sigue3:

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

TAREA 8 INSTRUCCIONES DE ENTRADA-SALIDA


rjmp retraso5
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

TAREA 8 INSTRUCCIONES DE ENTRADA-SALIDA

También podría gustarte