免費論壇 繁體 | 簡體
Sclub交友聊天~加入聊天室當版主
分享
返回列表 發帖

8051 lab2

LOOP:
          MOV R1,#03H                ;R1=11111100
          MOV A,R1                   ;將R0的值存入register A中                                 
          MOV P1,A                   ;將register A中的值存入Port1,初始狀態為一端亮
          ACALL DELAY                ;呼叫DELAY副程式
          MOV R1,#0F3H                ;R1=00001100
          MOV A,R1                   ;
          MOV P1,A                   ;
          ACALL DELAY                ;呼叫DELAY副程式
          MOV R1,#25H                ;R1=11011010
          MOV A,R1                   ;
          MOV P1,A                   ;
          ACALL DELAY                ;呼叫DELAY副程式
          MOV R1,#0DH                ;R1=11110010
          MOV A,R1                   ;
          MOV P1,A                   ;
          ACALL DELAY                ;呼叫DELAY副程式
          MOV R1,#99H                ;R1=01100110
          MOV A,R1                   ;
          MOV P1,A                   ;
          ACALL DELAY                ;呼叫DELAY副程式
          MOV R1,#49H                ;R1=10110110
          MOV A,R1                   ;
          MOV P1,A                   ;
          ACALL DELAY                ;呼叫DELAY副程式
          MOV R1,#0C1H                ;R1=00111110
          MOV A,R1                   ;
          MOV P1,A                   ;
          ACALL DELAY                ;呼叫DELAY副程式
          MOV R1,#1BH                ;R1=11100100
          MOV A,R1                   ;
          MOV P1,A                   ;
          ACALL DELAY                ;呼叫DELAY副程式
          MOV R1,#01H                ;R1=00011011
          MOV A,R1                   ;
          MOV P1,A                   ;
          ACALL DELAY                ;呼叫DELAY副程式
          MOV R1,#19H                ;R1=11100110
          MOV A,R1                   ;
          MOV P1,A                   ;
          ACALL DELAY                ;呼叫DELAY副程式
          JMP LOOP                   ;回到LOOP執行
DELAY:                        
          MOV R5,#250                  ;將R5參數改為指撥的數值
DELAY1:
          MOV R6,#150
DELAY2:
          MOV R7,#50
DELAY3:
          DJNZ  R7,DELAY3
          DJNZ  R6,DELAY2
          DJNZ  R5,DELAY1
          RET
          END
分享到: QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友

小貓貓2024了喔!
(點一下露米亞傳送到小貓貓2024大事記)

返回列表