A2osX/INC/MLI.I.txt

193 lines
4.5 KiB
Plaintext
Raw Normal View History

2015-03-14 21:48:35 +00:00
NEW
2021-07-03 17:18:58 +00:00
AUTO 3,1
2015-03-14 21:48:35 +00:00
.LIST OFF
*--------------------------------------
* PRODOS Constants
*--------------------------------------
MLI.MAXPATH .EQ 64
*--------------------------------------
* PRODOS Defines
*--------------------------------------
MLIALLOCIRQ .EQ $40
MLIDEALLOCIRQ .EQ $41
MLIATALK .EQ $42
MLIQUIT .EQ $65
MLIREADBLOCK .EQ $80
MLIWRITEBLOCK .EQ $81
MLIGETTIME .EQ $82
MLICREATE .EQ $C0
MLIDESTROY .EQ $C1
MLIRENAME .EQ $C2
2015-03-14 21:48:35 +00:00
MLISETFILEINFO .EQ $C3
MLIGETFILEINFO .EQ $C4
MLIONLINE .EQ $C5
MLISETPREFIX .EQ $C6
MLIGETPREFIX .EQ $C7
MLIOPEN .EQ $C8
MLINEWLINE .EQ $C9
MLIREAD .EQ $CA
MLIWRITE .EQ $CB
MLICLOSE .EQ $CC
MLIFLUSH .EQ $CD
MLISETMARK .EQ $CE
MLIGETMARK .EQ $CF
MLISETEOF .EQ $D0
MLIGETEOF .EQ $D1
MLISETBUF .EQ $D2
MLIGETBUF .EQ $D3
2020-07-18 14:04:21 +00:00
* ProDOS FX
2019-11-27 22:04:55 +00:00
MLISETFILEINFOEX .EQ $D4
MLIGETFILEINFOEX .EQ $D5
2020-07-18 14:04:21 +00:00
MLIACL .EQ $D6
2015-03-14 21:48:35 +00:00
*--------------------------------------
2020-07-30 11:14:37 +00:00
* 7 6 5 4 3 2 1 0
* +--+--+--+--+--+--+--+--+
* |D |RN|B |Reserved|W |R |
* +--+--+--+--+--+--+--+--+
*
* D: Destroy enable bit
* RN: Rename enable bit
* B: Backup needed bit
* W: Write enable bit
* R: Read enable bit
*
* Bit 2 = Invisible Bit (TECH NOTE #23)
*--------------------------------------
2017-10-27 14:56:46 +00:00
S.FI.A .EQ $03
S.FI.A.R .EQ $01
S.FI.A.W .EQ $02
2020-07-30 11:14:37 +00:00
S.FI.A.I .EQ $04
2017-10-27 14:56:46 +00:00
S.FI.A.B .EQ $20
S.FI.A.RN .EQ $40
S.FI.A.D .EQ $80
S.FI.A.FULL .EQ $C3
S.FI.T .EQ $04
S.FI.T.TXT .EQ $04
2018-07-05 05:42:16 +00:00
S.FI.T.BIN .EQ $06
2017-10-27 14:56:46 +00:00
S.FI.T.DIR .EQ $0F
2021-07-03 17:18:58 +00:00
S.FI.T.ASM .EQ $FA
S.FI.T.PIX .EQ $CB
S.FI.T.FON .EQ $CC
S.FI.T.PAK .EQ $CF
2017-10-27 14:56:46 +00:00
S.FI.T.SYS .EQ $FF
S.FI.AUXTYPE .EQ $05
S.FI.TBLKS .EQ $05
S.FI.ST .EQ $07
S.FI.ST.STD .EQ $01
S.FI.ST.DIR .EQ $0D
S.FI.UBLKS .EQ $08
2020-07-30 11:14:37 +00:00
*--------------------------------------
* DATE:
* 7 6 5 4 3 2 1 0 7 6 5 4 3 2 1 0
* +-+-+-+-+-+-+-+-+ +-+-+-+-+-+-+-+-+
* | Year | Month | Day |
* +-+-+-+-+-+-+-+-+ +-+-+-+-+-+-+-+-+
* TIME:
* 7 6 5 4 3 2 1 0 7 6 5 4 3 2 1 0
* +-+-+-+-+-+-+-+-+ +-+-+-+-+-+-+-+-+
* |0 0 0| Hour | |0 0| Minute |
* +-+-+-+-+-+-+-+-+ +-+-+-+-+-+-+-+-+
*--------------------------------------
2017-10-27 14:56:46 +00:00
S.FI.MDATE .EQ $0A
S.FI.MTIME .EQ $0C
S.FI.CDATE .EQ $0E
S.FI.CTIME .EQ $10
2016-09-02 15:14:24 +00:00
*
2017-10-27 14:56:46 +00:00
S.FI .EQ $12
2016-09-02 15:14:24 +00:00
*--------------------------------------
2020-05-28 21:13:52 +00:00
S.FIEX.FILENAME .EQ 0
2020-07-10 13:59:56 +00:00
S.FIEX.T .EQ 16
2020-05-28 21:13:52 +00:00
S.FIEX.KEYPTR .EQ 17
S.FIEX.BLKUSED .EQ 19
S.FIEX.EOF .EQ 21
2020-07-10 13:59:56 +00:00
2020-05-28 21:13:52 +00:00
S.FIEX.CTIME .EQ 24
S.FIEX.VERSION .EQ 28
S.FIEX.MVERSION .EQ 29
S.FIEX.ACCESS .EQ 30
S.FIEX.AUXTYPE .EQ 31
S.FIEX.MTIME .EQ 33
S.FIEX.BLKPTR .EQ 37
2020-07-10 13:59:56 +00:00
2020-07-13 19:29:31 +00:00
S.FIEX.ACL .EQ 40 57.00
2020-07-10 13:59:56 +00:00
S.FIEX.ACL.UID .EQ 42
S.FIEX.ACL.GID .EQ 44
S.FIEX.ACL.MOD .EQ 46
2019-12-06 07:15:51 +00:00
*
2020-05-28 21:13:52 +00:00
S.FIEX .EQ 48
2019-11-27 22:04:55 +00:00
*--------------------------------------
2015-03-14 21:48:35 +00:00
MLI .EQ $BF00
*JSPARE .EQ $BF03
2015-03-14 21:48:35 +00:00
DATETIME .EQ $BF06
SYSERR .EQ $BF09
*SYSDEATH .EQ $BF0C
*SERR .EQ $BF0F
DEVPTRS .EQ $BF10
*DEVPTRS0D1 .EQ $BF10
*DEVPTRS1D1 .EQ $BF12
*DEVPTRS2D1 .EQ $BF14
*DEVPTRS3D1 .EQ $BF16
*DEVPTRS4D1 .EQ $BF18
*DEVPTRS5D1 .EQ $BF1A
*DEVPTRS6D1 .EQ $BF1C
*DEVPTRS7D1 .EQ $BF1E
*DEVPTRS0D2 .EQ $BF20
*DEVPTRS1D2 .EQ $BF22
*DEVPTRS2D2 .EQ $BF24
2015-03-14 21:48:35 +00:00
DEVPTRS3D2 .EQ $BF26
*DEVPTRS4D2 .EQ $BF28
*DEVPTRS5D2 .EQ $BF2A
*DEVPTRS6D2 .EQ $BF2C
*DEVPTRS7D2 .EQ $BF2E
2015-03-14 21:48:35 +00:00
DEVNUM .EQ $BF30
2019-11-09 12:19:41 +00:00
DEVCNT .EQ $BF31 0 -> 13
2015-03-14 21:48:35 +00:00
DEVLST .EQ $BF32 -> $BF3F
*DEVLST0END .EQ $BF40 A 0 was added to ensure list ended with 0 if 14 devices in list
*PRODOSCOPYRIGHT .EQ $BF41 ;free->$BF4B
2020-08-18 15:00:56 +00:00
MLIENTRY .EQ $BF4B to bypass ATLK hook
2015-03-14 21:48:35 +00:00
MEMTABL .EQ $BF58 -> $BF6F
*GL.BUFF .EQ $BF70
*INTRUPT1 .EQ $BF80
*INTRUPT2 .EQ $BF82
*INTRUPT3 .EQ $BF84
*INTRUPT4 .EQ $BF86
2015-03-14 21:48:35 +00:00
DATELO .EQ $BF90
TIMELO .EQ $BF92
LEVEL .EQ $BF94
*BUBIT .EQ $BF95
*SPARE1 .EQ $BF96
2015-03-14 21:48:35 +00:00
MACHID .EQ $BF98
2017-10-27 14:56:46 +00:00
MACHID.T .EQ %11001000
*MACHID.T.II .EQ %00000000
*MACHID.T.IIp .EQ %01000000
MACHID.T.IIe .EQ %10000000
MACHID.T.IIc .EQ %10001000
*MACHID.T.III .EQ %11000000
MACHID.M .EQ %00110000
MACHID.M.128 .EQ %00110000
*MACHID.M.64 .EQ %00100000
*MACHID.M.48 .EQ %00010000
*MACHID.SPARE .EQ %00000100
2016-09-02 15:14:24 +00:00
MACHID.COL80 .EQ %00000010
MACHID.CLK .EQ %00000001
*SLTBYT .EQ $BF99
*PFIXPTR .EQ $BF9A
*MLIACTV .EQ $BF9B
*CMDADR .EQ $BF9C
*SAVEX .EQ $BF9E
*SAVEY .EQ $BF9F
2015-03-14 21:48:35 +00:00
*--------------------------------------
* code $BFA0 -> $BFF3
*--------------------------------------
*BNKBYT1 .EQ $BFF4
*BNKBYT2 .EQ $BFF5
*SYS.RTS .EQ $BFF6 code -> $BFFB
2017-01-12 17:43:45 +00:00
*IBAKVER .EQ $BFFC
*IVERSION .EQ $BFFD
*KBAKVER .EQ $BFFE
*KVERSION .EQ $BFFF
2016-05-01 21:12:22 +00:00
*--------------------------------------
2015-03-14 21:48:35 +00:00
MAN
2020-05-28 21:13:52 +00:00
SAVE inc/mli.i