TinySB System Types

; PROJECT : TinySBRunTime
; EDITED  : 9/5/2016
; ---------------------------------------------------------------------
//====Guide
//===_STR means String
//===_INT means Integer
//===_REL means Real

//==Strings1D, 2D, 3D are arrays of arrays of the string arrays user creates
//==INTS1D, 2D, 3D are arrays of arrays of the integer arrays user creates

//String Array Types
type one_dimensionalSTR
entries$(8129); //Static size, about the same as SB
internal_name$ //a list of these in another array will be provided, along with their indexes in the main array
total_length	//used to get the index
endtype

type two_dimensionalSTR
entries$(5000*5000);
internal_name$	//a list of these in another array will be provided, along with their indexes in the main array
X_width	//used to get the index
Y_depth	//used to check array boundaries
endtype

type three_dimensionalSTR
entries$(500*500*500);
internal_name$	//a list of these in another array will be provided, along with their indexes in the main array
X_width	//used to get the index
Y_depth	//used to check array boundaries
Z_depth
endtype

//Integer Array Types
type one_dimensional_INT
entries(8129) ; //Static size about the same as SB
internal_name$ //a list of these in another array will be provided, along with their indexes in the main array
total_length //used to get the index
endtype

type two_dimensional_INT
entries(5000*5000)
internal_name$ //a list of these in another array will be provided, along with their indexes in the main array
X_width //used to get the index
Y_depth //used to check array boundaries
endtype

type three_dimensional_INT
entries(500*500*500)
internal_name$ //a list of these in another array will be provided, along with their indexes in the main array
X_width //used to get the index
Y_depth //used to check array boundaries
Z_depth
endtype

//the type for a BGlayer.

type BGLAYER
BGImage
width
height
BGVARS(8)
BGROTANGLE
OFFSETX
OFFSETY
VISIBLE
endtype

dim Strings1D(1) as one_dimensionalSTR
dim Strings2D(1) as two_dimensionalSTR
dim Strings3D(1) as three_dimensionalSTR

Dim INTS1D(1) as one_dimensional_INT
dim INTS2D(1) as two_dimensional_INT
dim INTS3D(1) as three_dimensional_INT

dim BGLAYERS(4) as BGLAYER
for t=1 to 4
	BGLAYERS(t).BGImage=newfximage(127*16, 127*16)
	imagemaskcolour BGLAYERS(t).BGImage, rgb(0, 0,0 )
	BGLAYERS(t).width = 127
	BGLAYERS(t).height = 127
	BGLAYERS(t).BGROTANGLE =0
	BGLAYERS(t).OFFSETX = 0
	BGLAYERS(t).OFFSETY = 0
	//Used for BGSHOW and BGHIDE
	BGLAYERS(t).VISIBLE = FALSE
next t