1樓：匿名使用者
;------------------------------------
;程式實現功能
;西南北路口直行與轉彎交替通行，數碼管顯示直行通行倒計時，紅綠黃燈顯示包括人行道在內的道路交通狀態。
;某一方向道路擁擠時，可以人工控制調節東西南北方向通行時間。
;緊急情況時，各路**通燈顯示紅燈，數碼管保持資料不變。
;工作暫存器及儲存單元分配
;1.工作暫存器
;r2設定為定時器定時中斷次數,r6、r7用於延時程式中的暫存器
;2.片記憶體儲單元
;30h、31h作為兩組數碼管顯示資料儲存單元;32h、33h作為交通燈初始狀態儲存單元;40h、41h作為交通燈顯示資料儲存單元
;3.標誌位
;00h：南北通行標誌位 ; 01h：東西通行標誌位;02h：緊急事件標誌位
;-----------------------------------
snf equ 00h ;;;南北通行標誌位
ewf equ 01h ;;;東西通行標誌位
urf equ 02h ;;;緊急事件標誌位
*** 0000h
ljmp main ;;;上電轉主程式
*** 000bh ;;;定時中斷入口
ljmp dszd
*** 0003h ;;;緊急中斷入口
ljmp urzd
*** 0030h
main: lcall init ;;;呼叫初始化子程式
loop: lcall dis ;;;迴圈執行顯示子程式
ajmp loop
;///////////初始化程式
init: setb snf
setb ewf
setb urf
mov r2,#20 ;;;定時器中斷20次為1s
mov tmod,#01h ;;;初始化定時器
mov tl0,#0b0h
mov th0,#3ch
setb ea ;;;開定時中斷與緊急中斷
setb et0
setb tr0
setb ex0
setb it0 ;;;設定中斷程控方式
mov dptr,#tab ;;;數值首地址放入dptr中
mov 40h,#40 ;;;東南西北通行時間設定
mov 41h,#40
mov 30h,#40 ;;;通行時間初始化
mov 31h,#60
mov p0,#4ch ;;;初始化時南北通行並把交通燈狀態分別放在32h和33h中
mov 32h,#4ch
mov p2,#15h
mov 33h,#15h
ret;////////////顯示子程式
dis: mov p3,#0dfh ;;;選中南北方向的十位數碼管
mov a,30h ;;;把顯示資料送人數碼管顯示
mov b,#10
div ab
movc a,@a+dptr
mov p1,a ;;;
lcall d1ms
mov p3,#0efh ;;;選中南北方向的個位數碼管
mov a,b ;;;送入數碼管顯示
movc a,@a+dptr
mov p1,a
lcall d1ms
mov p3,#7fh ;;;選中第東西方向的十位數碼管
mov a,31h ;;;送入數碼管顯示
mov b,#10
div ab
movc a,@a+dptr
mov p1,a
lcall d1ms
mov p3,#0bfh ;;;選中第東西方向的個位數碼管
mov a,b
movc a,@a+dptr
mov p1,a
lcall d1ms
setb p3.0
setb p3.1
jnb p3.0,dis_s ;;;查詢是否第一個按鍵按下
jnb p3.1,dis_e ;;;查詢是否第二個按鍵按下
ajmp dis_r ;;;沒有鍵按下則返回
dis_s:lcall d5ms ;;;按鍵去抖
jnb p3.0,dis_sn
ajmp dis_r
dis_sn:mov 40h,#50 ;;;對通行時間從新分配，南北通行時間加長
mov 41h,#30
ajmp dis_r
dis_e:lcall d5ms ;;;按鍵去抖
jnb p3.1,dis_ew
ajmp dis_r
dis_ew:mov 40h,#30 ;;;東西通行時間加長
mov 41h,#50
dis_r:ret
;///////定時中斷處理程式
ds_c: ljmp ds_r ;;;接力跳轉
dszd: push acc ;;;保護現場
push psw
clr tr0 ;;;關定時器及中斷標誌位並重新賦值
clr tf0
mov tl0,#0b0h
mov th0,#3ch
djnz r2,ds_c ;;;判斷1m時間是否到達
mov r2,#20 ;;;到達重新賦值
dec 30h ;;;南北方向通行時間減一
mov a,30h ;;;把減一後的時間送入顯示儲存單元
;;;;;;;南北通行到達最後4秒時黃燈閃爍
ds_10:cjne a,#4,ds_11 ;;;如果通行時間剩餘4秒
jnb snf,ds_11 ;;;判斷是否是南北通行
mov p0,#8ah
mov 32h, #8ah ;;;把交通燈狀態存入儲存單元（後面類似）
ds_11:cjne a,#3,ds_12 ;;;不是剩餘3秒，返回
jnb snf,ds_12 ;;;不是南北通行時間，返回
mov p0,#88h
mov 32h, #88h
ds_12:cjne a,#2,ds_13
jnb snf,ds_13
mov p0,#8ah
mov 32h, #8ah
ds_13:cjne a,#1,ds_14
jnb snf,ds_14
mov p0,#88h
mov 32h, #88h
;------------------------
ds_14:jnz ds_ne ;;;通行時間沒有結束轉向改變東西方向的數碼管
cpl snf ;;;如果通行時間結束則對標誌位取反
jnb snf,ds_1 ;;;判斷是否南北通行
mov 30h,40h ;;;是，點亮相應的交通燈
mov p0,#4ch
mov 32h,#4ch ;;;儲存交通燈狀態
mov p2,#15h
mov 33h, #15h ;;;儲存交通燈狀態
ds_ne:dec 31h ;;;東西方向通行時間減一
mov a,31h ;;;把通行剩餘時間送入顯示儲存單元
;;;;;;;;東西方向通行時間剩餘4秒鐘黃燈閃爍（程式註釋與南北方向類似 略）
ds_20:cjne a,#4,ds_21
jb ewf,ds_21
mov p0,#51h
mov 32h, #51h
ds_21:cjne a,#3,ds_22
jb ewf,ds_22
mov p0,#41h
mov 32h, #41h
ds_22:cjne a,#2,ds_23
jb ewf,ds_23
mov p0,#51h
mov 32h, #51h
ds_23:cjne a,#1,ds_24
jb ewf,ds_24
mov p0,#41h
mov 32h, #41h
;-----------------------------
ds_24:jnz ds_r ;;;東西方向時間沒有結束，返回
cpl ewf ;;;對通行狀態取反
jnb ewf,ds_2 ;;;東西方向通行時間到來，跳轉
mov 31h,#80 ;;;東西方向通行結束，重新顯示時間
mov p0,#89h ;;;點亮相應的交通燈
mov 32h, #89h
mov p2,#29h
mov 33h, #29h
ajmp ds_r
ds_1: mov 30h,#80 ;;;南北通行時間結束，重新對顯示儲存單元賦值
mov p0,#89h ;;;執行轉彎狀態1
mov 32h, #89h
mov p2,#26h
mov 33h, #26h
ajmp ds_ne
ds_2: mov 31h,41h ;;;東西方向開始通行，賦值予顯示儲存單元
mov p0,#61h ;;;點亮相應的交通燈
mov 32h, #61h
mov p2,#15h
mov 33h, #15h
ds_r: setb tr0
pop psw ;;;恢復現場
pop acc
reti
;/////////////緊急中斷處理程式
urzd: push acc ;;;保護現場
push psw
clr ie0 ;;;清除中斷標誌位
clr tr0 ;;;關定時器
cpl urf ;;;緊急事件標誌位
jb urf,ur_con ;;;緊急結束；跳轉
mov p0,#49h ;;;各路口燈全顯示紅燈亮
mov p2,#15h
ajmp ur_r
ur_con:setb tr0 ;;;恢復正常交通
mov a,32h
mov p0,a
mov a,33h
mov p2,a
ur_r: pop psw ;;;恢復現場
pop acc
reti
;////////////查表指令0,1,2,3,4,5,6,7,8,9
tab: db 3fh, 06h, 5bh, 4fh, 66h, 6dh
db 7dh, 07h, 7fh, 6fh
；//////////延時5ms與1ms
d5ms: mov r7,#5
d1ms: mov r7,#10
mov r6,#50
l1: djnz r6,$
djnz r7,l1
retend
微控制器組合語言問題
建議你用定時中斷方式，下面的供參考 org 0000h ajmp start org 001bh ljmp time1 定時中斷1入口 org 0030h start mov 30h,0 mov 31h,0 mov 32h,0 mov 33h,0 mov p2,0ffh mov dptr,table...
微控制器串列埠通訊問題（組合語言），微控制器串列埠通訊問題（組合語言）
這倆程式，執行到最後邊，都是 ret，返回指令。返回到何處去呀？呵呵，還是，先解決程式結構的問題。1 程式結構 有問題，沒有呼叫子程式 就不應該有子程式返回指令。2 jnb ti,clr ti 為判斷 串列埠 是否 傳送 完畢的，3 jnb ri,clr ri 為判斷 串列埠 是否 有接收 的，如果...
at89c51微控制器怎麼用組合語言寫「多個延時程式」
微控制器組合語言中要使一個延時程式可以被不同情況下呼叫而延時不同的時間，可以通過類似於c語言中傳遞引數的方式來實現，舉例如下 org 0000h ljmp main org 0030h main mov p0,5ah p0上的led燈間隔點亮mov r7,50 r7是延時傳遞引數lcall dela...