remove TABs

[cc65] / libsrc / telestrat / clrscr.s

diff --git a/libsrc/telestrat/clrscr.s b/libsrc/telestrat/clrscr.s
index f2b8fafc16e8f41a3a2b1bb191395ec1e17adc20..1f90a7ca59bcb067a3bf75edd9b4f3f3a75a1209 100644 (file)
--- a/libsrc/telestrat/clrscr.s
+++ b/libsrc/telestrat/clrscr.s
@@ -1,14 +1,17 @@
 ;
 ; jede jede@oric.org 2017-02-25
-; 
+;
 
     .export    _clrscr
-       
+
     .importzp  sp
-       
+
     .include   "telestrat.inc"
 
 .proc _clrscr
+    ; Switch to text mode
+    BRK_TELEMON(XTEXT)
+
     lda     #<SCREEN
     ldy     #>SCREEN
     sta     RES
@@ -18,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