		#include		"aduc841.h"
		org		0000h

basla:				
		// ayarlar burada yapilacak
		mov		p3,#01h
		mov		a,#00h
		setb	c
anadongu:
		jb		p1.0,x    ; p1.0=1 ise x'e dallan, Aksi halde asagidan devam et.
		rlc		a
		mov		p3,a
		rlc		a
		mov		p3,a
		rlc		a
		mov		p3,a
		rlc		a
		mov		p3,a
		rlc		a
		mov		p3,a
		rlc		a
		mov		p3,a
		rlc		a
		mov		p3,a
		rlc		a
		mov		p3,a
		rlc		a
		mov		p3,a		
x:		sjmp	anadongu
		end