; ;******************************************************************************** ;1602液晶显示一个A * ;******************************************************************************** ;* 日期: 2007-3-25 * ;* 版本: 3.0 * ;* 作者: 深圳学林电子有限公司 专业8051单片机教程站 * ;* 邮箱: sxj1974@163.com * ;* 网站: http://www.51c51.com http://www.8951.com 更多例程请登陆网站 * ;******************************************************************************** ;* 硬件:此程序在本公司xlisp系列单片机实验仪运行通过 * ;******************************************************************************** ;* 【版权】 Copyright(C)深圳学林电子有限公司 www.51c51.com All Rights Reserved * ;* 【声明】 此程序仅用于学习与参考,引用请注明版权和作者信息! * ;******************************************************************************** RS EQU P2.0 RW EQU P2.1 E EQU P2.2 ORG 0000H MOV P0,#00000001B;清屏 ACALL ENABLE MOV P0,#00000001B;清屏 ACALL ENABLE MOV P0,#00111000B;显示功能 ACALL ENABLE MOV P0,#00001111B;显示开关控制 ACALL ENABLE MOV P0,#00000110B ;输入模式 ACALL ENABLE MOV P0,#0C0H;数据存贮器地址 ACALL ENABLE mov p0,#01000001b;ASCII码 SETB RS CLR RW CLR E ACALL DELAY SETB E AJMP $ ENABLE: CLR RS ;送命令 CLR RW CLR E ACALL DELAY SETB E RET DELAY: MOV P0,#0FFH CLR RS SETB RW CLR E NOP SETB E JB P0.7,DELAY;判断忙标志 RET END
hex格式文件下载(点右键,目标另存为hex即可直接烧写)

|