Uma função inútil que retorna o último sábado do mês...
function getLastSaturday(mes, ano) local date ={day=31, month= mes, year=ano} local saturday =os.date("*t",os.time(date)).wday return 31-(saturday%7) end
exemplo de uso:
print(getLastSaturday(8, 2015)) -- 29print(getLastSaturday(9, 2015)) -- 26print(getLastSaturday(10, 2015)) -- 31print(getLastSaturday(11, 2015)) -- 28print(getLastSaturday(12, 2015)) -- 26print(getLastSaturday(12, 2016)) -- 31