mirror of
https://github.com/mist64/msbasic.git
synced 2024-10-17 21:23:39 +00:00
115 lines
2.7 KiB
ArmAsm
115 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
|
||
|
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
|
||
|
TEMPX := $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
|
||
|
|