/DefaultRootGrayOrColor 0.88 0.88 0.88 rgbcolor store /backgroundcolor 1 1 1 rgbcolor store /textcolor 0.00 0.00 0.00 rgbcolor store LiteWindow begin /ClientFillColor backgroundcolor store /FrameFillColor 0.50 0.50 0.50 rgbcolor store /KeyFocusColor 0.00 0.00 0.00 rgbcolor store end UserProfile begin /NtermTextColor 0.00 0.00 0.00 rgbcolor store /NtermFillColor 1 1 1 rgbcolor store /NtermCaretColor 0.00 0.00 0.00 rgbcolor store end { framebuffer setcanvas PaintRoot { /setfgcolor where { pop % Hack Warning (find nterm windows) /NtermTextColor UserProfile 1 index known { UserProfile exch get dup /setfgcolor Text send /setfgcolor Win send } { pop } ifelse /NtermFillColor UserProfile 1 index known { UserProfile exch get dup /setbgcolor Text send /setbgcolor Win send } { pop } ifelse /NtermCaretColor UserProfile 1 index known { UserProfile exch get /setcaretcolor Text send } { pop } ifelse } if /paint self send} AllWin } fork pop