Function draw_inventory

outdated/win/gem/wingem1.c:865–924

}

static int
draw_inventory(PARMBLK *pb)
{
    GRECT area = *(GRECT *) &pb->pb_x;

    if (rc_intersect((GRECT *) &pb->pb_xc, &area)) {
        int gl, i, x = pb->pb_x, y = pb->pb_y, start_line = area.g_y - y;
        Gem_menu_item *it;

        v_set_mode(MD_REPLACE);
        v_set_text(menu_font.id, menu_font.size, BLACK, 0, 0, NULL);

        start_line /= menu_font.ch;
        y += start_line * menu_font.ch;
        x -= scroll_menu.px_hpos;
        start_line += scroll_menu.vpos;

        for (it = invent_list, i = start_line; --i >= 0 && it;
             it = it->Gmi_next)
            ;

        i = min((area.g_y - y + area.g_h + menu_font.ch - 1) / menu_font.ch,
                Anz_inv_lines - start_line);

        Vsync();
        area.g_h = menu_font.ch;

        for (; (--i >= 0) && it; it = it->Gmi_next, y += menu_font.ch) {
            if (it->Gmi_attr)
                v_set_text(FAIL, FALSE, BLUE, 1, FAIL, NULL); /* Bold */
            else
                v_set_text(FAIL, FALSE, BLACK, 0, FAIL, NULL);

            area.g_y = y;
            my_clear_area(&area);
            if ((gl = it->Gmi_glyph) != no_glyph) {
                int pla[8], h = min(menu_font.ch, Tile_heigth) - 1;

                pla[0] = pla[2] =
                    (gl % Tiles_per_line) * Tile_width; /* x_wert from */
                pla[1] = pla[3] =
                    (gl / Tiles_per_line) * Tile_heigth; /* y_wert from */
                pla[4] = pla[6] = x;                     /* x_wert to */
                pla[5] = pla[7] = y;                     /* y_wert to */
                pla[2] += Tile_width - 1;
                pla[3] += h;
                pla[6] += Tile_heigth - 1;
                pla[7] += h;

                vro_cpyfm(x_handle, S_ONLY, pla, &Tile_bilder, screen);
            }
            if (it->Gmi_identifier)
                it->Gmi_str[2] = it->Gmi_selected
                                     ? (it->Gmi_count == -1L ? '+' : '#')
                                     : '-';
            (*v_mtext)(x_handle, (x + 23) & ~7, y, it->Gmi_str);
        }
    }