Overhaul of the director system and opening quests. Private Areas further implemented as well.

data/scripts/commands/gm/workvalue.lua

@@ -0,0 +1,49 @@
+require("global");
+
+properties = {
+    permissions = 0,
+    parameters = "ssss",
+    description =
+[[
+<actorName> <workName> <uiFunc> <value>
+]],
+}
+
+function onTrigger(player, argc, target, workName, uiFunc, value)
+
+	local messageID = MESSAGE_TYPE_SYSTEM_ERROR;
+    local sender = "[workvalue] ";
+
+	if (argc != 4) then
+		player:SendMessage(messageID, sender, "Invalid args");
+		return;
+	end
+
+    if (target == "@t") then
+		targetActor = GetWorldManager():GetActorInWorld(player.currentTarget) or nil;
+	else
+		targetActor = GetWorldManager():GetActorInWorld(target) or nil;
+	end
+    
+    if not targetActor then
+        player:SendMessage(messageID, sender, "Error finding target...");
+        return
+    end
+    
+	if (tonumber(value) ~= nil) then	
+		result = targetActor:SetWorkValue(player, workName, uiFunc, tonumber(value));
+	elseif (value == "true") then
+		result = targetActor:SetWorkValue(player, workName, uiFunc, true);
+	elseif (value == "false") then
+		result = targetActor:SetWorkValue(player, workName, uiFunc, false);
+	else
+		result = targetActor:SetWorkValue(player, workName, uiFunc, value);
+	end
+	
+	if (result) then
+		player:SendMessage(messageID, sender, workName .. " changed to " .. value);
+	else
+		player:SendMessage(messageID, sender, "Could not changed workvalue. Is the name and datatype correct?");
+	end
+	
+end