1217309Snwhitehorn#! /bin/sh
2220749Snwhitehorn# $Id: infobox6,v 1.7 2011/01/18 09:20:59 tom Exp $
3217309Snwhitehorn# get rid of all flickering by constructing a script unroll the loop, leaving
4217309Snwhitehorn# us in curses-mode until we're done counting.
5217309Snwhitehorn#
6217309Snwhitehorn# a little fancier than infobox5, this moves the widget at each step.
7217309Snwhitehorn
8217309Snwhitehorn. ./setup-vars
9217309Snwhitehorn
10217309Snwhitehorn. ./setup-tempfile
11217309Snwhitehorn
12217309Snwhitehornleft=10
13217309Snwhitehornunit="seconds"
14217309Snwhitehornlast='\'
15217309Snwhitehorn
16217309Snwhitehorncat >>$tempfile <<EOF
17217309Snwhitehorn$DIALOG $last
18217309SnwhitehornEOF
19217309Snwhitehorn
20217309Snwhitehornwhile test $left != 0
21217309Snwhitehorndo
22217309Snwhitehorn
23217309Snwhitehorncat >>$tempfile <<EOF
24217309Snwhitehorn	--sleep 1 \
25217309Snwhitehorn	--begin $left `expr $left + 5` \
26220749Snwhitehorn	--title "INFO BOX" $* $last
27217309Snwhitehorn        --infobox "Hi, this is an information box. It is
28217309Snwhitehorndifferent from a message box: it will
29217309Snwhitehornnot pause waiting for input after displaying
30217309Snwhitehornthe message. The pause here is only introduced
31217309Snwhitehornby the sleep command within dialog.
32217309SnwhitehornYou have $left $unit to read this..." 0 0 $last
33217309SnwhitehornEOF
34217309Snwhitehorn
35217309Snwhitehornleft=`expr $left - 1`
36217309Snwhitehorntest $left = 1 && unit="second"
37217309Snwhitehorndone
38217309Snwhitehorn
39217309Snwhitehornecho >>$tempfile
40217309Snwhitehorn
41217309Snwhitehorn. $tempfile
42