2017-02-25 21:20:17 +00:00
|
|
|
;
|
|
|
|
|
; jede jede@oric.org 2017-02-25
|
|
|
|
|
;
|
|
|
|
|
.export _gotoy
|
2019-07-06 08:33:39 +00:00
|
|
|
.import CHARCOLOR_CHANGE, BGCOLOR_CHANGE
|
2017-02-25 21:20:17 +00:00
|
|
|
|
2019-07-07 20:02:48 +00:00
|
|
|
.import update_adscr
|
2017-02-25 21:20:17 +00:00
|
|
|
|
|
|
|
|
.include "telestrat.inc"
|
|
|
|
|
|
|
|
|
|
.proc _gotoy
|
|
|
|
|
sta SCRY
|
2019-07-07 20:02:48 +00:00
|
|
|
jsr update_adscr
|
2019-07-06 08:19:45 +00:00
|
|
|
|
|
|
|
|
; We change the current line, it means that we need to put color attributes again.
|
|
|
|
|
; That is not the case with _gotox because, it's on the same line attribute are already set
|
|
|
|
|
lda #$01
|
|
|
|
|
sta CHARCOLOR_CHANGE
|
|
|
|
|
sta BGCOLOR_CHANGE
|
2017-02-25 21:20:17 +00:00
|
|
|
rts
|
2019-02-05 22:27:52 +00:00
|
|
|
.endproc
|
