Чёт я смысла непонял. ты имееш ввиду так? :
function CreateLocation1()
Camera1 = CreateCamera()
PositionEntity Camera1,0,20,0
RotateEntity Camera1, 0, 0, 0
CameraRange Camera1,0.01,100000000
Svet = CreateLight()
TurnEntity Svet,30,20,0
Ploskost= CreatePlane()
Zemla=LoadTexture("Data\textures\15820652.jpg")
ScaleTexture Zemla,150,150
EntityTexture Ploskost,Zemla
end function
function FreeLocation1()
FreeEntity Camera1
FreeEntity Svet
FreeEntity Ploskost
FreeEntity Zemla
end function
While Not KeyDown(1)
If Location=<1>1 Then
FreeLocation1()
End If
Зачем удаление в функцию пихать? Так работать быстрее будет?