|
|||||||||||
| 技術交流 | 電路欣賞 | 工控天地 | 數字廣電 | 通信技術 | 電源技術 | 測控之家 | EMC技術 | ARM技術 | EDA技術 | PCB技術 | 嵌入式系統(tǒng) 驅動編程 | 集成電路 | 器件替換 | 模擬技術 | 新手園地 | 單 片 機 | DSP技術 | MCU技術 | IC 設計 | IC 產業(yè) | CAN-bus/DeviceNe |
單片機的基本實驗二 |
| 作者：weijinhua 欄目：單片機 |
| 2樓： | >>參與討論 |
| 作者： weijinhua 于 2005/6/7 12:12:00 發(fā)布：
不好意思昨天太匆忙了！所以還沒來得急傳東西��！ xsdat bit p1.4 ;定義驅動74164的數據腳為p1.4 xsclk bit p1.5 ;74164的時鐘 gw bit p1.0 ;個位顯示控制腳 sw bit p1.1 ;十位 bw bit p1.2 ;百位 qw bit p1.3 ;千位 Sadd bit p3.2 ;+key sdec bit p3.3 ;-key sjgw equ 30h ;顯示數據存儲器 sjsw equ 31h sjbw equ 32h sjqw equ 33h TEMP equ 35h ;當前數據 ;-------------------------------- mov sp,#40h mov TEMP,#0 main : setb sadd jb sadd,n1 lcall addkey ;+鍵按下 n1: lcall DISPLAY ;調用顯示子程序 jb sdec,n2 lcall deckey ;-鍵按下 n2: lcall DISPLAY ljmp main ;循環(huán)顯示 ;-------------------------------- addkey: mov r0,#5 ;消鍵抖 addloop: setb sadd lcall DISPLAY jnb sadd,addloop ;鍵一直=0，循環(huán)等待抬起 djnz r0,addloop inc TEMP ;當前數據+1 acall t2_10 ;十進制轉換 ret ;--------------------------------- deckey: mov r0,#5 ;消鍵抖 decloop: setb sdec lcall DISPLAY jnb sdec,decloop ;鍵一直=0，循環(huán)等待抬起 djnz r0,decloop dec TEMP ;當前數據-1 acall t2_10 ;十進制轉換 ret ;轉換成兩位十進制 t2_10: mov b,#100 mov a,TEMP div ab mov sjbw,a ;提取百位 mov a,b mov b,#10 div ab mov sjsw,a ;提取十位 mov sjgw,b ;個位 ret ;************************************************************************ ;74164顯示程序,使用RS1=1,RS0=0的1區(qū) ;--------------------------------------------------------- DISPLAY: PUSH ACC ;保存ACC PUSH psw clr rs1 setb rs0 ;使用第一區(qū)工作寄存器 mov dptr,#xstab mov a,sjgw ;取得數據 movc a,@a+dptr ;提取字模 acall dsout ;調用送出子程序 clr gw acall ds1ms ;調用顯示1ms延時程序 setb gw mov a,sjsw movc a,@a+dptr ;提取字模 acall dsout ;送出 clr sw acall ds1ms ;顯示1ms setb sw mov a,sjbw movc a,@a+dptr ;提取字模 acall dsout ;送出 clr bw acall ds1ms ;顯示1ms |
|
|
|
| 免費注冊為維庫電子開發(fā)網會員，參與電子工程師社區(qū)討論，點此進入 |
Copyright © 1998-2006 m.58mhw.cn 浙ICP證030469號 |