學了一段時間的匯編，寫了個小程序，貼出來大家噴噴，噴噴更快成長，順便也參加一下原創帖的活動，支持一下該網站
。懂匯編的多多指教，這里也特別感謝王工（wangchuangwccc）和樂工（ yueyunno1）給我的幫助。希望大家一起來學習！一起來學匯編
本人新手，離畢業還有15天學了一段時間的匯編，寫了個小程序，貼出來大家噴噴，噴噴更快成長，順便也參加一下原創帖的活動，支持一下該網站。懂匯編的多多指教，這里也特別感謝王工（wangchuangwccc）和樂工（ yueyunno1）給我的幫助。希望大家一起來學習！
學了一段時間的匯編，寫了個小程序，貼出來大家噴噴，噴噴更快成長，順便也參加一下原創帖的活動，支持一下該網站。懂匯編的多多指教，這里也特別感謝王工（wangchuangwccc）和樂工（ yueyunno1）給我的幫助。希望大家一起來學習！全部回復(8)
正序查看
倒序查看
想起剛開始學單片機看到燈亮是多么高興
@又一個暑假
首先來點個LED燈[圖片] 想起剛開始學單片機看到燈亮是多么高興[圖片]
再貼上程序
K1 bit P2.3 ；按鍵的I/O口
key_state EQU 20H ；消抖和防止一直觸發用的
key_step EQU 21H ；任務標志
ORG 0000H
SJMP STAR
ORG 1BH
LJMP Timer0_intrrupt ;裝T1中斷服務程序
star:
mov key_state,#00H ；初始化
mov key_step,#00H
mov P1,#0ffH
mov IE,#88H ;
mov TMOD,#10H
mov TH1,#0D8H
mov TL1,#0EFH
setb TR1 ;啟動T18
setb EA
loop:
key_switch:
jb key_step.0, key_low_step1 ；查詢要執行什么任務
jb key_step.1, key_low_step2
jb key_step.2, key_low_step3
jb key_step.3, key_low_step4
jb key_step.4, key_low_step5
jb key_step.5, key_low_step6
jb key_step.6, key_low_step7
jb key_step.7, key_low_step8
key_low_step0:
mov P1,#00H ; 上電就執行的任務不一定是點LED燈
jmp loop
key_low_step1:
mov P1,#01H ;任務一 不一定是點LED燈
jmp loop
key_low_step2:
mov P1,#02H ;任務二 不一定是點LED燈
jmp loop
key_low_step3:
mov P1,#04H ;;任務三 不一定是點LED燈
jmp loop
key_low_step4:
mov P1,#08H ;任務四 不一定是點LED燈
jmp loop
key_low_step5:
mov P1,#10H ;任務五 不一定是點LED燈
jmp loop
key_low_step6:
mov P1,#20H ;任務六 不一定是點LED燈
jmp loop
key_low_step7:
mov P1,#40H ;任務七 不一定是點LED燈
jmp loop
key_low_step8:
mov P1,#80H ;任務八 不一定是點LED燈
jmp loop
key_check: ；檢測按鍵
jb K1,key_high
key_low: ；有按下可能是抖動
jb key_state.0,key_unchange
setb key_state.0
ret
key_high: ；沒按下
mov key_state,#00H
mov a,key_step
cjne a,#00H,exit
mov P1,#00H
exit: ret
key_unchange: ；確定按下，是不是已經觸發
jb key_state.1,exit
setb key_state.1
mov a,key_step
jz key_unchange11
key_unchange1: ；確定按下
rl a
mov key_step,a
ret
key_unchange11 :
mov key_step,#01H
ret
Timer0_intrrupt: ；中斷服務函數
clr EA
mov TH1,#0D8H
mov TL1,#0EFH
acall key_check ；掃描按鍵
setb EA
exit_interrupt:
reti
END 0
回復
@又一個暑假
再貼上程序[圖片]K1bitP2.3；按鍵的I/O口key_stateEQU20H ；消抖和防止一直觸發用的key_stepEQU21H；任務標志ORG0000HSJMPSTARORG1BHLJMPTimer0_intrrupt;裝T1中斷服務程序star:movkey_state,#00H；初始化movkey_step,#00HmovP1,#0ffHmovIE,#88H;movTMOD,#10HmovTH1,#0D8HmovTL1,#0EFHsetbTR1;啟動T18setbEAloop:key_switch:jbkey_step.0,key_low_step1 ；查詢要執行什么任務jbkey_step.1,key_low_step2jbkey_step.2,key_low_step3jbkey_step.3,key_low_step4jbkey_step.4,key_low_step5jbkey_step.5,key_low_step6jbkey_step.6,key_low_step7jbkey_step.7,key_low_step8key_low_step0:movP1,#00H;上電就執行的任務不一定是點LED燈jmploopkey_low_step1:movP1,#01H;任務一不一定是點LED燈jmploopkey_low_step2:movP1,#02H;任務二不一定是點LED燈jmploopkey_low_step3:movP1,#04H;;任務三不一定是點LED燈jmploopkey_low_step4:movP1,#08H;任務四不一定是點LED燈jmploopkey_low_step5:movP1,#10H;任務五不一定是點LED燈jmploopkey_low_step6:movP1,#20H;任務六不一定是點LED燈jmploopkey_low_step7:movP1,#40H;任務七不一定是點LED燈jmploopkey_low_step8:movP1,#80H;任務八不一定是點LED燈jmploopkey_check:；檢測按鍵jbK1,key_highkey_low:；有按下可能是抖動jbkey_state.0,key_unchangesetbkey_state.0retkey_high:；沒按下movkey_state,#00Hmova,key_stepcjnea,#00H,exitmovP1,#00Hexit:retkey_unchange:；確定按下，是不是已經觸發jbkey_state.1,exitsetbkey_state.1mova,key_stepjzkey_unchange11key_unchange1:；確定按下rlamovkey_step,aretkey_unchange11:movkey_step,#01HretTimer0_intrrupt:；中斷服務函數clrEAmovTH1,#0D8HmovTL1,#0EFHacallkey_check；掃描按鍵setbEAexit_interrupt:retiEND
最后來介紹一下程序要實現什么功能
這個小程序主要是為了學習用定時器定時器來掃描按鍵
一上電就運行
key_low_step0的任務
然后通過按鍵來切換任務（這里只是用每一個LED燈來表示一個任務當然key_low_step0的任務全亮不是所有任務都執行）
不是為了讓LED輪了點亮，如果是讓LED燈輪流點亮完全不用那么麻煩
0
回復
@又一個暑假
[圖片]
shcp EQU P2.0 ; //數據在上升沿進入移位寄存器
date1 EQU P2.1 ; //串行數據輸入端
clock EQU P2.2 ; //上升沿時將數據輸出到并行端口
send_data EQU 20H
i EQU 30H
ORG 0000H
ljmp start
start:
mov i,#0
loop:
clr clock
mov dptr,#tab ;發送給第一片595
movc a,@a+dptr
mov send_data,a
lcall _74hc595_send_data
mov dptr,#tab1 ;發送給第二片595
mov a,i
movc a,@a+dptr
mov send_data,a
lcall _74hc595_send_data
setb clock
lcall delay_ms
inc i
mov a,i
cjne a,#16,loop
ljmp start
_74hc595_send_data: ;74hc595發送數據子函數
mov r0,#00H
mov a,send_data
loop_07_1:
clr shcp
rlc a
mov date1,C
setb shcp
inc r0
cjne r0,#08H,loop_07_1
ret
delay_ms :
MOV R6,#0ffH
DEL1:
MOV R7,#250
DJNZ R7,$
DJNZ R6,DEL1
RET
tab: DB 0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff
tab1: DB 0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe
end
0
回復
@又一個暑假
shcpEQUP2.0;//數據在上升沿進入移位寄存器date1EQUP2.1;//串行數據輸入端clockEQUP2.2;//上升沿時將數據輸出到并行端口send_dataEQU20HiEQU30HORG0000Hljmpstartstart:movi,#0loop:clrclockmovdptr,#tab;發送給第一片595movca,@a+dptrmovsend_data,alcall_74hc595_send_datamovdptr,#tab1;發送給第二片595mova,imovca,@a+dptrmovsend_data,alcall_74hc595_send_datasetbclocklcalldelay_msincimova,icjnea,#16,loopljmpstart_74hc595_send_data:;74hc595發送數據子函數movr0,#00Hmova,send_dataloop_07_1:clrshcprlcamovdate1,Csetbshcpincr0cjner0,#08H,loop_07_1retdelay_ms:MOVR6,#0ffHDEL1:MOVR7,#250DJNZR7,$DJNZR6,DEL1RETtab:DB0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xfftab1:DB0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfeend
這個程序就是傳說中的流水燈
今天不小心看到了74hc595連級的圖，就有了寫程序的沖動，最近學了點匯編，就用匯編寫一下
0
回復
;/////////////////////////////////////////////////////////////////////////////////////////
;//矩陣鍵盤0—15按下按鍵顯示對應的數值 ，沒按之前顯示"_"
;//
;////////////////////////////////////////////////////////////////////////////////////////
Key EQU P3 ;矩陣鍵盤接的I/O口
key_state EQU 20H ;用來標記消抖和防止多次觸發
key_step_buffer EQU 30H ;消抖時鍵值的保存
key_step EQU 35H ;存儲鍵值
key_count EQU 36H ;查表計數
ORG 0000H
SJMP STAR
ORG 1BH
LJMP Timer0_intrrupt ;裝T1中斷服務程序
;/////////////////////////////////////////////////////////////////////////////////////////
;//初始化
;//
;////////////////////////////////////////////////////////////////////////////////////////
star:
mov key_state,#00H
mov key_step,#00H
mov key_step_buffer,#00H
mov P0,#0ffH
mov P1,#0ffH
mov P2,#0aaH
mov IE,#088H ;
mov TMOD,#010H
mov TH1, #0D8H
mov TL1, #0EFH
setb TR1 ;啟動T1
setb EA
;/////////////////////////////////////////////////////////////////////////////////////////
;//主程序一直循環顯示
;//
;////////////////////////////////////////////////////////////////////////////////////////
loop:
lcall keystep_disp
; mov P0,key_step;
ljmp loop
;/////////////////////////////////////////////////////////////////////////////////////////
;//鍵值顯示程序
;//
;////////////////////////////////////////////////////////////////////////////////////////
keystep_disp:
mov a,key_step
cjne a,#00H,keystep_disp_1 ;判斷是否都沒按過
mov P0,#0f7h
ret
keystep_disp_1:
mov key_count,#0ffH
mov dptr,#kcodtab
rk_none:
clr a
movc a,@a+dptr
inc dptr
inc key_count
cjne a,key_step,rk_none ;按鍵查表
mov a, key_count
mov dptr,#segtab2
movc a,@a+dptr ;數碼管查表
mov p0,a
lcall delay
ret
;/////////////////////////////////////////////////////////////////////////////////////////
;//功能：按鍵掃描
;//方法：線反轉法
;////////////////////////////////////////////////////////////////////////////////////////
key_check:
mov Key,#0f0H
mov a,Key
cjne a,#0f0H,key_low
key_high:
mov key_state,#00H ;沒鍵按下，標志位清零
exit:
ret
key_low:
jb key_state.0,key_unchange_1;有鍵按下判斷是否抖動
setb key_state.0
mov Key,#0f0H
mov a,Key
orl a,#0fH
mov Key,a
mov key_step_buffer,Key
ret
key_unchange_1:
jb key_state.1,exit
mov Key,#0f0H
mov a,Key
orl a,#0fH
mov Key,a
mov a,Key
cjne a,Key_step_buffer,key_high
setb key_state.1 ;確定有鍵按下，自鎖
mov key_step,Key_step_buffer
ret
;/////////////////////////////////////////////////////////////////////////////////////////
;//Timer0中斷服務程序
;//功能：定時掃描按鍵
;////////////////////////////////////////////////////////////////////////////////////////
Timer0_intrrupt:
mov TH1,#0D8H
mov TL1,#0EFH
acall key_check ;檢測按鍵
exit_interrupt:
reti
;/////////////////////////////////////////////////////////////////////////////////////////
;//延時子程序
;//
;////////////////////////////////////////////////////////////////////////////////////////
delay: mov r3,#20
delay1: mov r4,#50
djnz r4,$
djnz r3,delay1
ret
;/////////////////////////////////////////////////////////////////////////////////////////
;//kcodtab 按鍵0——15對應的鍵值
;//segtab2 共陽數碼管對應的0——9
;////////////////////////////////////////////////////////////////////////////////////////
kcodtab:
db 11101110b,11011110b,10111110b,1111110b
db 11101101b,11011101b,10111101b,1111101b
db 11101011b,11011011b,10111011b,1111011b
db 11100111b,11010111b,10110111b,1110111b
segtab2:
db 0c0h,0f9h,0a4h,0b0h,099h,092h,082h,0f8h
db 080h,090h,088h,083h,0c6h,0a1h,086h,08eh
END
0
回復
