Modulo:Sandbox/ValterVB/ISSN

Versione del 11 apr 2020 alle 19:57 di ValterVB (discussione | contributi) (creo)
(diff) ← Versione meno recente | Versione attuale (diff) | Versione più recente → (diff)
local p = {}
-- nb/2010/16426 
-- nb2010016426
function p.ISSN(frame)
    id=frame.args.id
    result=8*string.sub (id, 5 , 6)+7*string.sub (id, 5 , 6)+6*string.sub (id, 5 , 6)+5*string.sub (id, 5 , 6)+4*string.sub (id, 5 , 6)+3*string.sub (id, 5 , 6)+2*string.sub (id, 5 , 6)
    result=11-result % 11
    return result
end
 
return p