Apple-2-SW
/
A2osX
mirror of https://github.com/A2osX/A2osX.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity
A2osX/SYS/KERNEL.S.BLISTX.txt

119 lines
1.9 KiB
Plaintext
Raw Normal View History

Kernel 0.94++
2021-04-29 11:56:34 +00:00
NEW
AUTO 3,1
*--------------------------------------
Kernel 0.94++
2021-05-04 17:31:21 +00:00
IBlkPtr .EQ ZPMEMMGR+12
DBlkPtr .EQ ZPMEMMGR+14
Kernel 0.94++
2021-04-29 11:56:34 +00:00
*--------------------------------------
Kernel 0.94++
2021-05-04 17:31:21 +00:00
KeyID .EQ *
iByte .BS 1
iBlk .BS 1
Kernel 0.94++
2021-04-29 11:56:34 +00:00
*--------------------------------------
KERNEL: modification for CC (Slist API) updated FORTH,SH, CSH, SM.... KERNEL: modification for Softcard //e (may help...or not) KERNEL: bugfix for VS/VE drive detetcion and report on KCONFIG CC: some progress on STRUCT & UNION SHARED/PrintF: removed support for /n..... (now in S-C MASM3.1 & A2osX-ASM)
2022-09-17 11:35:52 +00:00
BLISTX.New sta SLIST.Opt
>LDYAI 128 32k Max before out of memory!!!
Kernel 0.94++
2021-04-29 11:56:34 +00:00
ldx #S.MEM.F.INIT0+8 index
jsr MEM.GetMem.YAX
bcs .9
Kernel 0.94++
2021-05-04 17:31:21 +00:00
>STYA IBlkPtr
Kernel 0.94++
2021-04-29 11:56:34 +00:00
stx .8+1
>LDYAI 256
ldx #4 data
jsr MEM.GetMem.YAX
bcs .9
Kernel 0.94++
2021-05-04 17:31:21 +00:00
>STYA DBlkPtr
KERNEL: modification for CC (Slist API) updated FORTH,SH, CSH, SM.... KERNEL: modification for Softcard //e (may help...or not) KERNEL: bugfix for VS/VE drive detetcion and report on KCONFIG CC: some progress on STRUCT & UNION SHARED/PrintF: removed support for /n..... (now in S-C MASM3.1 & A2osX-ASM)
2022-09-17 11:35:52 +00:00
Kernel 0.94++
2021-04-29 11:56:34 +00:00
lda #0
Kernel 0.94++
2021-05-04 17:31:21 +00:00
sta (DBlkPtr)
KERNEL: modification for CC (Slist API) updated FORTH,SH, CSH, SM.... KERNEL: modification for Softcard //e (may help...or not) KERNEL: bugfix for VS/VE drive detetcion and report on KCONFIG CC: some progress on STRUCT & UNION SHARED/PrintF: removed support for /n..... (now in S-C MASM3.1 & A2osX-ASM)
2022-09-17 11:35:52 +00:00
lda SLIST.Opt
Kernel 0.94++
2021-05-04 17:31:21 +00:00
sta (IBlkPtr)
Kernel 0.94++
2021-04-29 11:56:34 +00:00
KERNEL: modification for CC (Slist API) updated FORTH,SH, CSH, SM.... KERNEL: modification for Softcard //e (may help...or not) KERNEL: bugfix for VS/VE drive detetcion and report on KCONFIG CC: some progress on STRUCT & UNION SHARED/PrintF: removed support for /n..... (now in S-C MASM3.1 & A2osX-ASM)
2022-09-17 11:35:52 +00:00
txa
ldy #1
sta (IBlkPtr),y
Kernel 0.94++
2021-04-29 11:56:34 +00:00
.8 lda #$ff SELF MODIFIED
KERNEL: modification for CC (Slist API) updated FORTH,SH, CSH, SM.... KERNEL: modification for Softcard //e (may help...or not) KERNEL: bugfix for VS/VE drive detetcion and report on KCONFIG CC: some progress on STRUCT & UNION SHARED/PrintF: removed support for /n..... (now in S-C MASM3.1 & A2osX-ASM)
2022-09-17 11:35:52 +00:00
* clc
Kernel 0.94++
2021-04-29 11:56:34 +00:00
.9 rts
*--------------------------------------
BLISTX.Free pha
jsr K.GetMemPtr
>STYA .1+1
KERNEL: modification for CC (Slist API) updated FORTH,SH, CSH, SM.... KERNEL: modification for Softcard //e (may help...or not) KERNEL: bugfix for VS/VE drive detetcion and report on KCONFIG CC: some progress on STRUCT & UNION SHARED/PrintF: removed support for /n..... (now in S-C MASM3.1 & A2osX-ASM)
2022-09-17 11:35:52 +00:00
ldx #1
Kernel 0.94++
2021-04-29 11:56:34 +00:00
.1 lda $ffff,x SELF MODIFIED
beq .8
Kernel 0.94++
2021-05-19 12:44:47 +00:00
phx
Kernel 0.94++
2021-04-29 11:56:34 +00:00
jsr K.FreeMem
Kernel 0.94++
2021-05-19 12:44:47 +00:00
plx
Kernel 0.94++
2021-04-29 11:56:34 +00:00
inx
bra .1
.8 pla
jmp K.FreeMem
*--------------------------------------
Kernel 0.94++
2021-05-04 17:31:21 +00:00
BLISTX.GetNByte ldy iByte
lda (DBlkPtr),y
BLISTX.2NByte inc iByte
Kernel 0.94++
2021-04-29 11:56:34 +00:00
bne .8
pha
Kernel 0.94++
2021-05-04 17:31:21 +00:00
jsr BLISTX.2NBlk
Kernel 0.94++
2021-04-29 11:56:34 +00:00
pla
.8 rts
*--------------------------------------
Kernel 0.94++
2021-05-04 17:31:21 +00:00
BLISTX.AddByte phy
ldy iByte
sta (DBlkPtr),y
inc iByte
Kernel 0.94++
2021-04-29 11:56:34 +00:00
bne .8
phx
>LDYAI 256
ldx #4
jsr MEM.GetMem.YAX
bcs .9
Kernel 0.94++
2021-05-04 17:31:21 +00:00
>STYA DBlkPtr
Kernel 0.94++
2021-04-29 11:56:34 +00:00
txa
Kernel 0.94++
2021-05-04 17:31:21 +00:00
inc iBlk
ldy iBlk
sta (IBlkPtr),y
Kernel 0.94++
2021-04-29 11:56:34 +00:00
Kernel 0.94++
2021-05-04 17:31:21 +00:00
* stz iByte
Kernel 0.94++
2021-04-29 11:56:34 +00:00
plx
.8 ply
clc
rts
.9 plx
ply
rts
*--------------------------------------
Kernel 0.94++
2021-05-04 17:31:21 +00:00
BLISTX.SetBlkByte
ldy iByte
sta (DBlkPtr),y
inc iByte
bne BLISTX.RTS
Kernel 0.94++
2021-04-29 11:56:34 +00:00
*--------------------------------------
Kernel 0.94++
2021-05-04 17:31:21 +00:00
BLISTX.2NBlk inc iBlk
ldy iBlk
lda (IBlkPtr),y
Kernel 0.94++
2021-04-29 11:56:34 +00:00
jsr K.GetMemPtr
Kernel 0.94++
2021-05-04 17:31:21 +00:00
>STYA DBlkPtr
BLISTX.RTS rts
Kernel 0.94++
2021-04-29 11:56:34 +00:00
*--------------------------------------
MAN
SAVE usr/src/sys/kernel.s.blistx
LOAD usr/src/sys/kernel.s
ASM