Position Entities Question

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

Nicstt

Using this function to finetune position of doors etc, that will be animated.

Is there a better way (CS4 doesnt give cords)?

Function EntityInfo()
; position an entity X = q,w;  Y = a,s; Z = z,x
	If KeyDown(16) ; X = q,w
		MoveEntity doorchurch, + 0.01, 0, 0
	EndIf
	If KeyDown(17) ; X = q,w
		MoveEntity doorchurch, - 0.01, 0, 0
	EndIf
	If KeyDown(30) ; Y = a,s
		MoveEntity doorchurch, 0, + 0.01, 0
	EndIf
	If KeyDown(31) ; Y = a,s
		MoveEntity doorchurch, 0, - 0.01, 0
	EndIf
	If KeyDown(44) ; Z = z,x
		MoveEntity doorchurch, 0, 0, + 0.01
	EndIf
	If KeyDown(45) ; Z = z,x
		MoveEntity doorchurch, 0, 0, - 0.01
	EndIf
	if KeyHit(88)
		writeinfo = writefile("C:\Documents and Settings\Administrator\My Documents\Blitz Progs\B3D\location.txt")
		WriteLine writeinfo, Str EntityX(doorchurch) + ", " + Str EntityY(doorchurch) + ", " + Str EntityZ(doorchurch)
		CloseFile(writeinfo)
		Text 1000, 60, "Co-ordinates Saved"
	EndIf
	; *** end of position an entity
	Text 1000, 10, "Object X: " + Str EntityX(doorchurch)
	Text 1000, 25, "Object Y: " + Str EntityY(doorchurch)
	Text 1000, 40, "Object Z: " + Str EntityZ(doorchurch)
End Function