2017-12-30 22:14:05 +00:00
|
|
|
|
NEW
|
2017-03-29 15:48:15 +00:00
|
|
|
|
PREFIX /A2OSX.BUILD
|
2017-12-30 22:14:05 +00:00
|
|
|
|
AUTO 4,1
|
2015-03-14 21:48:35 +00:00
|
|
|
|
*--------------------------------------
|
2018-06-14 15:31:36 +00:00
|
|
|
|
KVER .EQ $5C00 92.0
|
|
|
|
|
*--------------------------------------
|
2018-07-11 15:13:29 +00:00
|
|
|
|
ZPDRV .EQ $20 32 bytes
|
|
|
|
|
ZPLIB .EQ $40 32 bytes
|
2017-09-19 15:34:01 +00:00
|
|
|
|
*--------------------------------------
|
2018-01-15 06:50:44 +00:00
|
|
|
|
* PS Context : 48 bytes MAX
|
2016-10-07 06:09:25 +00:00
|
|
|
|
*--------------------------------------
|
2018-01-15 06:50:44 +00:00
|
|
|
|
pEvent .EQ $D4
|
|
|
|
|
pPs .EQ $D6
|
2017-09-19 15:34:01 +00:00
|
|
|
|
|
2018-01-15 06:50:44 +00:00
|
|
|
|
pCode .EQ $D8
|
|
|
|
|
pData .EQ $DA
|
|
|
|
|
pStack .EQ $DC
|
2018-04-10 15:03:29 +00:00
|
|
|
|
pLocal .EQ $DE 8 Bytes
|
2018-01-15 06:50:44 +00:00
|
|
|
|
|
|
|
|
|
ZPBIN .EQ $E0 32 bytes
|
2018-04-10 15:03:29 +00:00
|
|
|
|
ZPBIN.SIZE .EQ 40 8+32
|
2016-09-02 15:14:24 +00:00
|
|
|
|
*--------------------------------------
|
2015-03-14 21:48:35 +00:00
|
|
|
|
* A2osX GLOBAL PAGE
|
2016-11-25 16:20:28 +00:00
|
|
|
|
* $BD00->$BD0F : Public Vetors
|
2015-03-14 21:48:35 +00:00
|
|
|
|
*--------------------------------------
|
2016-11-25 16:20:28 +00:00
|
|
|
|
A2osX.SYSCALL .EQ $BD00
|
|
|
|
|
A2osX.LIBCALL .EQ $BD03
|
2017-11-05 21:23:21 +00:00
|
|
|
|
A2osX.ATKCALL .EQ $BD06
|
2017-08-31 15:35:15 +00:00
|
|
|
|
A2osX.ROMCALL .EQ $BD09
|
2017-07-01 13:45:53 +00:00
|
|
|
|
A2osX.BADCALL .EQ $BD0C
|
2015-11-10 20:48:42 +00:00
|
|
|
|
*--------------------------------------
|
2018-05-24 15:21:38 +00:00
|
|
|
|
A2osX.SLEEP .EQ $BD10
|
2015-03-14 21:48:35 +00:00
|
|
|
|
*--------------------------------------
|
2016-06-07 06:10:18 +00:00
|
|
|
|
* $BEE0->$BEEF : Public Variables
|
2015-06-03 18:30:57 +00:00
|
|
|
|
*--------------------------------------
|
2016-06-07 06:10:18 +00:00
|
|
|
|
A2osX.ASCREEN .EQ $BEE0 Active Screen
|
2016-10-07 15:28:17 +00:00
|
|
|
|
A2osX.SCRNDEVS .EQ $BEE1 -> $BEE4 (4 screen devices)
|
2015-03-14 21:48:35 +00:00
|
|
|
|
|
2016-12-05 17:04:42 +00:00
|
|
|
|
A2osX.CPUTYPE .EQ $BEE5
|
2017-01-25 16:18:35 +00:00
|
|
|
|
A2osX.CPUSPEED .EQ $BEE6 WORD, (->255.99 Mhz)
|
2015-03-14 21:48:35 +00:00
|
|
|
|
|
2017-01-25 16:18:35 +00:00
|
|
|
|
A2osX.Z80SLOT .EQ $BEE8
|
|
|
|
|
A2osX.Z80SPEED .EQ $BEE9 WORD
|
2016-03-13 21:50:43 +00:00
|
|
|
|
|
2018-04-27 12:13:54 +00:00
|
|
|
|
* .EQ $BEEB
|
2017-10-27 14:56:46 +00:00
|
|
|
|
|
2017-01-25 16:18:35 +00:00
|
|
|
|
A2osX.TIMER16 .EQ $BEEC WORD
|
|
|
|
|
A2osX.RANDOM16 .EQ $BEEE WORD
|
2015-03-14 21:48:35 +00:00
|
|
|
|
*--------------------------------------
|
2016-06-07 06:10:18 +00:00
|
|
|
|
* $BEF0->$BEFF : Kernel Config Block
|
|
|
|
|
*--------------------------------------
|
2017-04-13 16:04:05 +00:00
|
|
|
|
A2osX.HZ .EQ $BEF0 5/6 for 50/60Hz
|
2017-10-19 15:27:38 +00:00
|
|
|
|
A2osX.F .EQ $BEF8
|
|
|
|
|
A2osX.F.CHROOT .EQ %10000000 ChRooting to /RAMx
|
|
|
|
|
A2osX.F.PMODE .EQ %01000000 Preemptive Mode
|
|
|
|
|
A2osX.S .EQ $BEF8 $BEF9->$BEFF, 7 slots
|
|
|
|
|
A2osX.S.Z80 .EQ $80
|
|
|
|
|
A2osX.S.VSDRIVE .EQ $81
|
|
|
|
|
A2osX.S.ATCARD .EQ $82
|
|
|
|
|
A2osX.S.DII .EQ $C0
|
|
|
|
|
A2osX.S.BLK .EQ $C1
|
|
|
|
|
A2osX.S.SP .EQ $C2
|
|
|
|
|
A2osX.S.COM .EQ $E0
|
|
|
|
|
A2osX.S.XY .EQ $E1
|
|
|
|
|
A2osX.S.NIC .EQ $E2
|
|
|
|
|
A2osX.S.DISABLE .EQ $FF
|
2016-06-07 06:10:18 +00:00
|
|
|
|
*--------------------------------------
|
2015-11-10 20:48:42 +00:00
|
|
|
|
* A2osX.SYSCALL Functions Indexes
|
|
|
|
|
*--------------------------------------
|
2017-08-25 15:02:16 +00:00
|
|
|
|
* .EQ $00
|
|
|
|
|
* .EQ $02
|
|
|
|
|
SYS.Stat .EQ $04
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.MKDir .EQ $06
|
|
|
|
|
SYS.MKNod .EQ $08
|
2017-08-25 15:02:16 +00:00
|
|
|
|
SYS.MKFIFO .EQ $0A
|
|
|
|
|
* .EQ $0C
|
|
|
|
|
* .EQ $0E
|
2015-11-10 20:48:42 +00:00
|
|
|
|
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.OpenDir .EQ $10
|
|
|
|
|
SYS.ReadDir .EQ $12
|
|
|
|
|
SYS.CloseDir .EQ $14
|
2018-07-11 15:13:29 +00:00
|
|
|
|
SYS.Open .EQ $16
|
|
|
|
|
SYS.Open.RDONLY .EQ %00000001
|
|
|
|
|
SYS.Open.WRONLY .EQ %00000010
|
|
|
|
|
SYS.Open.RDWR .EQ %00000011
|
|
|
|
|
SYS.Open.APPEND .EQ %00000100
|
|
|
|
|
SYS.Open.CREATE .EQ %10000000
|
|
|
|
|
SYS.Close .EQ $18
|
|
|
|
|
SYS.Read .EQ $1A
|
|
|
|
|
SYS.Write .EQ $1C
|
|
|
|
|
SYS.IOCTL .EQ $1E
|
2017-08-25 15:02:16 +00:00
|
|
|
|
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.FPutC .EQ $20
|
|
|
|
|
SYS.PutChar .EQ $22
|
|
|
|
|
SYS.GetC .EQ $24
|
2017-08-25 15:02:16 +00:00
|
|
|
|
SYS.GetChar .EQ $26
|
|
|
|
|
SYS.FPutS .EQ $28
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.PutS .EQ $2A
|
2018-01-15 06:50:44 +00:00
|
|
|
|
* .EQ $2C
|
|
|
|
|
* .EQ $2E
|
2017-08-25 15:02:16 +00:00
|
|
|
|
|
|
|
|
|
SYS.FOpen .EQ $30
|
2017-01-12 17:43:45 +00:00
|
|
|
|
SYS.FOpen.R .EQ $01 Open For Read
|
|
|
|
|
SYS.FOpen.W .EQ $02 Open For Write
|
|
|
|
|
SYS.FOpen.A .EQ $04 Append
|
|
|
|
|
SYS.FOpen.T .EQ $08 Open/Append in Text mode
|
|
|
|
|
SYS.FOpen.X .EQ $80 Create if not exists
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.FClose .EQ $32
|
2017-08-25 15:02:16 +00:00
|
|
|
|
SYS.FRead .EQ $34
|
|
|
|
|
SYS.FWrite .EQ $36
|
|
|
|
|
SYS.FFlush .EQ $38
|
|
|
|
|
SYS.FSeek .EQ $3A
|
2017-01-12 17:43:45 +00:00
|
|
|
|
SYS.FSeek.SET .EQ $00
|
|
|
|
|
SYS.FSeek.CUR .EQ $01
|
|
|
|
|
SYS.FSeek.END .EQ $02
|
2017-08-25 15:02:16 +00:00
|
|
|
|
SYS.FTell .EQ $3C
|
|
|
|
|
SYS.FEOF .EQ $3E
|
2017-12-14 16:25:03 +00:00
|
|
|
|
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.Remove .EQ $40
|
2017-08-25 15:02:16 +00:00
|
|
|
|
SYS.Rename .EQ $42
|
2017-08-28 15:35:10 +00:00
|
|
|
|
* .EQ $44
|
|
|
|
|
* .EQ $46
|
|
|
|
|
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.GetDevByID .EQ $48
|
|
|
|
|
SYS.GetDevByName .EQ $4A
|
|
|
|
|
SYS.GetDevStatus .EQ $4C
|
2018-07-11 15:13:29 +00:00
|
|
|
|
* .EQ $4E
|
2017-08-25 15:02:16 +00:00
|
|
|
|
|
|
|
|
|
* .EQ $50
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.SScanF .EQ $52
|
2017-08-25 15:02:16 +00:00
|
|
|
|
* .EQ $54
|
|
|
|
|
* .EQ $56
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.PrintF .EQ $58
|
|
|
|
|
SYS.SPrintF .EQ $5A
|
|
|
|
|
SYS.FPrintF .EQ $5C
|
2017-08-25 15:02:16 +00:00
|
|
|
|
* .EQ $5E
|
|
|
|
|
|
2017-09-14 15:21:06 +00:00
|
|
|
|
* .EQ $60
|
2017-10-03 15:33:30 +00:00
|
|
|
|
* .EQ $62
|
2017-08-25 15:02:16 +00:00
|
|
|
|
SYS.LoadFile .EQ $64
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.LoadTxtFile .EQ $66
|
2017-08-25 15:02:16 +00:00
|
|
|
|
|
|
|
|
|
SYS.ChTyp .EQ $68
|
|
|
|
|
SYS.ChMod .EQ $6A
|
|
|
|
|
SYS.ChOwn .EQ $6C
|
|
|
|
|
SYS.ChGrp .EQ $6E
|
|
|
|
|
|
2017-09-18 06:30:07 +00:00
|
|
|
|
SYS.AToF .EQ $70
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.AToI .EQ $72
|
2017-09-18 06:30:07 +00:00
|
|
|
|
SYS.AToL .EQ $74
|
2017-10-16 15:41:48 +00:00
|
|
|
|
SYS.StrToF .EQ $76
|
|
|
|
|
SYS.StrToL .EQ $78
|
2017-09-18 06:30:07 +00:00
|
|
|
|
* .EQ $7A
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.RealPath .EQ $7C
|
2017-09-18 06:30:07 +00:00
|
|
|
|
* .EQ $7E
|
|
|
|
|
*--------------------------------------
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.StrLen .EQ $80
|
2017-09-18 06:30:07 +00:00
|
|
|
|
SYS.StrCpy .EQ $82
|
|
|
|
|
SYS.StrCat .EQ $84
|
|
|
|
|
SYS.StrMatch .EQ $86
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.StrUpr .EQ $88
|
|
|
|
|
SYS.StrLwr .EQ $8A
|
2018-01-15 16:51:44 +00:00
|
|
|
|
SYS.StrCmp .EQ $8C
|
|
|
|
|
SYS.StrICmp .EQ $8E
|
2017-08-25 15:02:16 +00:00
|
|
|
|
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.Time .EQ $90
|
2017-08-25 15:02:16 +00:00
|
|
|
|
SYS.CTime2Time .EQ $92
|
|
|
|
|
SYS.PTime2Time .EQ $94
|
2018-01-15 16:51:44 +00:00
|
|
|
|
SYS.StrFTime .EQ $96
|
2017-08-25 15:02:16 +00:00
|
|
|
|
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.LoadLib .EQ $98
|
|
|
|
|
SYS.UnloadLib .EQ $9A
|
|
|
|
|
SYS.LoadDrv .EQ $9C
|
2018-06-28 15:26:34 +00:00
|
|
|
|
SYS.InsDrv .EQ $9E
|
2017-12-14 16:25:03 +00:00
|
|
|
|
*--------------------------------------
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.ExecPSNewEnv .EQ $A0
|
|
|
|
|
SYS.ExecPS .EQ $A2
|
|
|
|
|
SYS.CreatePSNewEnv .EQ $A4
|
|
|
|
|
SYS.CreatePS .EQ $A6
|
2017-09-08 14:49:23 +00:00
|
|
|
|
* .EQ $A8
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.GetMemStat .EQ $AA
|
|
|
|
|
SYS.GetPSStatus .EQ $AC
|
|
|
|
|
SYS.GetPSStat .EQ $AE
|
2017-08-25 15:02:16 +00:00
|
|
|
|
|
2018-01-15 06:50:44 +00:00
|
|
|
|
* .EQ $B0
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.GetArg .EQ $B2
|
|
|
|
|
SYS.ExpandStr .EQ $B4
|
2018-06-28 15:26:34 +00:00
|
|
|
|
SYS.FileSearch .EQ $B6
|
2017-08-25 15:02:16 +00:00
|
|
|
|
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.PutEnv .EQ $B8
|
2017-08-25 15:02:16 +00:00
|
|
|
|
SYS.SetEnv .EQ $BA
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.GetEnv .EQ $BC
|
|
|
|
|
SYS.UnsetEnv .EQ $BE
|
2017-08-25 15:02:16 +00:00
|
|
|
|
*--------------------------------------
|
2017-10-27 14:56:46 +00:00
|
|
|
|
SYS.FAdd .EQ $C0
|
|
|
|
|
SYS.FSub .EQ $C2
|
|
|
|
|
SYS.FMult .EQ $C4
|
|
|
|
|
SYS.FDiv .EQ $C6
|
|
|
|
|
|
|
|
|
|
SYS.FPwr .EQ $C8
|
|
|
|
|
* .EQ $CA
|
2017-10-30 16:11:07 +00:00
|
|
|
|
SYS.LRIntF .EQ $CC
|
2017-10-31 15:25:16 +00:00
|
|
|
|
SYS.Float .EQ $CE
|
2017-10-27 14:56:46 +00:00
|
|
|
|
|
|
|
|
|
SYS.Log .EQ $D0
|
|
|
|
|
SYS.Sqr .EQ $D2
|
|
|
|
|
SYS.Exp .EQ $D4
|
|
|
|
|
SYS.Cos .EQ $D6
|
|
|
|
|
|
|
|
|
|
SYS.Sin .EQ $D8
|
|
|
|
|
SYS.Tan .EQ $DA
|
|
|
|
|
SYS.ATan .EQ $DC
|
|
|
|
|
* .EQ $DF
|
|
|
|
|
*--------------------------------------
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.GetStkObjProp .EQ $E0
|
|
|
|
|
SYS.FreeMem .EQ $E2
|
|
|
|
|
SYS.GetMemPtr .EQ $E4
|
|
|
|
|
SYS.GetMemByID .EQ $E6
|
2017-10-27 14:56:46 +00:00
|
|
|
|
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.GetMem .EQ $E8
|
|
|
|
|
SYS.GetMem0 .EQ $EA
|
|
|
|
|
SYS.NewStr .EQ $EC
|
2018-01-19 16:21:31 +00:00
|
|
|
|
SYS.SListAdd .EQ $EE
|
2017-10-27 14:56:46 +00:00
|
|
|
|
|
2018-01-19 16:21:31 +00:00
|
|
|
|
SYS.SListLookup .EQ $F0
|
|
|
|
|
SYS.SListGetByID .EQ $F2
|
|
|
|
|
SYS.SListUpdateByID .EQ $F4
|
|
|
|
|
SYS.SListNew .EQ $F6
|
2017-10-27 14:56:46 +00:00
|
|
|
|
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.SListFree .EQ $F8
|
2017-12-07 16:33:39 +00:00
|
|
|
|
SYS.LoadStkObj .EQ $FA
|
2018-06-18 06:22:50 +00:00
|
|
|
|
SYS.NewStkObj .EQ $FC
|
|
|
|
|
SYS.FreeStkObj .EQ $FE
|
2017-08-25 15:02:16 +00:00
|
|
|
|
*--------------------------------------
|
2017-12-30 22:14:05 +00:00
|
|
|
|
SYS.Kernel.JMP .EQ $E000
|
|
|
|
|
SYS.GuiOSD.JMP .EQ $E200
|
|
|
|
|
*--------------------------------------
|
2016-01-16 22:06:36 +00:00
|
|
|
|
* ProDOS ERROR CODES : $00->$5F
|
|
|
|
|
* Lib ERROR CODES : $80->$BF
|
|
|
|
|
* Kernel ERROR CODES : $C0->$FF
|
|
|
|
|
*--------------------------------------
|
2017-10-26 16:01:54 +00:00
|
|
|
|
K.E.OOM .EQ $FF Out Of Memory Error
|
|
|
|
|
K.E.OOH .EQ $FE Out Of Handle Error
|
2015-11-10 20:48:42 +00:00
|
|
|
|
*--------------------------------------
|
2017-10-26 16:01:54 +00:00
|
|
|
|
K.E.NSP .EQ $DD No Such Process Error
|
2015-11-10 20:48:42 +00:00
|
|
|
|
*--------------------------------------
|
2017-10-26 16:01:54 +00:00
|
|
|
|
K.E.SYN .EQ $CF Syntax Error
|
|
|
|
|
K.E.ENVF .EQ $CE Env is Full
|
|
|
|
|
K.E.IBIN .EQ $CD Invalid BIN format
|
|
|
|
|
K.E.FTB .EQ $CC File Too Big Error
|
2015-11-10 20:48:42 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
* MEM STRUCT
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.MEM.F .EQ 0
|
2017-10-06 15:25:14 +00:00
|
|
|
|
S.MEM.F.INUSE .EQ %10000000 (Internal Flag)
|
2015-11-10 20:48:42 +00:00
|
|
|
|
S.MEM.F.INIT0 .EQ %01000000 Fill with "0"
|
|
|
|
|
S.MEM.F.CODE .EQ %00100000
|
|
|
|
|
S.MEM.F.NOMOVE .EQ %00010000
|
|
|
|
|
S.MEM.F.ALIGN .EQ %00001000
|
|
|
|
|
S.MEM.REFCNT .EQ 1
|
|
|
|
|
S.MEM.OWNERPID .EQ 2
|
|
|
|
|
S.MEM.BIN .EQ 3
|
|
|
|
|
S.MEM.PTR .EQ 4
|
|
|
|
|
S.MEM.LEN .EQ 6
|
|
|
|
|
*
|
2016-10-03 15:59:36 +00:00
|
|
|
|
S.MEM .EQ 8
|
2015-11-10 20:48:42 +00:00
|
|
|
|
*--------------------------------------
|
2017-10-27 06:36:46 +00:00
|
|
|
|
S.MSTAT.ML .EQ 0
|
|
|
|
|
S.MSTAT.MF .EQ 2
|
|
|
|
|
S.MSTAT.MH .EQ 4
|
|
|
|
|
S.MSTAT.MLast .EQ 6
|
2016-12-08 16:53:29 +00:00
|
|
|
|
*
|
2017-10-27 06:36:46 +00:00
|
|
|
|
S.MSTAT.XL .EQ 8
|
|
|
|
|
S.MSTAT.XF .EQ 10
|
|
|
|
|
S.MSTAT.XH .EQ 12
|
|
|
|
|
S.MSTAT.XLast .EQ 14
|
2016-12-08 16:53:29 +00:00
|
|
|
|
*
|
2017-10-27 06:36:46 +00:00
|
|
|
|
S.MSTAT.DL .EQ 16
|
|
|
|
|
S.MSTAT.DF .EQ 18
|
|
|
|
|
S.MSTAT.DH .EQ 20
|
|
|
|
|
S.MSTAT.DCount .EQ 22
|
2016-12-08 16:53:29 +00:00
|
|
|
|
*
|
2017-10-27 06:36:46 +00:00
|
|
|
|
S.MSTAT .EQ 24
|
2016-12-08 16:53:29 +00:00
|
|
|
|
*--------------------------------------
|
2018-06-20 15:02:09 +00:00
|
|
|
|
* IOCTL device API
|
2016-12-06 16:57:00 +00:00
|
|
|
|
*--------------------------------------
|
2018-07-05 15:39:36 +00:00
|
|
|
|
C.EOF .EQ 4
|
2017-03-15 16:44:15 +00:00
|
|
|
|
*--------------------------------------
|
2018-06-22 14:59:24 +00:00
|
|
|
|
DEVID.NULL .EQ 0
|
2018-07-10 15:33:13 +00:00
|
|
|
|
DEVID.SYS .EQ 1
|
2018-06-22 14:59:24 +00:00
|
|
|
|
*--------------------------------------
|
2018-06-20 15:02:09 +00:00
|
|
|
|
IOCTL.STATUS .EQ 0 X,Y = byte count returned
|
2018-06-18 06:22:50 +00:00
|
|
|
|
IOCTL.READBLOCK .EQ 2
|
|
|
|
|
IOCTL.WRITEBLOCK .EQ 4
|
|
|
|
|
IOCTL.FORMAT .EQ 6
|
|
|
|
|
IOCTL.CONTROL .EQ 8
|
|
|
|
|
IOCTL.INIT .EQ 10
|
|
|
|
|
IOCTL.OPEN .EQ 12
|
|
|
|
|
IOCTL.CLOSE .EQ 14
|
|
|
|
|
IOCTL.READ .EQ 16
|
|
|
|
|
IOCTL.WRITE .EQ 18
|
|
|
|
|
IOCTL.IRQ .EQ 20
|
2017-01-12 17:43:45 +00:00
|
|
|
|
*--------------------------------------
|
2018-06-19 15:08:22 +00:00
|
|
|
|
S.IOCTL.CNT .EQ 0
|
|
|
|
|
S.IOCTL.UNITNUM .EQ 1
|
|
|
|
|
S.IOCTL.BUFPTR .EQ 2
|
|
|
|
|
S.IOCTL.STATCODE .EQ 4 1 BYTE
|
2018-06-20 15:02:09 +00:00
|
|
|
|
S.IOCTL.STATCODE.STATUS .EQ 0
|
|
|
|
|
S.IOCTL.STATCODE.GETDCB .EQ 1
|
|
|
|
|
S.IOCTL.STATCODE.GETNL .EQ 2
|
|
|
|
|
S.IOCTL.STATCODE.GETDIB .EQ 3
|
2018-06-19 15:08:22 +00:00
|
|
|
|
S.IOCTL.CTRLCODE .EQ 4 1 BYTE
|
2018-06-20 15:02:09 +00:00
|
|
|
|
S.IOCTL.CTRLCODE.RESET .EQ 0
|
|
|
|
|
S.IOCTL.CTRLCODE.SETDCB .EQ 1
|
|
|
|
|
S.IOCTL.CTRLCODE.SETNL .EQ 2
|
|
|
|
|
S.IOCTL.CTRLCODE.IRQ .EQ 3
|
|
|
|
|
S.IOCTL.CTRLCODE.EJECT .EQ 4
|
2018-06-19 15:08:22 +00:00
|
|
|
|
S.IOCTL.BLKNUM .EQ 4 3 BYTES
|
|
|
|
|
S.IOCTL.BYTECNT .EQ 4 2 BYTES
|
|
|
|
|
S.IOCTL.ADDRPTR .EQ 6 3 BYTES
|
|
|
|
|
*
|
|
|
|
|
S.IOCTRL .EQ 9
|
|
|
|
|
*--------------------------------------
|
2017-10-27 06:36:46 +00:00
|
|
|
|
S.DSTAT.S .EQ 0
|
|
|
|
|
S.DSTAT.S.BLOCK .EQ %10000000
|
|
|
|
|
S.DSTAT.S.WRITE .EQ %01000000
|
|
|
|
|
S.DSTAT.S.READ .EQ %00100000
|
|
|
|
|
S.DSTAT.S.ONLINE .EQ %00010000
|
|
|
|
|
S.DSTAT.S.NOFMT .EQ %00001000
|
|
|
|
|
S.DSTAT.S.WENABL .EQ %00000100
|
|
|
|
|
S.DSTAT.S.IRQ .EQ %00000010
|
|
|
|
|
S.DSTAT.S.OPENED .EQ %00000001
|
|
|
|
|
S.DSTAT.SIZE .EQ 1 3 bytes
|
|
|
|
|
S.DSTAT.IDS .EQ 4 1 (LEN) + 16 MAX
|
|
|
|
|
S.DSTAT.T .EQ 21
|
|
|
|
|
S.DSTAT.T.RAM .EQ $00 Memory Expansion Card (RAM disk)
|
|
|
|
|
S.DSTAT.T.3.5 .EQ $01 3.5" disk
|
|
|
|
|
S.DSTAT.T.PROFILE .EQ $02 ProFile-type hard disk
|
|
|
|
|
S.DSTAT.T.GENSCSI .EQ $03 Generic SCSI
|
|
|
|
|
S.DSTAT.T.ROM .EQ $04 ROM disk
|
|
|
|
|
S.DSTAT.T.CDROM .EQ $05 SCSI CD-ROM
|
|
|
|
|
S.DSTAT.T.TAPE .EQ $06 SCSI tape or other SCSI sequential device
|
|
|
|
|
S.DSTAT.T.HD .EQ $07 SCSI hard disk
|
2017-01-12 22:04:44 +00:00
|
|
|
|
* .EQ $08 Reserved
|
2017-10-27 06:36:46 +00:00
|
|
|
|
S.DSTAT.T.SPRINTER .EQ $09 SCSI printer
|
|
|
|
|
S.DSTAT.T.5.25 .EQ $0A 5-1/4" disk
|
2017-01-12 22:04:44 +00:00
|
|
|
|
* .EQ $0B Reserved
|
|
|
|
|
* .EQ $0C Reserved
|
2017-10-27 06:36:46 +00:00
|
|
|
|
S.DSTAT.T.PRINTER .EQ $0D Printer
|
|
|
|
|
S.DSTAT.T.CLOCK .EQ $0E Clock
|
|
|
|
|
S.DSTAT.T.MODEM .EQ $0F Modem
|
|
|
|
|
S.DSTAT.T.DISKII .EQ $10
|
|
|
|
|
S.DSTAT.T.PRODOS .EQ $11
|
|
|
|
|
S.DSTAT.T.NET .EQ $12 Network board
|
|
|
|
|
S.DSTAT.T.XY .EQ $13 X,Y Pointing Device
|
|
|
|
|
S.DSTAT.T.CHAR .EQ $14
|
|
|
|
|
S.DSTAT.T.GFX .EQ $15
|
2018-06-20 15:02:09 +00:00
|
|
|
|
S.DSTAT.T.SND .EQ $16
|
2017-10-27 06:36:46 +00:00
|
|
|
|
S.DSTAT.ST .EQ 22
|
|
|
|
|
S.DSTAT.ST.EXT .EQ $80
|
|
|
|
|
S.DSTAT.ST.DSKSW .EQ $40
|
|
|
|
|
S.DSTAT.ST.NOREM .EQ $20
|
|
|
|
|
S.DSTAT.VERSION .EQ 23
|
|
|
|
|
*
|
2018-07-11 15:13:29 +00:00
|
|
|
|
S.DSTAT .EQ 25
|
2017-01-12 22:04:44 +00:00
|
|
|
|
*--------------------------------------
|
2018-07-10 15:33:13 +00:00
|
|
|
|
* S.FD
|
|
|
|
|
*--------------------------------------
|
2018-07-11 15:13:29 +00:00
|
|
|
|
S.FD.T .EQ 0
|
2018-07-10 15:33:13 +00:00
|
|
|
|
S.FD.T.REG .EQ 0
|
|
|
|
|
S.FD.T.DIR .EQ 2
|
|
|
|
|
S.FD.T.CDEV .EQ 4
|
|
|
|
|
S.FD.T.BDEV .EQ 6
|
|
|
|
|
S.FD.T.LNK .EQ 8
|
2018-07-11 15:13:29 +00:00
|
|
|
|
S.FD.T.DSOCK .EQ 10
|
|
|
|
|
S.FD.T.SSOCK .EQ 12
|
2018-07-10 15:33:13 +00:00
|
|
|
|
S.FD.T.FIFO .EQ 14
|
|
|
|
|
S.FD.HANDLER .EQ 1 0=KRNL,!0=hLIB (LIBNFS,LIBTCPIP.....)
|
|
|
|
|
*--------------------------------------
|
2018-07-11 15:13:29 +00:00
|
|
|
|
S.FD.REG.REF .EQ 2
|
2018-07-10 15:33:13 +00:00
|
|
|
|
S.FD.REG.IOBUF .EQ 3
|
2018-06-19 15:08:22 +00:00
|
|
|
|
*
|
2018-07-10 15:33:13 +00:00
|
|
|
|
S.FD.REG .EQ 4
|
2018-06-19 15:08:22 +00:00
|
|
|
|
*--------------------------------------
|
2018-07-11 15:13:29 +00:00
|
|
|
|
S.FD.DIR.REF .EQ 2
|
2018-07-10 15:33:13 +00:00
|
|
|
|
S.FD.DIR.IOBUF .EQ 3
|
|
|
|
|
S.FD.DIR.EL .EQ 4
|
2018-07-11 15:13:29 +00:00
|
|
|
|
S.FD.DIR.EPB .EQ 5
|
2018-07-10 15:33:13 +00:00
|
|
|
|
S.FD.DIR.FC .EQ 6 word
|
2018-06-19 15:08:22 +00:00
|
|
|
|
*
|
2018-07-10 15:33:13 +00:00
|
|
|
|
S.FD.DIR .EQ 8
|
2018-06-19 15:08:22 +00:00
|
|
|
|
*--------------------------------------
|
2018-07-10 15:33:13 +00:00
|
|
|
|
S.FD.DEV.BUSID .EQ 2
|
|
|
|
|
S.FD.DEV.DEVID .EQ 3
|
|
|
|
|
S.FD.DEV.BUSPTR .EQ 4 word
|
|
|
|
|
S.FD.DEV.DRVPTR .EQ 6 word
|
2018-07-11 15:13:29 +00:00
|
|
|
|
S.FD.DEV.NAME .EQ 8 C-String
|
2018-06-19 15:08:22 +00:00
|
|
|
|
*
|
2018-07-10 15:33:13 +00:00
|
|
|
|
S.FD.DEV .EQ 16
|
2018-06-19 15:08:22 +00:00
|
|
|
|
*--------------------------------------
|
2018-07-10 15:33:13 +00:00
|
|
|
|
* S.FD.LNK
|
2018-06-19 15:08:22 +00:00
|
|
|
|
*--------------------------------------
|
2018-07-10 15:33:13 +00:00
|
|
|
|
S.FD.SSOCK.HSKT .EQ 2
|
|
|
|
|
S.FD.SSOCK.OPEN .EQ 3
|
|
|
|
|
S.FD.SSOCK.CLOSE .EQ 4
|
|
|
|
|
S.FD.SSOCK.READ .EQ 5
|
|
|
|
|
S.FD.SSOCK.WRITE .EQ 6
|
|
|
|
|
S.FD.SSOCK.STATUS .EQ 7
|
2018-06-19 15:08:22 +00:00
|
|
|
|
*
|
2018-07-11 15:13:29 +00:00
|
|
|
|
S.FD.SSOCK .EQ 8
|
2018-07-10 15:33:13 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.FD.FIFO.S .EQ 2
|
|
|
|
|
S.FD.FIFO.S.Opened .EQ 1
|
|
|
|
|
S.FD.FIFO.S.Closed .EQ 2
|
|
|
|
|
S.FD.FIFO.hMem .EQ 3
|
|
|
|
|
S.FD.FIFO.Tail .EQ 4
|
|
|
|
|
S.FD.FIFO.Head .EQ 5
|
2018-06-19 15:08:22 +00:00
|
|
|
|
*
|
2018-07-10 15:33:13 +00:00
|
|
|
|
S.FD.FIFO .EQ 6
|
2018-06-19 15:08:22 +00:00
|
|
|
|
*--------------------------------------
|
2015-11-10 20:48:42 +00:00
|
|
|
|
* PS STRUCT
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.PS.F .EQ 0
|
2018-04-12 15:45:31 +00:00
|
|
|
|
S.PS.F.INIT .EQ %10000000
|
|
|
|
|
S.PS.F.RUN .EQ %01000000
|
2018-04-26 15:38:02 +00:00
|
|
|
|
S.PS.F.QUIT .EQ %00100000
|
|
|
|
|
S.PS.F.DOEVENT .EQ %00010000
|
2018-04-20 15:06:41 +00:00
|
|
|
|
S.PS.F.HOLD .EQ %00001000
|
|
|
|
|
S.PS.F.SLEEP .EQ %00000100
|
|
|
|
|
S.PS.F.EVENT .EQ %00000010
|
|
|
|
|
S.PS.F.DUPENV .EQ %00000001
|
2017-01-12 17:43:45 +00:00
|
|
|
|
S.PS.PPID .EQ 1
|
|
|
|
|
S.PS.PID .EQ 2
|
|
|
|
|
S.PS.CPID .EQ 3
|
|
|
|
|
S.PS.hCS .EQ 4
|
|
|
|
|
S.PS.hDS .EQ 5
|
2017-08-24 06:47:31 +00:00
|
|
|
|
S.PS.hSS .EQ 6
|
2018-04-13 15:18:48 +00:00
|
|
|
|
S.PS.UID .EQ 7
|
2017-08-31 15:35:15 +00:00
|
|
|
|
S.PS.hENV .EQ 8
|
2017-08-24 06:47:31 +00:00
|
|
|
|
S.PS.hPREFIX .EQ 9
|
2017-01-12 17:43:45 +00:00
|
|
|
|
S.PS.hStdIn .EQ 10
|
|
|
|
|
S.PS.hStdOut .EQ 11
|
|
|
|
|
S.PS.hStdErr .EQ 12
|
2016-10-29 19:58:21 +00:00
|
|
|
|
S.PS.RC .EQ 13
|
2018-04-11 15:35:51 +00:00
|
|
|
|
S.PS.ARGC .EQ 14
|
|
|
|
|
S.PS.hARGS .EQ 15
|
2017-08-30 15:26:34 +00:00
|
|
|
|
|
2018-04-23 06:03:23 +00:00
|
|
|
|
* .EQ 16
|
2017-09-19 15:34:01 +00:00
|
|
|
|
|
2018-04-13 15:18:48 +00:00
|
|
|
|
S.PS.A .EQ 17
|
|
|
|
|
S.PS.X .EQ 18
|
|
|
|
|
S.PS.Y .EQ 19
|
|
|
|
|
S.PS.P .EQ 20
|
|
|
|
|
S.PS.PC .EQ 21 WORD
|
|
|
|
|
S.PS.ZP.SIZE .EQ 23
|
2018-04-12 15:45:31 +00:00
|
|
|
|
|
2018-04-10 15:03:29 +00:00
|
|
|
|
S.PS.ZP .EQ 24
|
|
|
|
|
|
|
|
|
|
S.PS.ZP.CODE .EQ 24
|
|
|
|
|
S.PS.ZP.DATA .EQ 26
|
|
|
|
|
S.PS.ZP.STACK .EQ 28
|
|
|
|
|
S.PS.ZP.LOCAL .EQ 30
|
2015-11-10 20:48:42 +00:00
|
|
|
|
*
|
2018-04-20 15:06:41 +00:00
|
|
|
|
S.PS .EQ 64
|
2015-03-14 21:48:35 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
* LIB Function Indexes
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
LIBMGR.LOAD .EQ 0
|
|
|
|
|
LIBMGR.UNLOAD .EQ 2
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
* Task Function Indexes
|
|
|
|
|
*--------------------------------------
|
2018-07-04 14:59:12 +00:00
|
|
|
|
PS.INIT .EQ 0
|
|
|
|
|
PS.RUN .EQ 2
|
|
|
|
|
PS.DOEVENT .EQ 4
|
|
|
|
|
PS.QUIT .EQ 6
|
|
|
|
|
PS.RESUME .EQ 8
|
2015-03-14 21:48:35 +00:00
|
|
|
|
*--------------------------------------
|
2015-11-10 20:48:42 +00:00
|
|
|
|
* EVENT STRUCT
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.EVT.F .EQ 0
|
2016-03-13 21:50:43 +00:00
|
|
|
|
S.EVT.F.T10TH .EQ %10000000
|
|
|
|
|
S.EVT.F.T1SEC .EQ %01000000
|
2017-10-27 06:36:46 +00:00
|
|
|
|
S.EVT.F.hMEM2 .EQ %00100000 Indicates That S.EVT.B2 is a hMem
|
|
|
|
|
S.EVT.F.hMEM1 .EQ %00010000 Indicates That S.EVT.B1 is a hMem
|
2016-03-13 21:50:43 +00:00
|
|
|
|
|
2018-04-26 15:38:02 +00:00
|
|
|
|
*S.EVT.hDEV .EQ 1
|
2017-10-27 06:36:46 +00:00
|
|
|
|
S.EVT.B1 .EQ 2
|
|
|
|
|
S.EVT.B2 .EQ 3
|
|
|
|
|
S.EVT.W1 .EQ 4
|
|
|
|
|
S.EVT.W2 .EQ 6
|
2015-11-10 20:48:42 +00:00
|
|
|
|
*
|
2016-03-13 21:50:43 +00:00
|
|
|
|
S.EVT .EQ 8
|
2015-11-10 20:48:42 +00:00
|
|
|
|
*--------------------------------------
|
2016-09-22 15:46:01 +00:00
|
|
|
|
S.TIME.CENTURY .EQ 0 19,20,21....
|
2018-04-17 15:25:45 +00:00
|
|
|
|
S.TIME.YEAR .EQ 1 0..99
|
2016-09-22 15:46:01 +00:00
|
|
|
|
S.TIME.MONTH .EQ 2 1..12
|
|
|
|
|
S.TIME.DAY .EQ 3 1..31
|
|
|
|
|
S.TIME.HOUR .EQ 4 0..23
|
|
|
|
|
S.TIME.MINUTE .EQ 5 0..59
|
|
|
|
|
S.TIME.SECOND .EQ 6 0..61
|
|
|
|
|
S.TIME.WDAY .EQ 7 1..7
|
2015-11-10 20:48:42 +00:00
|
|
|
|
*
|
2016-09-22 15:46:01 +00:00
|
|
|
|
S.TIME .EQ 8
|
2016-08-30 20:26:19 +00:00
|
|
|
|
*--------------------------------------
|
2016-12-09 16:36:24 +00:00
|
|
|
|
S.PFT.PATH .EQ 0 /dev, /mnt
|
|
|
|
|
S.PFT.HANDLER .EQ 16
|
|
|
|
|
S.PFT.DATA .EQ 24 8 bytes OPAQUE data for handler
|
|
|
|
|
*
|
|
|
|
|
S.PFT .EQ 32
|
|
|
|
|
*--------------------------------------
|
2016-08-30 20:26:19 +00:00
|
|
|
|
* S.STAT
|
2016-08-24 15:42:33 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.STAT.MODE .EQ 0
|
|
|
|
|
S.STAT.MODE.XO .EQ $0001
|
|
|
|
|
S.STAT.MODE.WO .EQ $0002
|
|
|
|
|
S.STAT.MODE.RO .EQ $0004
|
|
|
|
|
S.STAT.MODE.XG .EQ $0008
|
|
|
|
|
S.STAT.MODE.WG .EQ $0010
|
|
|
|
|
S.STAT.MODE.RG .EQ $0020
|
|
|
|
|
S.STAT.MODE.XU .EQ $0040
|
|
|
|
|
S.STAT.MODE.WU .EQ $0080
|
|
|
|
|
S.STAT.MODE.RU .EQ $0100
|
2016-10-29 19:58:21 +00:00
|
|
|
|
*S.STAT.MODE.SST .EQ $0200
|
2016-10-18 15:56:06 +00:00
|
|
|
|
*S.STAT.MODE.SGID .EQ $0400
|
|
|
|
|
*S.STAT.MODE.SUID .EQ $0800
|
|
|
|
|
|
2016-12-09 16:36:24 +00:00
|
|
|
|
S.STAT.MODE.REG .EQ $0000
|
|
|
|
|
S.STAT.MODE.DIR .EQ $1000
|
|
|
|
|
*S.STAT.MODE.CDEV .EQ $2000
|
|
|
|
|
*S.STAT.MODE.BDEV .EQ $3000
|
|
|
|
|
*S.STAT.MODE.LNK .EQ $4000
|
|
|
|
|
*S.STAT.MODE.DSOCK .EQ $5000
|
|
|
|
|
*S.STAT.MODE.SSOCK .EQ $6000
|
|
|
|
|
*S.STAT.MODE.FIFO .EQ $7000
|
2016-10-18 15:56:06 +00:00
|
|
|
|
|
2016-09-01 15:42:38 +00:00
|
|
|
|
S.STAT.DEV .EQ 2 WORD
|
|
|
|
|
S.STAT.UID .EQ 4 WORD
|
|
|
|
|
S.STAT.GID .EQ 6 WORD
|
|
|
|
|
S.STAT.INO .EQ 8 QWORD
|
|
|
|
|
S.STAT.NLINK .EQ 16 WORD
|
|
|
|
|
S.STAT.SIZE .EQ 18 DWORD
|
2016-10-14 06:23:05 +00:00
|
|
|
|
S.STAT.ATIME .EQ 22 S.TIME
|
|
|
|
|
S.STAT.MTIME .EQ 30 S.TIME
|
|
|
|
|
S.STAT.CTIME .EQ 38 S.TIME
|
|
|
|
|
S.STAT.BLOCKS .EQ 46 DWORD
|
|
|
|
|
S.STAT.BLKSIZE .EQ 50 WORD
|
2016-12-09 16:36:24 +00:00
|
|
|
|
S.STAT.P.TYPE .EQ 52 BYTE
|
2017-08-22 06:37:03 +00:00
|
|
|
|
S.STAT.P.AUXTYPE .EQ 53 WORD
|
2016-12-09 16:36:24 +00:00
|
|
|
|
S.STAT.P.SLOT .EQ 55 BYTE
|
|
|
|
|
S.STAT.P.DRIVE .EQ 56 BYTE
|
2017-08-22 06:37:03 +00:00
|
|
|
|
S.STAT.P.DEVSTATUS .EQ 57 BYTE
|
|
|
|
|
*S.STAT.P.DEVCNFLCT .EQ 58 BYTE
|
|
|
|
|
S.STAT.P.DEVBLOCKS .EQ 59 BYTE
|
2016-08-24 15:42:33 +00:00
|
|
|
|
*
|
2016-10-14 06:23:05 +00:00
|
|
|
|
S.STAT .EQ 64
|
2016-08-24 15:42:33 +00:00
|
|
|
|
*--------------------------------------
|
2015-03-14 21:48:35 +00:00
|
|
|
|
MAN
|
2017-03-29 15:48:15 +00:00
|
|
|
|
SAVE /A2OSX.BUILD/INC/A2OSX.I
|