הלימוד באתר מוקדש
לעילוי נשמת פרופ' חכם יעקב שוויקה זצ"ל

שבין שאר מפעליו הרבים לריבוי והפצת התורה דרך מיחשוב
עודד, תמך וסייע גם לאתר זה לגדול ולהתפתח.

פרסם כאן או הקדש את הלימוד באתר >>

יחידה:פרמטרים

מתוך ויקיסוגיה
קפיצה לניווט קפיצה לחיפוש

ניתן ליצור תיעוד על היחידה הזאת בדף יחידה:פרמטרים/תיעוד

-- This function is used for תבנית:הערה parameters control
function equal(frame)
	local pframe = frame:getParent()
	type = mw.ustring.sub(pframe:getTitle(), 7)
	oldargs = pframe.args
	local newargs = {}
	local kinds = frame.args
	local stop
	for p, pp in pairs(oldargs) do
		stop = false
		if tostring(p) == tostring(kinds[1]) and newargs[p] == nil then
			newargs[p] = pp
			stop = true
		elseif tostring(p) == tostring(kinds[1]) then
			equalerror("תוכן כפול: " .. newargs[p] .. " וגם " .. pp)
			stop = true
		else 
			for z, zz in ipairs(kinds) do
				if tostring(p) == tostring(zz) then
					newargs[p] = pp
					stop = true
					do
						break
					end
				end
			end
		end
		if not stop then
			local kind = newargs[kinds[1]] or newargs[tonumber(kinds[1])]
			if kind ~= nil then
				equalerror("תוכן כפול: " .. kind .. " וגם " .. p .. "=" .. pp)
			else newargs[kinds[1]] = p .. "=" .. pp
			end
		end
	end
	return frame:expandTemplate({title = frame.args["קוד"], args = newargs})
end

function equalerror(message)
	error("[[קטגוריה:שגיאות קריאה לתבנית " .. type .. "]] (בקריאה ל[[תבנית:" .. type .. "]]) " .. message, 0)
end

function decode(frame)
	return mw.uri.decode(frame.args[1])
end

function googleurl(frame)
	--return a .. mw.uri.parseQueryString( frame.args[1] )['http://www.google.co.il/url?url']
	--p = ''
	--for k, v in pairs(mw.uri.new( frame.args[1] ).query['url'])
	--do return 'a' .. k .. 'c' end --p = p .. '+++' .. k .. ':' .. v end
	--return p--
	local q = mw.uri.new(frame.args[1]).query
	return q and (q['url'] or q['q']) or ''
	--or mw.uri.parseQueryString( frame.args[1] )['http://www.google.co.il/url?url'] or ''
end

function biur(frame)
	pframe = frame:getParent()
	local newargs = {}
	for a, aa in pairs(pframe.args) do
		if a == "קבוצה" then
			error('פרמטר "קבוצה" כפול[[category:' ..
				tostring(mw.message.new("Cite-tracking-category-cite-error")) .. ']]', 0)
		end
		newargs[a] = aa
	end
	newargs["קבוצה"] = frame.args[1] or "hebrew"
	return frame:expandTemplate{title = "הערה", args = newargs}
end

function showparams( frame )
	local ans = '', k
	for i, v in pairs(frame.args) do
		if tonumber(i) then
			k = v
		else
			k = i
		end
		k = mw.ustring.gsub(k, '\n', '')
		if mw.ustring.find(k, '|') then
			k = k .. ' (' .. mw.ustring.sub(k, 3, mw.ustring.find(k, '|') - 1) .. ')'
		end
		ans = ans .. '#' .. k .. '\n'
	end
	return ans
end


local function main() end
	
return {
	main = main,
	equal = equal, 
	decode = decode, 
	googleurl = googleurl,
	biur = biur,
	showparams = showparams,
}