;MCD1实战一,LED8位流水灯《霹雳灯》
;该实战的目的作为学习和应用MCD1在线调试工具套件，进行项目的软件和硬件
;联合调试的范例程序，也就是当做一个用户程序实例，而演示板暂时充当用户电
;路的角色。这样就构成了一个软件、硬件齐全的自制项目模拟环境。
;本程序实现的功能是，把端口RC的8条引脚全部设置为输出模式，依次从引脚RC0
;到RC7送出高电平，然后再依次从引脚RC7到RC0送出高电平，并且周而复始，从而
;使得与该端口C相连的8只发光二极管LED循环依次点亮，其效果类似于一个简单的霹雳灯。
;该程序可用于PIC16F87X(A)所有系列
 
;************************************************
;《霹雳灯》程序。文件名为“mcd-led1.ASM”
;**************************************************
status    equ   3h       ;定义状态寄存器地址
portc     equ    7h      ;定义端口C的数据寄存器地址
trisc     equ   87h      ;定义端口C的方向控制寄存器地址
flag      equ   25h      ;定义一个控制左移/右移的标志寄存器
;***********************************************************
       org   000h      ;定义程序存放区域的起始地址
       nop             ;放置一条ICD必须的空操用指令
       bsf     status,5      ;设置文件寄存器的体1
       movlw   00h        ;对端口C的方向控制码00H先送W
       movwf   trisc       ;再由W转移到方向控制寄存器
       bcf    status,5       ;恢复到文件寄存器体0
       movlw  01h         ;将00000001B先送W
       movwf  portc        ;再由W转移到数据寄存器
       bsf     flag,0      ;将左右移标志位置1,首先进行左移LED
       bcf     status,0    ;先清除C标志位
loop  btfss    status,0      ;测试进位/借位位,是1则修改标志
       goto     loop1       ;是0则不修改标志
       comf    flag,1       ;FLAG的BIT0作为标志位,把它取反
loop1  btfss    flag,0       ;判断标志位，是1则跳到循环左移
       goto     loop2       ;是0则跳到循环右移
       rlf       portc,0     ;循环左移端口C数据寄存器，结果送W
       movwf   portc        ;将结果再送回端口C的数据寄存器
       goto     loop3        ;跳过下面两条指令
loop2  rrf      portc,0   ;循环右移端口C数据寄存器，结果送回W
       movwf   portc     ;将结果再送回端口C的数据寄存器   ;
loop3  call      delay         ;调用廷时子程序
       goto      loop         ;返回
;-------------------------廷时子程序--------------------------