the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added comments that explain why some instructions are implied.

Browse Source
This commit is contained in:
Greg King
2014-05-05 13:45:34 -04:00
parent 7d512ca238
commit a27e7562fd
4 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
libsrc/c128/mou/c128-1351.s
View File

@@ -208,7 +208,7 @@ UNINSTALL:
sta IRQInd+1 sta IRQInd+1
lda old_irq+1 lda old_irq+1
sta IRQInd+2 sta IRQInd+2
;cli ;cli ; This will be done at end of HIDE
jsr HIDE ; Hide cursor on exit jsr HIDE ; Hide cursor on exit
lda INIT_save lda INIT_save

4
libsrc/c128/mou/c128-inkwell.s
View File

@@ -240,7 +240,7 @@ UNINSTALL:
sei sei
sta IRQInd+1 sta IRQInd+1
stx IRQInd+2 stx IRQInd+2
;cli ;cli ; This will be done at end of HIDE
jsr HIDE ; Hide cursor on exit jsr HIDE ; Hide cursor on exit
lda INIT_save lda INIT_save
@@ -410,7 +410,7 @@ IRQ: jsr CPREP
ldy #%00000000 ; Set ports A and B to input ldy #%00000000 ; Set ports A and B to input
sty CIA1_DDRB sty CIA1_DDRB
sty CIA1_DDRA ; Keyboard won't look like buttons sty CIA1_DDRA ; Keyboard won't look like buttons
;lda #%01111111 ;lda #%01111111 ; (Keyboard scan leaves this in port A)
;sta CIA1_PRA ;sta CIA1_PRA
lda CIA1_PRB ; Read Control Port 1 lda CIA1_PRB ; Read Control Port 1
dec CIA1_DDRA ; Set port A back to output dec CIA1_DDRA ; Set port A back to output

2
libsrc/c128/mou/c128-joy.s
View File

@@ -209,7 +209,7 @@ UNINSTALL:
sta IRQInd+1 sta IRQInd+1
lda old_irq+1 lda old_irq+1
sta IRQInd+2 sta IRQInd+2
;cli ;cli ; This will be done at end of HIDE
jsr HIDE ; Hide cursor on exit jsr HIDE ; Hide cursor on exit
lda INIT_save lda INIT_save

6
libsrc/c128/mou/c128-pot.s
View File

@@ -209,7 +209,7 @@ UNINSTALL:
sei sei
sta IRQInd+1 sta IRQInd+1
stx IRQInd+2 stx IRQInd+2
;cli ;cli ; This will be done at end of HIDE
jsr HIDE ; Hide cursor on exit jsr HIDE ; Hide cursor on exit
lda INIT_save lda INIT_save
@@ -318,8 +318,8 @@ BUTTONS:
and #JOY::LEFT | JOY::RIGHT and #JOY::LEFT | JOY::RIGHT
lsr a lsr a
lsr a lsr a
;clc ;clc ; ("lsr" shifted zero into carry flag)
adc #%00001110 adc #%00001110 ; Shift bit 1 over to bit 4
and #MOUSE_BTN_LEFT | MOUSE_BTN_RIGHT and #MOUSE_BTN_LEFT | MOUSE_BTN_RIGHT
rts rts