PIC单片机流水灯程序

org  00h ;goto a1;org  0ch;;******************************************;   主程序段;******************************************a1  movlw  8;循环次数 movwf  40h;movlw  B01111111;初显示值movwf  41h;a2   bsf   STATUS,RP0;选择体1bcf   STATUS,RP1;movlw  00h;movwf  TRISD;设置RD口为输出口bcf   STATUS,RP0;选择体0bcf   STATUS,RP1;movfw  41h;movwf  PORTD;输出显示数据RRF   41H,0;处理Crrf   41h,1;循环右移call  m001;延时decfsz  40h,1;判断是否完成8次goto  a2;否继续goto  a1;是返回重新设置;************************************************;   延时子程序;************************************************m001movlw  4movwf  30hm002  movlw  248movwf  31hm003  movlw  250movwf  32hdecfsz  32h,1goto  $-1decfsz  31h,1goto  m003decfsz  30h,1goto  m002    returnend