window before the main window, displaying the contents of access.pcx at the bottom of the screen. If the timeout expires on this screen, then the default menu item will be booted without ever showing the main menu; conversely, any key press will show the main menu. The idea of this is to avoid everyone having to see a complicated main menu, while offering a visual indication that you need to press a key to get to it.master
parent
81f8157964
commit
dc9518ee13
@ -0,0 +1,61 @@
|
||||
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
||||
%
|
||||
% Splash screen (hidden-timeout mode).
|
||||
%
|
||||
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
||||
|
||||
|
||||
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
||||
% Create new splash window.
|
||||
%
|
||||
% ( ) ==> ( window )
|
||||
%
|
||||
/window.splash {
|
||||
widget.size array
|
||||
dup .type t_splash put
|
||||
} def
|
||||
|
||||
|
||||
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
||||
% Initialize splash window.
|
||||
%
|
||||
% ( window ) ==> ( )
|
||||
%
|
||||
/splash.init {
|
||||
pop
|
||||
} def
|
||||
|
||||
|
||||
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
||||
% Draw splash window.
|
||||
%
|
||||
% ( window ) ==> ( )
|
||||
%
|
||||
/splash.show {
|
||||
window.push
|
||||
|
||||
access.file dup .undef ne {
|
||||
setimage
|
||||
screen.size exch access.width sub 2 div exch access.height sub
|
||||
moveto 0 0 access.width access.height image
|
||||
|
||||
background.file setimage
|
||||
} { pop } ifelse
|
||||
} def
|
||||
|
||||
|
||||
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
||||
% Handle keyboard input.
|
||||
%
|
||||
% ( key_in ) ==> ( key_out )
|
||||
%
|
||||
/splash.input {
|
||||
/timeout.hidden false def
|
||||
0 0 moveto background.file setimage 0 0 image.size image
|
||||
window.done
|
||||
window.main
|
||||
dup window.init
|
||||
window.show
|
||||
lang.displayed not { panel.lang } if
|
||||
pop 0
|
||||
} def
|
Loading…
Reference in new issue