mirror of
https://github.com/A2osX/A2osX.git
synced 2025-02-16 18:30:26 +00:00
Kernel version 0.9 : BugFix in VBL & IrqMgr
This commit is contained in:
parent
a8fec4ccfa
commit
41e62bf292
BIN
A2OSX.BOOT.po
BIN
A2OSX.BOOT.po
Binary file not shown.
BIN
A2OSX.SRC.po
BIN
A2OSX.SRC.po
Binary file not shown.
@ -143,7 +143,9 @@ CS.RUN >LDYA L.SEQ.DETECT
|
||||
ldy #ScreenW Wait for Response from terminal
|
||||
lda (pData),y for W & H
|
||||
beq .1
|
||||
|
||||
|
||||
>DEBUG
|
||||
|
||||
jsr SCRN.Init
|
||||
bcs .9
|
||||
|
||||
@ -194,7 +196,7 @@ CS.QUIT ldy #hBuffer
|
||||
.9 rts
|
||||
*--------------------------------------
|
||||
CharIn tax
|
||||
|
||||
>DEBUG
|
||||
ldy #bEscMode
|
||||
lda (pData),y
|
||||
asl
|
||||
@ -251,6 +253,7 @@ CharIn.Esc ldy #bEscMode
|
||||
bne .1
|
||||
cmp #'R' Response to cursor position query?
|
||||
beq .3
|
||||
|
||||
sec
|
||||
rts
|
||||
|
||||
|
@ -34,9 +34,11 @@ Several subprojects are now indentified :
|
||||
## Screenshots
|
||||
|
||||
![](https://github.com/burniouf/A2osX/blob/master/ScreenShot.LS.bmp)
|
||||
![](https://github.com/burniouf/A2osX/blob/master/ScreenShot.EDIT.bmp)
|
||||
|
||||
|
||||
![](https://github.com/burniouf/A2osX/blob/master/ScreenShot.EDIT.bmp)
|
||||
|
||||
![](https://github.com/burniouf/A2osX/blob/master/PuTTY.png)
|
||||
|
||||
## General Information:
|
||||
|
||||
** Kernel 0.9 complete rewrite in progress **
|
||||
|
@ -219,8 +219,9 @@ IrqHandler cld
|
||||
lda RDALTZP
|
||||
sta .2+1
|
||||
|
||||
bmi .1
|
||||
sta SETALTZP
|
||||
bmi .1 we are already in AuxZP/LC
|
||||
|
||||
sta SETALTZP coming from MainLC, switch to aux
|
||||
tsx
|
||||
stx A2osX.SaveSM
|
||||
ldx A2osX.SaveSX
|
||||
@ -228,10 +229,10 @@ IrqHandler cld
|
||||
|
||||
.1 jsr K.IrqHandler
|
||||
|
||||
.2 lda #$ff
|
||||
bmi .3
|
||||
.2 lda #$ff get back ZP status when called
|
||||
bmi .3 we were coming from AuxZP/LC
|
||||
|
||||
tsx
|
||||
tsx go back to Main
|
||||
stx A2osX.SaveSX
|
||||
ldx A2osX.SaveSM
|
||||
txs
|
||||
|
@ -12,16 +12,16 @@ Kernel.Init3 jsr MemMgrInit
|
||||
>LDYAI MSG.Init3
|
||||
>SYSCALL CPrintFYA
|
||||
|
||||
>LDYAI MSG.IRQ
|
||||
>SYSCALL CPrintFYA
|
||||
jsr IrqMgrInit
|
||||
bcs *
|
||||
|
||||
>LDYAI MSG.DEV
|
||||
>SYSCALL CPrintFYA
|
||||
jsr DevMgrInit
|
||||
bcs *
|
||||
|
||||
>LDYAI MSG.IRQ
|
||||
>SYSCALL CPrintFYA
|
||||
jsr IrqMgrInit
|
||||
bcs *
|
||||
|
||||
>LDYAI MSG.EVT
|
||||
>SYSCALL CPrintFYA
|
||||
jsr EvtMgrInit
|
||||
@ -195,6 +195,8 @@ IrqMgrInit php
|
||||
sta K.IrqMgrVBL.MSM+2
|
||||
sta K.IrqMgrVBL.MRM+2
|
||||
|
||||
and #$0f
|
||||
sta K.IrqMgrVBL.0n
|
||||
asl
|
||||
asl
|
||||
asl
|
||||
@ -212,11 +214,14 @@ IrqMgrInit php
|
||||
|
||||
bit RROMBNK2 Renable ROM to allow MOUSE II firmware works properly
|
||||
|
||||
ldy #INITMOUSE Reset
|
||||
jsr GOMOUSE
|
||||
bcs *
|
||||
* ldy #INITMOUSE Reset
|
||||
* jsr GOMOUSE
|
||||
* bcs *
|
||||
|
||||
lda #8
|
||||
ldx K.IrqMgrVBL.0n
|
||||
lda $7F8,x
|
||||
and #$0F
|
||||
ora #9
|
||||
ldy #SETMOUSE
|
||||
jsr GOMOUSE
|
||||
bcs *
|
||||
@ -472,8 +477,8 @@ I.ENV.DRV >PSTR "DRV=${A2OSX}DRV/"
|
||||
STARTUP.CMDLINE >PSTR "${A2OSX}SBIN/SHELL ${A2OSX}A2osX.STARTUP"
|
||||
*--------------------------------------
|
||||
MSG.Init3 >CSTR "A2osX[Stage3]:Init\r\n"
|
||||
MSG.IRQ >CSTR "-Interrupt Manager...\r\n"
|
||||
MSG.DEV >CSTR "-Device Manager...\r\n"
|
||||
MSG.IRQ >CSTR "-Interrupt Manager...\r\n"
|
||||
MSG.EVT >CSTR "-Event Manager...\r\n"
|
||||
MSG.FLT >CSTR "-Path Filter...\r\n"
|
||||
MSG.TSK >CSTR "-Task Manager...\r\n"
|
||||
|
@ -60,9 +60,14 @@ K.IrkMgr.VBLINT .BS 1
|
||||
*--------------------------------------
|
||||
K.IrqHandler lda K.IrkMgr.VBL
|
||||
beq .10 0, totally disabled....
|
||||
|
||||
|
||||
jsr K.IrqMgrVBL.MSM SERVEMOUSE
|
||||
bcs .10 Not From Mouse VBL
|
||||
bcs .10 Not From Mouse
|
||||
|
||||
ldx K.IrqMgrVBL.0n
|
||||
lda $778,x
|
||||
and #$08 IRQ was caused by VBL ?
|
||||
beq .10
|
||||
|
||||
ldx K.IrqMgrVBL.MRM+2 $Cn
|
||||
ldy K.IrqMgrVBL.n0
|
||||
@ -106,6 +111,7 @@ K.IrqHandler lda K.IrkMgr.VBL
|
||||
.8 rts
|
||||
*--------------------------------------
|
||||
K.IrqMgrVBL.n0 .BS 1
|
||||
K.IrqMgrVBL.0n .BS 1
|
||||
K.IrqMgrVBL.MSM jmp $0000
|
||||
K.IrqMgrVBL.MRM jmp $0000
|
||||
*--------------------------------------
|
||||
|
Loading…
x
Reference in New Issue
Block a user