PIC Vietnam - vòng lặp

các bác ơi cho em hơi cái này vói .mới hoc về pic viết thử chương trinh mà sao nó ko chạy mà chẳng bít sửa như thế nào .cho em hỏi về cái vòng lặp thuan,nghich sao nó ko chạy.chỉ xuất ra mỗi giá trị đầu nhập vào.
chương trình đây nè.ở đây em chỉ viết mỗi vòng thuận thui còn vòng nghịch em cũng viết tương tự

Code:

.processor p16f877a

include<P16f877a.inc>

STATUS        EQU        03H

PORTB        EQU        06H

PORTA        EQU        05H

TRISB        EQU        86H

TRISA        EQU        85H

COUNT_1 EQU       20H

COUNT_2 EQU       21H

ORG 0X000

      BSF          STATUS,5;CHON BANK 1

      MOVLW     0x00

      MOVWF     TRISA;PORTA lA NGO RA

      MOVLW     0XFF

       MOVWF    TRISB; PORTB LA NGO VAO

      BCF          STATUS,5;CHON BANK 0

      MOVLW     0X00

      MOVWF     PORTB

MAIN 

      BTFSS       PORTB,4

      GOTO       MAIN

      BTFSS      PORTB,5 

      GOTO        THUAN

      BTFSS       PORTB,6

      GOTO        THUAN

      GOTO        MAIN

THUAN  

       MOVLW      01H     

        MOVWF     PORTA

         CALL        DELAY

LOOP  RLF          PORTA,1

      CALL           DELAY

      BTFSS         PORTB,4

      GOTO          MAIN

      BTFSS         PORTB,6 

      GOTO         NGHICH

      BTFSS        PORTA,5

      GOTO        LOOP

      GOTO         THUAN

DELAY:         CLRF  COUNT_1

D2      CLRF  COUNT_2

D1      GOTO   D1

        DECFSZ COUNT_1 

              GOTO  D2

      RETURN

END

các bác giải thích giúp em với nhé.với lại có tài liệu nào hay về tập lệnh asembly của pic cho em xin với nhé
thank