Add InterpolateCameraPos and InterpolateCameraLookAt

Author: colistro123

amx/client/client.lua

@@ -261,6 +261,62 @@ function showIntroScene()
 	introSceneShown = true
 end
 
+-----------------------------
+-- Camera Interpolation
+--Originally from https://wiki.multitheftauto.com/wiki/SmoothMoveCamera
+
+local sm = {}
+sm.moov = 0
+sm.objCamPos,sm.objLookAt = nil,nil
+ 
+function removeCamHandler()
+	outputConsole('removeCamHandler was called')
+	if(sm.moov == 1) then
+		outputConsole('Destroying cam handler...')
+		sm.moov = 0
+	end
+end
+ 
+function camRender()
+	if (sm.moov == 1) then
+		local x1,y1,z1,x2,y2,z2 = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0
+		if sm.objCamPos ~= nil then
+			x1,y1,z1 = getElementPosition(sm.objCamPos)
+		end
+		if sm.objLookAt ~= nil then
+			x2,y2,z2 = getElementPosition(sm.objLookAt)
+		end
+		--outputConsole(string.format("Current Camera Matrix is: CamPos: %f %f %f CamLookAt: %f %f %f", x1,y1,z1,x2,y2,z2))
+		setCameraMatrix(x1,y1,z1,x2,y2,z2)
+	else
+		removeEventHandler("onClientPreRender", root, camRender)
+	end
+end
+
+function setupCameraObject(camObj, FromX, FromY, FromZ, ToX, ToY, ToZ, time, cut)
+	sm.moov = 1
+	camObj = createObject(1337, FromX, FromY, FromZ)
+	setElementCollisionsEnabled (camObj, false) 
+	setElementAlpha(camObj, 0)
+	setObjectScale(camObj, 0.01)
+	moveObject(camObj, time, ToX, ToY, ToZ, ToX, ToY, ToZ, "InOutQuad")
+	setTimer(removeCamHandler,time,1)
+	setTimer(destroyElement,time,1,camObj)
+	return camObj
+end
+
+function InterpolateCameraPos(FromX, FromY, FromZ, ToX, ToY, ToZ, time, cut)
+	outputConsole(string.format("InterpolateCameraPos called with args %f %f %f %f %f %f %d %d", FromX, FromY, FromZ, ToX, ToY, ToZ, time, cut))
+	sm.objCamPos = setupCameraObject(sm.objCamPos, FromX, FromY, FromZ, ToX, ToY, ToZ, time, cut)
+	addEventHandler("onClientPreRender", root, camRender)
+	return true
+end
+function InterpolateCameraLookAt(FromX, FromY, FromZ, ToX, ToY, ToZ, time, cut)
+	outputConsole(string.format("InterpolateCameraLookAt called with args %f %f %f %f %f %f %d %d", FromX, FromY, FromZ, ToX, ToY, ToZ, time, cut))
+	sm.objLookAt = setupCameraObject(sm.objLookAt, FromX, FromY, FromZ, ToX, ToY, ToZ, time, cut)
+	addEventHandler("onClientPreRender", root, camRender)
+	return true
+end
 -----------------------------
 -- Player objects
 function RemoveBuildingForPlayer(model, x, y, z, radius)

amx/server/syscalls.lua

@@ -845,6 +845,14 @@ function RemoveBuildingForPlayer(amx, player, model, x, y, z, radius)
 	clientCall(player, 'RemoveBuildingForPlayer', model, x, y, z, radius)
 end
 
+--playerid, Float:FromX, Float:FromY, Float:FromZ, Float:ToX, Float:ToY, Float:ToZ, time, cut = CAMERA_CUT
+function InterpolateCameraPos(amx, player, FromX, FromY, FromZ, ToX, ToY, ToZ, time, cut)
+	clientCall(player, 'InterpolateCameraPos', FromX, FromY, FromZ, ToX, ToY, ToZ, time, cut)
+end
+function InterpolateCameraLookAt(amx, player, FromX, FromY, FromZ, ToX, ToY, ToZ, time, cut)
+	clientCall(player, 'InterpolateCameraLookAt', FromX, FromY, FromZ, ToX, ToY, ToZ, time, cut)
+end
+
 function EnableVehicleFriendlyFire(amx)
 	return 1;
 end
@@ -1145,6 +1153,8 @@ function SendRconCommand(amx, command)
 end
 
 function SetCameraBehindPlayer(amx, player)
+	--In samp calling SetCameraBehindPlayer also unsets camera interpolation
+	clientCall(player, 'removeCamHandler')
 	setCameraTarget(player, player)
 end
 
@@ -1664,6 +1674,8 @@ function TogglePlayerSpectating(amx, player, enable)
 		if isPedDead(player) then
 			spawnPlayerBySelectedClass(player)
 		end
+		--In samp calling TogglePlayerSpectating also unsets camera interpolation
+		clientCall(player, 'removeCamHandler')
 		setCameraTarget(player, player)
 		setPlayerHudComponentVisible(player, 'radar', true)
 		setPlayerState(player, PLAYER_STATE_ONFOOT)
@@ -3237,7 +3249,9 @@ g_SAMPSyscallPrototypes = {
 	memcpy = {'r', 'r', 'i', 'i', 'i'},
 	RemoveBuildingForPlayer = {'p', 'i', 'f', 'f', 'f', 'f'},
 	ManualVehicleEngineAndLights = {},
-
+	InterpolateCameraPos = {'p', 'f', 'f', 'f', 'f', 'f', 'f', 'i', 'i'},
+	InterpolateCameraLookAt = {'p', 'f', 'f', 'f', 'f', 'f', 'f', 'i', 'i'},
+	  
 	-- more dummies (unimplemented)
 	EnableVehicleFriendlyFire = {},	
 	DisableRemoteVehicleCollisions = {'p', 'i'},
@@ -3266,8 +3280,6 @@ g_SAMPSyscallPrototypes = {
 	GetActorPos = {'i', 'r', 'r', 'r'}, --r since the vals should be passed by ref
 	GetPVarsUpperIndex = {'p'},
   	GetPVarNameAtIndex = {'p', 'i', 'r', 'i'},
-	InterpolateCameraPos = {'p', 'f', 'f', 'f', 'f', 'f', 'f', 'i', 'i'},
-  	InterpolateCameraLookAt = {'p', 'f', 'f', 'f', 'f', 'f', 'f', 'i', 'i'},
 	RemovePlayerAttachedObject = {'p', 'i'},
 	SetVehicleParamsCarWindows = {'v', 'i', 'i', 'i', 'i'},
 	GetPlayerVersion = {'p', 's', 'i'},