remove TABs

This commit is contained in:
Christian Groessler
2019-02-05 23:27:52 +01:00
parent 2190703a57
commit 58484449b4
21 changed files with 164 additions and 169 deletions

View File

@@ -1,16 +1,16 @@
;
; jede jede@oric.org 2017-02-25
;
;
.export _clrscr
.importzp sp
.include "telestrat.inc"
.proc _clrscr
; Switch to text mode
BRK_TELEMON(XTEXT)
BRK_TELEMON(XTEXT)
lda #<SCREEN
ldy #>SCREEN
@@ -21,18 +21,18 @@
ldx #>(SCREEN+SCREEN_XSIZE*SCREEN_YSIZE)
lda #' '
BRK_TELEMON XFILLM
; reset prompt position
lda #<(SCREEN+40)
sta ADSCRL
lda #>(SCREEN+40)
sta ADSCRH
; reset display position
lda #$01
sta SCRY
lda #$00
sta SCRX
sta SCRX
rts
.endproc
.endproc