mirror of
https://github.com/mist64/msbasic.git
synced 2024-06-24 10:29:27 +00:00
116 lines
2.7 KiB
ArmAsm
116 lines
2.7 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
|
|
TEMPPT := $0063
|
|
LASTPT := $0064
|
|
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
|
|
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
|
|
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
|
|
|
|
BYTES_PER_FRAME := $12
|
|
SPACE_FOR_GOSUB := $36
|
|
TEMPST := $66
|
|
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
|
|
|
|
TOKEN_GOTO := $88
|
|
TOKEN_GOSUB := $8C
|
|
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
|
|
|