笔者在这里介绍一种定时程序，说明循环程序在PIC单片机上的应用。笔者仍以PIC16F84单片机为例建立其定时源程序清单。

　　该定时器源程序只需改变一条指令的常数设置，即可使定时时间从分钟级到3??8小时的连续变化(4MHz晶振条件)。PIC16F84单片机的硬件电路，请见本报第32期实验编程器1??01实验板电路。在该实验板电路上，若读者改变晶振的频率(2MHz、1MHz、500kHz)等，很易直观看出定时时间成比例相应地增加，这对了解PIC单片机的性能十分直观有趣。若在该源程序上再多设置一次循环，可使定时时间长达1月以上。
　
　　该PIC16F84定时源程序可直接在MPLAB集成开发环境软件下进行汇编，其汇编后生成的HEX文件可在实验编程器1??01上对源程序进行固化并可在相应的实验板上直接观察实验的结果。PIC16F84定时的源程序清单如下(文件各可自定义)：
　　　LIST　　P=PIC16F84
　　　＃INCLUDE P16F84?盜NC
　　　COUNT1   EQU　　0x1F
　　　COUNT2   EQU　　0x1E
　　　COUNT3   EQU　　0x1D
　　　COUNT4   EQU　　0x1C
　　　ORG    　0
　　　START CLRW　　　　　　；与MOVLW0等效
　　　BSF　　  STATUS，5；选体1
　　　MOVWF    TRISB　；设B口为输出
　　　BCF　　  STATUS，5；STATUS复位当前体0
　　　CLRF　   PORTB     ；定时启动功能
　　　M1　  BTFSS　  PORTA，1；判断A口第D1位，D1=1间跳，D1=0顺
　　　　　　　　　　　　；序执行
　　　GOTO　  M2
　　　GOTO　  M1
　　　M2　  MOVLW   0xAA　    ；选B口定时位，LED亮开始定时
　　　MOVWF   PORTB　  ；B口按0x10101010输出
　　　DELY  CLRW　　　　　　；与MOVLW0等效
　　   MOVLW    0xFF
　　   MVOWF    COUNT1
　　   MVOWF    COUNT2
　　   MVOWF    COUNT3
　　   MOVLW    0　　　   ；与CLRW指令等效
　　   MOVLW    0x02　　  ；0x02送W(最大定时为0xFF)
　　   MOVWF    COUNT4    ；定时值控制(细调)
　　　LOOP  DECFSZ    COUNT1，1；CPUNT减1，为0间跳
　　   GOTO     LOOP
　　   DECFSZ     COUNT2，1；同上特点，这里d=1可不用
　　   GOTO　   LOOP
　　   DECFSZ    COUNT3，1；同上
　　   GOTO     LOOP
　　   DECFSZ    COUNT4，1；同上，但COUNT4中值可自由选定
　　   GOTO     LOOP
　　   CLRW　　　　　　  ；与MOVLW0相同
　　   MOVLW    0x02　　  ；定时结束显示
　　   MOVWF    PORTB
　　　M3     GOTO     M3
　　  END　　　　　　　；程序结束

　　说明：该源程序中常数设置可由读者任意改变，改变之后即可达到任意时间的设定。