;
; Labb3 chapter 1 försök2.asm
;
; Created: 2019-02-15 13:55:05
; Author : da3684bl-s
;

//delay på cirka 0.1 s

#define DDRB 0x04
#define PORTB 0x05
#define LED2 2
#define decreaser 139

start:
	ldi r18, (1<<LED2)
	ldi r24, (0<<LED2)
	in r17, DDRB
	or r17, r18
	out DDRB, r18
	in r17, PORTB
	or r17, r18


	call ledblink

end:
	rjmp end


	delay:
		ldi r20, decreaser
			l1:
			 r21, ldidecreaser
				l2:
				ldi r22, decreaser
					l3:
					dec	r22
					brne l3
					dec r21
					brne l2
					dec r20
					brne l1
	ret

	ledon:
		ldi r18, (1<<LED2)
		in r17, DDRB
		or r17, r18
		out DDRB, r18
		in r17, PORTB
		or r17, r18
		out PORTB, r18
	ret

	ledblink:

		out PORTB, r18
		call delay
		out PORTB, r24
		call delay
		rjmp ledblink



/*
start:
	ldi r20, 5
	ldi r21, 5
	ldi r22, 5


	call loop

	end:
	rjmp end

	l1:
		dec r20
		brne l1
			dec r21
			brne l1
				dec r22
				brne l1
		nop
	ret

	ledon:
		ldi r18, (1<<LED2)
		in r17, DDRB
		or r17, r18
		out DDRB, r18
		in r17, PORTB
		or r17, r18
		out PORTB, r18


	ret
	ledoff:
		ldi r18, (0<<LED2)
		in r17, DDRB
		or r17, r18
		out DDRB, r18
		in r17, PORTB
		or r17, r18
		out PORTB, r18


	ret

	loop:
		call ledon
		call l1
		call ledoff
		call l1
		rjmp loop

*/