mirror of
https://github.com/A2osX/A2osX.git
synced 2024-10-31 23:09:33 +00:00
34f9969c0c
BASIC.FX: bugfix in PATH, relocation code, Added Toolbox function "printf"
188 lines
4.9 KiB
Plaintext
188 lines
4.9 KiB
Plaintext
NEW
|
||
AUTO 3,1
|
||
.LIST OFF
|
||
*--------------------------------------
|
||
* BASIC.SYSTEM Defines
|
||
*--------------------------------------
|
||
BS.E.RANGE .EQ $02
|
||
BS.E.NODEV .EQ $03
|
||
BS.E.WPROT .EQ $04
|
||
BS.E.ENDOFDATA .EQ $05
|
||
BS.E.PATHNFND6 .EQ $06
|
||
BS.E.PATHNFND7 .EQ $07
|
||
BS.E.IO .EQ $08
|
||
BS.E.DISKFULL .EQ $09
|
||
BS.E.LOCKED .EQ $0A
|
||
BS.E.INVOPT .EQ $0B
|
||
BS.E.NOBUFFER .EQ $0C
|
||
BS.E.MISMATCH .EQ $0D
|
||
BS.E.TOOLARGE .EQ $0E
|
||
BS.E.NODIRECT .EQ $0F
|
||
BS.E.SYNTAX .EQ $10
|
||
BS.E.DIRFULL .EQ $11
|
||
BS.E.FNOTOPEN .EQ $12
|
||
BS.E.DUPFILE .EQ $13
|
||
BS.E.FBUSTY .EQ $14
|
||
BS.E.FSTILLOPEN .EQ $15
|
||
*--------------------------------------
|
||
CMDBITS0.PFIX .EQ $80 Prefix needs fetching, pathname optional
|
||
CMDBITS0.SLOT .EQ $40 No parameters to be processed
|
||
CMDBITS0.RRUN .EQ $20 Command only valid during program
|
||
CMDBITS0.FNOPT .EQ $10 Filename is optional
|
||
CMDBITS0.CRFLG .EQ $08 CREATE allowed
|
||
CMDBITS0.T .EQ $04 File type
|
||
CMDBITS0.FN2 .EQ $02 Filename '2' for RENAME
|
||
CMDBITS0.FN1 .EQ $01 Filename expected
|
||
|
||
CMDBITS1.A .EQ $80 Address
|
||
CMDBITS1.B .EQ $40 Byte
|
||
CMDBITS1.E .EQ $20 End address
|
||
CMDBITS1.L .EQ $10 Length
|
||
CMDBITS1.LINE .EQ $08 '@' line number
|
||
CMDBITS1.SD .EQ $04 Slot and drive numbers
|
||
CMDBITS1.F .EQ $02 Field
|
||
CMDBITS1.R .EQ $01 Record
|
||
|
||
CMDBITS1.V .EQ $00 Volume number ignored
|
||
*--------------------------------------
|
||
* BASIC.SYSTEM Global page
|
||
*--------------------------------------
|
||
GP.ENTRY .EQ $BE00
|
||
GP.DOSCMD .EQ $BE03
|
||
GP.EXTRNCMD .EQ $BE06
|
||
GP.ERROUT .EQ $BE09
|
||
GP.PRINTERR .EQ $BE0C
|
||
GP.ERRCODE .EQ $BE0F
|
||
*--------------------------------------
|
||
GP.OUTVECT0 .EQ $BE10
|
||
GP.OUTVECT1 .EQ $BE12
|
||
GP.OUTVECT2 .EQ $BE14
|
||
GP.OUTVECT3 .EQ $BE16
|
||
GP.OUTVECT4 .EQ $BE18
|
||
GP.OUTVECT5 .EQ $BE1A
|
||
GP.OUTVECT6 .EQ $BE1C
|
||
GP.OUTVECT7 .EQ $BE1E
|
||
GP.INVECT0 .EQ $BE20
|
||
GP.INVECT1 .EQ $BE22
|
||
GP.INVECT2 .EQ $BE24
|
||
GP.INVECT3 .EQ $BE26
|
||
GP.INVECT4 .EQ $BE28
|
||
GP.INVECT5 .EQ $BE2A
|
||
GP.INVECT6 .EQ $BE2C
|
||
GP.INVECT7 .EQ $BE2E
|
||
*--------------------------------------
|
||
GP.VECTOUT .EQ $BE30
|
||
GP.VECTIN .EQ $BE32
|
||
GP.VDOSO .EQ $BE34
|
||
GP.VDOSI .EQ $BE36
|
||
GP.VSYSO .EQ $BE38
|
||
GP.VSYSI .EQ $BE3A
|
||
*--------------------------------------
|
||
GP.VDEFSLT .EQ $BE3C
|
||
GP.VDEFDRV .EQ $BE3D
|
||
GP.PREGA .EQ $BE3E
|
||
GP.PREGX .EQ $BE3F
|
||
GP.PREGY .EQ $BE40
|
||
GP.DTRACE .EQ $BE41
|
||
GP.STATE .EQ $BE42
|
||
GP.EXECACTV .EQ $BE43
|
||
GP.IFILACTV .EQ $BE44
|
||
GP.OFILACTV .EQ $BE45
|
||
GP.PFXACTV .EQ $BE46
|
||
GP.DIRFLG .EQ $BE47
|
||
GP.EDIRFLG .EQ $BE48
|
||
GP.STRINGS .EQ $BE49
|
||
GP.TBUFPTR .EQ $BE4A
|
||
GP.INPTR .EQ $BE4B
|
||
GP.CHRLAST .EQ $BE4C
|
||
GP.OPENCNT .EQ $BE4D
|
||
GP.EXECFILE .EQ $BE4E
|
||
GP.CATFLAG .EQ $BE4F
|
||
*--------------------------------------
|
||
GP.XTRNADDR .EQ $BE50
|
||
GP.XLEN .EQ $BE52
|
||
GP.XCNUM .EQ $BE53
|
||
*--------------------------------------
|
||
GP.AllowedBITS .EQ $BE54
|
||
GP.FoundBITS .EQ $BE56
|
||
GP.ParamA .EQ $BE58
|
||
GP.ParamB .EQ $BE5A
|
||
GP.ParamE .EQ $BE5D
|
||
GP.ParamL .EQ $BE5F
|
||
GP.ParamS .EQ $BE61
|
||
GP.ParamD .EQ $BE62
|
||
GP.ParamF .EQ $BE63
|
||
GP.ParamR .EQ $BE65
|
||
GP.ParamV .EQ $BE67
|
||
GP.ParamAT .EQ $BE68
|
||
GP.ParamT .EQ $BE6A
|
||
GP.ParamINPR .EQ $BE6B
|
||
GP.VPATH1 .EQ $BE6C
|
||
GP.VPATH2 .EQ $BE6E
|
||
*--------------------------------------
|
||
GP.GOSYSTEM .EQ $BE70
|
||
GP.GOSYSTEM.C .EQ $BE85
|
||
GP.GOSYSTEM.P .EQ $BE86
|
||
GP.BADCALL .EQ $BE8B
|
||
GP.RTS .EQ $BE9E
|
||
GP.CISPARE1 .EQ $BE9F
|
||
*--------------------------------------
|
||
GP.SCREATE .EQ $BEA0
|
||
GP.SCREATEPATH .EQ $BEA1
|
||
GP.CRACCESS .EQ $BEA3
|
||
GP.CRTYPE .EQ $BEA4
|
||
GP.CRAUXTYPE .EQ $BEA5
|
||
GP.CRSTTYPE .EQ $BEA7
|
||
GP.DATETIME .EQ $BEA8
|
||
*--------------------------------------
|
||
GP.SDSTROY .EQ $BEAC
|
||
GP.SDSTROYPATH .EQ $BEAD
|
||
*--------------------------------------
|
||
GP.SRECNAME .EQ $BEAF
|
||
GP.SRECNAMEOLD .EQ $BEB0
|
||
GP.SRECNAMENEW .EQ $BEB2
|
||
*--------------------------------------
|
||
GP.SSGINFO .EQ $BEB4
|
||
GP.SSGINFOPATH .EQ $BEB5
|
||
GP.FIACCESS .EQ $BEB7
|
||
GP.FITYPE .EQ $BEB8
|
||
GP.FIAUXTYPE .EQ $BEB9
|
||
GP.STTYPE .EQ $BEBB
|
||
GP.FIBLOKS .EQ $BEBC
|
||
GP.FIMDATE .EQ $BEBE
|
||
GP.FICDATE .EQ $BEC2
|
||
*--------------------------------------
|
||
GP.MLIMRKEOFBUF .EQ $BEC6
|
||
GP.MLIMRKEOFBUF.REFNUM .EQ $BEC7
|
||
GP.SBUFADR .EQ $BEC8
|
||
*--------------------------------------
|
||
GP.SOPEN .EQ $BECB
|
||
GP.TXTBUF .EQ $BECC
|
||
GP.OSYSBUF .EQ $BECE
|
||
GP.OREFNUM .EQ $BED0
|
||
*--------------------------------------
|
||
GP.SNEWLIN .EQ $BED1
|
||
GP.NEWLREF .EQ $BED2
|
||
GP.NLINEMASK .EQ $BED3
|
||
GP.NLINECHAR .EQ $BED4
|
||
*--------------------------------------
|
||
GP.MLIRW .EQ $BED5
|
||
GP.MLIRW.REFNUM .EQ $BED6
|
||
GP.MLIRW.DATAPTR .EQ $BED7
|
||
GP.MLIRW.COUNT .EQ $BED9
|
||
GP.MLIRW.TRANS .EQ $BEDB
|
||
*--------------------------------------
|
||
GP.MLICF .EQ $BEDD
|
||
GP.MLICF.REFNUM .EQ $BEDE
|
||
*--------------------------------------
|
||
GP.CCCSPARE .EQ $BEDF
|
||
*--------------------------------------
|
||
GP.GETBUFR .EQ $BEF5
|
||
GP.FREEBUFR .EQ $BEF8
|
||
GP.RSHIMEM .EQ $BEFB
|
||
GP.TBOX .EQ $BEFD
|
||
GP.TBOX.PrintF .EQ 0
|
||
*--------------------------------------
|
||
MAN
|
||
SAVE inc/bs.i
|