fix comments

[cc65] / libsrc / atmos / atmos-240-200-2.s

diff --git a/libsrc/atmos/atmos-240-200-2.s b/libsrc/atmos/atmos-240-200-2.s
index 6d664cdf58b668676a5d5d614076ee7452f7e169..72887db4aa1f5929991fc0b83d7aee4a73441705 100644 (file)
--- a/libsrc/atmos/atmos-240-200-2.s
+++ b/libsrc/atmos/atmos-240-200-2.s
@@ -29,31 +29,31 @@
        .byte   1                       ; Number of screens available
 xsize: .byte   6                       ; System font X size
        .byte   8                       ; System font Y size
-       .res    4, $00                  ; Reserved for future extensions
+        .word   $100                    ; Aspect ratio
 
 ; Next comes the jump table. Currently all entries must be valid and may point
 ; to an RTS for test versions (function not implemented).
 
-       .word   INSTALL
-       .word   UNINSTALL
-       .word   INIT
-       .word   DONE
-       .word   GETERROR
-       .word   CONTROL
-       .word   CLEAR
-       .word   SETVIEWPAGE
-       .word   SETDRAWPAGE
-       .word   SETCOLOR
-       .word   SETPALETTE
-       .word   GETPALETTE
-       .word   GETDEFPALETTE
-       .word   SETPIXEL
-       .word   GETPIXEL
-       .word   LINE
-       .word   BAR
-       .word   _CIRCLE
-       .word   TEXTSTYLE
-       .word   OUTTEXT
+               .addr   INSTALL
+               .addr   UNINSTALL
+               .addr   INIT
+               .addr   DONE
+               .addr   GETERROR
+               .addr   CONTROL
+               .addr   CLEAR
+               .addr   SETVIEWPAGE
+               .addr   SETDRAWPAGE
+               .addr   SETCOLOR
+               .addr   SETPALETTE
+               .addr   GETPALETTE
+               .addr   GETDEFPALETTE
+               .addr   SETPIXEL
+               .addr   GETPIXEL
+               .addr   LINE
+               .addr   BAR
+               .addr   TEXTSTYLE
+               .addr   OUTTEXT
+        .addr   0                       ; IRQ entry is unused
 
 ; ------------------------------------------------------------------------
 ; Data.
@@ -87,7 +87,6 @@ CHAR          = $F12D
 POINT          = $F1C8
 PAPER          = $F204
 INK            = $F210
-CIRCLE         = $F37F
 
 .rodata
 
@@ -349,22 +348,6 @@ BAR:
        bne     @L1
        rts
 
-; ------------------------------------------------------------------------
-; CIRCLE: Draw a circle around the center X1/Y1 (= ptr1/ptr2) with the
-; radius in tmp1 and the current drawing color.
-;
-; Must set an error code: NO
-;
-
-_CIRCLE:
-       lda     #3
-       jsr     mymode
-       lda     RADIUS
-       sta     PARAM1
-       lda     MODE
-       sta     PARAM2
-       jmp     CIRCLE
-
 ; ------------------------------------------------------------------------
 ; TEXTSTYLE: Set the style used when calling OUTTEXT. Text scaling in X and Y
 ; direction is passend in X/Y, the text direction is passed in A.