Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-11-29 17:50:18 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.94

Browse Source
This commit is contained in:
Rémy GIBERT 2020-08-28 19:10:23 +02:00
parent 943d5a706a
commit 37f9a2c585
2 changed files with 7 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

12
SYS/KM.RAMWORKS.S.txt
View File

@ -400,16 +400,15 @@ DRV.BUFF .EQ $44
DRV.BLKNUM .EQ $46 DRV.BLKNUM .EQ $46
*-------------------------------------- *--------------------------------------
RWDRV.B.START .PH $FF00 RWDRV.B.START .PH $FF00
RWDRV.START cld ProDOS will check that byte!!! RWDRV.START
* cld ProDOS will check that byte!!!
ldy DRV.COMMAND 0 = Status ? ldy DRV.COMMAND 0 = Status ?
beq RMDRV.CMDSTATUS beq RMDRV.CMDSTATUS
cpy #3 cpy #3
beq RWDRV.EXITOK 3 = Format : nothing to do, exit with no error beq RWDRV.EXITOK 3 = Format : nothing to do, exit with no error
* bcs RWDRV.IOERR > 3 = Invalid OP, IO error bcs RWDRV.IOERR > 3 = Invalid OP, IO error
RWDRV.IOERR lda #MLI.E.IO Carry already set
rts
ldx DRV.BLKNUM ldx DRV.BLKNUM
cpx RWDRV.MAXLO+1 cpx RWDRV.MAXLO+1
@ -488,6 +487,9 @@ RWDRV.MAXHI ldy #$FF
RWDRV.EXITOK lda #0 make A=0 RWDRV.EXITOK lda #0 make A=0
clc clc
rts rts
RWDRV.IOERR lda #MLI.E.IO Carry already set
rts
*-------------------------------------- *--------------------------------------
* X=Page(0/1 or LC),A=Bank * X=Page(0/1 or LC),A=Bank
*-------------------------------------- *--------------------------------------