TẠI SAO doạn chương trình này không thể viết gọn lại

[phamthanhkhuyen]

Đây là đoạn chương trình con nằm trong chương trình ngắt Timer0 ;pic6f877a

;phần khai báo biến
                       CBLOCK 0X20
;DIGIx : là các con số BCD nén
DIGI1     ;4 BIT CAO =NHIETmax_DONVI     4 BIT THẤP=NHIETdoduoc_DONVI
DIGI2     ;4 BIT CAO =NHIETmax_CHUC      4 BIT THẤP=NHIETdoduoc_CHUC
DIGI3     ;4 BIT CAO =NHIETmax_TRAM      4 BIT THẤP=NHIETdoduoc_TRAM
.......
                       ENDC

........



;chương trình so sánh khi Nhiệt đo được < Nhiệt max --->on_relay
;khi : Nhiệt đo được >= Nhiệt max --->off_relay


;XAC DINH VI TRI LED TRAM
					MOVLW	0X22		
					MOVWF	FSR


SO_SANH

			;XAC DINH POINT_OFF TRAM:					;NHIETmax DUOC THIET LAP DO THAO TAC BAN PHIM
					MOVLW	B'11110000'				;NHIETmax 	: NAM TRONG 4 BIT CAO
					ANDWF	INDF, W					;NHIETdoduoc: NAM TRONG 4 BIT THAP
					MOVWF	POINT_ONOFF				;POINT_ONOFF = NHIETmax	
					SWAPF	POINT_ONOFF, F
			;LUU Y :NEU POINT_ONOFF=15 THI XOA 
                                       ;POINT_ONOFF=<9:0> chỉ =15 khi tắt sự hiển thị
POINT_ONOFF=0
					MOVLW	0X0F
					XORWF	POINT_ONOFF, W
					BTFSC	STATUS, Z
					CLRF	POINT_ONOFF	
		
					MOVLW	B'00001111'				
					ANDWF	INDF, W					;NHIETdoduoc = 4 BIT THAP
					SUBWF	POINT_ONOFF, W			;POINT_ONOFF - NHIETdoduoc
					BTFSS	STATUS, C
					GOTO	OFF_RELAY				;C=0  POINT_ONOFF < NHIETdoduoc
			;C=1 POINT_ONOFF >= NHIETdoduoc
					
					BTFSS	STATUS, Z				;NEU : NHIETdoduoc = POINT_ONOFF THI Z=1
					GOTO	ON_RELAY				;POINT_ONOFF > NHIETdoduoc
					;THOAT RA TIEP TUC XET LED CAP DUOI


					DECF	FSR, F
			;XAC DINH POINT_OFF CHUC :				;NHIETmax DUOC THIET LAP DO THAO TAC BAN PHIM
					MOVLW	B'11110000'				;NHIETmax 	: NAM TRONG 4 BIT CAO
					ANDWF	INDF, W					;NHIETdoduoc: NAM TRONG 4 BIT THAP
					MOVWF	POINT_ONOFF				;POINT_ONOFF = NHIETmax	
					SWAPF	POINT_ONOFF, F
			;LUU Y :NEU POINT_ONOFF=15 THI XOA--> POINT_ONOFF=0
					MOVLW	0X0F
					XORWF	POINT_ONOFF, W
					BTFSC	STATUS, Z
					CLRF	POINT_ONOFF	
		
					MOVLW	B'00001111'				
					ANDWF	INDF, W					;NHIETdoduoc = 4 BIT THAP
					SUBWF	POINT_ONOFF, W			;POINT_ONOFF - NHIETdoduoc
					BTFSS	STATUS, C
					GOTO	OFF_RELAY				;C=0  POINT_ONOFF < NHIETdoduoc
			;C=1 POINT_ONOFF >= NHIETdoduoc
					
					BTFSS	STATUS, Z				;NEU : NHIETdoduoc = POINT_ONOFF THI Z=1
					GOTO	ON_RELAY				;POINT_ONOFF > NHIETdoduoc
					;THOAT RA TIEP TUC XET LED CAP DUOI


					DECF	FSR, F
			;XAC DINH POINT_OFF DONVI :					;NHIETmax DUOC THIET LAP DO THAO TAC BAN PHIM
					MOVLW	B'11110000'				;NHIETmax 	: NAM TRONG 4 BIT CAO
					ANDWF	INDF, W					;NHIETdoduoc: NAM TRONG 4 BIT THAP
					MOVWF	POINT_ONOFF				;POINT_ONOFF = NHIETmax	
					SWAPF	POINT_ONOFF, F
			;LUU Y :NEU POINT_ONOFF=15 THI XOA POINT_ONOFF=0
					MOVLW	0X0F
					XORWF	POINT_ONOFF, W
					BTFSC	STATUS, Z
					CLRF	POINT_ONOFF	
		
					MOVLW	B'00001111'				
					ANDWF	INDF, W					;NHIETdoduoc = 4 BIT THAP
					SUBWF	POINT_ONOFF, W			;POINT_ONOFF - NHIETdoduoc
					BTFSS	STATUS, C
					GOTO	OFF_RELAY				;C=0  POINT_ONOFF < NHIETdoduoc
			;C=1 POINT_ONOFF >= NHIETdoduoc
					
					BTFSS	STATUS, Z				;NEU : NHIETdoduoc = POINT_ONOFF THI Z=1
					GOTO	ON_RELAY				;POINT_ONOFF > NHIETdoduoc
					;THOAT RA TIEP TUC XET LED CAP DUOI



