view lisp/toolbar/new.xpm @ 47587:7e861822d947

(gamegrid-face): new variable to emulate a buffer-local default face. (gamegrid-xbm): new variable; XBM image as a replacement for `gamegrid-xpm' on Emacsen compiled without XPM-support. (gamegrid-colorize-glyph): Ported XEmacs-code for the generation of images to Emacs. (gamegrid-match-spec): Call `gamegrid-make-image-from-vector' to convert XEmacs-type image descriptors. (gamegrid-color-display-p): Removed. (Use `display-colors-p' instead.) (gamegrid-make-image-from-vector): New function. Convert XEmacs' image descriptors. (gamegrid-display-type): Use Emacs' standard `display-.*-p' functions to check for display capabilities. Fix the recognition of image-support in Emacs 21 by this way. (gamegrid-hide-cursor): Removed. (gamegrid-setup-default-font): Ported the code from XEmacs to Emacs: create a new face and assign the variable `gamegrid-face' to it. Make sure that the face is not higher than the smallest image used by the game. (gamegrid-initialize-display): Use `(setq cursor-type nil)' instead of `gamegrid-hide-cursor'. (gamegrid-set-face): If `gamegrid-display-mode' is 'glyph, put an image in the buffer, instead of applying a face. (gamegrid-init-buffer): If `gamegrid-display-mode' is 'glyph, put the face held by `gamegrid-face' in an overlay over the whole buffer to emulate a buffer-local default-face.

/* XPM */
static char *magick[] = {
/* columns rows colors chars-per-pixel */
"24 24 7 1",
"  c Gray0",
". c #61b761b7600a",
"X c #828282827474",
"o c #a5d8a5d89550",
"O c #d305d305bc3c",
"+ c #ea03ea03d271",
"@ c None",
/* pixels */
"@@@@@@@@@@@@@@@@@@@@@@@@",
"@@@@@@@@@@@@@@@@@@@@@@@@",
"@@@@@@@@@@@@@ @@@@@@@@@@",
"@@@@@@@@@@@  o @@@@@@@@@",
"@@@@@@@@@  oO+ @@@@@@@@@",
"@@@@@@@  oOOOO+ @@@@@@@@",
"@@@@@  oOOOOOO+o @@@@@@@",
"@@@@ ..OOOOOO+++.@@@@@@@",
"@@@@ +.OOOOO+++++ @@@@@@",
"@@@@ ++.OOO++++++o @@@@@",
"@@@@ ++.oOO+++++++ @@@@@",
"@@@@ +.oOO+++++++++ @@@@",
"@@@@  oOO++++++++++O @@@",
"@@@@ .OOO+++++++++++O @@",
"@@@@ oOO++++++++++++X @@",
"@@@@@ +++++++++++++  @@@",
"@@@@@ O++++++++++O @@@@@",
"@@@@@@.+++++++++X @@@@@@",
"@@@@@@ +++++++O @@@@@@@@",
"@@@@@@@ +++++o @@@@@@@@@",
"@@@@@@@ O++O. @@@@@@@@@@",
"@@@@@@@@ +o @@@@@@@@@@@@",
"@@@@@@@@@  @@@@@@@@@@@@@",
"@@@@@@@@@@@@@@@@@@@@@@@@"
};