From: hackbard Date: Sat, 17 Jun 2006 12:53:06 +0000 (+0000) Subject: added ports/uart test code for atmega32 X-Git-Url: https://hackdaworld.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=9d55aec060472da1faa198e7068d82cbd62a2cd3;p=my-code%2Fatmel.git added ports/uart test code for atmega32 --- diff --git a/beginners/test_ports_uart.asm b/beginners/test_ports_uart.asm new file mode 100644 index 0000000..f870a3e --- /dev/null +++ b/beginners/test_ports_uart.asm @@ -0,0 +1,94 @@ +; +; test all ports and uart +; + +.include "../include/m32def.inc" + +INIT: + + ; all ports outputs + ldi r16,0xff + out DDRA,r16 + out DDRB,r16 + out DDRC,r16 + out DDRD,r16 + + ; uart baudrate (8mhz -> 38.4k) + enable + ldi r16,0 + out UBRRH,r16 + ldi r16,12 + out UBRRL,r16 + sbi UCSRB,TXEN + + ; led counter + ldi r17,0 + ; loop counter + ldi r18,0 + +MAINLOOP: + + ; reset loop counter + ldi r18,0 + + ; the delay loop + LOOP: + + ; the dely loop in the delay loop + ldi r22,0 + INNERLOOP: + + inc r22 + cpi r22,0xff + brne INNERLOOP + + ; increase loop counter + inc r18 + + ; check loop counter + cpi r18,0xff + + ; continue if loop counter = 0xff + ; else do loop again + brne LOOP + + ; shift the led counter + lsl r17 + + ; set first bit if led counter is equal zero + cpi r17,0 + brne LEDOUT + ldi r17,1 + + ; drive the leds + LEDOUT: + ldi r21,0xff + sub r21,r17 + out PORTA,r21 + out PORTB,r21 + out PORTC,r21 + out PORTD,r21 + + ; get the number we want to transmit + mov r19,r17 + ldi r20,0x30 ; ascii 0 + GETNUMBER: + + lsr r19 + inc r20 + cpi r19,0 + brne GETNUMBER + + ; uart transmit + UARTOUT: + + ; try again if uart not ready + sbis UCSRA,UDRE + rjmp UARTOUT + + ; transmit the number + out UDR,r20 + + ; loop forever + rjmp LOOP + +; eof