Hello all.. I'm running into a bit of a problem here...
I'm trying to get some terrain with a rotatable/moveable camera to display in B3D. I'm using code that is pretty much verbatim to what is in the help file, however, when I actually implement it, with only a couple changes that shouldn't affect anything, it's not working. I keep getting a "Expecting Wend" - and there's a Wend in there, as there is in the sample code...
Just to show what I mean..
Here's the code in the B3D Help file (I have no idea why the font is coming out so tiny, so I'm sorry for that)
And here's what I'm using:
Can someone please let me know what I'm doing wrong here? Because to my eyes, everything looks as it's supposed to be..
Thanks!
Mike
I'm trying to get some terrain with a rotatable/moveable camera to display in B3D. I'm using code that is pretty much verbatim to what is in the help file, however, when I actually implement it, with only a couple changes that shouldn't affect anything, it's not working. I keep getting a "Expecting Wend" - and there's a Wend in there, as there is in the sample code...
Just to show what I mean..
Here's the code in the B3D Help file (I have no idea why the font is coming out so tiny, so I'm sorry for that)
Graphics3D 800,600 SetBuffer BackBuffer() camera=CreateCamera() CameraViewport camera,0,0,800,600 light=CreateLight() house=LoadMesh( "house.3ds" ) RotateEntity house,0,90,0 While Not KeyHit(1) If KeyDown(200) Then MoveEntity camera,0,0,1 EndIf If KeyDown(208) Then MoveEntity camera,0,0,-1 EndIf If KeyDown(203) Then TurnEntity camera,0,1.0,0 EndIf If KeyDown(205) Then TurnEntity camera,0,-1.0,0 EndIf UpdateWorld RenderWorld Text 335,500,"Camera Movement" Flip Wend End
And here's what I'm using:
Graphics3D 1024,768 SetBuffer BackBuffer() land=LoadMesh("terrdirectx.x") ; find this in the .zip file and also copy the textures & lightmap to your working dir AmbientLight 180,180,210 camera=CreateCamera() PositionEntity camera,0,8,0 While Not KeyHit(1) IfKeyDown(200) Then MoveEntity camera,0,0,1 EndIf If KeyDown(208) Then MoveEntity camera,0,0,-1 EndIf If KeyDown(203) Then TurnEntity camera,0,1.0,0 EndIf IfKeyDown(205) Then TurnEntity camera,0,-1.0,0 EndIf UpdateWorld RenderWorld Flip Wend End
Can someone please let me know what I'm doing wrong here? Because to my eyes, everything looks as it's supposed to be..
Thanks!
Mike