首页 > 编程知识 正文

51单片机游戏代码LCD1602,51单片机

时间:2023-05-04 15:03:32 阅读:113722 作者:4486

Turbo51编译器支持Turbo pascal 7面向对象语法,虽然不完整,但大致可以使用。

以下代码实现了LCD1602类。 并不完美。 主要端口指定无法集成到类中。 当前,只能使用端口定义LCD1602PortDef.inc。 在类文件LCD1602.PAS中使用{$I LCD1602PortDef.inc },提供一定的灵活性。 此外,在Turbo51中,XDATA段需要类实现,并且必须在代码中指定。

//Turbo51单片机实例:液晶屏1602驱动程序//单片机编译器:Turbo51//主程序测试液晶屏1602; {$M $0000,$1000,$0000,$ 1000,0 } uses LCD 1602; var VLCD1602:TLCD1602 XDATA; begin VLCD1602.Init; vcd 1602.print (0,0,' Hello ' ); end. // LCD1602.Pas//LCD1602类实现unit LCD1602; //接口段,外部可见{ $ xdata }接口类型petlcd 1602 _ x=0. 15; TLCD1602_Y=0.1; tlcd 1602=对象产品清除器; 功能is busy : byte; procedurewritecommand (acmd :字节; procedure setcursorpos (pos :字节; 产品写入数据(adata :字节; 产品初始化; 产品完成; 产品打印(ax : tlcd 1602 _ x; AY:TLCD1602_Y; str :字符串; 结束; //实现段,定义外部不可见的implementation //端口,不能动态指定。 //端口发生变化时,继承中{ $ ilcd 1602 port def.Inc } const LCD 1602 _ display _ mode _ 1602

版权声明:该文观点仅代表作者本人。处理文章:请发送邮件至 三1五14八八95#扣扣.com 举报,一经查实,本站将立刻删除。