From a27e7562fd04567f608606bd1b3dde566e792f93 Mon Sep 17 00:00:00 2001 From: Greg King Date: Mon, 5 May 2014 13:45:34 -0400 Subject: [PATCH] Added comments that explain why some instructions are implied. --- libsrc/c128/mou/c128-1351.s | 2 +- libsrc/c128/mou/c128-inkwell.s | 4 ++-- libsrc/c128/mou/c128-joy.s | 2 +- libsrc/c128/mou/c128-pot.s | 6 +++--- 4 files changed, 7 insertions(+), 7 deletions(-) diff --git a/libsrc/c128/mou/c128-1351.s b/libsrc/c128/mou/c128-1351.s index 89a32bbd5..298cf9e13 100644 --- a/libsrc/c128/mou/c128-1351.s +++ b/libsrc/c128/mou/c128-1351.s @@ -208,7 +208,7 @@ UNINSTALL: sta IRQInd+1 lda old_irq+1 sta IRQInd+2 - ;cli + ;cli ; This will be done at end of HIDE jsr HIDE ; Hide cursor on exit lda INIT_save diff --git a/libsrc/c128/mou/c128-inkwell.s b/libsrc/c128/mou/c128-inkwell.s index 1e2f19844..0e45046e8 100644 --- a/libsrc/c128/mou/c128-inkwell.s +++ b/libsrc/c128/mou/c128-inkwell.s @@ -240,7 +240,7 @@ UNINSTALL: sei sta IRQInd+1 stx IRQInd+2 - ;cli + ;cli ; This will be done at end of HIDE jsr HIDE ; Hide cursor on exit lda INIT_save @@ -410,7 +410,7 @@ IRQ: jsr CPREP ldy #%00000000 ; Set ports A and B to input sty CIA1_DDRB sty CIA1_DDRA ; Keyboard won't look like buttons - ;lda #%01111111 + ;lda #%01111111 ; (Keyboard scan leaves this in port A) ;sta CIA1_PRA lda CIA1_PRB ; Read Control Port 1 dec CIA1_DDRA ; Set port A back to output diff --git a/libsrc/c128/mou/c128-joy.s b/libsrc/c128/mou/c128-joy.s index 2426ebd69..47a73c877 100644 --- a/libsrc/c128/mou/c128-joy.s +++ b/libsrc/c128/mou/c128-joy.s @@ -209,7 +209,7 @@ UNINSTALL: sta IRQInd+1 lda old_irq+1 sta IRQInd+2 - ;cli + ;cli ; This will be done at end of HIDE jsr HIDE ; Hide cursor on exit lda INIT_save diff --git a/libsrc/c128/mou/c128-pot.s b/libsrc/c128/mou/c128-pot.s index 0a3ed6051..43a4b40e9 100644 --- a/libsrc/c128/mou/c128-pot.s +++ b/libsrc/c128/mou/c128-pot.s @@ -209,7 +209,7 @@ UNINSTALL: sei sta IRQInd+1 stx IRQInd+2 - ;cli + ;cli ; This will be done at end of HIDE jsr HIDE ; Hide cursor on exit lda INIT_save @@ -318,8 +318,8 @@ BUTTONS: and #JOY::LEFT | JOY::RIGHT lsr a lsr a - ;clc - adc #%00001110 + ;clc ; ("lsr" shifted zero into carry flag) + adc #%00001110 ; Shift bit 1 over to bit 4 and #MOUSE_BTN_LEFT | MOUSE_BTN_RIGHT rts -- 2.39.5