75 |
:type 'color) |
:type 'color) |
76 |
|
|
77 |
(defcustom pong-border-color "white" |
(defcustom pong-border-color "white" |
78 |
"*Color used for pong balls." |
"*Color used for pong borders." |
79 |
:group 'pong |
:group 'pong |
80 |
:type 'color) |
:type 'color) |
81 |
|
|
155 |
'(((glyph colorize) |
'(((glyph colorize) |
156 |
(t ?\+)) |
(t ?\+)) |
157 |
((color-x color-x) |
((color-x color-x) |
158 |
(mono-x grid-x)) |
(mono-x grid-x) |
159 |
;; The colors used to be [0.5 0.5 0.5], but that produces a black |
(color-tty color-tty)) |
160 |
;; color on 8-color tty's, which would make the border invisible. |
(((glyph color-x) [0.5 0.5 0.5]) |
|
;; 0.51 produces white on such tty's, and at the same time has |
|
|
;; almost no effect on X and similar displays. |
|
|
(((glyph color-x) [0.51 0.51 0.51]) |
|
161 |
(color-tty pong-border-color)))) |
(color-tty pong-border-color)))) |
162 |
|
|
163 |
(defconst pong-blank 0) |
(defconst pong-blank 0) |