设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 24小时必答区 › 求助大神们帮帮忙 我是初学者实在不会了
返回列表 发新帖
查看: 2177|回复: 13
打印 上一主题 下一主题
收起左侧

求助大神们帮帮忙 我是初学者实在不会了

  [复制链接]
楼主
ID:135253 发表于 2016-8-8 14:02 | 显示全部楼层
给你一个吧，流水灯，两个按键控制
  1. KEY_LEFT         BIT P1.0
  2. KEY_RIGHT        BIT P1.1
  3.                         ORG 0000H
  4.                         JMP MAIN
  5.                         ORG 0030H

  7. MAIN:
  8.                         SETB KEY_LEFT        ;预读数,先置1
  9.                         SETB KEY_RIGHT

  11. LEFT:
  12.                         JB KEY_LEFT,RIGHT
  13.                         MOV R2,#8
  14.                         MOV R0,#0FEH

  16. KL0:
  17.                         MOV A,R0
  18.                         MOV P2,A
  19.                         CALL DELAY10MS
  20.                         SETB C
  21.                         RLC A
  22.                         MOV R0,A
  23.                         DJNZ R2,KL0

  25. RIGHT:
  26.                         JB KEY_RIGHT,LEFT
  27.                         MOV R2,#8
  28.                         MOV R1,#7FH

  30. KR0:
  31.                         MOV A,R1
  32.                         MOV P2,A
  33.                         CALL DELAY10MS
  34.                         SETB C
  35.                         RRC A
  36.                         MOV R1,A
  37.                         DJNZ R2,KR0
  38.                         SJMP MAIN


  41. DELAY10MS:
  42.         MOV R5,#199
  43. D1:        MOV R6,#250
  44.         DJNZ R6,$
  45.         DJNZ R5,D1
  46.         RET

  48. END
复制代码

liushuideng.PNG (28.58 KB, 下载次数: 75)

电路图

电路图
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表