//Generate "StadiumBG.GR" from "StadiumBG.DD"

U0 StadiumGen()
{
    U0 (*fp_old_update)(CDC *dc);
    CDC *dc, *dc2;

    Cd(__DIR__);
    AutoComplete;
    WinBorder;
    WinMax;
    DocCursor(OFF);
    DocClear;
    Type("StadiumBG.DD");
    "$CM,0,%d$", TEXT_ROWS - 3;
    fp_old_update = gr.fp_final_screen_update; //hide mouse cursor
    gr.fp_final_screen_update = NULL;

    Refresh(2,TRUE);
    dc2 = DCScreenCapture;
    dc = DCExt(dc2, 0, FONT_HEIGHT, GR_WIDTH, GR_HEIGHT);
    DCDel(dc2);

    GRWrite("StadiumBG", dc, DCSF_PALETTE_GET);
    DCDel(dc);

    DocCursor(ON);
    gr.fp_final_screen_update = fp_old_update;
    DocClear;
}

StadiumGen;