I got it, Google is your friend
global ColoredTiles as integer[8, 100]
colorRepeat as integer
LoadImage ( 100, "\media\images\coloredTiles\BoxWhite.png" )
for colorRepeat = 0 to 99
ColoredTiles[0, colorRepeat] = CreateSprite ( 100 )
SetSpriteDepth ( ColoredTiles[0, colorRepeat], 3 )
SetSpriteOffset( ColoredTiles[0, colorRepeat], (GetSpriteWidth(ColoredTiles[0, colorRepeat])/2) , (GetSpriteHeight(ColoredTiles[0, colorRepeat])/2) )
SetSpritePositionByOffset( ColoredTiles[0, colorRepeat], -9999, -9999 )
next colorRepeat
LoadImage ( 200, "\media\images\coloredTiles\BoxRed.png" )
for colorRepeat = 0 to 99
ColoredTiles[1, colorRepeat] = CreateSprite ( 200 )
SetSpriteDepth ( ColoredTiles[1, colorRepeat], 3 )
SetSpriteOffset( ColoredTiles[1, colorRepeat], (GetSpriteWidth(ColoredTiles[1, colorRepeat])/2) , (GetSpriteHeight(ColoredTiles[1, colorRepeat])/2) )
SetSpritePositionByOffset( ColoredTiles[1, colorRepeat], -9999, -9999 )
next colorRepeat
LoadImage ( 300, "\media\images\coloredTiles\BoxOrange.png" )
for colorRepeat = 0 to 99
ColoredTiles[2, colorRepeat] = CreateSprite ( 300 )
SetSpriteDepth ( ColoredTiles[2, colorRepeat], 3 )
SetSpriteOffset( ColoredTiles[2, colorRepeat], (GetSpriteWidth(ColoredTiles[2, colorRepeat])/2) , (GetSpriteHeight(ColoredTiles[2, colorRepeat])/2) )
SetSpritePositionByOffset( ColoredTiles[2, colorRepeat], -9999, -9999 )
next colorRepeat
LoadImage ( 400, "\media\images\coloredTiles\BoxYellow.png" )
for colorRepeat = 0 to 99
ColoredTiles[3, colorRepeat] = CreateSprite ( 400 )
SetSpriteDepth ( ColoredTiles[3, colorRepeat], 3 )
SetSpriteOffset( ColoredTiles[3, colorRepeat], (GetSpriteWidth(ColoredTiles[3, colorRepeat])/2) , (GetSpriteHeight(ColoredTiles[3, colorRepeat])/2) )
SetSpritePositionByOffset( ColoredTiles[3, colorRepeat], -9999, -9999 )
next colorRepeat
LoadImage ( 500, "\media\images\coloredTiles\BoxGreen.png" )
for colorRepeat = 0 to 99
ColoredTiles[4, colorRepeat] = CreateSprite ( 500 )
SetSpriteDepth ( ColoredTiles[4, colorRepeat], 3 )
SetSpriteOffset( ColoredTiles[4, colorRepeat], (GetSpriteWidth(ColoredTiles[4, colorRepeat])/2) , (GetSpriteHeight(ColoredTiles[4, colorRepeat])/2) )
SetSpritePositionByOffset( ColoredTiles[4, colorRepeat], -9999, -9999 )
next colorRepeat
LoadImage ( 600, "\media\images\coloredTiles\BoxBlue.png" )
for colorRepeat = 0 to 99
ColoredTiles[5, colorRepeat] = CreateSprite ( 600 )
SetSpriteDepth ( ColoredTiles[5, colorRepeat], 3 )
SetSpriteOffset( ColoredTiles[5, colorRepeat], (GetSpriteWidth(ColoredTiles[5, colorRepeat])/2) , (GetSpriteHeight(ColoredTiles[5, colorRepeat])/2) )
SetSpritePositionByOffset( ColoredTiles[5, colorRepeat], -9999, -9999 )
next colorRepeat
LoadImage ( 700, "\media\images\coloredTiles\BoxPurple.png" )
for colorRepeat = 0 to 99
ColoredTiles[6, colorRepeat] = CreateSprite ( 700 )
SetSpriteDepth ( ColoredTiles[6, colorRepeat], 3 )
SetSpriteOffset( ColoredTiles[6, colorRepeat], (GetSpriteWidth(ColoredTiles[6, colorRepeat])/2) , (GetSpriteHeight(ColoredTiles[6, colorRepeat])/2) )
SetSpritePositionByOffset( ColoredTiles[6, colorRepeat], -9999, -9999 )
next colorRepeat
LoadImage ( 800, "\media\images\coloredTiles\BoxBlack.png" )
for colorRepeat = 0 to 99
ColoredTiles[7, colorRepeat] = CreateSprite ( 800 )
SetSpriteDepth ( ColoredTiles[7, colorRepeat], 3 )
SetSpriteOffset( ColoredTiles[7, colorRepeat], (GetSpriteWidth(ColoredTiles[7, colorRepeat])/2) , (GetSpriteHeight(ColoredTiles[7, colorRepeat])/2) )
SetSpritePositionByOffset( ColoredTiles[7, colorRepeat], -9999, -9999 )
next colorRepeat