2017-12-22 22:24:30 +01:00
|
|
|
|
NEW
|
2019-04-19 06:42:43 +01:00
|
|
|
|
AUTO 3,1
|
2016-10-26 22:51:06 +02:00
|
|
|
|
*/--------------------------------------
|
2019-05-04 23:13:50 +02: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 23:13:46 +02:00
|
|
|
|
* # ChOwn
|
2018-06-14 17:31:36 +02:00
|
|
|
|
* **In:**
|
2018-09-05 17:22:46 +02:00
|
|
|
|
* PUSHW = mod
|
2017-04-04 15:07:58 +02:00
|
|
|
|
* PUSHW = PATH
|
2017-04-03 23:13:46 +02:00
|
|
|
|
*\--------------------------------------
|
|
|
|
|
|
K.ChOwn
|
|
|
|
|
|
*/--------------------------------------
|
|
|
|
|
|
* # ChGrp
|
2018-06-14 17:31:36 +02:00
|
|
|
|
* **In:**
|
2017-04-04 15:07:58 +02:00
|
|
|
|
* PUSHW = GID
|
|
|
|
|
|
* PUSHW = PATH
|
2017-04-03 23:13:46 +02:00
|
|
|
|
*\--------------------------------------
|
|
|
|
|
|
K.ChGrp
|
|
|
|
|
|
sec
|
|
|
|
|
|
rts
|
2016-01-09 23:40:19 +01:00
|
|
|
|
*--------------------------------------
|
2015-03-14 22:48:35 +01:00
|
|
|
|
MAN
|
2018-11-17 18:17:13 +01:00
|
|
|
|
SAVE USR/SRC/SYS/KERNEL.S.FIO
|
|
|
|
|
|
LOAD USR/SRC/SYS/KERNEL.S
|
2015-03-14 22:48:35 +01:00
|
|
|
|
ASM
|
