display.asm

PS2 Game Products Test-Jig source code,

;////////////////////////////////////////////////
;DISPLAY BUTTON 
;////////////////////////////////////////////////

;1ST LED DISPLAY
DISPLAY_DATA    
;		BSF     STATUS,RP0      ;SET PORTD IS OUTPUT PORT
;		CLRF    TRISB
;		CLRF    TRISD
;               MOVLW   B'11011111'
;               MOVWF   TRISA
;		BCF     STATUS,RP0              

		BSF	RESET_COL
		BCF	RESET_COL		
	
		CLRF    PORTB
		MOVLW   0xFF            ;SET PORTD BIT(0-3) = HIGH
		MOVWF   PORTD
		
		MOVLW	D'9'
		MOVWF	COUNT_COL
		
		MOVLW	DIS_BUF1-1
		MOVWF	FSR	
	
DIS_DATA1        
		CLRWDT
		BSF	NEXT_COL
		BCF	NEXT_COL

		INCF	FSR,F
		MOVF	INDF,W
		MOVWF	DATA_PORT
				
		BCF     O_ENABLE1       ;ENABLE OUTPUT BUFFER
		BCF     E_LATCH1        ;LATCH OUTPUT DATA		


DIS_DATA2			
		INCF	FSR,F
		MOVF	INDF,W
		MOVWF	DATA_PORT
				
		BCF     O_ENABLE2       ;ENABLE OUTPUT BUFFER
		BCF     E_LATCH2        ;LATCH OUTPUT DATA		


DIS_DATA3
		INCF	FSR,F
		MOVF	INDF,W
		MOVWF	DATA_PORT
				
		BCF     O_ENABLE3       ;ENABLE OUTPUT BUFFER
		BCF     E_LATCH3        ;LATCH OUTPUT DATA		

DIS_DATA4
		INCF	FSR,F
		MOVF	INDF,W
		MOVWF	DATA_PORT
				
		BCF     O_ENABLE4       ;ENABLE OUTPUT BUFFER
		BCF     E_LATCH4        ;LATCH OUTPUT DATA		

;--------------------------------------------------------------------
		CALL	LED_DELAY

		MOVLW	0xFF		
		MOVWF	ROW_SEL_PORT
		DECFSZ	COUNT_COL,F
		GOTO	DIS_DATA1

		BSF	RESET_COL
		BCF	RESET_COL		

		RETURN
;--------------------------------------------------------------------
LED_DELAY       MOVLW   LED_DELAY_H     ;DELAY=1.9ms (CRYSTAL=10MHz)
		MOVWF   CCPR1H

		MOVLW   LED_DELAY_L

		CLRF	PCLATH		;Page0
		CALL    E_CCP1
		BSF	PCLATH,3	;Page1
		
		RETURN