Форум arduino.ua

		.DSEG		; Сегмент ОЗУ
		.CSEG
		.org 0                 ;Задание нулевого адреса старта программы
		rjmp reset          ;Безусловный переход к метке reset
		.org 1
		reti ;Prer
		.org 2
		reti ;Pin Change Interrupt0
		.org 3
		reti ;timer0_ovf 
		.org 4
		reti ;EEPROM write complete
		.org 5
		reti ;Analog Comparator Interrupt
		.org 6
		reti ;timerA;Timer_Counter0A; Compare Match A
		.org 7
		reti ;Timer_Counter0B; Compare Match B
		.org 8
		reti ;Watchdog Timeout
		.org 9
		reti ;conversion;ADC Conversion Complete Handle 
reset:	

		wdr; Reset Watchdog Timer
		;ldi r16,24
		;out WDTCR, r16;
		;ldi r16,12 
		;out WDTCR, r16;
		LDI	ZL,Low(SRAM_START)	; Адрес начала ОЗУ в индекс
		LDI	ZH,High(SRAM_START)
		CLR	R16			; Очищаем R16
Flush:	ST 	Z+,R16			; Сохраняем 0 в ячейку памяти
		CPI	ZH,High(RAMEND+1)	; Достигли конца оперативки?
		BRNE	Flush			; Нет? Крутимся дальше!
		CPI	ZL,Low(RAMEND+1)	; А младший байт достиг конца?
		BRNE	Flush
		CLR	ZL			; Очищаем индекс
		CLR	ZH
		LDI	ZL, 30		; Адрес самого старшего регистра	
		CLR	ZH		; А тут у нас будет ноль
		DEC	ZL		; Уменьшая адрес
		ST	Z, ZH		; Записываем в регистр 0
		BRNE	PC-2		; Пока не перебрали все не успокоились		
		ldi r16, RAMEND ;Загрузка в регистр r16 адреса верхней границы ОЗУ
		out SPL, r16


		cbi DDRB, 0
		cbi PORTB, 0
		cbi DDRB, 1
		cbi PORTB, 1
		cbi DDRB, 2
		cbi PORTB, 2
		cbi DDRB, 3
		cbi PORTB, 3
		cbi DDRB, 4
		sbi PORTB, 4
		ldi r16,0

main:

sbic PINB,1 ;пропустить если бит в регистре очищен
rjmp t_in_test

		sbi DDRB, 0 ; установить
		cbi DDRB, 2 ;out очистить
		cbr r16, 1 ; очистить бит 0 в r16

rjmp main

t_in_test:
		sbrc r16, 0 ; Пропустить если бит 0 в r16 очищен
rjmp rxrid
		cbi DDRB, 0 ; очистить
		sbr r16, 1 ; Установить бит 0 в r16
		nop
		nop
		nop
		nop
rjmp main

rxrid:
sbic PINB,0 ;пропустить если бит в регистре очищен
rjmp rx_test

		sbi DDRB, 2 ; установить
		cbr r16, 2 ; очистить бит 1 в r16

rjmp main

rx_test:
		sbrc r16, 1 ; Пропустить если бит 1 в r16 очищен
rjmp main
		cbi DDRB, 2 ; очистить
		sbr r16, 2 ; Установить бит 1 в r16
		nop
		nop
		nop
		nop
rjmp main