Field _shapeSet:TShape[16]
Function _SetShape(ShapeToSet:TShape, ShapeString:String[])
Rem
Given four strings of length 4 characters each, where a . stands for an empty space and a * for a
bit, we can easily set a shape.
EndRem
Local stringIndex:Int, characterIndex:Int
For stringIndex = 0 To 3
For characterIndex = 0 To 3
If ShapeString[stringIndex][characterIndex] = "." Then
Else
End If
Next
Next
End Function
Function SetDefaultShapes()
Local ShapeString:String[3]
ShapeString[0] = "****"
ShapeString[1] = "...."
ShapeString[2] = "...."
ShapeString[3] = "...."
_shapeSet[0] = New TShape
_SetShape(_shapeSet[0], ShapeString)
End Function
I get an error: _shapeSet[0] = New TShape saying the identifier shapeSet cannot be found. Why can't I access a field of a type within a function? Is there any way I can tag a field as shared?
Function _SetShape(ShapeToSet:TShape, ShapeString:String[])
Rem
Given four strings of length 4 characters each, where a . stands for an empty space and a * for a
bit, we can easily set a shape.
EndRem
Local stringIndex:Int, characterIndex:Int
For stringIndex = 0 To 3
For characterIndex = 0 To 3
If ShapeString[stringIndex][characterIndex] = "." Then
Else
End If
Next
Next
End Function
Function SetDefaultShapes()
Local ShapeString:String[3]
ShapeString[0] = "****"
ShapeString[1] = "...."
ShapeString[2] = "...."
ShapeString[3] = "...."
_shapeSet[0] = New TShape
_SetShape(_shapeSet[0], ShapeString)
End Function
I get an error: _shapeSet[0] = New TShape saying the identifier shapeSet cannot be found. Why can't I access a field of a type within a function? Is there any way I can tag a field as shared?