MoreCore Ruleset

Uploading 1.48 now.
No instructions as yet - ran outta time - its 1am - some instructions tomorrow if I can sneak them into work time.
See post #1.

Thanks!

My apologies good people - uploaded a fubar'd ruleset there.
New version uploaded.

Thanks for the fix, damned.

The mod should = 0 instead of 1 but that was an easy fix.

The +# (labeled a.Mod in the params) before the drop number still doesn't do anything, but the MOD box works with the rolls, so I've eliminated that function in the roll formula (no sense having to type useless data). If someone could figure out how to make that work it would help with skills in F12, but the current function as fixed by damned will work in the meantime.


Edit: example of what I need:
/factwelve 2d12+1d10+12 1
Would roll 2d12 and 1d10 keeping the best 2 dice and then add 12 to those two dice.

What I've changed it to:
/factwelve 2d12+1d10 1
with a 12 in the MOD box.
This gives me the result I need, but requires filling in the MOD box each time. Being able to plug the roll into skill rolls would allow each skill to have a proper roll.

Quote:

---

Originally Posted by changed script

--
-- Please see the license.html file included with this distribution for
-- attribution and copyright information.
--

local sCmd = "factwelve";

-- MoreCore v0.60
function onInit()
CustomDiceManager.add_roll_type(sCmd, performAction, onLanded, true, "all");
end

function performAction(draginfo, rActor, sParams)
Debug.console("performAction: ", draginfo, rActor, sParams);
if not sParams or sParams == "" then
sParams = "2d12+1d4 1";
end

if sParams == "?" or string.lower(sParams) == "help" then
createHelpMessage();
else
local rRoll = createRoll(sParams);
ActionsManager.performAction(draginfo, rActor, rRoll);
end

end


function onLanded(rSource, rTarget, rRoll)
Debug.console("onLanded: ", rSource, rTarget, rRoll);
local rMessage = ActionsManager.createActionMessage(rSource, rRoll);
rRoll = dropDiceResults(rRoll);
rMessage = createChatMessage(rSource, rRoll);
rMessage.type = "dice";
Comm.deliverChatMessage(rMessage);
end


---
--- This function creates the roll object based on the parameters sent in
---
function createRoll(sParams)
local rRoll = {};
rRoll.sType = sCmd;
rRoll.nMod = 0;
--- rRoll.sUser = User.getUsername();
rRoll.aDice = {};
rRoll.aDropped = {};

local nStart, nEnd, sDicePattern, sDescriptionParam = string.find(sParams, "([^%s]+)%s*(.*)");
rRoll.sDesc = sDescriptionParam;

-- If no number to drop is specified, we will assume it is 1
-- If no number to drop is specified, we will assume it is 1
if(not sParams:match("(%d+)d([%dF]*)+(%d+)d([%dF]*)%s(%d+)") and sParams:match("(%d+)d([%dF]+(%d+)d([%dF]*)+)")) then
sParams = sParams .. " 1"
end

-- Now we check that we have a properly formatted parameter, or we set the sDesc for the roll with a message.
if not sParams:match("(%d+)d([%dF]*)+(%d+)d([%dF]*)%s(%d+)") then
rRoll.sDesc = "Parameters not in correct format. Should be in the format of \"2d12+#d# #\"";
return rRoll;
end

local sNum, sSize, tNum, tSize, sDrop = sParams:match("(%d+)d([%dF]+)+(%d+)d([%dF]*)%s(%d+)");
local count = tonumber(sNum);
local comp = tonumber(tNum);
local drop = tonumber(sDrop);

if (drop > count) then
rRoll.sDesc = "You cannot drop more results than the number of dice being rolled.";
return rRoll;
end

while count > 0 do
table.insert(rRoll.aDice, "d" .. sSize);

-- For d100 rolls, we also need to add a d10 dice for the ones place
if sSize == "100" then
table.insert(rRoll.aDice, "d10");
end
count = count - 1;
end

while comp > 0 do
table.insert(rRoll.aDice, "d" .. tSize);

-- For d100 rolls, we also need to add a d10 dice for the ones place
if sSize == "100" then
table.insert(rRoll.aDice, "d10");
end
comp = comp - 1;
end

rRoll.nDrop = drop;

return rRoll;
end

---
--- This function first sorts the dice rolls in ascending order, then it splits
--- the dice results into kept and dropped dice, and stores them as rRoll.aDice
--- and rRoll.aDropped.
---
function dropDiceResults(rRoll)
if #(rRoll.aDice) < 2 then return rRoll end
local len = #(rRoll.aDice) or 0;
local drop = tonumber(rRoll.nDrop) or 0;
local dropped = {};
local kept = {};

table.sort(rRoll.aDice, function(a,b) return a.result < b.result end);
local count = 1;
while count <= len do
if count <= drop then
table.insert(dropped, rRoll.aDice[count]);
else
table.insert(kept, rRoll.aDice[count]);
end

