完整的源程序pic07.c 清單如下：

　　#include pic.h>

　　∥包含頭文件

　　# define PORTAIT （ add , bit ） （ （unsigned ）（add）*8+（bit））

　　static bit PORT_2 @PORTAIT（PORTA,2）；

　　static bit PORT_3 @PORTAIT（PORTA,3）；

　　static bit PORT_4 @PORTAIT（PORTA,4）；

　　∥ A 口位定義

　　unsigned int x=0;

　　∥給無(wú)符號(hào)整型變量X 賦值0

　　void delay（unsigned long int k ）

　　∥帶形參K 的延時(shí)函數(shù)

　　{

　　unsigned long int i;

　　for（i=0;i=k;i++）

　　continue;

　　}

　　void display（unsigned int x）

　　∥帶形參X 的顯示函數(shù)

　　{

　　unsigned int d=100,unit_bit,ten_bit;

　　∥自定義無(wú)符號(hào)整型變量d

　　∥ 個(gè)位和十位

　　unsigned char SEG7[10]={0xc0,0xf9,0xa4,

　　0xb0,0x99,0x92,0x82,0xf8,0x80,0x90};

　　∥引用數(shù)組字符段碼

　　unit_bit=x%10;

　　∥ Picc 可識(shí)別的個(gè)位

　　ten_bit=x/10%10;

　　∥ Picc 可識(shí)別的十位

　　while（d>0）

　　∥ while 語(yǔ)句

　　{

　　PORTA=0x1F;

　　∥關(guān)秒顯示

　　PORTB=SEG7[unit_bit];

　　∥個(gè)位段碼送B 口

　　RA3=0;

　　∥顯示個(gè)位

　　delay（200）；

　　∥延時(shí)以便觀察

　　RA3=1;

　　∥關(guān)個(gè)位顯示

　　delay（2）；

　　∥延時(shí)

　　PORTB=SEG7[ten_bit];

　　∥十位段碼送B 口

　　RA2=0;

　　∥顯示十位值