Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-08-12 14:29:33 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.93

Browse Source
This commit is contained in:
Rémy GIBERT 2019-05-06 07:40:12 +02:00
parent 94a15e1ec3
commit 13b16e76be
2 changed files with 9 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
SBIN/GETTY.S.txt
View File

@ -15,6 +15,7 @@ TIMEOUT.MAX .EQ 100 10 sec.
.OR ZPBIN .OR ZPBIN
ZS.START ZS.START
ZPPtr1 .BS 2 ZPPtr1 .BS 2
TimeOut .BS 1
ZS.END .ED ZS.END .ED
*-------------------------------------- *--------------------------------------
* File Header (16 Bytes) * File Header (16 Bytes)
@ -120,7 +121,8 @@ CS.RUN.LOOP0 >SLEEP
>SYSCALL fwrite >SYSCALL fwrite
bcs CS.RUN.EXIT I/O error bcs CS.RUN.EXIT I/O error
jsr Init.Timeout lda #TIMEOUT.MAX
sta TimeOut
CS.RUN.LOOP1 >SLEEP CS.RUN.LOOP1 >SLEEP
@ -144,8 +146,8 @@ CS.RUN.LOOP1 >SLEEP
bra CS.RUN.LOOP1 bra CS.RUN.LOOP1
.1 jsr Wait.Timeout .1 lda TimeOut
bcc CS.RUN.LOOP1 bne CS.RUN.LOOP1
>LDA.G ArgDev >LDA.G ArgDev
>SYSCALL ArgV >SYSCALL ArgV
@ -264,11 +266,10 @@ CS.RUN.IAC.SB >SYSCALL GetChar Wait for IAC SB.IS or SEND
CS.DOEVENT lda (pEvent) CS.DOEVENT lda (pEvent)
bpl .9 is it a TIMER event? bpl .9 is it a TIMER event?
>LDA.G TimeOut lda TimeOut
beq .9 beq .9
dec dec TimeOut
sta (pData),y
.9 sec do not discard TIMER event .9 sec do not discard TIMER event
rts rts
@ -281,16 +282,6 @@ CS.QUIT >LDA.G hFILE
.8 clc .8 clc
rts rts
*-------------------------------------- *--------------------------------------
Init.Timeout lda #TIMEOUT.MAX
>STA.G TimeOut
rts
*--------------------------------------
Wait.TimeOut sec
>LDA.G TimeOut
beq .9
clc
.9 rts
*--------------------------------------
CkeckOption lda (ZPPtr1) CkeckOption lda (ZPPtr1)
cmp #'-' cmp #'-'
bne .8 bne .8
@ -351,7 +342,6 @@ ArgDev .BS 1
ArgProg .BS 1 ArgProg .BS 1
hFILE .BS 1 hFILE .BS 1
bExitOnClose .BS 1 bExitOnClose .BS 1
TimeOut .BS 1
IAC.CMD .BS 1 IAC.CMD .BS 1
IAC.SUBCMD .BS 1 IAC.SUBCMD .BS 1
IAC.SB.CMD .BS 1 IAC.SB.CMD .BS 1

6
SYS/KERNEL.S.INIT.txt
View File

@ -938,14 +938,11 @@ DevMgrInit.SP ldy #$ff
.1 jsr $ffff Self Modified .1 jsr $ffff Self Modified
.DA #0 Status .DA #0 Status
.DA SP.IOCTL.STATUS .DA SP.IOCTL.STATUS
bcs .9 bcs DevMgrInit.AddBDev.RTS
ldx SP.IOCTL.STATUS.DIB+S.DIB.S ldx SP.IOCTL.STATUS.DIB+S.DIB.S
>LDYAI DRV.SmartPort >LDYAI DRV.SmartPort
jsr DevMgrInit.AddBDev
.9 rts
*-------------------------------------- *--------------------------------------
DevMgrInit.AddBDev DevMgrInit.AddBDev
>STYA FD.BDEV+S.FD.DEV.DRVPTR >STYA FD.BDEV+S.FD.DEV.DRVPTR
@ -966,6 +963,7 @@ DevMgrInit.AddBDev
>PUSHWI FD.BDEV.NAME >PUSHWI FD.BDEV.NAME
>LDYAI FD.BDEV >LDYAI FD.BDEV
>SYSCALL MKDev >SYSCALL MKDev
DevMgrInit.AddBDev.RTS
rts rts
*-------------------------------------- *--------------------------------------
EvtMgrInit >LDYAI MSG.EVT EvtMgrInit >LDYAI MSG.EVT