2017-12-22 21:24:30 +00:00
|
|
|
|
NEW
|
2019-04-19 05:42:43 +00:00
|
|
|
|
AUTO 3,1
|
2016-10-26 20:51:06 +00:00
|
|
|
|
*/--------------------------------------
|
2019-05-04 21:13:50 +00:00
|
|
|
|
* # ChTyp
|
|
|
|
|
|
* Change The type of a ProDOS File
|
|
|
|
|
|
* ## C
|
|
|
|
|
|
* `int chtyp(const char *filepath, const char filetype);`
|
|
|
|
|
|
* ## ASM
|
|
|
|
|
|
* **In:**
|
|
|
|
|
|
* `>PUSHBI filetype`
|
|
|
|
|
|
* `>LDYA filepath`
|
|
|
|
|
|
* `>SYSCALL chtyp`
|
|
|
|
|
|
* ## RETURN VALUE
|
|
|
|
|
|
*\--------------------------------------
|
|
|
|
|
|
K.ChTyp jsr PFT.CheckPathYA
|
|
|
|
|
|
bcs .99
|
|
|
|
|
|
>PULLB .1+1
|
|
|
|
|
|
>MLICALL MLIGETFILEINFO
|
|
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
|
|
.1 lda #$ff
|
|
|
|
|
|
sta K.MLI.PARAMS+S.FI.T
|
|
|
|
|
|
>MLICALL MLISETFILEINFO
|
|
|
|
|
|
.9 rts
|
|
|
|
|
|
|
|
|
|
|
|
.99 >RET 1 discard filetype
|
|
|
|
|
|
*/--------------------------------------
|
2017-04-03 21:13:46 +00:00
|
|
|
|
* # ChOwn
|
2018-06-14 15:31:36 +00:00
|
|
|
|
* **In:**
|
2018-09-05 15:22:46 +00:00
|
|
|
|
* PUSHW = mod
|
2017-04-04 13:07:58 +00:00
|
|
|
|
* PUSHW = PATH
|
2017-04-03 21:13:46 +00:00
|
|
|
|
*\--------------------------------------
|
|
|
|
|
|
K.ChOwn
|
|
|
|
|
|
*/--------------------------------------
|
|
|
|
|
|
* # ChGrp
|
2018-06-14 15:31:36 +00:00
|
|
|
|
* **In:**
|
2017-04-04 13:07:58 +00:00
|
|
|
|
* PUSHW = GID
|
|
|
|
|
|
* PUSHW = PATH
|
2017-04-03 21:13:46 +00:00
|
|
|
|
*\--------------------------------------
|
|
|
|
|
|
K.ChGrp
|
|
|
|
|
|
sec
|
|
|
|
|
|
rts
|
2016-01-09 22:40:19 +00:00
|
|
|
|
*--------------------------------------
|
2015-03-14 21:48:35 +00:00
|
|
|
|
MAN
|
2018-11-17 17:17:13 +00:00
|
|
|
|
SAVE USR/SRC/SYS/KERNEL.S.FIO
|
|
|
|
|
|
LOAD USR/SRC/SYS/KERNEL.S
|
2015-03-14 21:48:35 +00:00
|
|
|
|
ASM
|
