广告广告
  加入我的最爱 设为首页 风格修改
首页 首尾
 手机版   订阅   地图  繁体 
您是第 4624 个阅读者
 
发表文章 发表投票 回覆文章
  可列印版   加为IE收藏   收藏主题   上一主题 | 下一主题   
qlql753
数位造型
个人文章 个人相簿 个人日记 个人地图
路人甲
级别: 路人甲 该用户目前不上站
推文 x1 鲜花 x0
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片
推文 x0
[asm][求助] 求助~~8051~~
如何用指拨开关来控制LCD 例如拨1在LCD上就显示1 拨 ..

访客只能看到部份内容,免费 加入会员 或由脸书 Google 可以看到全部内容



献花 x0 回到顶端 [楼 主] From:台湾中华电信 | Posted:2006-01-01 12:07 |
a843433
数位造型
个人文章 个人相簿 个人日记 个人地图
小人物
级别: 小人物 该用户目前不上站
推文 x0 鲜花 x34
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

就........... 写程式观察 P0 的变化情况(一直读取),然后查表输出资讯而已,很简单的。 表情


献花 x0 回到顶端 [1 楼] From:台湾新世纪资通 | Posted:2006-01-01 12:18 |
qlql753
数位造型
个人文章 个人相簿 个人日记 个人地图
路人甲
级别: 路人甲 该用户目前不上站
推文 x1 鲜花 x0
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

可不可以麻烦给个程式><


献花 x0 回到顶端 [2 楼] From:台湾中华电信 | Posted:2006-01-01 12:26 |
玉琉璃 手机
个人头像
个人文章 个人相簿 个人日记 个人地图
特殊贡献奖 优秀管理员勋章
小有名气
级别: 小有名气 该用户目前不上站
推文 x13 鲜花 x596
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

给个程式............................很长耶~
光lcd就....
你先把你打好的给我看~我在看看哪边要补强~
整个打出来~~会起笑 表情


献花 x0 回到顶端 [3 楼] From:台湾中华电信 | Posted:2006-01-01 15:14 |
qlql753
数位造型
个人文章 个人相簿 个人日记 个人地图
路人甲
级别: 路人甲 该用户目前不上站
推文 x1 鲜花 x0
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

能不能从这里面改呢??     这个程式是显示是七段显示器上的 能不能改成LCD呢??



          ORG       0    
    JMP     INITIALIZE
    ORG     13H
    JMP     INT1    
EN     REG     P3.5
RW     REG     P3.6
RS     REG     P3.7
LCD     REG     P2
;=========================================================
;=========================主程式==========================
;=========================================================
INITALIZE:
    MOV     A,#00111000B     ;设定为8BIT,2列,5*7字型
    CALL     WR_INST        
    MOV     A,#00001000B     ;关闭显示幕
    CALL     WR_INST
    MOV     A,#00000001B     ;清除显示幕
    CALL     WR_INST
    MOV     A,#00001111B     ;开启显示幕,游标,与闪烁
    CALL     WR_INST
    MOV     A,#00000110B     ;设定AC+1
    CALL     WR_INST

;=========================================================
START:
    MOV     03H,#C0H     ;使用位址站存器03H
    MOV     P1,03H         ;输出七段0
    CALL     DELAY1

AGAIN:
    MOV     A,#10000000B     ;设定A值为128
    MOV     R4,#8         ;做八次的测试
   
RR:
    MOV     P0,#FFH         ;设定P0为高阻态
    MOV     03H,P0         ;取回P0的值,放入03H暂存器
    CJNE     A,03H,JJ     ;若内容相等,做SHOW动作
    CALL     LOOP1
    CALL     SHOW
    AJMP     AGAIN        
JJ:     RR     A         ;右旋A=做除2动作
    DJNZ     R4,RR         ;跳至RR继续下一个接脚测试

    MOV     A,03H         ;若为零,输出七段0
    JZ     START        

    MOV     P1,#FFH         ;若皆错误,LCM显示错误
    CALL     LOOP
    AJMP     AGAIN         ;无限回圈

;=========================================================
;========================   SHOW   =======================
;=========================================================
SHOW:
    PUSH     A
    MOV     DPTR,#TABLE     ;输出字形表0~9
    MOV     A,R4         ;
    MOVC     A,@A+DPTR     ;

    MOV     P1,A         ;
    CALL     DELAY1
    POP     A

    RET

;=========================================================
;======================== LCM副程式 ======================
;=========================================================
LOOP:
    MOV     A,#10000000B     ;
    CALL     WR_INST
    MOV     DPTR,#LINE1
    MOV     R0,#16
    CALL     WR_STRING
    CALL     DELAY2
    RET

