but It does it for all the tiles.
please help with code.
Code: Select all
For x=0 To 2
For y=0 To 2
For Tiles.WlvTile = Each WlvTile
Tiles\TileMesh=CreateCube()
Tiles\TileTexture=LoadAnimTexture("Data\LevelTextures\"+"leveltex abstract"+".bmp",0,64,64,0,1)
MoveEntity Tiles\TileMesh,xx,-0.2,-yy
ScaleEntity Tiles\TileMesh,0.6,Tiles\Xtrude,0.6
EntityTexture Tiles\TileMesh,Tiles\TileTexture
Tiles\WaterMesh=CreateCube()
Tiles\WaterTexture=LoadAnimTexture("Data\LevelTextures\"+"watertex 1"+".jpg",0,128,107,0,1)
MoveEntity Tiles\WaterMesh,x,-0.6,-y
ScaleEntity Tiles\WaterMesh,0.6,0.01,0.6
EntityTexture Tiles\WaterMesh,Tiles\WaterTexture
Next
Next
Next
just a update.