string_compare.asm

SUNPLUS的8BIT的MCU SPMC65X基本功能函数库及使用说明

;==================================================================================
; The information contained herein is the exclusive property of
; Sunplus Technology Co. And shall not be distributed, reproduced,
; or disclosed in whole in part without prior written permission.
;       (C) COPYRIGHT 2004   SUNPLUS TECHNOLOGY CO.                                  
;                   ALL RIGHTS RESERVED
; The entire notice above must be reproduced on all authorized copies.
;==================================================================================
																					
;==================================================================================
;  Program Name		:	string_compare.asm
;  Description		:	This program compare a string with another 
;                       string.		 
;  Reference		:	SPMC65P2404A/2408A Data Sheet
;  Revision history	:
;---------------------------------------------------------------------------------- 
;  Version		Date 		Description
;  1.0.0    	2004-8-11	First Edition
;==================================================================================

.SYNTAX  6502							;process standard 6502 addressing syntax
.LINKLIST								;generate linklist information
.SYMBOLS								;generate symbolic debug information
;************************************************************************************
C_LIB_DEF		EQU		1
.INCLUDE		AN_O0100.INC			;Define	external variable
;**********************************************************************************
.PAGE0					
.DATA									;define data storage section
;**********************************************************************************
.CODE
;==================================================================================
;	Function:		F_Stringcompare
;	Description:	compare a string with another string.            .       
;	Input:			none
;	Output:			z----1:ok  0:error
;	Destroy:		A,X
;	Stacks:			1
;==================================================================================
.PUBLIC		F_Stringcompare
F_Stringcompare:
		ldy		#0
?L_Stringcopy_Loop:		
		lda		(GB_String_Address1),y		;get data from String1
		cmp		(GB_String_Address2),y		;String1 = String2	?
		bne		?_Stringcopy_End			;no
		lda		(GB_String_Address1),y		;get data from String1
		beq		?_Stringcopy_End
		iny									;index regist add 1
		jmp		?L_Stringcopy_Loop		
?_Stringcopy_End:
		rts