יחידה:מונה הופעות

מתוך חב"דטקסט, מאגר ספרים חב"דים חופשי בגרסת טקסט.
גרסה מ־22:28, 20 ביוני 2024 מאת חלוקת קונטרסים (שיחה | תרומות) (גרסה אחת יובאה: ייבוא תבניות ראשוני מחב"דפדיה. קרדיט לויקיפדיה על מה שהועתק מהם לחב"דפדיה)
(הבדל) → הגרסה הקודמת | הגרסה האחרונה (הבדל) | הגרסה הבאה ← (הבדל)
קפיצה לניווט קפיצה לחיפוש

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

local p = {}

function p.countlines(frame)
	local s = frame.args[1] or frame.args.text
	local _, count = s:gsub('\n', '%0') -- Count newline characters in s
	return count + 1
end

function p.count(frame)
	local ans = 0
	local c = mw.ustring.codepoint(frame.args[2], 1, 1)
	for cp in mw.ustring.gcodepoint(frame.args[1]) do
    	if cp == c then
    		ans = ans + 1
    	end
	end
	return ans
end

return p