找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開始

搜索
查看: 1851|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

單片機(jī)匯編語言動(dòng)態(tài)顯示程序與Proteus仿真圖

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
仿真原理圖如下(proteus仿真工程文件可到本帖附件中下載)



單片機(jī)匯編語言源程序如下:
org   0000h
      jmp   Start

;====================================================================
; CODE SEGMENT
;====================================================================

Start:        
                MOV        R2        ,#00
                MOV        R3        ,#04
                MOV        DPTR        ,#TAB
                MOV        R7        ,#01        
LP0:        MOV        A                ,R2
                MOVC        A                ,@A+DPTR
LP:        MOV        SBUF        ,A
                JNB        TI        ,$
                CLR        TI
                DJNZ        R3        ,LP
                INC        R2
                MOV        R3        ,#04
                ACALL                DEL05
                CJNE        R2        ,#10        ,LP0
                MOV        R3        ,#04
                MOV        R2        ,#00
                DEC                R7
                CJNE        R7        ,#00        ,LP0
                ACALL        DEL05
                MOV        30H        ,#00100100B
                MOV        R0        ,30H
                MOV        A                ,R0
                ANL                A                ,#0FH
                MOVC        A                ,@A+DPTR
                MOV        SBUF        ,A
                JNB                TI                ,$
                CLR                TI
                ACALL        DEL05
                MOV        A                ,R0
                ANL                A                ,#0F0H
                SWAP        A
                MOVC        A                ,@A+DPTR
                MOV        SBUF        ,A
                JNB                TI                ,$
                CLR                TI
                ACALL                DEL05
                MOV        31H        ,#01000110B
                MOV        R0        ,31H
                MOV        A                ,R0
                ANL                A                ,#0FH
                MOVC        A                ,@A+DPTR
                MOV        SBUF        ,A
                JNB                TI                ,$
                CLR                TI
                ACALL        DEL05
                MOV        A                ,R0
                ANL                A                ,#0F0H
                SWAP        A
                MOVC        A                ,@A+DPTR
                MOV        SBUF        ,A
                JNB                TI                ,$
                CLR                TI
                ACALL                DEL05
                RET
TAB:        DB        03H,9FH,25H,0DH,99H
                DB        49H,41H,1FH,01H,        09H
DEL05:                MOV        R4,#50
DEL0:                MOV        R5,#91
DEL1:                MOV        R6,#100
                                DJNZ        R6,$
                                DJNZ        R5,DEL1
                                DJNZ        R4,DEL0
                                RET
;====================================================================
      END


用的Proteus自帶的編譯器編譯的程序
上圖Proteus8.8仿真pdsprj文件下載: 動(dòng)態(tài)顯示.zip (21.94 KB, 下載次數(shù): 6)

評(píng)分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)!

查看全部評(píng)分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表