A2osX/INC/PRODOS.I.txt

185 lines
4.6 KiB
Plaintext
Raw Normal View History

2015-03-14 21:48:35 +00:00
PR#3
2015-06-03 18:30:57 +00:00
PREFIX /A2OSX.SRC
2015-03-14 21:48:35 +00:00
NEW
INC 1
2016-05-01 21:12:22 +00:00
AUTO 6
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
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
*--------------------------------------
2016-09-02 15:14:24 +00:00
S.FILEINFO.ACCESS .EQ $03
S.FILEINFO.ACCESS.R .EQ $01
S.FILEINFO.ACCESS.W .EQ $02
S.FILEINFO.ACCESS.B .EQ $20
S.FILEINFO.ACCESS.RN .EQ $40
S.FILEINFO.ACCESS.D .EQ $80
S.FILEINFO.ACCESS.FULL .EQ $C3
S.FILEINFO.TYPE .EQ $04
S.FILEINFO.TYPE.TXT .EQ $04
S.FILEINFO.TYPE.DIR .EQ $0F
S.FILEINFO.TYPE.SYS .EQ $FF
2016-09-02 15:14:24 +00:00
S.FILEINFO.AUXTYPE .EQ $05
S.FILEINFO.TOTALBLOCKS .EQ $05
S.FILEINFO.STORETYPE .EQ $07
S.FILEINFO.STORETYPE.STD .EQ $01
S.FILEINFO.STORETYPE.DIR .EQ $0D
2016-09-02 15:14:24 +00:00
S.FILEINFO.BLOCKSUSED .EQ $08
S.FILEINFO.MODDATE .EQ $0A
S.FILEINFO.MODTIME .EQ $0C
S.FILEINFO.CREATEDATE .EQ $0E
S.FILEINFO.CREATETIME .EQ $10
*
S.FILEINFO .EQ $12
*--------------------------------------
*$00 - No Error
*$01 - Bad Call Number
*$04 - Bad Parameter Count
*$25 - Interrupt Table Full
*$27 - I/O Error
*$28 - No Device Connected
*$2B - Write Protected
*$2E - Disk Switched
*$40 - Invalid Pathname
*$42 - Maximum Number of Files Open
*$43 - Invalid Reference Number
*$44 - Directory Not Found
*$45 - Volume Not Found
*$46 - File Not Found
*$47 - Duplicate File Name
*$48 - Volume Full
*$49 - Directory Full
*$4A - Incompatible File Format
*$4B - Unsupported Storage Type
*$4C - End of File, No More Data
*$4D - Beyond EOF
*$4E - File Access Error, File Locked
*$50 - File Already Open
*$51 - Directory Structure Damaged
*$53 - Invalid Parameter
*$55 - Too Many Volumes
*$56 - Bad Buffer Address
*$57 - Duplicate Volume
*$5A - File Structure Damaged
*--------------------------------------
2015-03-14 21:48:35 +00:00
MLI.ERR.BADCALL .EQ $01
MLI.ERR.BADCNT .EQ $04
MLI.ERR.IRQFULL .EQ $25
MLI.ERR.IO .EQ $27
MLI.ERR.NODEV .EQ $28
MLI.ERR.WRTPROT .EQ $2B
MLI.ERR.DSKSWIT .EQ $2E
MLI.ERR.INVPATH .EQ $40
MLI.ERR.FCBFULL .EQ $42
MLI.ERR.BADREF .EQ $43
MLI.ERR.PNOTFND .EQ $44
MLI.ERR.VNOTFND .EQ $45
MLI.ERR.FNOTFND .EQ $46
MLI.ERR.DUPFILE .EQ $47
MLI.ERR.OVERRUN .EQ $48
MLI.ERR.VOLFULL .EQ $49
2015-03-15 22:00:40 +00:00
MLI.ERR.EOF .EQ $4C
2015-03-14 21:48:35 +00:00
*--------------------------------------
MLI .EQ $BF00
JSPARE .EQ $BF03
DATETIME .EQ $BF06
SYSERR .EQ $BF09
SYSDEATH .EQ $BF0C
SERR .EQ $BF0F
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
DEVPTRS3D2 .EQ $BF26
DEVPTRS4D2 .EQ $BF28
DEVPTRS5D2 .EQ $BF2A
DEVPTRS6D2 .EQ $BF2C
DEVPTRS7D2 .EQ $BF2E
DEVNUM .EQ $BF30
DEVCNT .EQ $BF31
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
MEMTABL .EQ $BF58 -> $BF6F
GL.BUFF .EQ $BF70
INTRUPT1 .EQ $BF80
INTRUPT2 .EQ $BF82
INTRUPT3 .EQ $BF84
INTRUPT4 .EQ $BF86
DATELO .EQ $BF90
TIMELO .EQ $BF92
LEVEL .EQ $BF94
BUBIT .EQ $BF95
SPARE1 .EQ $BF96
MACHID .EQ $BF98
2016-09-02 15:14:24 +00:00
MACHID.TYPE .EQ %11001000
MACHID.TYPE.II .EQ %00000000
MACHID.TYPE.IIp .EQ %01000000
MACHID.TYPE.IIe .EQ %10000000
MACHID.TYPE.IIc .EQ %10001000
MACHID.TYPE.III .EQ %11000000
MACHID.RAM .EQ %00110000
MACHID.RAM.128 .EQ %00110000
MACHID.RAM.64 .EQ %00100000
MACHID.RAM.48 .EQ %00010000
MACHID.SPARE .EQ %00000100
MACHID.COL80 .EQ %00000010
MACHID.CLK .EQ %00000001
2015-03-14 21:48:35 +00:00
SLTBYT .EQ $BF99
PFIXPTR .EQ $BF9A
MLIACTV .EQ $BF9B
CMDADR .EQ $BF9C
SAVEX .EQ $BF9E
SAVEY .EQ $BF9F
*--------------------------------------
* code $BFA0 -> $BFF3
*--------------------------------------
BNKBYT1 .EQ $BFF4
BNKBYT2 .EQ $BFF5
SYS.RTS .EQ $BFF6 code -> $BFFB
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
SAVE INC/PRODOS.I