Beispiel #1
0
SCM
gucu_slk_color_x (SCM color_pair_number)
{
  SCM_ASSERT (scm_is_integer (color_pair_number), color_pair_number, SCM_ARG1,
	      "slk-color!");

  short c_color_pair_number = scm_to_short (color_pair_number);

  int ret = slk_color (c_color_pair_number);
  RETURNTF (ret);
}
Beispiel #2
0
int main(void)
{
    char labels[LCOUNT][19] = { "Help!", "File", "Print", "Text",
                                "Edit", "Quick", "Config", "System"
                              };
    int x;

    slk_init(0);
    initscr();
    start_color();
    init_pair(1,COLOR_BLUE,COLOR_WHITE);

    slk_color(1);
    for(x=0; x<LCOUNT; x++)
        slk_set(x+1,labels[x],CENTER);
    slk_refresh();
    getch();

    endwin();
    return 0;
}