]> git.sur5r.net Git - cc65/blobdiff - libsrc/cbm/c_load.s
Added mouse module from C64
[cc65] / libsrc / cbm / c_load.s
index 16aec28df191689530132fb3c3e6ac94af8fb946..4a767eab4e6cfcd1a701ef5678e7ab6eb2180ad9 100644 (file)
@@ -1,26 +1,23 @@
 ;
 ; Ullrich von Bassewitz, 03.06.1999
 ;
-; unsigned __fastcall__ cbm_load (unsigned char flag, unsigned addr);
+; unsigned char __fastcall__ cbm_k_load (unsigned char flag, unsigned addr);
 ;
 
        .include        "cbm.inc"
 
-               .export         _cbm_load
+               .export         _cbm_k_load
        .import         popa
        .importzp       ptr1
 
-_cbm_load:
+_cbm_k_load:
        sta     ptr1
-       stx     ptr1+1      
+       stx     ptr1+1
        jsr     popa            ; get flag
        ldx     ptr1
        ldy     ptr1+1
        jsr     LOAD
-       ldx     #0
-       bcc     @Ok
-       inx
-       rts
-@Ok:   txa
-       rts
-
+       bcs     @NotOk
+       lda     #0
+@NotOk:        rts
+