include window
call OK start_color
call OK refresh
comparend color_start.chk
comparend home.chk
compare color_blank_draw.chk
call OK init_pair 4 $COLOR_RED $COLOR_GREEN
call OK wcolor_set $win1 4 NULL
call OK wprintw $win1 "%s" "test"
call OK wrefresh $win1
compare wcolor_set.chk