6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2025-08-14 18:27:25 +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
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 ADC #$00
STA ESTKL,X STA ESTKL,X
BEQ + BEQ +
!BYTE #$A9
- CLC
INC ESTKH,X INC ESTKH,X
+ BCC CHKLP + BCS -
INC ESTKH,X LDA (SRC),Y
CLC
CHKLP LDA (SRC),Y
PHA PHA
INY INY
BNE + BNE +

20
src/libsrc/uthernet.pla
View File

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