diff --git a/.Docs/KERNEL.md b/.Docs/KERNEL.md index db47472e..603cb792 100644 --- a/.Docs/KERNEL.md +++ b/.Docs/KERNEL.md @@ -421,6 +421,22 @@ Load a file in AUX memory (Stock Objects) none. (X,Y unmodified) +# GetStkObj + +## C +`int *ptr getstkobj (shoirt int hStkObj);` + +## ASM +`lda hStkObj` +`>SYSCALL GetStkObj` + +## RETURN VALUE + CC : success + X = hMem + Y,A = ptr + CS : error + A = EC + # ExecL ## C / CSH @@ -726,6 +742,19 @@ Change The type of a ProDOS File ## RETURN VALUE +# SetAttr +Change Attributes of a ProDOS File + +## C +`int setattr(const char *filepath, short int attributes);` + +## ASM +`>PUSHW filepath` +`>PUSHB attributes` +`>SYSCALL setattr` + +## RETURN VALUE + # Stat Return information about a file diff --git a/SYS/KERNEL.S.MOUNT.txt b/SYS/KERNEL.S.MOUNT.txt index 8cd8f9c1..d488e349 100644 --- a/SYS/KERNEL.S.MOUNT.txt +++ b/SYS/KERNEL.S.MOUNT.txt @@ -19,7 +19,20 @@ K.Online >PULLW K.MLI.PARAMS+2 >PULLW K.MLI.PARAMS+1 >MLICALL MLIONLINE rts -*-------------------------------------- +*/-------------------------------------- +* # GetStkObj +* ## C +* `int *ptr getstkobj (shoirt int hStkObj);` +* ## ASM +* `lda hStkObj` +* `>SYSCALL GetStkObj` +* ## RETURN VALUE +* CC : success +* X = hMem +* Y,A = ptr +* CS : error +* A = EC +*\-------------------------------------- K.GetStkObj tax hMem for CopyToMain jsr MEM.GetMemByID