]> git.sur5r.net Git - cc65/blobdiff - libsrc/cbm510/peeksys.s
Merge pull request #121 from groessler/something_to_pull
[cc65] / libsrc / cbm510 / peeksys.s
index 3d551e75cebd10c44a16372299e8c2d017dcbe70..ea3ed7134108f8a7680c28902e2fafe4f175c5de 100644 (file)
@@ -2,49 +2,49 @@
 ; Ullrich von Bassewitz, 14.09.2001
 ;
 
-       .export         _peekbsys, _peekwsys
-       .importzp       ptr1
+        .export         _peekbsys, _peekwsys
+        .importzp       ptr1
 
-       .include        "cbm510.inc"
+        .include        "cbm510.inc"
 
 
 ; ------------------------------------------------------------------------
 ; unsigned char __fastcall__ peekbsys (unsigned addr);
 
-.proc  _peekbsys
+.proc   _peekbsys
 
-       sta     ptr1            ; Store argument pointer
-       stx     ptr1+1
-               ldx     IndReg
-       lda     #$0F
-       sta     IndReg
-       ldy     #$00
-       lda     (ptr1),y
-       stx     IndReg
-       ldx     #$00            ; Extend to word
-       rts
+        sta     ptr1            ; Store argument pointer
+        stx     ptr1+1
+        ldx     IndReg
+        lda     #$0F
+        sta     IndReg
+        ldy     #$00
+        lda     (ptr1),y
+        stx     IndReg
+        ldx     #$00            ; Extend to word
+        rts
 
 .endproc
 
 ; ------------------------------------------------------------------------
 ; unsigned __fastcall__ peekwsys (unsigned addr);
 
-.proc  _peekwsys
-
-       sta     ptr1            ; Store argument pointer
-       stx     ptr1+1
-               ldx     IndReg
-       lda     #$0F
-       sta     IndReg
-       ldy     #$00
-       lda     (ptr1),y        ; Get low byte
-       pha
-       iny
-       lda     (ptr1),y        ; Get high byte
-       stx     IndReg
-       tax                     ; High byte -> X
-       pla                     ; Low byte -> A
-       rts
+.proc   _peekwsys
+
+        sta     ptr1            ; Store argument pointer
+        stx     ptr1+1
+        ldx     IndReg
+        lda     #$0F
+        sta     IndReg
+        ldy     #$00
+        lda     (ptr1),y        ; Get low byte
+        pha
+        iny
+        lda     (ptr1),y        ; Get high byte
+        stx     IndReg
+        tax                     ; High byte -> X
+        pla                     ; Low byte -> A
+        rts
 
 .endproc