[tormoz]

Напиши простенькую функцию по изменению размера квада по коофициенту размера картинки.

например:

Function CreateSheet(File$,fl)
Local texture,scx#,scy#

mesh=CreateMesh()
surf=CreateSurface(mesh)

AddVertex surf,-1,1,0,0,0:AddVertex surf,1,1,0,1,0
AddVertex surf,1,-1,0,1,1:AddVertex surf,-1,-1,0,0,1

AddTriangle surf,0,1,2:AddTriangle surf,0,2,3
UpdateNormals mesh
texture=LoadTexture ( File$,fl)
img=LoadImage(File$)

scx#=ImageWidth (img)
scy#=ImageHeight (img)

ScaleMesh mesh,scx/256,scy/256,1
EntityTexture mesh,texture
FreeTexture texture
FreeImage img
Return mesh
End Function