Change read/write flags to high bits

This commit is contained in:
Terence Boldt 2021-01-16 12:42:00 -05:00
parent daed9d2dd9
commit e1d78ba7a5
3 changed files with 6 additions and 6 deletions

View File

@ -147,8 +147,8 @@ SendByte:
pha pha
waitWrite: waitWrite:
lda InputFlags,x lda InputFlags,x
ror rol
ror ;Second lowest bit goes low when ready rol
bcs waitWrite bcs waitWrite
pla pla
sta OutputByte,x sta OutputByte,x
@ -156,8 +156,8 @@ waitWrite:
sta OutputFlags,x sta OutputFlags,x
finishWrite: finishWrite:
lda InputFlags,x lda InputFlags,x
ror rol
ror rol
bcc finishWrite bcc finishWrite
lda #$0f lda #$0f
sta OutputFlags,x sta OutputFlags,x
@ -168,7 +168,7 @@ GetByte:
sta OutputFlags,x sta OutputFlags,x
waitRead: waitRead:
lda InputFlags,x lda InputFlags,x
ror rol
bcs waitRead bcs waitRead
lda InputByte lda InputByte
pha pha
@ -176,7 +176,7 @@ waitRead:
sta OutputFlags,x sta OutputFlags,x
finishRead: finishRead:
lda InputFlags,x lda InputFlags,x
ror rol
bcc finishRead bcc finishRead
pla pla
end: end:

Binary file not shown.

Binary file not shown.