You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
67 lines
1.3 KiB
67 lines
1.3 KiB
19 years ago
|
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
||
|
%
|
||
|
% Driver update dialog.
|
||
|
%
|
||
|
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
||
|
|
||
|
|
||
|
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
||
|
% Show driver update.
|
||
|
%
|
||
|
% ( ) => ( )
|
||
|
%
|
||
|
/dud.redraw {
|
||
|
update.pos exch pop 0 exch moveto currentpoint
|
||
|
txt_dud_ready strsize 7 add exch pop clip.size pop exch
|
||
|
image
|
||
|
|
||
|
do_driverupdate {
|
||
|
currentfont
|
||
|
font.normal setfont
|
||
|
update.pos moveto 8 3 rmoveto txt_dud_ready
|
||
|
ptheme { white } { lightblue } ifelse setcolor show
|
||
|
setfont
|
||
|
} if
|
||
|
} def
|
||
|
|
||
|
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
||
|
% Toggle driver update.
|
||
|
%
|
||
|
% ( ) => ( )
|
||
|
%
|
||
|
/panel.dud {
|
||
|
do_driverupdate .undef eq {
|
||
|
/do_driverupdate 1 def
|
||
|
} {
|
||
|
/do_driverupdate .undef def
|
||
|
} ifelse
|
||
|
|
||
|
dud.redraw
|
||
|
|
||
|
"driverupdate" help.setcontext
|
||
|
} def
|
||
|
|
||
|
|
||
|
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
||
|
% Return width of driver update entry.
|
||
|
%
|
||
|
% ( ) => ( width )
|
||
|
%
|
||
|
/panel.dud.width {
|
||
|
txt_driver_update strsize pop
|
||
|
} def
|
||
|
|
||
|
|
||
|
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
||
|
% Redraw panel entry.
|
||
|
%
|
||
|
% ( panel ) => ( )
|
||
|
%
|
||
|
/panel.dud.update {
|
||
|
panel.text.moveto
|
||
|
|
||
|
txt_driver_update show
|
||
|
} def
|
||
|
|
||
|
|