Module:Test

La bibliothèque libre.

La documentation pour ce module peut être créée à Module:Test/Documentation

local p = {}
local szMsg = ''
local szCode = ''

function p.ConstruireEnPage( frame )

    ----------------------------------------------------------------------
    -- Noter les paramètres évalués dans le code du modèle :
    --   |1={{{1}}}  |2={{{2}}}  |3={{{di}}}  |4={{{début}}}  |5={{{fin}}}
    ----------------------------------------------------------------------
    local szParamNom = '';    if ( frame.args[1] ~= nil ) then szParamNom = frame.args[1] end
    local szParamRepl = '';   if ( frame.args[2] ~= nil ) then szParamRepl = frame.args[2] end
    local szParamDida = '';   if ( frame.args[3] ~= nil ) then szParamDida = frame.args[3] end
    local szParamDebut = '';  if ( frame.args[4] ~= nil ) then szParamDebut = frame.args[4] end
    local szParamFin = '';    if ( frame.args[5] ~= nil ) then szParamFin = frame.args[5] end
    if szParamDebut ~= '' and szParamFin ~= '' then szMsg = '<span style="color:red; font-size:200%;">Ne pas utiliser |fin= et |début= dans l\'appel de modèle.</span>' end

    -------------------------
    -- Créer le wikicode/HTML
    -------------------------
    szCode = '<div style="page-break-inside:avoid;">'
    if szParamNom ~= '' then szCode = szCode .. '<div style="text-align:center;"><span style="font-variant:all-small-caps;" class=sc>' .. szParamNom .. '</span>' end
    if szParamDida ~= '' then szCode = szCode .. '<span style="font-size:90%;">' .. szParamDida .. '</span>' end
    if szParamNom ~= '' then szCode = szCode .. '</div>' end
    
    if szParamRepl ~= '' then 
      if szParamDebut ~= '' then szCode = szCode .. '<p>' .. szParamRepl .. '</p>' end
      if szParamFin ~= '' then szCode = szCode .. szParamRepl end
      if szParamDebut == '' and szParamFin == '' then szCode = szCode .. '<p>' .. szParamRepl .. '</p>' end
    end
    
    szCode = szCode .. '</div>'

    if string.len( szMsg ) ~= 0 then
      szCode = szMsg
    end

    return szCode
end

function p.ConstruireHorsPage( frame )

    ----------------------------------------------------------------------
    -- Noter les paramètres évalués dans le code du modèle :
    --   |1={{{1}}}  |2={{{2}}}  |3={{{di}}}  |4={{{début}}}  |5={{{fin}}}
    ----------------------------------------------------------------------
    local szParamNom = '';    if ( frame.args[1] ~= nil ) then szParamNom = frame.args[1] end
    local szParamRepl = '';   if ( frame.args[2] ~= nil ) then szParamRepl = frame.args[2] end
    local szParamDida = '';   if ( frame.args[3] ~= nil ) then szParamDida = frame.args[3] end
    local szParamDebut = '';  if ( frame.args[4] ~= nil ) then szParamDebut = frame.args[4] end
    local szParamFin = '';    if ( frame.args[5] ~= nil ) then szParamFin = frame.args[5] end
    if szParamDebut ~= '' and szParamFin ~= '' then szMsg = '<span style="color:red; font-size:200%;">Ne pas utiliser |fin= et |début= dans l\'appel de modèle.</span>' end

    -------------------------
    -- Créer le wikicode/HTML
    -------------------------
    if szParamDebut ~= '' and szParamFin == '' then 
      szCode = '<div style="page-break-inside:avoid;">'
      if szParamNom ~= '' then szCode = szCode .. '<div style="text-align:center;"><span style="font-variant:all-small-caps;" class=sc>' .. szParamNom .. '</span>' end
      if szParamDida ~= '' then szCode = szCode .. '<span style="font-size:90%;">' .. szParamDida .. '</span>' end
      if szParamNom ~= '' then szCode = szCode .. '</div>' end

      if szParamRepl ~= '' then 
        szCode = szCode .. '<p class=ChallwaRouge>' .. szParamRepl
      end
    end

    if szParamDebut == '' and szParamFin ~= '' then 
      if szParamRepl ~= '' then 
        szCode = szCode .. szParamRepl
      end
      szCode = szCode .. '</p>'
      szCode = szCode .. '</div>'
    end

    if szParamDebut == '' and szParamFin == '' then 
      szCode = '<div style="page-break-inside:avoid;">'
      if szParamNom ~= '' then szCode = szCode .. '<div style="text-align:center;"><span style="font-variant:all-small-caps;" class=sc>' .. szParamNom .. '</span>' end
      if szParamDida ~= '' then szCode = szCode .. '<span style="font-size:90%;">' .. szParamDida .. '</span>' end
      if szParamNom ~= '' then szCode = szCode .. '</div>' end

      if szParamRepl ~= '' then 
        szCode = szCode .. '<p class=ChallwaVert>' .. szParamRepl .. '</p>'
      end
      szCode = szCode .. '</div>'
    end

    if string.len( szMsg ) ~= 0 then
      szCode = szMsg
    end

    return szCode
end

return p