mirror of
https://github.com/cc65/cc65.git
synced 2025-08-08 06:25:17 +00:00
Cleaning
This commit is contained in:
@@ -10,7 +10,7 @@
|
|||||||
|
|
||||||
.proc _clrscr
|
.proc _clrscr
|
||||||
lda #<SCREEN
|
lda #<SCREEN
|
||||||
ldy #>SCREEN
|
ldy #>SCREEN
|
||||||
sta RES
|
sta RES
|
||||||
sty RES+1
|
sty RES+1
|
||||||
|
|
||||||
@@ -20,14 +20,14 @@
|
|||||||
BRK_TELEMON XFILLM
|
BRK_TELEMON XFILLM
|
||||||
|
|
||||||
|
|
||||||
; reset prompt position
|
; reset prompt position
|
||||||
lda #<(SCREEN+40)
|
lda #<(SCREEN+40)
|
||||||
sta ADSCRL
|
sta ADSCRL
|
||||||
lda #>(SCREEN+40)
|
lda #>(SCREEN+40)
|
||||||
sta ADSCRH
|
sta ADSCRH
|
||||||
|
|
||||||
; reset display position
|
; reset display position
|
||||||
lda #$01
|
lda #$01
|
||||||
sta SCRY
|
sta SCRY
|
||||||
lda #$00
|
lda #$00
|
||||||
sta SCRX
|
sta SCRX
|
||||||
|
@@ -5,11 +5,10 @@
|
|||||||
|
|
||||||
.import popa
|
.import popa
|
||||||
|
|
||||||
.importzp sp,tmp2,tmp3,tmp1
|
.importzp sp
|
||||||
|
|
||||||
.include "telestrat.inc"
|
.include "telestrat.inc"
|
||||||
|
|
||||||
|
|
||||||
.proc _gotoxy
|
.proc _gotoxy
|
||||||
; This function move only cursor for display, it does not move the prompt position
|
; This function move only cursor for display, it does not move the prompt position
|
||||||
; in telemon, there is position for prompt, and another for the cursor
|
; in telemon, there is position for prompt, and another for the cursor
|
||||||
|
@@ -7,7 +7,6 @@
|
|||||||
|
|
||||||
.include "telestrat.inc"
|
.include "telestrat.inc"
|
||||||
|
|
||||||
|
|
||||||
.proc _gotoy
|
.proc _gotoy
|
||||||
sta SCRY
|
sta SCRY
|
||||||
rts
|
rts
|
||||||
|
@@ -7,7 +7,6 @@
|
|||||||
|
|
||||||
.include "telestrat.inc"
|
.include "telestrat.inc"
|
||||||
|
|
||||||
|
|
||||||
.proc _wherex
|
.proc _wherex
|
||||||
ldx #$00
|
ldx #$00
|
||||||
lda SCRX
|
lda SCRX
|
||||||
|
@@ -7,7 +7,6 @@
|
|||||||
|
|
||||||
.include "telestrat.inc"
|
.include "telestrat.inc"
|
||||||
|
|
||||||
|
|
||||||
.proc _wherey
|
.proc _wherey
|
||||||
ldx #$00
|
ldx #$00
|
||||||
lda SCRY
|
lda SCRY
|
||||||
|
Reference in New Issue
Block a user