-------------------------------------------------------------------------------
-- restricts all research for a player
--
function Player_RestrictAllResearch(iPlayer)
    local iRace = Player_GetRace(iPlayer) + 1
    dofilepath([[data:scripts/race.lua]])
    dofilepath([[data:scripts/building and research/]] .. races[iRace][1] .. [[/research.lua]])
    for i, iCount in research do
        Player_RestrictResearchOption(iPlayer, iCount.Name)
    end
end