Code not working?

Blitz3D Forums/Blitz3D Programming/Code not working?

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)

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

I think you're missing some spaces in "IfKeyDown(200)" and "IfKeyDown(205)"...

That was exactly it... Not sure how I overlooked that.. I mean one showed up all in Blue the other all in white.. ugh.. Okay


Thanks again!

Oh.. also.. because I cannot seem to remember it, where you can find the key values to use in the If KeyDown(xxx) commands? I used to know exactly where it was but it's escaping me now and I'm not sure exactly what to search for on Google to find it...

Thanks!

:-)

The key values are contained in the Command Reference under Scancodes.