Thanks guys, that helped a lot. Sorry for the late response. Moving and such takes time out. Just one further question if anyone is still reading this post. It appears that some sprites have a black line showing here and there as though it's taking part of the sprite above or beside, though these lines can be faded. Here's what I have for code. I checked all of the sprites and they are within the 32x32 sizes on the sheet.
For the Sprite Loading:
for x = 1 to mapx
for y = 1 to mapy
line$ = ReadLine(1)
ID = val(GetStringToken(line$ , " " , 1))
Room1[x,y].SpriteID=ID
SpriteProp = val(GetStringToken(line$ , " " , 2))
Room1[x,y].Properties=SpriteProp
If Room1[X,Y].Properties > 0
CreateSprite(Room1[X,Y].SpriteID,1)
SetSpriteAnimation(Room1[X,Y].SpriteID,32,32,1024)
SetSpriteFrame(Room1[X,Y].SpriteID,Room1[X,Y].Properties)
//NEED and offset of -32 so its in line
SetSpritePosition(Room1[X,Y].SpriteID,X*Grid-32,Y*Grid-32)
Endif
next y
next x
And for globals needed:
Global MapX = 32
Global MapY = 24
Grid = 32
Is there something that stands out? Thanks again.