Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- .NOLIST
- .INCLUDE "m128def.inc"
- .LIST
- init:
- .DEF presun = r16
- .DEF data = r17
- .DEF pozice = r18
- .DEF test = r19
- ldi pozice, 3
- ldi presun, low(RAMEND) ;nastaveni zasobniku
- out spl, presun
- ldi presun, high(RAMEND)
- out sph, presun
- ldi presun, 0xFF ;nastaveni portu vystupnich periferiich
- out DDRB, presun
- out DDRD, presun
- ldi r16, 103
- out UBRR0L, r16
- ; Enable receiver and transmitter
- ldi r16, (1<<RXEN0)|(1<<TXEN0)
- out UCSR0B, r16
- ; Set frame format: 8data, 2stop bit
- ldi r16, (1<<USBS0)|(1<<UCSZ01)|(1<<UCSZ00)
- sts UCSR0C, r16
- USART_Receive:
- sbis UCSR0A, RXC0
- jmp USART_Receive
- ; Get and return received data from buffer
- in presun, UDR0
- //za predpokladu ze v presun mame data
- testzero:
- cpi presun, 0b00000000
- brne testone
- jmp lightzero
- testone:
- cpi presun, 0b00000001
- brne testtwo
- jmp lightone
- testtwo:
- cpi presun, 0b00000010
- brne testthree
- jmp lighttwo
- testthree:
- cpi presun, 0b00000011
- brne testfour
- jmp lightthree
- testfour:
- cpi presun, 0b00000100
- brne testfive
- jmp lightfour
- testfive:
- cpi presun, 0b00000101
- brne testsix
- jmp lightfive
- testsix:
- cpi presun, 0b00000110
- brne testseven
- jmp lightsix
- testseven:
- cpi presun, 0b00000111
- brne testeight
- jmp lightseven
- testeight:
- cpi presun, 0b00001000
- brne testnine
- jmp lighteight
- testnine:
- cpi presun, 0b00001001
- brne testzero
- jmp lightnine
- lightzero:
- ldi data, 0xFC
- out PORTB, data
- out PORTD, pozice
- jmp USART_Receive
- lightone:
- ldi data, 0xE0
- out PORTB, data
- out PORTD, pozice
- jmp USART_Receive
- lighttwo:
- ldi data, 0xDA
- out PORTB, data
- out PORTD, pozice
- jmp USART_Receive
- lightthree:
- ldi data, 0xF2
- out PORTB, data
- out PORTD, pozice
- jmp USART_Receive
- lightfour:
- ldi data, 0x66
- out PORTB, data
- out PORTD, pozice
- jmp USART_Receive
- lightfive:
- ldi data, 0xB6
- out PORTB, data
- out PORTD, pozice
- jmp USART_Receive
- lightsix:
- ldi data, 0xBE
- out PORTB, data
- out PORTD, pozice
- jmp USART_Receive
- lightseven:
- ldi data, 0xE0
- out PORTB, data
- out PORTD, pozice
- jmp USART_Receive
- lighteight:
- ldi data, 0xFE
- out PORTB, data
- out PORTD, pozice
- jmp USART_Receive
- lightnine:
- ldi data, 0xF6
- out PORTB, data
- out PORTD, pozice
- jmp USART_Receive
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement