Klog timestampy
[mirrors/Programs.git] / perl / curses / plaincurses.pl
CommitLineData
21c4e167
H
1#!/usr/bin/env perl
2use Curses;
3
4initscr;
5END{endwin;}
6
7printw("Normalni text\n");
8attron(A_BOLD);
9printw("Tucny text\n");
10attron(A_UNDERLINE);
11printw("Tucny a podtrzeny text\n");
12attron(A_BLINK);
13printw("Tucny, podtrzeny a blikajici text\n");
14attron(A_STANDOUT);
15printw("Jeste navic zvyrazneny text\n");
16attroff(A_BLINK);
17printw("Vypiname blikani\n");
18attrset(A_BLINK | A_BOLD);
19printw("Nyni je text pouze blikajici a tucny\n");
20
21getch;
This page took 0.134716 seconds and 4 git commands to generate.