Merge pull request #740 from laubzega/master

[cc65] / libsrc / pce / kplot.s

diff --git a/libsrc/pce/kplot.s b/libsrc/pce/kplot.s
index e4426d00573802465449700f3bb1f01acef218ed..ae31710f3b3782af4a70fe00daeb8a236bea632e 100644 (file)
--- a/libsrc/pce/kplot.s
+++ b/libsrc/pce/kplot.s
@@ -4,36 +4,27 @@
         .include        "pce.inc"
         .include        "extzp.inc"
 
-PLOT:
-        bcs     @getpos
+PLOT:   bcs     @getpos
 
         tya
         ;clc                    ; already cleared
-        adc     _plotlo,x
+        adc     plotlo,x
         sta     SCREEN_PTR
 
-        lda     _plothi,x
-        adc     #0
+        cla
+        adc     plothi,x
         sta     SCREEN_PTR+1
 @getpos:
         ldx     CURS_Y
         ldy     CURS_X
         rts
 
-        .rodata
+.rodata
 
-_plotlo:
-        .repeat screenrows,line
+plotlo: .repeat screenrows,line
         .byte   <($0000+(line*$80))
         .endrepeat
 
-_plothi:
-        .repeat screenrows,line
+plothi: .repeat screenrows,line
         .byte   >($0000+(line*$80))
         .endrepeat
-
-;-------------------------------------------------------------------------------
-; force the init constructor to be imported
-
-        .import initconio
-conio_init      = initconio