Kernel 0.92

This commit is contained in:
Rémy GIBERT 2018-12-18 08:31:32 +01:00
parent d58b6c3e99
commit c3e396238a
3 changed files with 25 additions and 17 deletions

Binary file not shown.

View File

@ -10,6 +10,7 @@ AUTO 4,1
.INB INC/A2OSX.I .INB INC/A2OSX.I
.INB INC/MLI.E.I .INB INC/MLI.E.I
.INB INC/XY.MOUSE.I .INB INC/XY.MOUSE.I
.INB INC/GUI.I
.INB INC/LIBGUI.I .INB INC/LIBGUI.I
*-------------------------------------- *--------------------------------------
ZPSlotPtr .EQ ZPDRV ZPSlotPtr .EQ ZPDRV
@ -31,7 +32,9 @@ CS.START cld
L.MSG.DETECT .DA MSG.DETECT L.MSG.DETECT .DA MSG.DETECT
L.MSG.DETECT.OK .DA MSG.DETECT.OK L.MSG.DETECT.OK .DA MSG.DETECT.OK
L.MSG.DETECT.KO .DA MSG.DETECT.KO L.MSG.DETECT.KO .DA MSG.DETECT.KO
L.DEV.HEADER.NAME .DA DEV.HEADER.NAME L.DRV.CS.START .DA DRV.CS.START
L.FD.DEV .DA FD.DEV
L.FD.DEV.NAME .DA FD.DEV.NAME
.DA 0 End Of Reloc Table .DA 0 End Of Reloc Table
*-------------------------------------- *--------------------------------------
Dev.Detect >LDYA L.MSG.DETECT Dev.Detect >LDYA L.MSG.DETECT
@ -49,8 +52,21 @@ Dev.Detect >LDYA L.MSG.DETECT
bne .3 bne .3
dex dex
bpl .2 bpl .2
bra .8
lda ZPSlotPtr+1 .3 lda ZPSlotPtr+1 no match, try next slot....
inc
cmp #$C8
bne .1
>LDYA L.MSG.DETECT.KO
>SYSCALL printf
.9 lda #MLI.E.NODEV
sec
rts
.8 lda ZPSlotPtr+1
sta GOMOUSE+2 sta GOMOUSE+2
sta GOMOUSE.Cn+1 sta GOMOUSE.Cn+1
sta GOMOUSE.JMP+2 sta GOMOUSE.JMP+2
@ -64,7 +80,8 @@ Dev.Detect >LDYA L.MSG.DETECT
asl asl
sta GOMOUSE.n0+1 sta GOMOUSE.n0+1
>PUSHW L.DEV.HEADER.NAME >PUSHW L.FD.DEV.NAME
>PUSHBI 2
>LDYA L.MSG.DETECT.OK >LDYA L.MSG.DETECT.OK
>SYSCALL printf >SYSCALL printf
@ -81,18 +98,6 @@ Dev.Detect >LDYA L.MSG.DETECT
>SYSCALL MKDEV >SYSCALL MKDEV
rts rts
.3 lda ZPSlotPtr+1 no match, try next slot....
inc
cmp #$C8
bne .1
>LDYA L.MSG.DETECT.KO
>SYSCALL printf
lda #MLI.E.NODEV
sec
rts
*-------------------------------------- *--------------------------------------
CS.END CS.END
MSG.DETECT .AZ "Apple Mouse Driver.\r\n" MSG.DETECT .AZ "Apple Mouse Driver.\r\n"
@ -116,7 +121,9 @@ FD.DEV.NAME .AZ "MOU7"
ZPIOCTL .EQ ZPDRV ZPIOCTL .EQ ZPDRV
ZPTmpPtr1 .EQ ZPDRV+2 ZPTmpPtr1 .EQ ZPDRV+2
*-------------------------------------- *--------------------------------------
DRV.CS.START .DA STATUS DRV.CS.START cld
jmp (.1,x)
.1 .DA STATUS
.DA READBLOCK .DA READBLOCK
.DA A2osX.BADCALL .DA A2osX.BADCALL
.DA A2osX.BADCALL .DA A2osX.BADCALL
@ -336,6 +343,7 @@ DEVSTAT .DA #0
.DA #0 .DA #0
.DA #91 .DA #91
*-------------------------------------- *--------------------------------------
DRV.END
MAN MAN
SAVE USR/SRC/DRV/MOUSE.DRV.S SAVE USR/SRC/DRV/MOUSE.DRV.S
ASM ASM

View File

@ -149,7 +149,7 @@ CS.RUN.LOOP1 >SLEEP
.1 jsr Wait.Timeout .1 jsr Wait.Timeout
bcc CS.RUN.LOOP1 bcc CS.RUN.LOOP1
.2 >PUSHBI S.PS.F.DUPENV+S.PS.F.HOLD .2 >PUSHBI S.PS.F.HOLD
>LDA.G ArgProg >LDA.G ArgProg
>SYSCALL ArgV >SYSCALL ArgV