Weapon-Stats BBCode Table

function displayWeaponStats()
    local statsWeapons = {"grenade", "teargas", "molotov", "colt 45", "silenced", "deagle", "shotgun", "sawed-off", "combat shotgun", "uzi", "mp5", "ak-47", "m4", "tec-9", "rifle", "sniper", "rocket launcher", "rocket launcher hs", "flamethrower", "minigun", "satchel", "bomb", "spraycan", "fire extinguisher", "camera"}
    local dmg, acc, tRange, wRange, Odmg, Oacc, OtRange, OwRange
    local result = {}
    table.insert(result, "[table]")
        table.insert(result, "[tr]")
            table.insert(result, "[td]ID[/td]")
            table.insert(result, "[td]Name[/td]")
            table.insert(result, "[td]Accuracy[/td]")
            table.insert(result, "[td]Target Range[/td]")
            table.insert(result, "[td]Weapon Range[/td]")
            table.insert(result, "[td]Schaden[/td]")
        table.insert(result, "[/tr]")

    for id = 0, 41 do
        if table.find(statsWeapons, string.lower(getWeaponNameFromID(id))) then
            dmg = false
            if WEAPON_DAMAGE[id] or getWeaponProperty(id, "pro", "damage") then
                dmg = WEAPON_DAMAGE[id] or getWeaponProperty(id, "pro", "damage")
            end
            if dmg then
                acc = getWeaponProperty(id, "pro", "accuracy") or " - "
                tRange = getWeaponProperty(id, "pro", "target_range") or " - "
                wRange = getWeaponProperty(id, "pro", "weapon_range") or " - "

                Odmg = getOriginalWeaponProperty(id, "pro", "damage")
                Oacc = getOriginalWeaponProperty(id, "pro", "accuracy")
                OtRange = getOriginalWeaponProperty(id, "pro", "target_range")
                OwRange = getOriginalWeaponProperty(id, "pro", "weapon_range")

                table.insert(result, "[tr]")
                    table.insert(result, ("[td]%d[/td]"):format(id))
                    table.insert(result, ("[td]%s[/td]"):format(getWeaponNameFromID(id)))
                    table.insert(result, ("[td]%s (%s)[/td]"):format(acc, Oacc))
                    table.insert(result, ("[td]%s (%s)[/td]"):format(tRange, OtRange))
                    table.insert(result, ("[td]%s (%s)[/td]"):format(wRange, OwRange))
                    table.insert(result, ("[td]%s (%s)[/td]"):format(dmg, Odmg))
                table.insert(result, "[/tr]")
            end
        end
    end
    table.insert(result, "[/table]")
    for index, val in ipairs(result) do
        outputConsole(val)
    end
end
displayWeaponStats()