keymic.asm

学林电子实验箱源码 完整板

;小电子琴,按P3口的小键盘喇叭发出不同频率的声音。同时数码管显示不同的数字。 
;***************************************************************************
;*  [e-mail]		     (51c51 test web)     www.8951.com     *
;*  Create by :石学军      www.51c51.com 更多例程请登陆网站        	   *
;***************************************************************************
	org 0000h
	ljmp start
	org 0030h
start: 	mov	p2,#0ffh
	CLR 	P2.6		;选中最右边的七段码。
	mov 	p3,#0ffh     	;初始化,键盘全部置高
l1: jnb 	p3.2,l2		; 监测键盘如果3.2按下执行l2
	jnb 	p3.4,l3		;
	jnb 	p3.5,l4		;检测按键
	ljmp l1			;循环检测
l2:
     cpl p3.3            	;小喇叭响
     mov p0,#7eH		;显示'1'
     lcall delay1        	;延时1
     ljmp l1              	;重新监测键盘
l3:  cpl p3.3
     mov p0,#0A2H		;显示'2'
     lcall delay2
	 ljmp l1
l4:   cpl p3.3
      mov p0,#62H		;显示'3'
      lcall delay3
     ljmp l1
delay1:	mov r5,#100	;延时1。
     djnz r5,$
      ret
 delay2:
        mov r5,#180	;延时2。
        djnz r5,$
        ret
  delay3:
        mov r5,#250	;延时3。
        djnz r5,$
        ret
        end