Nuevo en el Foro
Registrado: 21 Jul, 2009
Mensajes: 3
|
| eske tengo estos nemonicos y pues me marca error y pues nos e ke puedo hacer por ke ya me desepere ayudenme pleaseeee....
y me marca error en include no se por ke ....
INCLUDE "2313DEF.INC"
.DEF TEMP=R16
.DEF Segundos=R17
.DEF AUX= R18
.ORG 0×0
RJMP main "vector" del reset"
.ORG 0×6
RJMP int "vector" del tiempo
Main: LDI TEMP,$34
OUT TCCR0,TEMP ;configura el prescaler=256
LDI TEMP,$DF
OUT SPL,TEMP ;Inicializa el puntero de la pila
LDI TEMP,256-39
OUT TCNTO,TEMP ;Carga 256-39 en el registro TCNTO.
LDI TEMP,0x2
OUT TOIE0,TEMP ;Habilita la generacion de interruptores por TOVO
SEI ;Habilitacion de interruptores en el SREG.
CLR sEGUNDOS
CLR AUX
LDI TEMP,$1F
OUT DDRD,TEMP :Configura los pines del puerto B como salidas que activan las luces de los semaforos 1 y 3
OUT DDRD,TEMP :Configura los pines del puerto D como salidas que activan las luces de los semaforos 2 y 4
s0: LDI TEMP,$11
OUT PORTB,TEMP ; activa luces del semaforo 1 segun el estado S0
LDI TEMP ,$0C
OUT PORTD, TEMP ;activa luces del semaforo 2 segun el estado S0
CPI Segundos,20
BRCS Espera S0
SI: SBRS Segundos 0 ; comprueba si el bit 0 de la variable segundos es 0 o 1
RJMP Salto SI
CBI PORTB,4 ;apaga verde de peaton
RJMP Espera SI
salto SI SBI PORTB,4 ;activa verde de peaton
Espera SI: CPI Segundos,25
BRCS SI
S2: OUT PORTD,$A ; activa luz ambar y apaga la luz roja del semaforo 2
bucle S2 SBRS Segundos,0 ;comprueba si el bit 0 de la variable segundos es 0 o 1.Dependiendio de su valor se activa o no la luz verde de peaton.
RJMP salto S2
CBI PORTB,4 ;apaga verde de peaton
RJMP Espera S2
salto S2 sBI PORTB,4 ;activa verde de peaton
Espera S2: CPI Segundos,30
BRCS Bucle S2
S3: LDI TEMP ,$0
OUT PORTB,TEMP ;activa luces del semaforo 1 segun el estado S3
LDI TEMP, $11
OUT PORTD,TEMP ;activa luces del semaforo 2 segun el estado S3
Espera S3: CPI Segundos,50
BRCS Espera S3
S4: SBRS Segundos,0 ;Comprueba si el bit 0 de la variable segundos es 0 o 1. dependiendo de su valor, se activa, o no, la luz verde de peaton.
RJMP Salto S4
CBI PORTD,4 ;Apaga verde de peaton
RJMP EsperaS4
Salto S4: SBI PORTD,4 ;Activa verde de peaton
Esapea S4 CPI Segundos,0
BRCS S4
S5: OUT PORT,4 ;Activa verde de peaton
BucleS5 SBRS Segundos,0 ;Comprueba si el bit 0 de la variable segundos es 0 o 1. dependiento de su valor, se activa, o no, la luz verde de peaton.
RJMP saltoS5
CBI PORTD,4 ;Apaga verde de peaton
RJMP EsperaS5
saltoS5 SBI PORTD,4 ;Activa verde de peaton
EsperaS5: CPI Segundos, 60
BRCS Segundos ;Borra la variable segundos, para iniciar nuevo ciclo
RJMP S0 ;Vuelve al estado S0.
Int: PUSH TEMP
IN TEMP,SREG
PUSH TEMP
LDI TEMP,256-39
OUT TCNTO,TEMP ;Carga 256-39 en el registro TCNTO.
INC AUX
CPI AUX,100
BRNE Fin_int
INC Segundos
CLR AUX
POP TEMP
OUT SREG,TEMP
POP TEMP
Fin_int RETI | |
| |
| |
|
FAQ
Buscar
Registrarse
Entre para ver sus mensajes privados
Login
