void ClearScreen()
{
    static Uint32 color = ::SDL_MapRGB(
                ::global.video->format,
                CLEAR_SCREEN_COLOR_R,
                CLEAR_SCREEN_COLOR_G,
                CLEAR_SCREEN_COLOR_B);
    ::SDL_FillRect(::global.video, 0, color);
}