<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">NAME
    Curses::UI::Number - Create and manipulate number widgets.

CLASS HIERARCHY
     Curses::UI::Widget
        |
        +----Curses::UI::Label
                |
                +----Curses::UI::Number

SYNOPSIS
     use Curses::UI;
     my $win = $cui-&gt;add('window_id', 'Window');
     my $number = $win-&gt;add(
             'mynum', 'Curses::UI::Number',
             -num =&gt; 5,
     );
     $number-&gt;draw;

DESCRIPTION
    Curses::UI::Number is a widget that shows a number in graphic form.

STANDARD OPTIONS
    "-parent", "-x", "-y", "-width", "-height", "-pad", "-padleft",
    "-padright", "-padtop", "-padbottom", "-ipad", "-ipadleft",
    "-ipadright", "-ipadtop", "-ipadbottom", "-title", "-titlefullwidth",
    "-titlereverse", "-onfocus", "-onblur".

    For an explanation of these standard options, see Curses::UI::Widget.

REMOVED OPTIONS
    "-text".

WIDGET-SPECIFIC OPTIONS
    *       "-num" &lt; NUMBER &gt;

             Number.
             Default value is undef.

    *       "-char" &lt; CHARACTER &gt;

             Foreground color.
             Possible values are defined in Curses::UI::Color.
             Default value is 'â–'.

STANDARD METHODS
    "layout", "draw", "intellidraw", "focus", "onFocus", "onBlur".

    For an explanation of these standard methods, see Curses::UI::Widget.

WIDGET-SPECIFIC METHODS
    *       "new(%parameters)"

             Constructor.
             Create widget with volume in graphic form, defined by -volume number.
             Returns object.

    *       "num([$number])"

             Get or set number.
             Returns number (0 - 9).

EXAMPLE1
     # Pragmas.
     use strict;
     use warnings;

     # Modules.
     use Curses::UI;

     # Object.
     my $cui = Curses::UI-&gt;new;
 
     # Main window.
     my $win = $cui-&gt;add('window_id', 'Window');
 
     # Add volume.
     $win-&gt;add(
             undef, 'Curses::UI::Number',
             '-num' =&gt; 5,
     );
 
     # Binding for quit.
     $win-&gt;set_binding(\&amp;exit, "\cQ", "\cC");
 
     # Loop.
     $cui-&gt;mainloop;

EXAMPLE2
     # Pragmas.
     use strict;
     use warnings;

     # Modules.
     use Curses::UI;

     # Object.
     my $cui = Curses::UI-&gt;new(
             -color_support =&gt; 1,
     );
 
     # Main window.
     my $win = $cui-&gt;add('window_id', 'Window');

     # Add number.
     my $num = $win-&gt;add(
             undef, 'Curses::UI::Number',
             '-border' =&gt; 1,
             '-num' =&gt; 0,
     );
 
     # Binding for quit.
     $win-&gt;set_binding(\&amp;exit, "\cQ", "\cC");

     # Time.
     $cui-&gt;set_timer(
             'timer',
             sub {
                     my $act = $num-&gt;num;
                     $act += 1;
                     if ($act &gt; 9) {
                             $act = 0;
                     }
                     $num-&gt;num($act);
                     return;
             },
             1,
     );
 
     # Loop.
     $cui-&gt;mainloop;

DEPENDENCIES
    Curses::UI::Common, Curses::UI::Label, Curses::UI::Widget, Encode.

SEE ALSO
    Curses::UI, Curses::UI::Widget.

REPOSITORY
    &lt;https://github.com/tupinek/Curses-UI-Number&gt;

AUTHOR
    Michal Ĺ&nbsp;paÄŤek &lt;mailto:skim@cpan.org&gt;

    &lt;http://skim.cz&gt;

LICENSE AND COPYRIGHT
    BSD license.

DEDICATION
    To Czech Perl Workshop 2014 and their organizers.

VERSION
    0.03

</pre></body></html>