X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=libsrc%2Fcbm610%2Fcrtc.s;h=ad9ddefb56f60e8b3c9d1aa94f4a0475a84a8984;hb=85885001b133e2dc320b6f6459259afa69784ca8;hp=f7b0184094dbd0c741959a906bd3906e05f2adb6;hpb=44fd1082ae807a0b6b4046c65914e20a7e27101c;p=cc65 diff --git a/libsrc/cbm610/crtc.s b/libsrc/cbm610/crtc.s index f7b018409..ad9ddefb5 100644 --- a/libsrc/cbm610/crtc.s +++ b/libsrc/cbm610/crtc.s @@ -4,54 +4,54 @@ ; Write to the CRTC. ; - .export write_crtc, read_crtc - .importzp crtc, ktmp + .export write_crtc, read_crtc + .importzp crtc, ktmp - .include "cbm610.inc" + .include "cbm610.inc" ; Write a value to the CRTC. The index is in Y, the value in A -.proc write_crtc - sta ktmp - lda IndReg - pha - lda #$0F - sta IndReg - tya - ldy #$00 - sei - sta (crtc),y - iny - lda ktmp - sta (crtc),y - cli - pla - sta IndReg - lda ktmp - rts +.proc write_crtc + sta ktmp + lda IndReg + pha + lda #$0F + sta IndReg + tya + ldy #$00 + sei + sta (crtc),y + iny + lda ktmp + sta (crtc),y + cli + pla + sta IndReg + lda ktmp + rts .endproc -.proc read_crtc - sty ktmp - lda IndReg - pha - lda #$0F - sta IndReg - lda ktmp - ldy #$00 - sei - sta (crtc),y - iny - lda (crtc),y - cli - tay - pla - sta IndReg - tya - ldy ktmp - rts +.proc read_crtc + sty ktmp + lda IndReg + pha + lda #$0F + sta IndReg + lda ktmp + ldy #$00 + sei + sta (crtc),y + iny + lda (crtc),y + cli + tay + pla + sta IndReg + tya + ldy ktmp + rts .endproc