二、应广单片机点亮一个灯

        上一节介绍基础，由于时间仓促，写得十分模糊。这一节开始从一个个实际例子，向大家展示应广单片机的各项功能。由于看本文的读者层次不相同，这里全部按照初学者视之。

废话少说，上例程：

//========================================================
#include "extern.h"

KeyBounce  equ 30*1000    //30ms

void FPPA0(void)
{
.ADJUST_IC SYSCLK=IHRC/2;
pac = 0b_1111_1110;
pa = 0b_0000_0000;
paph = 0b_0000_0001;
$ padier 0b_1111_1001;

while (1)
{
    if( pa.0 == 0 )
    {
        if(--KeyBounce  == 0)
        {
            if( pa.0 == 0 )
            {
                A = pa.3;
                A ~= 0b00001000;
                pa = A; 
            }
        }
    }
}
}
//========================================================

以上例程非常简单

#include "extern.h"

是程序的头文件。

void FPPA0(void)

相当于程序的 main() 函数。

.ADJUST_IC SYSCLK=IHRC/2;

是对芯片时钟的设定，具体参考使用的单片机芯片来设定。

pac = 0b_1111_1110;
pa = 0b_0000_0000;
paph = 0b_0000_0001;
$ padier 0b_1111_1001;

是对芯片引脚设定。这里设定 pa.0 为输入，启用上拉电阻。具体设置可参考芯片手册。

while (1)

无限循环函数，与大多数函数相似。

if( pa.0 == 0 )

判断 pa.0 是否被人按下了。如果不是，直接跳过。如果被按下。

if(--KeyBounce  == 0)

程序连续判断了30 * 1000 次后还是 被按下。执行：

A = pa.3;
A ~= 0b00001000;
pa = A; 

取反 pa.3 的电平。程序的外围器件将 pa.3 的引脚连接 LED 灯，取反 pa.3 的电平时，实现点亮或者熄灭一颗灯的效果。