Module:Flag

 localmargs=require('Module:Arguments')

 localfunction_main(frame,name,mode,key)
 localcategories={
 ['Flag icon']='[[Category:Flag icons missing country data templates]]{{Preview warning|unrecognized country in Template:flag icon}}',
 ['Flag decoration']='[[Category:Flag decoration missing country data templates]]',
 }

 localyesno=require('Module:Yesno')

 --Get input arguments
 localargs=margs.getArgs(frame,{
 frameOnly=((frame.args.frameonlyor'')~=''),valueFunc=
 function(argkey,value)
 ifvaluethen
 value=mw.text.trim(value)
 --Change empty string to nil for all args except 'image' and 'border'
 ifargkey=="image"orargkey=="border"orvalue~=""then
 returnvalue
 end
 end
 returnnil
 end
 })

 localpreftext,sufftext="",""

 ifname=='Flag+link'then
 args.pref=args[1]
 elseifname=='Flag athlete'then
 args.preftext=args[1]
 args[2]=args.codeorargs[2]or""
 args.variant=args.variantorargs[3]
 elseifname=='Flag medalist'then
 preftext=(args[1]or"").."<br/>"
 args[2]=args.codeorargs[2]or""
 args.variant=args.variantorargs[3]
 elseifname=='Flag link'then
 args.suff=args[2]
 args[2]=args[1]or""
 args.variant=args.variantorargs[3]
 elseifkey~=nilthen
 args.variant=args.variantorargs[1]
 args[2]=key
 else
 sports={
 ['3x3']='3x3',
 bb='bb',
 fb='fb',
 ['fb-rt']='fb',
 fbicon='fb',
 ru='ru',
 fba='fba',
 fbaicon='fba'
 }
 ifsports[name]then
 args.avar=args[1]andsports[name]ornil
 ifname=='fb'andyesno(args.align)==truethen
 args.align='c'
 elseifsports[name]=='fba'then
 ifargs[1]then
 locallist=require("Module:Fba/list")
 localold=((args.oldor"")~="")and"_old"or""
 localcountry=args[1]
 localfba=list.fbas[country..old]
 ifnotfbathen-- look for aliases
 localcountryTable=require('Module:CountryData').getcachedtable(frame,country)
 ifcountryTableandcountryTable.aliasthen
 country=countryTable.alias
 fba=list.fbas[country..old]
 end
 end
 ifargs.name=="code"then
 args.name=list.codes[country]orcountry
 elseifargs.name=="full"then
 args.name=fba
 end
 iffbathen
 mode=string.gsub(mode,"p","c")
 args.link=fba
 end
 args.altlink=args.old
 elseifargs.name=="code"orargs.name=="full"then
 args.name=""
 end
 end
 elseifname=="Flag team"and(args.codeorargs[1])then
 sufftext='&nbsp;<span style="font-size:90%;">('..(args.codeorargs[1])..')</span>'
 end
 args.variant=args.variantorargs[2]
 args[2]=args[1]or""
 end

 args[1]=mode..(args.optsor'')
 args.missingcategory=categories[name]
 args.noredlink=args.noredlinkor'notext'

 ifargs.placeholderandyesno(args.placeholder)~=truethen
 args[1]=args[1]..'o'
 end

 check=''

 ifname=='Flag icon'andmw.title.getCurrentTitle().namespace==0then
 localunknown='[[Category:Pages using '..mw.ustring.lower(name)..
 ' template with unknown parameters|_VALUE_'..frame:getParent():getTitle()..']]'
 localopts={
 unknown=unknown,
 preview='Page using [[Template:'..name..']] with unknown parameter "_VALUE_"',
 ignoreblank='y',
 '1','2','variant','image','size','sz','border','align','al','width',
 'w','alt','ilink','noredlink','missingcategory','name','clink','link',
 'pref','suff','plink','the','section','altvar','avar','age','nalign',
 'nal','text','nodata','opts','placeholder','getParent','frameonly'
 }
 check=require('Module:Check for unknown parameters')._check(opts,args)
 end

 returnpreftext..require('Module:Flagg').luaMain(frame,args)..sufftext..check
 end

 localp={
 ['']=function(frame)return_main(frame,'Flag','unc')end,
 decoration=function(frame)return_main(frame,'Flag decoration','uxx')end,
 icon=function(frame)return_main(frame,'Flag icon','cxxl')end,
 link=function(frame)return_main(frame,'Flag link','unpe')end,
 ['+link']=function(frame)return_main(frame,'Flag+link','unpefo')end,
 country=function(frame)return_main(frame,'Flag country','unce')end,
 list=function(frame)return_main(frame,'Flag list','usc')end,
 team=function(frame)return_main(frame,'Flag team','unce')end,
 athlete=function(frame)return_main(frame,'Flag athlete','unape')end,
 medalist=function(frame)return_main(frame,'Flag medalist','unce')end,
 ['3x3']=function(frame)return_main(frame,'3x3','unpe')end,
 bb=function(frame)return_main(frame,'bb','unpe')end,
 fb=function(frame)return_main(frame,'fb','unpe')end,
 fba=function(frame)return_main(frame,'fba','unpe')end,
 ['fb-rt']=function(frame)return_main(frame,'fb-rt','unpre')end,
 fbicon=function(frame)return_main(frame,'fbicon','pxxl')end,
 fbaicon=function(frame)return_main(frame,'fbaicon','pxxl')end,
 ru=function(frame)return_main(frame,'ru','unpe')end,
 IOC=function(frame)returnrequire('Module:Country_alias').flagIOC(frame:newChild{title='Template:Flag IOC'})end,
 IOC2=function(frame)returnrequire('Module:Country_alias').flagXYZ(frame:newChild{title='Template:Flag IOC 2',args={name=margs.getArgs(frame).nameor'',type='name'}})end,
 IOCathlete=function(frame)returnrequire('Module:Country_alias').flagXYZ(frame:newChild{title='Template:Flag IOC athlete',args={type='athlete-O'}})end,
 }

 p['deco']=p.decoration
 p['IOC 2']=p.IOC2
 p['IOC athlete']=p.IOCathlete

 returnsetmetatable(p,{['__index']=-- returns table p with the metatable __index set so that, if the table KEY isn't recognized, it returns
 function(_,key)-- this anonymous function called as function(p, KEY)
 returnfunction(frame)return_main(frame,'Flag','unc',key)end-- which interprets the module call as {{flag|KEY}} and passes it to _main()
 end
 })