.def	drem8u	=r15		;remainder
.def	dres8u	=r16		;result
.def	dd8u	=r16		;dividend
.def	dv8u	=r17		;divisor
.def	dcnt8u	=r18		;loop counter

		ldi dd8u,0b11100101	; данные
		ldi dv8u,0b00000000		

div8u:
		sub drem8u,drem8u	; clear remainder and carry
		ldi dcnt8u,9		; init loop counter

d8u_1:	
		rol	dd8u		; shift left dividend
		dec	dcnt8u		; decrement counter
		brne	d8u_2		; if done
		ret			; return

d8u_2:	
		rol	drem8u		; shift dividend into remainder
		sub	drem8u,dv8u	; remainder = remainder - divisor
		brcc	d8u_3		; if result negative
		add	drem8u,dv8u	; restore remainder
		clc			; clear carry to be shifted into result
		rjmp	d8u_1           ; else

d8u_3:	
		sec			; set carry to be shifted into result
		
		mov	temp3,drem8u
		andi 	temp3,0b00000001
		out 	SPDR,temp3 	; отправляем бит по SPI
		sbi     PORTB, 5	; дергаем SCL		
		nop	
		cbi	PORTB, 5	; дергаем SCL
		
		rjmp	d8u_1