;***************************************************************************
      ;*;p1口8個(gè)跑馬燈的程序。      *
      ;* Support telephone:  (www.ggdl.com )                       
      ;*
      ;*               
      ;*
      ;* 
      ;*************************************************************************** 


      org 0000h
      ajmp main
      org 030h
      main:
      setb p3.0
      setb p3.1
      nop
      nop
      lcall delay ;
      lcall delay ;
;		lcall delay ;
     ; lcall delay ;
      clr p3.0
      clr p3.1
      nop
      nop
      lcall delay ;
      lcall delay 
;		lcall delay ;
      lcall delay ;;
      ;ajmp main
      mov  p0,#0 ;
      mov  p2,#0 ;
      setb p2.3   ;關(guān)風(fēng)鳴器
      MOV  p1,#00h ;全亮
      lcall delay ;
      lcall delay ;
      lcall delay ;延時(shí)一段時(shí)間
		lcall delay ;
      lcall delay ;
      mov a,#0feh ;每次只亮一個(gè)燈。
loop: mov p1,a ;
      lcall delay ;
      lcall delay ;
      lcall delay ;
;
      lcall delay ;
      lcall delay ;
      rl a ;循環(huán)左移。
;		cpl   p2.0
;
      ajmp loop ;

      org 0b00h
      delay: mov r7,#00h ;延時(shí)子程序
      tt: mov r6,#00h
      djnz r6,$
      djnz r7,tt
      ret
      end