//Press <F5> to compile and run.

U0 NetOfDots()
{
        I64  i;
        CDC *dc = DCAlias;

        DocClear;
        dc->color = RED;
        for (i = 0; i < 480; i += 20)
                GrLine(dc, i, 0, 0, 480 - i, 3);
        DCDel(dc);
        PressAKey;
        DCFill;
}

NetOfDots;      //Run when #included