Module:Sports table/totalscheck

Documentatie voor deze module kan aangemaakt worden op de volgende pagina: Module:Sports table/totalscheck/doc

local tc = {}

function tc.check(Args, team_list, ii_start, ii_end)
        local warn = {}

        local wtotal, dtotal, ltotal = 0,0,0
        local hwtotal, hdtotal, hltotal = 0,0,0
        local awtotal, adtotal, altotal = 0,0,0
        local pkwtotal, pkltotal, otwtotal, otltotal = 0,0,0,0
        local gftotal, gatotal = 0,0

        for ii = ii_start, ii_end do
                -- First get code
                local team_code_ii = team_list[ii]
                if team_code_ii ~= 'SPORTS_TABLE_TOTAL' then
                -- Now tabulate values
                        wtotal = wtotal + (tonumber(Args['win_'..team_code_ii]) or 0)
                        dtotal = dtotal + (tonumber(Args['draw_'..team_code_ii]) or 0)
                        ltotal = ltotal + (tonumber(Args['loss_'..team_code_ii]) or 0)
                        hwtotal = hwtotal + (tonumber(Args['hwin_'..team_code_ii]) or 0)
                        hdtotal = hdtotal + (tonumber(Args['hdraw_'..team_code_ii]) or 0)
                        hltotal = hltotal + (tonumber(Args['hloss_'..team_code_ii]) or 0)
                        awtotal = awtotal + (tonumber(Args['awin_'..team_code_ii]) or 0)
                        adtotal = adtotal + (tonumber(Args['adraw_'..team_code_ii]) or 0)
                        altotal = altotal + (tonumber(Args['aloss_'..team_code_ii]) or 0)
                        pkwtotal = pkwtotal + (tonumber(Args['PKwin_'..team_code_ii]) or 0)
                        pkltotal = pkltotal + (tonumber(Args['PKloss_'..team_code_ii]) or 0)
                        otwtotal = otwtotal + (tonumber(Args['OTwin_'..team_code_ii]) or 0)
                        otltotal = otltotal + (tonumber(Args['OTloss_'..team_code_ii]) or 0)
                        gftotal = gftotal + (tonumber(Args['gf_'..team_code_ii]) or 0) + (tonumber(Args['pf_'..team_code_ii]) or 0)
                        gatotal = gatotal + (tonumber(Args['ga_'..team_code_ii]) or 0) + (tonumber(Args['pa_'..team_code_ii]) or 0)
                end
        end
        if wtotal ~= ltotal then
                table.insert(warn, wtotal .. ' totaal aantal overwinningen != ' .. ltotal .. ' totaal aantal nederlagen')
        end
        if hwtotal ~= altotal then
                table.insert(warn, hwtotal .. ' totaal aantal thuis overwinningen != ' .. altotal .. ' totaal aantal uit nederlagen')
        end
        if awtotal ~= hltotal then
                table.insert(warn, awtotal .. ' totaal aantal uit overwinningen != ' .. hltotal .. ' totaal aantal thuis nederlagen')
        end
        if (2*math.floor(dtotal/2)) ~= dtotal then
                table.insert(warn, dtotal .. ' totaal aantal gelijke spelen is een oneven getal')
        end
        if hdtotal ~= adtotal then
                table.insert(warn, hdtotal .. ' totaal aantal thuis gelijke spelen != ' .. adtotal .. ' totaal aantal uit gelijke spelen')
        end
        if pkwtotal ~= pkltotal then
                table.insert(warn, pkwtotal .. ' totaal aantal PK-overwinningen != ' .. pkltotal .. ' totaal aantal PK-nederlagen')
        end
        if otwtotal ~= otltotal then
                table.insert(warn, otwtotal .. ' totaal aantal OT-overwinningen != ' .. otltotal .. ' totaal aantal OT-nederlagen')
        end
        if gftotal ~= gatotal then
                table.insert(warn, gftotal .. ' totaal aantal doelpunten voor != ' .. gatotal .. ' totaal aantal doelpunten tegen')
        end

        return warn
end

return tc