s_reg.asm.bak

PS2 Game Products Test-Jig source code,

;////////////////////////////////////////////////
;SET I/O PORT
;////////////////////////////////////////////////

;SET OUTPUT STATE			; BIT =(7|6|5|4|3|2|1|0)
		CLRF	PORTB		;PORTB=(L|L|L|L|L|L|L|L)
		MOVLW	0xFF;B'01101000'
		MOVWF	PORTC
		MOVLW	0xFF		
		MOVWF	PORTD		;PORTD=(H|H|H|H|H|H|H|H)

		CLRF	PORTA		;PORTA=(L|L|L|L|L|L|L|L)
		CLRF	PORTE		;PORTE=(L|L|L|L|L|L|L|L)

;SET I/O PIN DIRECTION	
		BSF	STATUS,RP0	;TO BANK1
		CLRF	TRISD
		CLRF	TRISB		;SET PORTB IS OUTPUT PORT
		MOVLW	B'11011100'
		MOVWF	TRISA		

		MOVLW	B'00000110'
		MOVWF	ADCON1

		MOVLW	B'00000100'
		MOVWF	TRISE	
		BCF	STATUS,RP0	;TO BANK0
		
;////////////////////////////////////////////////
;SET SPI COMMAND
;////////////////////////////////////////////////
;SET SPI STATUS
		MOVLW	B'00010011'	;TRANSMIT ON FALLING EDGE, RECEIVE ON RISING EDGE
 		MOVWF	SSPCON 		;MASTER MODE, CLOCK = TMR2 OUTPUT/2

;////////////////////////////////////////////////
;CLEAR BUFFER
;////////////////////////////////////////////////
		MOVLW	0x20-1
		MOVWF	FSR
CLEAR_BUFFER1	
		INCF	FSR,F
		CLRF	INDF
		
		MOVF	FSR,W
		XORLW	0x7F
		BTFSS	STATUS,Z
		GOTO	CLEAR_BUFFER1
		
		MOVLW	0xA0-1
		MOVWF	FSR
CLEAR_BUFFER1A
		INCF	FSR,F
		CLRF	INDF
		
		MOVF	FSR,W
		XORLW	0xFF
		BTFSS	STATUS,Z
		GOTO	CLEAR_BUFFER1A
		
		CLRF	DSR_FB
		CLRF	EEP_FB
		CLRF	EEP_OPT
		CLRF	COUNT_DSR
		CLRF	MODE_TYPE
                CLRF	DIS_BUF_FB

                MOVLW	0x02
		MOVWF	NOF_RD_PSCTP

		MOVLW	0x5A		;CHECK ACKNOWLEDGE = 5A
		MOVWF	C_ACK

;////////////////////////////////////////////////
;ENABLE INTERRUPT
;////////////////////////////////////////////////

;		MOVLW	B'11000000'     ;ENABLE (GLOBAL,PERIPHERAL) INTERRUPT
;		IORWF	INTCON,F



;////////////////////////////////////////////////
;DISPLAY DATE
;////////////////////////////////////////////////

		CALL	DIS_DATE

		MOVLW	D'120'
		MOVWF	TEMP_BUFFER

DISPLAY_RELEASE_DATE		
		BSF	PCLATH,3		;PAGE 1
		CALL	DISPLAY_DATA		
		CLRF	PCLATH			;PAGE 0
	
		DECFSZ	TEMP_BUFFER,F
		GOTO	DISPLAY_RELEASE_DATE