Kernel version 0.9 : UTHERNET2.DRV.S.txt.....working again!

This commit is contained in:
Rémy GIBERT 2017-04-24 23:32:57 +02:00
parent 9e853cd049
commit 173256a691
6 changed files with 11 additions and 33 deletions

View File

@ -45,16 +45,10 @@ Dev.Detect >STYA Args
>LDYA L.MSG.DETECT
>SYSCALL CPrintFYA
ldx #$70
ldx #$70+$88
ldy #7
.1 txa IO based detection, avoid scanning in Disk Controller IO!!!!
lsr
lsr
lsr
lsr
tay
lda A2osX.SLOTS,y
.1 lda A2osX.SLOTS,y IO based detection, avoid scanning in Disk Controller IO!!!!
bne .2
lda #W5100.MR.RST
@ -89,6 +83,7 @@ Dev.Detect >STYA Args
sec
sbc #$10
tax
dey
bne .1
>LDYA L.MSG.DETECT.KO
@ -99,12 +94,6 @@ Dev.Detect >STYA Args
rts
.3 stx DEVSLOTx0
txa
lsr
lsr
lsr
lsr
tay
lda #A2osX.SLOTS.NET
sta A2osX.SLOTS,y

View File

@ -44,16 +44,10 @@ Dev.Detect >STYA Args
>LDYA L.MSG.DETECT
>SYSCALL CPrintFYA
ldx #$70
ldx #$70+$88
ldy #7
.1 txa IO based detection, avoid scanning in Disk Controller IO!!!!
lsr
lsr
lsr
lsr
tay
lda A2osX.SLOTS,y
.1 lda A2osX.SLOTS,y IO based detection, avoid scanning in Disk Controller IO!!!!
bne .2
lda #W5100.MR.RST
@ -88,6 +82,7 @@ Dev.Detect >STYA Args
sec
sbc #$10
tax
dey
bne .1
>LDYA L.MSG.DETECT.KO
@ -98,12 +93,6 @@ Dev.Detect >STYA Args
rts
.3 stx DEVSLOTx0
txa
lsr
lsr
lsr
lsr
tay
lda #A2osX.SLOTS.NET
sta A2osX.SLOTS,y

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -14,13 +14,13 @@ AUTO 6
sta W5100.AR+1,x
.EM
*--------------------------------------
W5100.MR .EQ $C084 Mode Register
W5100.MR .EQ $C084-$88 Mode Register
W5100.MR.RST .EQ %10000000
W5100.MR.PB .EQ %00010000
W5100.MR.PPPOE .EQ %00001000
W5100.MR.AI .EQ %00000010
W5100.MR.IND .EQ %00000001
W5100.AR .EQ $C085 Memory Pointer
W5100.AR .EQ $C085-$88 Memory Pointer
W5100.AR.GAR .EQ $0001
W5100.AR.SUBR .EQ $0005
W5100.AR.SHAR .EQ $0009
@ -70,7 +70,7 @@ W5100.AR.S0.TX.RD .EQ $0422
W5100.AR.S0.TX.WR .EQ $0424
W5100.AR.S0.RX.RSR .EQ $0426
W5100.AR.S0.RX.RD .EQ $0428
W5100.DR .EQ $C087
W5100.DR .EQ $C087-$88
*--------------------------------------
TX.BASE .EQ $4000
RX.BASE .EQ $6000