Fixed syntax and missed definitions
This commit is contained in:
1 parent
778a18e84b
commit
986e663aaf
7 files changed
+755
-736
No files matched your search
+32
-34
@@ -1,68 +1,66 @@
|
||||
; ==================================================
|
||||
; Orion BASIC v2.4 for Orion-128 computer
|
||||
;
|
||||
;
|
||||
; Uninitialized variables
|
||||
; Disassembled by Romychs @ 2026-10-23
|
||||
; ==================================================
|
||||
|
||||
ORG 0x27C2
|
||||
|
||||
DIMFLG:
|
||||
|
||||
DIMFLG:
|
||||
DS 1 ; DIM flag
|
||||
VALTYP:
|
||||
VALTYP:
|
||||
DS 1 ; Value type indicator 0-numeric, 1-string
|
||||
TEMPPT:
|
||||
TEMPPT:
|
||||
DS 2 ; Pointer to first free temp descriptor
|
||||
TEMPST:
|
||||
TEMPST:
|
||||
DS STRSIZ*NUMTMP ; Storage for NUMTMP temp descriptors
|
||||
DSCTMP:
|
||||
DSCTMP:
|
||||
DS 4 ; String function result descriptor
|
||||
STREND:
|
||||
DS 2
|
||||
TEMP3:
|
||||
DS 2
|
||||
DATLIN:
|
||||
STREND:
|
||||
DS 2
|
||||
TEMP3:
|
||||
DS 2
|
||||
DATLIN:
|
||||
DS 2 ; Data line number, remember for error
|
||||
SUBFLG:
|
||||
SUBFLG:
|
||||
DS 1 ; Flag for subscribted variable allowed
|
||||
FLGINP:
|
||||
FLGINP:
|
||||
DS 1 ; Flag, we doing input
|
||||
TEMP:
|
||||
DS 2
|
||||
TEMP2:
|
||||
DS 2
|
||||
CURLIN:
|
||||
TEMP:
|
||||
DS 2
|
||||
TEMP2:
|
||||
DS 2
|
||||
CURLIN:
|
||||
DS 2 ; Current line number
|
||||
OLDLIN:
|
||||
OLDLIN:
|
||||
DS 2 ; Old line number
|
||||
OLDTXT:
|
||||
OLDTXT:
|
||||
DS 2 ; Old text pointer
|
||||
ARYTAB:
|
||||
ARYTAB:
|
||||
DS 2 ; Pointer to beginning of array table
|
||||
DATPTR:
|
||||
DS 2
|
||||
FACLO:
|
||||
DATPTR:
|
||||
DS 2
|
||||
FACLO:
|
||||
DS 3 ; Mantissa
|
||||
FAC:
|
||||
FAC:
|
||||
DS 2 ; Exponent
|
||||
FBUFFR:
|
||||
DS 13
|
||||
FBUFFR:
|
||||
DS 13
|
||||
|
||||
; ---------------------------------------------------
|
||||
; Text of BASIC program
|
||||
; ---------------------------------------------------
|
||||
ORG 0x2801
|
||||
TEXT
|
||||
TEXT
|
||||
DS 22523
|
||||
|
||||
|
||||
; ---------------------------------------------------
|
||||
; Sprite operation temp area
|
||||
; ---------------------------------------------------
|
||||
ORG 0x7FFC
|
||||
SPR_HEIGHT DS 1
|
||||
SPR_HEIGHT DS 1
|
||||
SPR_WIDTH DS 1
|
||||
SPR_BUFADR DS 2
|
||||
DS 16
|
||||
SPR_TOP $
|
||||
|
||||
|
||||
SPR_TOP EQU $
|
||||
Reference in new issue
Block a user