but it still 9999999999999 meters from the grass i puted oute :S why?
and the hole code is
Graphics3D 800,600,16,0
SetBuffer BackBuffer()
camera=CreateCamera()
PositionEntity camera,64,2,64
;------------------------------meshes-----------------------------------------
;gun1
weapon1 = LoadMesh("C:\Documents and Settings\nicklas\Skrivbord\blitzbasic 3d\models\P08LUGER.3DS,camera")
;house1
house1=LoadMesh("C:\Documents and Settings\nicklas\Skrivbord\blitzbasic 3d\models\house4.3ds")
PositionEntity house1, 60, 0, 60
;------------------------------sounds-----------------------------------------
gun = LoadSound("C:\Documents and Settings\nicklas\Skrivbord\blitzbasic 3d\sounds\shot001.wav")
reload = LoadSound("C:\Documents and Settings\nicklas\Skrivbord\blitzbasic 3d\sounds\reload01.wav")
terrain=CreateTerrain(128)
grass_tex=LoadTexture( "C:\Documents and Settings\nicklas\Skrivbord\blitzbasic 3d\pictures\lexkunstrk.bmp" )
EntityTexture terrain,grass_tex
While Not KeyDown( 1 )
If KeyDown( 205 )= True Then TurnEntity camera,0,-20,0
If KeyDown( 203 )= True Then TurnEntity camera,0,20,0
If KeyDown( 208 )= True Then MoveEntity camera,0,0,-0.20
If KeyDown( 200 )= True Then MoveEntity camera,0,0,0.20
RenderWorld
Text 0,0,"Use cursor keys to move about the terrain"
Flip
Wend
End
and the hole code is
Graphics3D 800,600,16,0
SetBuffer BackBuffer()
camera=CreateCamera()
PositionEntity camera,64,2,64
;------------------------------meshes-----------------------------------------
;gun1
weapon1 = LoadMesh("C:\Documents and Settings\nicklas\Skrivbord\blitzbasic 3d\models\P08LUGER.3DS,camera")
;house1
house1=LoadMesh("C:\Documents and Settings\nicklas\Skrivbord\blitzbasic 3d\models\house4.3ds")
PositionEntity house1, 60, 0, 60
;------------------------------sounds-----------------------------------------
gun = LoadSound("C:\Documents and Settings\nicklas\Skrivbord\blitzbasic 3d\sounds\shot001.wav")
reload = LoadSound("C:\Documents and Settings\nicklas\Skrivbord\blitzbasic 3d\sounds\reload01.wav")
terrain=CreateTerrain(128)
grass_tex=LoadTexture( "C:\Documents and Settings\nicklas\Skrivbord\blitzbasic 3d\pictures\lexkunstrk.bmp" )
EntityTexture terrain,grass_tex
While Not KeyDown( 1 )
If KeyDown( 205 )= True Then TurnEntity camera,0,-20,0
If KeyDown( 203 )= True Then TurnEntity camera,0,20,0
If KeyDown( 208 )= True Then MoveEntity camera,0,0,-0.20
If KeyDown( 200 )= True Then MoveEntity camera,0,0,0.20
RenderWorld
Text 0,0,"Use cursor keys to move about the terrain"
Flip
Wend
End