count = count + 1;
end
rRoll.aDice = kept;
rRoll.aDropped = dropped;
return rRoll;
end
---
--- This function creates a chat message that displays the results.
---
function createChatMessage(rSource, rRoll)
local rMessage = ActionsManager.createActionMessage(rSource, rRoll);
if #(rRoll.aDice) > 0 then
rMessage.text = rMessage.text .. "[KEPT]";
for _,v in ipairs(rRoll.aDice) do
rMessage.text = rMessage.text .. " " .. v.result;
end
end
if #(rRoll.aDice) > 0 and #(rRoll.aDropped) > 0 then
rMessage.text = rMessage.text .. "\n";
end
if #(rRoll.aDropped) > 0 then
rMessage.text = rMessage.text .. "[DROPPED]";
for _,v in ipairs(rRoll.aDropped) do
rMessage.text = rMessage.text .. " " .. v.result;
end
end

return rMessage;
end

---
--- This function creates the help text message for output.
---
function createHelpMessage()
local rMessage = ChatManager.createBaseMessage(nil, nil);
rMessage.text = rMessage.text .. "The \"/factwelve\" command is used to roll a set of dice, removing a number of the lowest results.\n";
rMessage.text = rMessage.text .. "You can specify the number of dice to roll, the type of dice, and the number of results to be dropped ";
rMessage.text = rMessage.text .. "by supplying the \"/factwelve\" command with parameters in the format of \"#d#+#d# #\".";
rMessage.text = rMessage.text .. "If no parameters are supplied, the default parameters of \"2d12+1d4 1\" are used.";
Comm.deliverChatMessage(rMessage);
end

---
--- This is the callback that gets triggered after the roll is completed.
---
function onRoll(rSource, rTarget, rRoll)
rRoll = dropDiceResults(rRoll);
rMessage = createChatMessage(rSource, rRoll);
rMessage.type = "dice";
Comm.deliverChatMessage(rMessage);
end

---

DMReckless have a look at this one.

/factwelve 1d#+#

You always roll 2d12 and you always roll one extra dice and you always only keep 2 dice.
So always just insert 2d12 and also insert one more variable sided dice and pass a mod.

Code:

---

        local sNum, sSize, aMod = sParams:match("(%d+)d([%dF]*)+(%d+)");
        local nSize = tonumber(sSize);

        Debug.console("sNum, sSize, aMod, nSize: ", sNum, sSize, aMod, nSize);
       
        rRoll.aDice = {"d12","d12","d" .. nSize};
        Debug.console("rRoll.aDice: ", rRoll.aDice);

---

Collect the Modifier Stack

Code:

---

        local sModDesc, nMod = ModifierStack.getStack(true);

---

Sort the Dice Biggest to Smallest

Code:

---

        table.sort(rRoll.aDice, function(a,b) return a.result > b.result end);

---

Collect the first two dice results

Code:

---

        local nResult1 = rRoll.aDice[1].result;
        local nResult2 = rRoll.aDice[2].result;

---

Do some math

Code:

---

        nResult = rRoll.aDice[1].result+rRoll.aDice[2].result+rRoll.aMod+rRoll.nMod;

---

Build the message

Code:

---

        rMessage.text = rMessage.text .. ", " .. rRoll.sModDesc;
        rMessage.text = rMessage.text .. "\n[Kept] " .. rRoll.nResult1 .. " " .. rRoll.nResult2;
        rMessage.text = rMessage.text .. "\n[Modifiers] " .. rRoll.aMod .. " " .. rRoll.nMod .. "\n";
        rMessage.text = rMessage.text .. "[Total] " .. rRoll.nResult;

---

And I also added some code to replace the generated SUM with the derived Result so you can drag and drop the results.

Attachment 25698

Make it even better by combining it with Parametrised Rolls!

https://www.fantasygrounds.com/forum...chmentid=25698

Thanks, that works as I need it to. (One exception: the MOD box is being doubled; I was able to fix this by changing the initial "roll.nMod = 0" to "eatroll.nMod = nMod" and the second from "roll.nMod = nMod" to "roll.nMod = 0"; now it only populates the mod collector on the initiation instead of twice.)

Great work! Thanks again.

Wow!!! Grat job Damned.
The new magic system you adopted is absolutely perfect. I wait the online help to understand how to use spell library, since it's changed, but still right now it's exactly what my group need.
Thanks again for your great job.

DMReckless please share the whole file for me and Ill update the base ruleset.

graziano.girelli fantastic - Im glad it is working for you. The Spells Library is unfortunately likely to be removed at some point in the near future as I think the current spell trackers are generally the more useful method. Spells can be added as Rolls still where appropriate. I am still open to additional feedback. I will get the doco updated soon.

I know your system is in Italian but Id love it if you guys could upload a FG Mod and some exported characters for others to try!

Here you are....

@damned It isn't fixed. It's still doing the same thing as before.