This commit was generated by cvs2svn to compensate for changes in r2,

which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81
2000-05-28 13:40:48 +00:00
parent 579491e8a4
commit 53dd513176
847 changed files with 91345 additions and 0 deletions
--- a/libsrc/runtime/inc.s
+++ b/libsrc/runtime/inc.s
@@ -0,0 +1,48 @@
+;
+; Ullrich von Bassewitz, 05.08.1998
+;
+; CC65 runtime: Increment ax by constant or value in Y
+;
+
+       	.export	   	incaxy
+ 	.export	   	incax8, incax7, incax6, incax5
+	.export	   	incax4, incax3, incax2, incax1
+	.importzp  	tmp1
+
+
+incax8:	ldy	#8
+       	bne 	incaxy
+
+incax7:	ldy	#7
+	bne	incaxy
+
+incax6:	ldy	#6
+	bne	incaxy
+
+incax5:	ldy	#5
+	bne	incaxy
+
+incax4:	ldy	#4
+	bne	incaxy
+
+incax3:	ldy	#3
+;     	bne	incaxy
+incaxy:	sty	tmp1
+      	clc
+      	adc	tmp1
+      	bcc	*+3
+      	inx
+      	rts
+		   
+incax2:	clc
+	adc	#2
+	bcc	*+3
+	inx
+	rts
+
+incax1:	clc
+	adc	#1
+	bcc	*+3
+	inx
+	rts
+