⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 k1-l4-zhishi.asm

📁 单片机中LED显示/数码管显示/键盘控制/蜂鸣器输出/中断应用/定时器和计数器/串口通信/键控看门狗/数据交换
💻 ASM
字号:
;********************************************************************
;*                                                                  *
;* ME500单片机开发系统演示程序 - K1-K4状态指示                      *
;*                                                                  *
;* LED显示                                                          *
;*                                                                  *
;* 版本: V1.0 (2006/11/20)                                         *
;* 作者: gguoqing (Email: gguoqing@willar.com)                     *
;* 网站: www.willar.com(伟纳电子)   www.mcusj.com(伟纳单片机世界)  *
;* 邮箱: support@willar.com                                       *
;*                                                                  *
;*【版权】Copyright(C)伟纳电子 www.willar.com  All Rights Reserved  *
;*【声明】此程序仅用于学习与参考,引用请注明版权和作者信息!        *
;*                                                                  *
;********************************************************************

        K1  BIT  P1.4
        K2  BIT  P1.5
        K3  BIT  P1.6
        K4  BIT  P1.7
        
;*********************************************************

        ORG  0000H
        JMP  MAIN
        ORG  0030H
        
;*********************************************************
MAIN:
        MOV  SP,#60H
        MOV  P2,#0FFH
LOOP:
        MOV  P0,#0FFH       ;关闭所有LED
        MOV  P1,#0F0H       ;置P1.4-P1.7为输入状态
        JNB  K1,K1_PROG
        JNB  K2,K2_PROG
        JNB  K3,K3_PROG
        JNB  K4,K4_PROG
        JMP  LOOP

K1_PROG:
        MOV  P0,#0FEH       ;D00灯亮
        JMP  LOOP
K2_PROG:
        MOV  P0,#0FDH       ;D01灯亮
        JMP  LOOP
K3_PROG:
        MOV  P0,#0FBH       ;D02灯亮
        JMP  LOOP
K4_PROG:
        MOV  P0,#0F7H       ;D03灯亮
        JMP  LOOP
;*********************************************************
        END

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -