Added more stuff from groepaz with cleanups
git-svn-id: svn://svn.cc65.org/cc65/trunk@2122 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
39
libsrc/nes/setcursor.s
Normal file
39
libsrc/nes/setcursor.s
Normal file
@@ -0,0 +1,39 @@
|
||||
;
|
||||
; Written by Groepaz/Hitmen <groepaz@gmx.net>
|
||||
; Cleanup by Ullrich von Bassewitz <uz@cc65.org>
|
||||
;
|
||||
; Set the cursor position
|
||||
|
||||
.export setcursor
|
||||
|
||||
.include "nes.inc"
|
||||
|
||||
;-----------------------------------------------------------------------------
|
||||
|
||||
.proc setcursor
|
||||
|
||||
tya
|
||||
clc
|
||||
adc addrlo,x
|
||||
sta SCREEN_PTR
|
||||
|
||||
lda addrhi,x
|
||||
adc #0
|
||||
sta SCREEN_PTR+1
|
||||
rts
|
||||
|
||||
rts
|
||||
|
||||
.endproc
|
||||
|
||||
;-----------------------------------------------------------------------------
|
||||
; Tables with screen addresses
|
||||
|
||||
addrlo: .repeat screenrows,line
|
||||
.byte <($2000+((1*32))+(line*charsperline))
|
||||
.endrepeat
|
||||
|
||||
addrhi: .repeat screenrows,line
|
||||
.byte >($2000+((1*32))+(line*charsperline))
|
||||
.endrepeat
|
||||
|
||||
Reference in New Issue
Block a user