mirror of
https://github.com/A2osX/A2osX.git
synced 2024-09-10 07:54:37 +00:00
Kernel 0.93
This commit is contained in:
parent
1c0ef79adb
commit
949eb44bb1
@ -3,14 +3,7 @@ NEW
|
|||||||
.LIST OFF
|
.LIST OFF
|
||||||
.OP 65C02
|
.OP 65C02
|
||||||
.OR $2000
|
.OR $2000
|
||||||
*--------------------------------------
|
|
||||||
UTHERNETX .EQ 1
|
|
||||||
*--------------------------------------
|
|
||||||
.DO UTHERNETX=1
|
|
||||||
.TF DRV/UTHERNETX.DRV
|
|
||||||
.ELSE
|
|
||||||
.TF DRV/UTHERNET.DRV
|
.TF DRV/UTHERNET.DRV
|
||||||
.FIN
|
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
.INB INC/MACROS.I
|
.INB INC/MACROS.I
|
||||||
.INB INC/A2OSX.I
|
.INB INC/A2OSX.I
|
||||||
@ -395,15 +388,25 @@ READ php
|
|||||||
|
|
||||||
sta (ZPIOCTL),y
|
sta (ZPIOCTL),y
|
||||||
pha
|
pha
|
||||||
eor #$ff
|
lsr
|
||||||
sta Counter+1
|
tax
|
||||||
|
|
||||||
lda RTDATA,x
|
lda RTDATA,x
|
||||||
dey
|
dey
|
||||||
sta (ZPIOCTL),y
|
sta (ZPIOCTL),y
|
||||||
tay
|
tay
|
||||||
eor #$ff
|
|
||||||
|
ror
|
||||||
|
adc #0
|
||||||
|
bcc .11
|
||||||
|
|
||||||
|
inx
|
||||||
|
|
||||||
|
.11 eor #$ff
|
||||||
sta Counter
|
sta Counter
|
||||||
|
txa
|
||||||
|
eor #$ff
|
||||||
|
sta Counter+1
|
||||||
|
|
||||||
pla
|
pla
|
||||||
|
|
||||||
@ -432,27 +435,13 @@ READ php
|
|||||||
.3 lda RTDATA,x
|
.3 lda RTDATA,x
|
||||||
sta (ZPBufPtr),y
|
sta (ZPBufPtr),y
|
||||||
iny
|
iny
|
||||||
bne .4
|
|
||||||
inc ZPBufPtr+1
|
|
||||||
|
|
||||||
.4 .DO UTHERNETX=1
|
|
||||||
lda RTDATA+1,x
|
lda RTDATA+1,x
|
||||||
.FIN
|
|
||||||
|
|
||||||
inc Counter
|
|
||||||
bne .5
|
|
||||||
inc Counter+1
|
|
||||||
beq .8
|
|
||||||
|
|
||||||
.5 .DO UTHERNETX=0
|
|
||||||
lda RTDATA+1,x
|
|
||||||
.FIN
|
|
||||||
|
|
||||||
sta (ZPBufPtr),y
|
sta (ZPBufPtr),y
|
||||||
iny
|
iny
|
||||||
bne .2
|
bne .2
|
||||||
inc ZPBufPtr+1
|
inc ZPBufPtr+1
|
||||||
bne .2
|
bra .2
|
||||||
|
|
||||||
.8 pla hMem
|
.8 pla hMem
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user