165.asm

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

   org 00h
   loop : mov scon,#00010000b
   
   clr p3.2
   call delay1
   
   setb p3.2


   clr ri
   loop1:jbc ri,loop2
   jmp loop1
   loop2:mov a,sbuf

   mov p1,a
  ;call delay
   jmp loop

delay:	mov	r7,#00h		;延时子程序
tt:	mov	r6,#00h
	djnz	r6,$
	djnz	r7,tt
	ret
 delay1:
    mov r7,#02
    djnz r7,$
    ret
   end