/usr/share/ngraph-gtk/addin/timer.nsc is in ngraph-gtk-addins 6.07.02-2build3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 | # Description: _Timer,Countdown timer,
BAR_X=1000
BAR_Y=19000
BAR_W=19000
BAR_H=3000
new dialog
dialog::title="Countdown timer"
dialog::caption="Countdown (minutes):"
T=${dialog::integer_entry:"1 120 1 30"}
del dialog
if [ -z "$T" ]
then
exit
fi
for inst in text:timer int:timer
do
if exist -q $inst
then
del $inst
fi
done
T=`iexpr $T*60`
OBJ=`derive -instance draw`
system:0:hide_instance $OBJ
new int
int::name="timer"
int::@="$T+1"
new text
text::name="timer"
text::hidden=false
text::text='%{system::time:0}'
text::x=600
text::y=13000
text::pt=14200
text::font='Sans-serif'
new rectangle
rectangle::name="timer_bar"
rectangle::x1="$BAR_X"
rectangle::y1="$BAR_Y"
rectangle::x2="$BAR_X+$BAR_W"
rectangle::y2="$BAR_Y+$BAR_H"
rectangle::fill_G=255
rectangle::fill=true
rectangle::stroke=false
dup rectangle
rectangle::name="timer"
rectangle::fill=false
rectangle::stroke=true
rectangle::width=120
while int:timer:times
do
m=`iexpr "int(${int:timer:@}/60)"`
s=`iexpr "${int:timer:@}\\\\60"`
s=`get text:timer -field printf:"%02d $s"`
text:timer:text="%{system::time:0}\&\n$m:$s\&"
rectangle:timer_bar:x2="$BAR_W*${int:timer:@}/$T+${rectangle:timer:x1}"
rectangle:timer_bar:fill_G="255*${int:timer:@}/$T"
rectangle:timer_bar:fill_R="255*(1-${int:timer:@}/$T)"
gra::clear
gra::draw
sleep 1
done
del int:timer
del text:timer
del rectangle:timer
del rectangle:timer_bar
system:0:recover_instance $OBJ
gra::clear
gra::draw
|