לדלג לתוכן

יחידה:פרמטרים: הבדלים בין גרסאות בדף

מתוך צפונות ויקי
אין תקציר עריכה
אין תקציר עריכה
שורה 1: שורה 1:
function foo(frame)
function foo(frame)
local ans = ""
ans = ""
namespace = "תבנית:"
local pframe = frame:getParent()
local pframe = frame:getParent()
local template = pframe:getTitle()
local template = pframe:getTitle()
local templatename = template
local templatename = template
if (find1(templatename, "תבנית:") == 1) then
if find1(templatename, namespace) == 1 then templatename = mw.ustring.sub(templatename, len1(namespace) + 1) end
templatename = sub1(templatename, 7)
end
local data = mw.loadData('יחידה:פרמטרים/' .. templatename)
local data = mw.loadData('יחידה:פרמטרים/' .. templatename)
local numbered = 0
local numbered = 0
local mustnum = data[1]
local mustnum = data[1]
local parameters = data[2]
parameters = data[2]
local suggestions = data[3]
suggestions = data[3]
for k, v in pairs( pframe.args ) do
for k, v in pairs(pframe.args) do
if type( k ) == 'string' then
if type(k) == 'string' then checknamed(k) elseif mw.text.trim(v) ~= "" then numbered = k end  
ans = checknamed(k, ans, parameters, suggestions[k])
elseif (mw.text.trim(v) ~= "") then
numbered = k
end
end
end
if (mustnum < numbered) then
if mustnum < numbered then out ("צריך מקסימום " .. mustnum .. " פרמטרים, ישנם " .. numbered) end
ans = out (ans, "צריך מקסימום " .. mustnum .. " פרמטרים, ישנם " .. numbered)
if (ans == "") then return ans end
end
return "<div class=error> '''שגיאת פרמטרים ב[[" .. template .. "]]:<br/>" .. ans .. "''' </div>[[קטגוריה:שגיאות פרמטריות]]"  
if (ans == "") then
return ans
end
return "<div class=error> '''שגיאת פרמטרים ב[[" .. template .. "]]:<br/>"
.. ans .. "''' </div>[[קטגוריה:שגיאות פרמטריות]]"  
end
end


function checknamed(k, ans, parameters, suggestion)
function checknamed(k)
local i = 2
local answer = "פרמטר לא ידוע: ''" .. k .. "''"
local answer
for p1, p in ipairs(parameters) do
for p1, p in ipairs(parameters) do
if p == k then
if p == k then return end
return ans
end
end
end
answer = "פרמטר לא ידוע: ''" .. k .. "''"
if suggestions[k] ~= nil then answer = answer .. ', <span style = "color:green">מומלץ ' .. suggestions[k] .. "</span>" end
if (suggestion ~= nil) then
out(answer)
answer = answer .. '<span style = "color:green">, מומלץ ' .. suggestion .. "</span>"
end
return out(ans, answer)
end
end


function out(ans, new)
function out(new)
return ans .. new .. "</br>"
ans = ans .. new .. "</br>"
end
end


function sub1(str, from, to)
function find1(str, what, where)
return mw.ustring.sub(str, from, to)
local ans = mw.ustring.find(str, what, where, true)
if ans == nil then ans = 0 end
return ans
end
end


function find1(str, what, ...)
function len1(s)
local args = ...
if s == nil then return 0 end
local where = 1
return mw.ustring.len(s)
if (args ~= nil) then
where = args
end
local ans = mw.ustring.find(str, what, where, true)
if (ans == nil) then
ans = 0
end
return ans
end
end


return {
return {['main'] = foo}
['main'] = foo
}

גרסה מ־18:15, 8 במאי 2015


function foo(frame)
	ans = ""
	namespace = "תבנית:"
	local pframe = frame:getParent()
	local template = pframe:getTitle()
	local templatename = template
	if find1(templatename, namespace) == 1 then templatename = mw.ustring.sub(templatename, len1(namespace) + 1) end
	local data = mw.loadData('יחידה:פרמטרים/' .. templatename)
	local numbered = 0
	local mustnum = data[1]
	parameters = data[2]
	suggestions = data[3]
	for k, v in pairs(pframe.args) do
		if type(k) == 'string' then checknamed(k) elseif mw.text.trim(v) ~= "" then numbered = k end 
	end
	if mustnum < numbered then out ("צריך מקסימום " .. mustnum .. " פרמטרים, ישנם " .. numbered) end
	if (ans == "") then return ans end
	return "<div class=error> '''שגיאת פרמטרים ב[[" .. template .. "]]:<br/>" .. ans .. "''' </div>[[קטגוריה:שגיאות פרמטריות]]" 
end

function checknamed(k)
	local answer = "פרמטר לא ידוע: ''" .. k .. "''"
	for p1, p in ipairs(parameters) do
		if p == k then return end
	end
	if suggestions[k] ~= nil then answer = answer .. ', <span style = "color:green">מומלץ ' .. suggestions[k] .. "</span>" end
	out(answer)
end

function out(new)
	ans = ans .. new .. "</br>"
end

function find1(str, what, where)
	local ans = mw.ustring.find(str, what, where, true)
	if ans == nil then ans = 0 end
	return ans
end

function len1(s)
	if s == nil then return 0 end
	return mw.ustring.len(s)
end

return {['main'] = foo}