mirror of
https://github.com/A2osX/A2osX.git
synced 2025-02-21 06:29:08 +00:00
Kernel 0.93
This commit is contained in:
parent
76e20b8b72
commit
3b08cbb8d9
@ -35,7 +35,7 @@ CS.START cld
|
|||||||
.DA #0 S.PS.F.EVENT
|
.DA #0 S.PS.F.EVENT
|
||||||
.DA #0
|
.DA #0
|
||||||
.DA CS.END-CS.START Code Size (without Constants)
|
.DA CS.END-CS.START Code Size (without Constants)
|
||||||
.DA DS.END-DS.START Data SegmentSize
|
.DA DS.END-DS.START Data Segment Size
|
||||||
.DA #64 Stack Size
|
.DA #64 Stack Size
|
||||||
.DA #ZS.END-ZS.START Zero Page Size
|
.DA #ZS.END-ZS.START Zero Page Size
|
||||||
.DA 0
|
.DA 0
|
||||||
|
@ -49,24 +49,24 @@ K.PutPW.1 sta SETREADAUX
|
|||||||
bne PWD.Store
|
bne PWD.Store
|
||||||
.9 rts
|
.9 rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
PWD.Store >LDYA PWD.DBSize
|
PWD.Store >DEBUG
|
||||||
|
lda PWD.DBPtr
|
||||||
|
sta A1L
|
||||||
|
clc
|
||||||
|
adc PWD.DBSize
|
||||||
|
sta A2L
|
||||||
|
|
||||||
|
lda PWD.DBPtr+1
|
||||||
|
sta A1L+1
|
||||||
|
adc PWD.DBSize+1
|
||||||
|
sta A2L+1
|
||||||
|
|
||||||
|
>LDYA PWD.DBSize
|
||||||
jsr K.getmem
|
jsr K.getmem
|
||||||
bcs .9
|
bcs .9
|
||||||
stx .8+1
|
stx .8+1
|
||||||
>STYA A4L Save Destination Address in MAIN
|
>STYA A4L Save Destination Address in MAIN
|
||||||
|
|
||||||
pha
|
|
||||||
* clc
|
|
||||||
adc PWD.DBSize
|
|
||||||
sta A2L
|
|
||||||
pla
|
|
||||||
adc PWD.DBSize+1
|
|
||||||
sta A2L+1
|
|
||||||
|
|
||||||
lda PWD.hDB
|
|
||||||
jsr K.getmemptr
|
|
||||||
>STYA A1L Save AUX base Ptr
|
|
||||||
|
|
||||||
clc Aux To Main
|
clc Aux To Main
|
||||||
jsr AuxMove
|
jsr AuxMove
|
||||||
|
|
||||||
@ -114,6 +114,7 @@ PWD.Store >LDYA PWD.DBSize
|
|||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
PWD.bDirty .BS 1
|
PWD.bDirty .BS 1
|
||||||
PWD.hDB .BS 1
|
PWD.hDB .BS 1
|
||||||
|
PWD.DBPtr .BS 2
|
||||||
PWD.DBSize .BS 2
|
PWD.DBSize .BS 2
|
||||||
PWD.FILE .AZ "${ROOT}ETC/PASSWD"
|
PWD.FILE .AZ "${ROOT}ETC/PASSWD"
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
@ -48,6 +48,7 @@ PWD.InitDB
|
|||||||
jsr K.getmem
|
jsr K.getmem
|
||||||
bcs .9
|
bcs .9
|
||||||
>STYA ZPPtr3
|
>STYA ZPPtr3
|
||||||
|
>STYA PWD.DBPtr
|
||||||
stx PWD.hDB
|
stx PWD.hDB
|
||||||
|
|
||||||
jsr PWD.StoreRecord
|
jsr PWD.StoreRecord
|
||||||
|
Loading…
x
Reference in New Issue
Block a user