6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2024-08-22 13:29:01 +00:00
Code Issues Projects Releases Wiki Activity

a bit smaller calculation

Browse Source
This commit is contained in:
Peter Ferrie 2016-03-22 21:19:41 -07:00
parent 5edf7abb18
commit 39d5c185a6
2 changed files with 15 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/libsrc/etherip.pla
View File

@ -230,11 +230,11 @@ asm sum1
ADC #$00
STA ESTKL,X
BEQ +
!BYTE #$A9
- CLC
INC ESTKH,X
+ BCC CHKLP
INC ESTKH,X
CLC
CHKLP LDA (SRC),Y
+ BCS -
LDA (SRC),Y
PHA
INY
BNE +

20
src/libsrc/uthernet.pla
View File

@ -109,11 +109,12 @@ asm pokefrm
ROR
ADC #$00
STA ESTKL,X
BEQ +
INC ESTKH,X
+ BCC POKELP
INC ESTKH,X
POKELP LDA (SRC),Y
BEQ +
!BYTE #$A9
- CLC
INC ESTKH,X
+ BCS -
LDA (SRC),Y
end
asm _pokefrml
STA $C000
@ -147,10 +148,11 @@ asm peekfrm
ROR
ADC #$00
STA ESTKL,X
BEQ +
INC ESTKH,X
+ BCC PEEKLP
INC ESTKH,X
BEQ +
!BYTE #$A9
- CLC
INC ESTKH,X
+ BCS -
end
asm _peekfrml
PEEKLP LDA $C000