Name: Anonymous 2007-10-31 18:37
Is it doable? What do I use? Are there some books? Should I use a real programming language instead?
(defvar *window*)
(defun init-graphics ()
(setf *window* (ncurses:initscr))
(ncurses:curs-set 0)
(ncurses:start-color)
(ncurses:noecho)
(ncurses:cbreak))
(defun cleanup-graphics ()
(ncurses:echo)
(ncurses:curs-set 1)
(ncurses:nocbreak)
(ncurses:endwin))
(defun clear-screen ()
(ncurses:erase))
(defun refresh-screen ()
(ncurses:refresh))
(defun move-add-char (x y character)
(ncurses:mvaddch y x (char-code character)))
(defun get-char ()
(code-char (ncurses:getch)))
(defun move-add-string (x y string)
(ncurses:echo)
(ncurses:mvaddstr y x string)
(ncurses:noecho))
(defun screen-width ()
ncurses:+screen-width+)
(defun screen-height ()
ncurses:+screen-height+)