Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-12-27 18:30:51 +00:00
Code Issues Projects Releases Wiki Activity

LANCEGS.DRV:working.

Browse Source
This commit is contained in:
Rémy GIBERT 2016-03-31 22:07:47 +02:00
parent e6f1583572
commit 4f8d9dfcb6
1 changed files with 5 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
DRV/LANCEGS.DRV.S.txt
View File

@ -195,7 +195,7 @@ OPEN jsr Reset will select L91C96.0
ldy #0
bit USERMAC
bpl .2
bmi .2
.1 lda L91C96.1.IAR,x
sta MAC,y
@ -367,19 +367,14 @@ SEND >PULLW ZPTmpPTR
sta FRAMELEN
clc
adc #6 3 WORDs more Status, len & Control
sta FRAMELEN6
pha
bne .10
clc LO byte is 0, no need for an extra empty page
ldy #1
.10 ldy #1
lda (ZPTmpPTR),y
sta FRAMELEN+1
adc #0
sta FRAMELEN6+1
beq .1 DIV 256=0, write "0 pages", MOD256 is > 0
ply if MOD 256=0, save one empty page
bne .1
dec
.1 ora #L91C96.2.MMUCR.ALLOC
sta L91C96.2.MMUCR,x
@ -502,7 +497,6 @@ DRV.CS.END
DEVSLOTx0 .BS 1
USERMAC .BS 1
FRAMELEN .BS 2
FRAMELEN6 .BS 2
*--------------------------------------
DEVINFO .DA #S.DEVINFO.TYPE.NET
DEVFLAGS .DA #0