#Region Project Attributes
#AutoFlushLogs: True
#CheckArrayBounds: True
#StackBufferSize: 300
#End Region
'Ctrl+Click to open the C code folder: ide://run?File=%WINDIR%\System32\explorer.exe&Args=%PROJECT%\Objects\Src
Sub Process_Globals
Public Serial1 As Serial
Dim bc As ByteConverter
End Sub
Private Sub AppStart
Serial1.Initialize(9600)
Log("AppStart")
Dim arr1(200) As Byte
Dim arr2(210) As Byte
For ii= 0 To 199
arr1(ii) = 10
Next
For ii= 0 To 209
arr2(ii) = 50
Next
bc.ArrayCopy(arr2, arr1)
For ii = 0 To arr1.Length - 1
Log(ii, "-", arr1(ii))
Next
Log("Ok")
End Sub