	#include "aduc841.h"
	;#include <AT89X52.H>

	org		0x00

	;clr	p2.3
	
	
	;nop
	;mov	A,#00Eh
	;mov	00h,#01h
	;add	a,00h
	;add a,00h
	;end
		
		
	
	;;mov	p0,#0f4h
	
	;;MOV	a,#00fh	
	;;ANL P0, A
	;;nop
	;;nop
	;;ANL A, P0
	;;nop
	;;nop
	;;end
;----------------------------------------------------
	;// ornek 0
	;// buton testi
	;// portlarda baslangicta 1 var. latch'de
	;// p2.0 da buton olsun. Basildiginda topraga ceksin
	;
	;x: jb	p2.0, x ; burada buton basilanana kadar bekler.
	               ;; cok da istenmeyen bir durum
			        ;; basildi ise islem yapilir.
	;// diger kodlar
	;end
	
	
;-----------------------------------------------------
	;// ornek 1 jb ile
;x:	
	;mov		p1,#00d 
;k:	jb		p2.0,x  ; eger basilmissa alttan devam eder.
	;mov		p1,#255d
	;sjmp	k
	;end
	 ;// ornek 1 in diger versiyonu jnb ile
;x:
	;mov		p1,#255d
;k:	jnb		p2.0,x
	;mov		p1,#00h
	;sjmp	k
	;end
	 ;// ornek 1 in diger bir versiyonu jb ile
	
;k:	jb		p2.0,x
	;mov		p1,#0ffh
	;sjmp	k
;x:  mov		p1,#00h
	;sjmp	k
	;end
	
	
;-----------------------------------------------------
;; ornek 2
;; yukaridaki orneklerde butona basip cekme yoktu.
;; burada butonun basilip cekilmesi ornegi yapalim

x:	jb		p2.0,y ; butona basilmis ise bir alt koda gecer aksi halde y'ye gider
k:  jnb		p2.0,k ; butondan elimizi cekene kadar bu satirda doner elimizi cekince butonun
                   ; gorevi bir alt satirda icra edilebilir.
	
	// butonun gorev kodu burada
	nop
	mov		p1,#0ffh
	sjmp	x


y:  // burada diger baska islemler olabilir
	nop
	sjmp	x
	end
	
	
;;----------------------------------------------------------
;; ornek 3   jnb ile
;x:	jnb		p2.0,y ; basik degilse p2.0=1 dir  ve bir alt satirdan devam eder.
				;// diger kod gorevleri burada olacak
	;nop
	;nop
	;sjmp	x
;y:	jnb		p2.1,m
	;mov		p1, #00h
	;sjmp	x
;m:  mov		p1,#0ffh
	;sjmp	x
	;; bu kod baska sekillerde de düzenlenebilir.
	;end
	
	
	
	;MOV	p1,#33H
	
	


;;;-------------------------------

	;;Pin okuma:
	
	
	
	;mov	a,P1
	
	
	;jb		p2.0,$
	;jnb		p2.0,$	
	;mov		c,P2.1
	
	;;Tutucu uzerinde islem yapan komutlar
	
	;anl		P1,a
	;orl		P1,a
	;xrl		P1,a
;x1:	jbc		P2.0,y1
	;nop
	;sjmp	x1
;y1:		
	;nop
	;nop
	
	;cpl		P2.3
	;inc		P2
	;dec		P2
	
	;mov		P2,#02h
;x2:	djnz	P2,x2
	;nop
	;mov		P2.3,c
	;clr		P2.4
	;setb	P2.5
	
	
	
;end
	

	