2000-10-25 19:53:22 +00:00
|
|
|
;
|
2003-05-04 22:34:16 +00:00
|
|
|
; Ullrich von Bassewitz, 2003-05-04
|
2000-10-25 19:53:22 +00:00
|
|
|
;
|
|
|
|
; CC65 runtime: Increment the stackpointer by 5
|
|
|
|
;
|
|
|
|
|
|
|
|
.export incsp5
|
2003-05-04 22:34:16 +00:00
|
|
|
.importzp sp
|
2000-10-25 19:53:22 +00:00
|
|
|
|
|
|
|
.proc incsp5
|
|
|
|
|
2003-05-04 22:34:16 +00:00
|
|
|
lda sp
|
|
|
|
clc
|
|
|
|
adc #5
|
|
|
|
sta sp
|
|
|
|
bcs @L1
|
|
|
|
rts
|
2000-10-25 19:53:22 +00:00
|
|
|
|
2003-05-04 22:34:16 +00:00
|
|
|
@L1: inc sp+1
|
|
|
|
rts
|
2000-10-25 19:53:22 +00:00
|
|
|
|
2003-05-04 22:34:16 +00:00
|
|
|
.endproc
|
2000-10-25 19:53:22 +00:00
|
|
|
|
2003-05-04 22:34:16 +00:00
|
|
|
|