.include "m8def.inc"			;загрузка предопределений для ATmega8
.list							;подключение генерации листинга

.cseg							;начало сегмента кода
.org 0x00						;начальное значение для адресации

								;========== Векторы прерываний =======
			  



								;== инициализация стека ===
		  ldi   R16,low(RAMEND) ;скопируем в R16 младщий байт из константы RAMEND, которая определена в m8def.inc и хранит размер SRAM
          out   SPL,R16         ;скопируем значение из R16 в SPL
          ldi   R17,high(RAMEND);скопируем в R16 старший байт из константы RAMEND, которая определена в m8def.inc
          out   SPH,R17         ;скопируем значение из R17 в SPH

								;====== Инициализация портов ВВ
		  ldi R16, 0b00000001
		  out DDRB, R16

								 ; === Начало программы ===

main: 
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi

			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi

			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall hi
			rcall lo
			rcall lo
			rcall lo
			rcall lo
			rcall lo
			rcall lo
			rcall lo
			rcall lo
			rcall lo
			rcall lo
			rcall lo
			rcall lo
			rcall lo
			rcall lo
			rcall lo
			rcall lo
			rcall reset





hi:
			sbi PORTB, 0
		    ldi  r18, 4
L1:			dec  r18
			brne L1
			cbi PORTB, 0
			ret

lo:
			sbi PORTB, 0
			lpm
			cbi PORTB, 0
			ldi  r18, 4
L2:			dec  r18
			brne L2
			ret

reset:
			    ldi  r18, 2
				ldi  r19, 8
L3:				dec  r19
				brne L3
				dec  r18
				brne L3
				rjmp main
				