;==============================================================
LOOP1:
    MOV     A,#10000000B     ;
    CALL     WR_INST
    MOV     DPTR,#LINE2
    MOV     R0,#16
    CALL     WR_STRING
    CALL     DELAY2
    RET
   
;==============================================================
WR_INST:
    CALL     CHECK_BF
    CLR     RS
    CLR     RW
    SETB     EN
    MOV     LCD,A
    CLR     EN
    RET

;================================================================
CHECK_BF:
    PUSH     A
BUSY:
    CLR     RS
    SETB     RW
    SETB     EN
    MOV     A,LCD
    CLR     EN
    JB     ACC.7,BUSY
    CALL     DELAY
    POP     A
    RET

;================================================================
WR_STRING:
    MOV     R1,#0
NEXT:
    MOV     A,R1
    MOVC     A,@A+DPTR
    CALL     WR_DATA
    INC     R1
    DJNZ     R0,NEXT
    RET

;================================================================
WR_DATA:
    CALL     CHECK_BF
    SETB     RS
    CLR     RW
    SETB     EN
    MOV     LCD,A
    CLR     EN
    RET

;=========================================================
;======================== 延迟时间 =======================
;=========================================================
DELAY1:
    MOV     R5,#10
D0:     MOV     R6,#250
D1:     MOV     R7,#200
D2:     DJNZ     R7,D2
    DJNZ     R6,D1
    DJNZ     R5,D0

    RET

;================================================================
DELAY:
    MOV     R6,#15
D3:     MOV     R7,#200
    DJNZ     R7,$
    DJNZ     R6,D3
    RET

;================================================================
DELAY2:
    MOV     R5,#20
D4:     MOV     R6,#200
D5:     MOV     R7,#250
    DJNZ     R7,$
    DJNZ     R6,D5
    DJNZ     R5,D4
    RET

;==============================================================
;======================   TABLE   =========================
;==============================================================
TABLE:
    DB     11000000B     ;0
    DB     11111001B     ;1
    DB     10100100B     ;2
    DB     10110000B     ;3
    DB     10011001B     ;4
    DB     10010010B     ;5
    DB     10000010B     ;6
    DB     11111000B     ;7
    DB     10000000B     ;8
    DB     10010000B     ;9

LINE1:     DB     '       '
LINE2:     DB     '   ERROR         '
;==============================================================
    END


[ 此文章被qlql753在2006-01-01 17:44重新编辑 ]


献花 x0 回到顶端 [4 楼] From:台湾中华电信 | Posted:2006-01-01 15:38 |
玉琉璃 手机
个人头像
个人文章 个人相簿 个人日记 个人地图
特殊贡献奖 优秀管理员勋章
小有名气
级别: 小有名气 该用户目前不上站
推文 x13 鲜花 x596
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

恩~这是七段的
您现在是七段改成LCD?
还是要做合并?
现在就是少了LCD
LCD副程式的CHAR 您会吗
就是 DB ................. 这样


献花 x0 回到顶端 [5 楼] From:台湾中华电信 | Posted:2006-01-02 02:30 |
qlql753
数位造型
个人文章 个人相簿 个人日记 个人地图
路人甲
级别: 路人甲 该用户目前不上站
推文 x1 鲜花 x0
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

对~没错我是要把七段改成LCD
但你说的那个DB好像不太会.... 表情


献花 x0 回到顶端 [6 楼] From:台湾中华电信 | Posted:2006-01-02 07:49 |
玉琉璃 手机
个人头像
个人文章 个人相簿 个人日记 个人地图
特殊贡献奖 优秀管理员勋章
小有名气
级别: 小有名气 该用户目前不上站
推文 x13 鲜花 x596
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

直接改成LCD~
您这程式同时有七段与LCD~
可是LCD须补上另外一些程式
必须设
LCD初始化设定 <-这个程式有了
DD RAM设定
还有字串 MSG 设定

LCD才有动作~
加上需要设定输入指令~更难搞了 表情
赶快找单机片书籍参考吧@@


[ 此文章被HellKid在2006-01-02 22:15重新编辑 ]


献花 x0 回到顶端 [7 楼] From:台湾中华电信 | Posted:2006-01-02 21:53 |
qlql753
数位造型
个人文章 个人相簿 个人日记 个人地图
路人甲
级别: 路人甲 该用户目前不上站
推文 x1 鲜花 x0
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

尽量试试看搂~~~
谢谢你^^


献花 x0 回到顶端 [8 楼] From:台湾中华电信 | Posted:2006-01-02 23:52 |

首页  发表文章 发表投票 回覆文章
Powered by PHPWind v1.3.6
Copyright © 2003-04 PHPWind
Processed in 0.075107 second(s),query:16 Gzip disabled
本站由 瀛睿律师事务所 担任常年法律顾问 | 免责声明 | 本网站已依台湾网站内容分级规定处理 | 连络我们 | 访客留言