mirror of
https://github.com/mist64/msbasic.git
synced 2024-06-24 10:29:27 +00:00
122 lines
3.0 KiB
ArmAsm
122 lines
3.0 KiB
ArmAsm
Z00 := $0000
|
|
L0001 := $0001
|
|
L0002 := $0002
|
|
GOWARM := $0003
|
|
GOSTROUT := $0006
|
|
GOGIVEAYF := $0008
|
|
|
|
CHARAC := $000A
|
|
ENDCHR := $000B
|
|
EOLPNTR := $000C
|
|
DIMFLG := $000D
|
|
VALTYP := $000E
|
|
DATAFLG := $0010
|
|
SUBFLG := $0011
|
|
INPUTFLG := $0012
|
|
CPRMASK := $0013
|
|
Z14 := $0014 ; Ctrl+O flag
|
|
Z15 := $0015
|
|
Z16 := $0016
|
|
Z17 := $0017
|
|
Z18 := $0018
|
|
LINNUM := $0019
|
|
TXPSV := $0019
|
|
INPUTBUFFER := $001B
|
|
INPUTBUFFERX := $0000
|
|
;TEMPPT := $0063
|
|
;LASTPT := $0064
|
|
;TEMPST := $66
|
|
;INDEX := $006F
|
|
;DEST := $0071
|
|
;RESULT := $0073
|
|
;RESULT_LAST := $0077
|
|
;TXTTAB := $0078
|
|
;VARTAB := $007A
|
|
;ARYTAB := $007C
|
|
;STREND := $007E
|
|
;FRETOP := $0080
|
|
;FRESPC := $0082
|
|
;MEMSIZ := $0084
|
|
;CURLIN := $0086
|
|
;OLDLIN := $0088
|
|
;OLDTEXT := $008A
|
|
;Z8C := $008C
|
|
;DATPTR := $008E
|
|
;INPTR := $0090
|
|
;VARNAM := $0092
|
|
;VARPNT := $0094
|
|
;FORPNT := $0096
|
|
;LASTOP := $0098
|
|
;CPRTYP := $009A
|
|
;FNCNAM := $009B
|
|
;TEMP3 := $009B ; same
|
|
;DSCPTR := $009D
|
|
|
|
;DSCLEN := $00A0
|
|
;JMPADRS := $00A1
|
|
;Z52 := $00A2
|
|
;LENGTH := $00A2
|
|
;ARGEXTENSION := $00A3 ; overlap with JMPADRS! (same on c64)
|
|
;TEMP1 := $00A4
|
|
;HIGHDS := $00A5
|
|
;HIGHTR := $00A7
|
|
;TEMP2 := $00A9
|
|
;INDX := $00AA
|
|
;TMPEXP := $00AA ; same
|
|
;EXPON := $00AB
|
|
;LOWTR := $00AC ; $9D also EXPSGN
|
|
;LOWTRX := $00AC ; $9D also EXPSGN
|
|
;EXPSGN := $00AD
|
|
;FAC := $00AE
|
|
;FAC_LAST := $00B2
|
|
;FACSIGN := $00B3
|
|
;SERLEN := $00B4
|
|
;SHIFTSIGNEXT := $00B5
|
|
;ARG := $00B6
|
|
;ARG_LAST := $00BA
|
|
;ARGSIGN := $00BB
|
|
;STRNG1 := $00BC ; TODO: also SGNCPR
|
|
;FACEXTENSION := $00BD
|
|
;STRNG2 := $00BE
|
|
;CHRGET := $00C0
|
|
;CHRGOT := $00C6
|
|
;TXTPTR := $00C7
|
|
;RNDSEED := $00D8
|
|
|
|
L1800 := $1800
|
|
L1873 := $1873
|
|
MONRDKEY := $1E5A
|
|
MONCOUT := $1EA0
|
|
|
|
STACK_TOP := $FC
|
|
BYTES_PER_FRAME := $12
|
|
SPACE_FOR_GOSUB := $36
|
|
FOR_STACK1 := $0F
|
|
FOR_STACK2 := $09
|
|
NUM_TOKENS := $1D
|
|
NULL_MAX := $F2 ; probably different in original version; the image I have seems to be modified; see PDF
|
|
BYTES_PER_ELEMENT := 5
|
|
BYTES_PER_VARIABLE := 7
|
|
BYTES_FP := 5
|
|
MANTISSA_BYTES := BYTES_FP-1
|
|
MAX_EXPON = 10
|
|
|
|
TOKEN_GOTO := $88
|
|
TOKEN_GOSUB := $8C
|
|
TOKEN_REM := $8E
|
|
TOKEN_PRINT := $97
|
|
TOKEN_TAB := $9D
|
|
TOKEN_TO := $9E
|
|
TOKEN_FN := $9F
|
|
TOKEN_SPC := $A0
|
|
TOKEN_THEN := $A1
|
|
TOKEN_NOT := $A2
|
|
TOKEN_STEP := $A3
|
|
TOKEN_PLUS := $A4
|
|
TOKEN_MINUS := $A5
|
|
TOKEN_GREATER := $AB
|
|
TOKEN_EQUAL := $AC
|
|
TOKEN_SGN := $AE
|
|
TOKEN_LEFTSTR := $C2
|
|
|