51单片机--PASCAL语言实例 1:亮灭一只LED

// 本程序使用 Trubo51( https://turbo51.com/ ) 单片机 PASCAL 编译器
// 单片机程序开发，一直以来的都是用C语言开发，对于我这种的PASCAL业余爱好者来说，
// 显然是一种遗憾。
// 好在国外有大神开发了TURBO51编译器，详情大家可以在百度一下。
// Turbo51编译的HEX文件高效短小，比SDCC小4至5倍，虽不开源，
// 但可免费使用，作为业余应用开发，足够了。

//下面的程序用来闪烁一支LED灯，亮灭相隔一秒
//延时单元 delay.pas
unit Delay;

interface
procedure Delayms(ms:integer);

implementation
procedure Delayms