Modul:Str: Unterschied zwischen den Versionen

Aus WiiDatabase Wiki
Zur Navigation springenZur Suche springen

Modul:Str (Quelltext anzeigen)

Version vom 23. Januar 2022, 16:35 Uhr

1.479 Bytes hinzugefügt ,  23. Januar 2022
K
Änderte die Schutzeinstellungen für „Modul:Str“: Häufig eingebundenes Modul ([Bearbeiten=Nur Administratoren] (unbeschränkt) [Verschieben=Nur Administratoren] (unbeschränkt))
(Die Seite wurde neu angelegt: „ local Str = {} function Str.len(frame) return mw.ustring.len(frame.args[1]) end function Str.left(frame) local idx = tonumber(fram…“)
 
K (Änderte die Schutzeinstellungen für „Modul:Str“: Häufig eingebundenes Modul ([Bearbeiten=Nur Administratoren] (unbeschränkt) [Verschieben=Nur Administratoren] (unbeschränkt)))
Zeile 1: Zeile 1:
  local Str = {}
    function Str.len(frame)
      return mw.ustring.len(frame.args[1])
    end
    function Str.left(frame)
      local idx = tonumber(frame.args[2])
      if (not idx) or idx < 1 then
        return ""
      end
      return mw.ustring.sub(frame.args[1],1,idx)
    end
    function Str.right(frame)
      local laenge = tonumber(frame.args[2])
      if (not laenge) or laenge < 1 then
        return ""
      else
      laenge = - laenge
      end
      return mw.ustring.sub(frame.args[1],laenge,-1)
    end
    function Str.index(frame)
      local idx = tonumber(frame.args[2])
      if (not idx) or idx < 1 then
        return ""
      end
      return mw.ustring.sub(frame.args[1],idx,idx)
    end
    function Str.sub(frame)
      local von = tonumber(frame.args[2])
      local laenge = tonumber(frame.args[3])
      if (not von) or (not laenge) then
        return ""
      end
      if (von < 1) then
        von = 1
      end     
      local bis = von + laenge - 1
      if (bis < von) then
        return ""
      end
      return mw.ustring.sub(frame.args[1],von,bis)
    end
    function Str.crop(frame)
      local s = frame.args[1]
      local cut = tonumber(frame.args[2])
      local laenge =  mw.ustring.len(s)
      if (not cut) or (cut < 1) then
        return s
      end
      return mw.ustring.sub(s,1,laenge - cut)
    end
    function Str.cropleft(frame)
      local s = frame.args[1]
      local cut = tonumber(frame.args[2])
      local laenge =  mw.ustring.len(s)
      if (not cut) or (cut < 1) then
        return s
      end
      return mw.ustring.sub(s,cut+1,-1)
    end
    function Str.find(frame)
      if not frame.args[2] or frame.args[2] == "" then
        return 1
      end
      local  idx = mw.ustring.find(frame.args[1], frame.args[2],1, true)
      if idx then
          return idx
      else
          return -1
      end
    end
    function Str.hex2dez(frame)
      a = tonumber(frame.args[1],16)
      if a then
        return a
      else
        return 0
      end
    end
    function Str.match(frame)
        local text = frame.args[1] or ""
        local pattern = frame.args[2] or ""
        local index = tonumber(frame.args[3]) or 0
        if (text == "" or pattern == "") then return "" end
        -- return all captures (denoted by brackets in the pattern) if index is zero, otherwise return only the index-th capture
        if index <= 0 then
            return mw.ustring.match(text, pattern)
        else
            return ({mw.ustring.match(text, pattern)})[index]
        end
    end
function escape_lua_regex(str)
function escape_lua_regex(str)
return mw.ustring.gsub(str, ".", {
return mw.ustring.gsub(str, ".", {
Zeile 119: Zeile 16:
   })
   })
end
end
 
function Str.replace(frame)
local function trim(s)
local text = frame.args[1] or ""     -- Text, der bearbeitet werden soll
s = mw.ustring.gsub(s,"\n","");
local search = frame.args[2] or ""   -- Textstellen innerhalb von "text" die ersetzt werden sollen
while mw.ustring.sub(s,1,1) == " " do
if text == "" or search == "" then return "" end
s= mw.ustring.sub(s,2,-1);
local replace = frame.args[3] or ""  -- Ersetzungstext
local count = tonumber(frame.args[4]) -- Anzahl der Ersetzungen (optional)
local regexsearch = frame.args[5]    -- beliebiger Wert um dafür zu sorgen, dass der Suchtext "search" als Lua-regulärer Ausdruck behandelt werden soll
if not regexsearch or regexsearch == "" then
search = escape_lua_regex(search)
replace = mw.ustring.gsub(replace, "%%", "%%%%")
end
end
while mw.ustring.sub(s,-1,-1) == " " do
local result
s= mw.ustring.sub(s,1,-2);
if count then
result,_ = mw.ustring.gsub(text, search, replace, count)
else
result,_ = mw.ustring.gsub(text, search, replace)
end
end
return result
return s;
end
end
local Str = {}
function Str.len(frame)
local s = trim((frame.args[1] or ""));
return mw.ustring.len(s);
end
function Str.left(frame)
local s = trim((frame.args[1] or ""));
local idx = tonumber(frame.args[2]) or 0;
if idx < 1 then
return "";
end
return mw.ustring.sub(s,1,idx);
end
function Str.right(frame)
local s = trim((frame.args[1] or ""));
local length = tonumber(frame.args[2]) or 0;
if length < 1 then
return ""
else
length = -length;
end
return mw.ustring.sub(s,length,-1)
end
function Str.index(frame)
local s = trim((frame.args[1] or ""));
local idx = tonumber(frame.args[2]) or 0;
if idx < 1 then
return ""
end
return mw.ustring.sub(s,idx,idx)
end
function Str.sub(frame)
local s = trim((frame.args[1] or ""));
local von = tonumber(frame.args[2]) or 1;
local length = tonumber(frame.args[3]) or 0;
if (von < 1) then
von = 1
end
local bis = von + length - 1
if (bis < von) then
return ""
end
return mw.ustring.sub(s,von,bis)
end
function Str.crop(frame)
local s = trim((frame.args[1] or ""));
local cut = tonumber(frame.args[2]) or 0;
local length =  mw.ustring.len(s)
if cut < 1 then
return s;
end
return mw.ustring.sub(s,1,length - cut)
end
function Str.cropleft(frame)
local s = trim((frame.args[1] or ""));
local cut = tonumber(frame.args[2]) or 0;
local length =  mw.ustring.len(s)
if cut < 1 then
return s;
end
return mw.ustring.sub(s,cut+1,-1);
end
function Str.find(frame)
local text = trim((frame.args[1] or ""));
local pat = frame.args[2] or "";
if pat == "" then
return 1
end
local idx = mw.ustring.find(text,pat,1,true)
if idx then
return idx;
else
return -1;
end
end
function Str.hex2dez(frame)
a = tonumber(frame.args[1],16) or 0;
return a
end
function Str.match(frame)
local text = frame.args[1] or ""
local pattern = frame.args[2] or ""
local index = tonumber(frame.args[3]) or 0
if (text == "" or pattern == "") then return "" end
-- return all captures (denoted by brackets in the pattern) if index is zero, otherwise return only the index-th capture
if index <= 0 then
return mw.ustring.match(text, pattern)
else
return ({mw.ustring.match(text, pattern)})[index]
end
end
function Str.rep(frame)
local repetitions = tonumber(frame.args[2]) or 0;
return mw.ustring.rep( frame.args[1] or '', repetitions );
end
function Str.replace(frame)
local text = frame.args[1] or "";      -- Text, der bearbeitet werden soll
local search = frame.args[2] or "";    -- Textstellen innerhalb von "text" die ersetzt werden sollen
local replace = frame.args[3] or "";  -- Ersetzungstext
if text == "" or search == "" then
return "";
end
local count = tonumber(frame.args[4]) -- Anzahl der Ersetzungen (optional)
local regexsearch = frame.args[5]    -- beliebiger Wert um dafür zu sorgen, dass der Suchtext "search" als Lua-regulärer Ausdruck behandelt werden soll
if not regexsearch or regexsearch == "" then
search = escape_lua_regex(search)
replace = mw.ustring.gsub(replace, "%%", "%%%%")
end
local result
if count then
result,_ = mw.ustring.gsub(text, search, replace, count)
else
result,_ = mw.ustring.gsub(text, search, replace)
end
return result
end


-- richtet Zahlen numerisch aus
-- richtet Zahlen numerisch aus
Zeile 196: Zeile 209:
return ausgabe;
return ausgabe;
end
end
  return Str
 
-- Konvertierung von Mathe-Minus, Geviert-, Halbgeviert- und Viertelgeviertstrich, sowie U+2012 ins ASCII-Minus.
function Str.minus(frame)
local s = frame.args[1] or "";
s = mw.ustring.gsub(s,'−','-'); -- Erstes Zeichen ist U+2212 (Mathe-Minus)
s = mw.ustring.gsub(s,'‐','-'); -- Erstes Zeichen ist U+2010 (Viertelgeviertstrich)!
s = mw.ustring.gsub(s,'‒','-'); -- Erstes Zeichen ist U+2012 (Figure dash)!
s = mw.ustring.gsub(s,'–','-'); -- Erstes Zeichen ist U+2013 (Halbgeviertstrich)!
s = mw.ustring.gsub(s,'—','-'); -- Erstes Zeichen ist U+2014 (Geviertstrich)!
return s;
end
 
-- Die folgende Stringfunktion rundet Zahlen und gibt im Unterschied zu
-- "round" im Modul FormatNum auch nachfolgende Nullen aus.
-- So wird "1.12" bei drei Nachkommastellen als "1.120" zurückgegeben.
function Str.round(frame)
local num  = tonumber(frame.args[1] or '') or 'NaN'; -- zu rundende Zahl
local prec = tonumber(frame.args[2] or '') or 'NaN'; -- Dezimalstellen
if num == 'NaN' or prec =='NaN' then
return "NaN";
end
prec = math.floor(prec); 
local out = "";
local rnd = 10;
if prec > 0 then
local fmt = "%." .. tostring(prec) .. "f";
out = string.format(fmt,num); -- Zahlen haben nur ASCII-Zeichen
else
rnd = 10^(-prec);
num = math.floor(num/rnd + 0.5) * rnd;
out = string.format("%d",num); -- Zahlen haben nur ASCII-Zeichen
end
return out;
end
 
return Str
Anonymer Benutzer
Abgerufen von „https://wiki.wiidatabase.de/wiki/Spezial:Mobiler_Unterschied/10141“

Navigationsmenü