SmoothTrack

This code has been declared by its author to be Public Domain code.

SmoothTrack by AntonyWells

2004

You can track an entity's rotation smoothly, useful for smooth aim, smooth cameras and just about any code assisted anim.

For example create a pivot, and every frame point it at your player. now simply call smoothTrack(myCam,pivot,0.1)
and the camera will smoothly track pivot's rotation, taking the shortest route.

Function smoothTrack(ent1,ent2,speed#=0.2)
	np#=sang(EntityPitch(ent1),EntityPitch(ent2),speed)
	ny#=sang(EntityYaw(ent1),EntityYaw(ent2),speed)
	nr#=sang(EntityRoll(ent1),EntityRoll(ent2),speed)
	RotateEntity ent1,np,ny,nr
End Function

Function sang#(ang1#,ang2#,spd#)
	If ang1>ang2
		d1#=ang1-ang2
		d2#=360.-ang1+ang2
		If d1<d2
			out#=ang1-(d1*spd)
		Else
			out#=ang1+(d2*spd)
		EndIf
	Else
		d1#=ang2-ang1
		d2#=360.-ang2+ang1
		If d1<d2
			out#=ang1+(d1*spd)
		Else
			out#=ang1-(d2*spd)
		EndIf
	EndIf
	If out<0. out=360.-Abs(out)
	If out>360. out=out-360.
	Return out
End Function

Comments

None.

Code Archives Forum