summaryrefslogtreecommitdiffstats
path: root/timeout.inc
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2009-01-27 17:30:08 +0000
committerPascal Rigaux <pixel@mandriva.com>2009-01-27 17:30:08 +0000
commit5ce8d30439463838f845c78bc926cc9b310a8743 (patch)
treebb1852dc58711c7baee31216a765067dfa49b65b /timeout.inc
parent10658e71475bd964263d09f1a661f24fadfaf496 (diff)
downloadbootloader-theme-5ce8d30439463838f845c78bc926cc9b310a8743.tar
bootloader-theme-5ce8d30439463838f845c78bc926cc9b310a8743.tar.gz
bootloader-theme-5ce8d30439463838f845c78bc926cc9b310a8743.tar.bz2
bootloader-theme-5ce8d30439463838f845c78bc926cc9b310a8743.tar.xz
bootloader-theme-5ce8d30439463838f845c78bc926cc9b310a8743.zip
imported openSUSE.tar.bz2 (from gfxboot-4.1.19-2.1.src.rpm)4.1.19.1
Diffstat (limited to 'timeout.inc')
-rw-r--r--timeout.inc147
1 files changed, 0 insertions, 147 deletions
diff --git a/timeout.inc b/timeout.inc
deleted file mode 100644
index 069e1c1..0000000
--- a/timeout.inc
+++ /dev/null
@@ -1,147 +0,0 @@
-%
-% include before common.inc
-%
-
-% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-% Boot timeout counter.
-%
-% ( timeout time ) ==> ( )
-%
-% timeout: total time in 18.2Hz steps, time: current value.
-%
-% The code below assumes we're showing seconds and some symbolic counter.
-%
-/Timeout {
- % first time
- timeout.current .undef eq { over timeout.init } if
-
- % no counter
- timeout.steps .undef eq { return } if
-
- /timeout.s.last timeout.s.current def
- /timeout.s.current over 10 mul 150 add 182 div def
-
- /timeout.last timeout.current def
- over sub neg timeout.steps mul exch div
- /timeout.current exch def
-
- timeout.current timeout.steps ge {
- % last run
- timeout.s.done
- timeout.done
- } {
- % 0 270 moveto timeout.last print "<" print timeout.current print "<" print
-
- timeout.s.last timeout.s.current ne { timeout.s.current timeout.s.update } if
-
- timeout.last timeout.current ne {
- timeout.last 1 add 1 timeout.current { timeout.update } for
- } if
-
- } ifelse
-} def
-
-
-% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-% Initialize timeout indicator.
-%
-% ( time ) ==> ( )
-%
-/timeout.init {
- "timer_a.jpg" findfile /timeout.file over def dup .undef ne {
- currentimage exch setimage
- 0 0 image.size unpackimage /timeout.image exch def
- setimage
-
- /timeout.steps timeout.image imgsize div def
-
- /timeout.width timeout.image imgsize exch pop def
-
- /timeout.x menu.start.x menu.bar.width add 24 sub def
- /timeout.y menu.start.y menu.entry menu.item.height mul add def
-
- timeout.x timeout.y moveto
- /timeout.bg timeout.width dup savescreen def
- % just a few buffers
- /timeout.img_buf timeout.width dup savescreen def
- /timeout.alpha_buf timeout.width dup savescreen def
-
- /timeout.current 0 def
-
- timeout.current timeout.update
- } { pop } ifelse
-
- /timeout.s.buf 64 string def
- /timeout.s.x 100 def
- /timeout.s.y 250 def
- /timeout.s.current -1 def
-
- pop
-} def
-
-
-% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-% Update timeout indicator.
-%
-% ( index ) ==> ( )
-%
-% index runs from 0 to timeout.steps - 1. It is guaranteed that index is
-% 1 larger than the last index. Never a step twice and no step is left out.
-%
-/timeout.update {
- timeout.width mul 0 moveto
- timeout.image 255 timeout.alpha_buf blend
-
- timeout.img_buf timeout.bg dup length memcpy
-
- 0 0 moveto
- black timeout.alpha_buf timeout.img_buf blend
-
- timeout.x timeout.y moveto
- timeout.img_buf restorescreen
-} def
-
-
-% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-% Clear timeout indicator.
-%
-% ( ) ==> ( )
-%
-/timeout.done {
- timeout.x timeout.y moveto
- timeout.bg restorescreen
-
- /timeout.bg timeout.bg free .undef def
- /timeout.img_buf timeout.img_buf free .undef def
- /timeout.alpha_buf timeout.alpha_buf free .undef def
- /timeout.image timeout.image free .undef def
- /timeout.file timeout.file free .undef def
-} def
-
-
-% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-% Update seconds counter.
-%
-% ( time_in_s ) ==> ( )
-%
-/timeout.s.update {
-% white setcolor
-% timeout.s.x timeout.s.y moveto -30 0 rmoveto
-% currentpoint 30 fontheight image
-% "%ds" timeout.s.buf sprintf
-% timeout.s.x timeout.s.y moveto timeout.s.buf showright
- pop
-} def
-
-
-% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-% Clear seconds counter.
-%
-% ( ) ==> ( )
-%
-/timeout.s.done {
-% timeout.s.x timeout.s.y moveto -30 0 rmoveto
-% currentpoint 30 fontheight image
-} def
-
-