;---------------------------------------
ON_RELAY
                                                 ....
                                                 GOTO EXIT_RELAY
OFF_RELAY
                                                 ....
  EXIT_RELAY                               RETURN

[phamthanhkhuyen]

tôi viết theo cách này thì chương trình nó không chịu chạy

			;XAC DINH VI TRI LED TRAM
					MOVLW	0X23		
					MOVWF	FSR
                                                                MOVLW   .3
                                                                MOVWF   TEMP

SO_SANH
                                                                DECF       FSR, F

			;XAC DINH POINT_OFF TRAM:					;NHIETmax DUOC THIET LAP DO THAO TAC BAN PHIM
					MOVLW	B'11110000'				;NHIETmax 	: NAM TRONG 4 BIT CAO
					ANDWF	INDF, W					;NHIETdoduoc: NAM TRONG 4 BIT THAP
					MOVWF	POINT_ONOFF				;POINT_ONOFF = NHIETmax	
					SWAPF	POINT_ONOFF, F
			;LUU Y :NEU POINT_ONOFF=15 THI XOA POINT_ONOFF=0
					MOVLW	0X0F
					XORWF	POINT_ONOFF, W
					BTFSC	STATUS, Z
					CLRF	POINT_ONOFF	
		
					MOVLW	B'00001111'				
					ANDWF	INDF, W					;NHIETdoduoc = 4 BIT THAP
					SUBWF	POINT_ONOFF, W			;POINT_ONOFF - NHIETdoduoc
					BTFSS	STATUS, C
					GOTO	OFF_RELAY				;C=0  POINT_ONOFF < NHIETdoduoc
			;C=1 POINT_ONOFF >= NHIETdoduoc
					
					BTFSS	STATUS, Z				;NEU : NHIETdoduoc = POINT_ONOFF THI Z=1
					GOTO	ON_RELAY				;POINT_ONOFF > NHIETdoduoc
					;THOAT RA TIEP TUC XET LED CAP DUOI

                                            DECFSZ    TEMP, F
                                            GOTO       SO_SANH

ON_RELAY
                                            ....
                                            GOTO EXIT_RELAY
OFF_RELAY
                                            ....
  EXIT_RELAY                          RETURN

[namqn]

Hai đoạn code đó về nguyên tắc thì phải chạy giống nhau, trừ khi bạn khai báo biến TEMP không tốt (mang địa chỉ một thanh ghi đặc biệt nào đó, hay trùng với một trong các biến khác) hay còn một lý do nào khác mà tôi chưa biết. Góp ý một chút: viết code toàn bằng chữ in thì sẽ gây khó khăn cho mắt khi đọc code.

Thân,