Rev. 56

Iron-Stag-Games · Jan 30, 2024 · 62e1249 · 62e1249
1 parent 6da3eb2
commit 62e1249
Show file tree

Hide file tree

Showing 2 changed files with 19 additions and 5 deletions.
diff --git a/Pronghorn/Remotes/init.lua b/Pronghorn/Remotes/init.lua
@@ -28,6 +28,7 @@ local TypeChecker = require(script.TypeChecker)
 -- Helper Variables
 --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
 
+local random = Random.new(os.clock())
 local remotesFolder: Folder;
 
 --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
@@ -69,20 +70,29 @@ local function connectEventClient(remote: RemoteFunction | UnreliableRemoteEvent
 		end
 
 	elseif remote:IsA("UnreliableRemoteEvent") or remote:IsA("RemoteEvent") then
+		local lastRandom = script:GetAttribute("Random")
 
 		actions.Connect = function(_, func: (...any) -> ()): RBXScriptConnection
 			return (remote :: RemoteEvent).OnClientEvent:Connect(func)
 		end
 
 		actions.Fire = function(_, ...: any?)
-			Print(getEnvironment(), debugPrintText, {...})
-			return (remote :: RemoteEvent):FireServer(...)
+			local nextRandom = script:GetAttribute("Random")
+			if nextRandom ~= lastRandom then
+				lastRandom = nextRandom
+				Print(getEnvironment(), debugPrintText, {...});
+				(remote :: RemoteEvent):FireServer(...)
+			end
 		end
 
 		metaTable.__call = function(_, context: any, ...: any?)
+			local nextRandom = script:GetAttribute("Random")
 			if context ~= Remotes[moduleName] then error(`Must call {moduleName}:{remote.Name}() with a colon`, 0) end
-			Print(getEnvironment(), debugPrintText, {...});
-			(remote :: RemoteEvent):FireServer(...)
+			if nextRandom ~= lastRandom then
+				lastRandom = nextRandom
+				Print(getEnvironment(), debugPrintText, {...});
+				(remote :: RemoteEvent):FireServer(...)
+			end
 		end
 	end
 end
@@ -223,6 +233,10 @@ end
 function Remotes:Init()
 	if RunService:IsServer() then
 		remotesFolder = New.Instance("Folder", ReplicatedStorage, "__remotes")
+
+		RunService.Heartbeat:Connect(function(_dt: number)
+			script:SetAttribute("Random", random:NextNumber())
+		end)
 	else
 		remotesFolder = ReplicatedStorage:WaitForChild("__remotes") :: Folder
 

diff --git a/Pronghorn/init.lua b/Pronghorn/init.lua
@@ -29,7 +29,7 @@
 ║                           ██████▀██▓▌▀▌ ▄     ▄▓▌▐▓█▌                ║
 ║                                                                      ║
 ║                                                                      ║
-║                    Pronghorn Framework  Rev. B55                     ║
+║                    Pronghorn Framework  Rev. B56                     ║
 ║             https://github.com/Iron-Stag-Games/Pronghorn             ║
 ║                GNU Lesser General Public License v2.1                ║
 ║                                                                      ║