Difference between revisions of "Module:Thought"
Jump to navigation
Jump to search
Arcangelus (talk | contribs) m (Arcangelus moved page Module:Arcangel/Testing to Module:Thought without leaving a redirect: This module is ready to use. Changing the name for the one of the template intended to use it makes the most sense to me.) |
Arcangelus (talk | contribs) m (Very minor edit. I may have to deprecate this: While it works, it has some undesired behaviour due to being LUA. For instance, the long dash (−) is not a valid "minus" sign, making problematic its use (I could replace it on the final result, probably). Also, It may be heavier than the template version (while easier to parse). On the bright side, It did teach me how to make Modules work (the main purpose of writing this), so not a complete loss.) |
||
Line 12: | Line 12: | ||
function p.main(frame) | function p.main(frame) | ||
local args = getArgs(frame) | local args = getArgs(frame) | ||
− | |||
− | |||
− | |||
− | |||
local multi = tonumber(args["multi"]) or 1 | local multi = tonumber(args["multi"]) or 1 | ||
--[[ The advantage of adding values to an empty list rather than defining a list | --[[ The advantage of adding values to an empty list rather than defining a list | ||
Line 33: | Line 29: | ||
valores[#valores+1]=args["value9"] | valores[#valores+1]=args["value9"] | ||
if tonumber(args["value"]) then | if tonumber(args["value"]) then | ||
− | return p._main(desc, label, duration, stack, multi, valores) | + | return p._main(tostring(args["desc"]), tostring(args["label"]), tonumber(args["duration"]), tonumber(args["stack"]), multi, valores) |
else | else | ||
return "<big><b>Missing value. Please, define a numerical value to use.</b></big>" | return "<big><b>Missing value. Please, define a numerical value to use.</b></big>" |
Latest revision as of 19:04, 26 August 2024
Documentation for this module may be created at Module:Thought/doc
--[[ This module implements the functions of Template:Thought ]] local p = {} local getArgs = require('Module:Arguments').getArgs --[[ The template argument goes to "main" Only this funcion will work when invoked. This is case sensitive. What it does is obtain the data from the wiki to a fomrat readable by other functions]] function p.main(frame) local args = getArgs(frame) local multi = tonumber(args["multi"]) or 1 --[[ The advantage of adding values to an empty list rather than defining a list with the correct values is that no nil values will get into the list this way. This means that values don't have to be consecutive. EX: value9 is valid w/o defining value2 to value8. ]] local valores = {} valores[#valores+1]=args["value"] valores[#valores+1]=args["value2"] valores[#valores+1]=args["value3"] valores[#valores+1]=args["value4"] valores[#valores+1]=args["value5"] valores[#valores+1]=args["value6"] valores[#valores+1]=args["value7"] valores[#valores+1]=args["value8"] valores[#valores+1]=args["value9"] if tonumber(args["value"]) then return p._main(tostring(args["desc"]), tostring(args["label"]), tonumber(args["duration"]), tonumber(args["stack"]), multi, valores) else return "<big><b>Missing value. Please, define a numerical value to use.</b></big>" end end --[[ _main function decides the kind of thought this will be and returns the final output If the are several defines values, then it uses the Thought function If only value is defined, then: - If both stack and the multiplier "multi" are 1, it gives a result early. multi defaults to 1 when not defined (or invalid) - Otherwise, it calls the stacks function. ]] function p._main(desc, label, duration, stack, multi, valores) local final_string = duration and " [[mood]] for "..duration.." [[Time|days]]" or " [[mood]]" local middle_string ='<abbr title="'..desc..'"><i>'..(label:gsub("^%l", string.upper))..'</i></abbr>' -- middle_string is pure convenience. It makes reading the output easier. -- "valores" is a list of all values given to the function. -- This checks if a second value exist if valores[2] then return p.Thought(valores)..middle_string..final_string else --Only initial value defined if stack==1 and multi==1 then local value = valores[1] if tonumber(value)>0 then return '<b><font color="forestgreen">'..value..'</font></b> '..middle_string..final_string elseif tonumber(value) == 0 then return '<b>'..value..'</b> '..middle_string..final_string else return '<b><font color="firebrick">'..value..'</font></b> '..middle_string..final_string end end return p.stacks(stack, multi, valores[1])..middle_string..final_string end end --[[ The "Thought" function returns a string if more than 1 value was defined. It iterates through all the values defined (contained on the list "valores") For each element: 1.- If it is a valid number, then it valuates what kind of number it is. 1.2.- If it is, it then decides what color it need. Currently, it returns: Green for positive, Red for negative, None for 0. 2.- It it is not a valid number, it returns the value bolded and large. The idea is to make the mistake obvious. 3.- Once all values are checked, it concatenates all results, with some extras to make sense. This last part is what it returns. ]] function p.Thought(valores) local valores_buscados={} for i, j in ipairs(valores) do local vx = valores[i] local vy = "" if tonumber(vx) then -- A number. vy = tonumber(vx)<0 and '<b><font color="firebrick">'..vx.."</font></b>" or tonumber(vx)>0 and '<b><font color="forestgreen">'..vx.."</font></b>" or '<b>0</b>' else vy='<big><b>'..vx.."</b></big>" --The idea is to prevent a hard to track error end valores_buscados[#valores_buscados+1]=vy end return "<b>"..table.concat(valores_buscados,"<b>/</b>").."</b> " end --[[ The "stacks" function return a string for the case that only 1 value was defined. 1. If a stack value was defined: 1.1 Is stack equal to 1 1.2 Any other case. 2. If a stack was not defined, then check the multiplier 2.1 If the multiplier is equal or above one 2.2 If the multiplier is below 1. Finally, some final code to decide what color to use. 1. Green (forestgreen) for positive. 2. None for 0. 3. Red (firebrick) for negatives. The retuned value is rounded half-down. (Meaning 0.5 -> 0 ) string.format("%.2f", number)) To combat that, I add 0.001 to the number calculated. It should be enough. ]] function p.stacks(stack, multi, value) local text="" if stack then if multi == 1 then if stack ~= 1 then text = "Stacking "..stack.." times for a maximum of "..tostring(value*stack) end else text = "Stacking "..stack.." times with a "..multi.." multiplier for maximum of "..string.format("%.2f", value*( 1 - multi^stack)/(1 - multi) + 0.001) end else if multi >= 1 then --I want to avoid the case of really large numbers. text = "Stacking infinitely" else text = "Stacking with a "..multi.." multiplier for maximum of "..string.format("%.2f", value*( 1 - multi^100)/(1 - multi) + 0.001) end end if tonumber(value)>0 then return '<abbr title="'..text..'"><b><font color="forestgreen">'..value..'</font></b></abbr> ' elseif tonumber(value) == 0 then return '<abbr title="'..text..'"><b>'..value..'</b></abbr> ' else return '<abbr title="'..text..'"><b><font color="firebrick">'..value..'</font></b></abbr> ' end end --This last part outputs the actual result. W/O it, it gives an error. return p