]> git.jsancho.org Git - gacela.git/blobdiff - gacela.lisp
(no commit message)
[gacela.git] / gacela.lisp
index b9b415a0b711121da8cb8dcea11faf2a75194669..de3a3f886a848fee75beb12de1266fa5758bb080 100644 (file)
      (init-video-mode)
      (SDL_WM_SetCaption ,title "")
      (init-frame-time)
+     (refresh-running-mobs)
      (process-events)
      (do () ((quit?))
         (glClear (+ GL_COLOR_BUFFER_BIT GL_DEPTH_BUFFER_BIT))
+        (logic-mobs)
+        (render-mobs)
         (glLoadIdentity)
         ,@code
         (SDL_GL_SwapBuffers)
         (delay-frame)
         (init-frame-time)
+        (refresh-running-mobs)
         (process-events)
         (setq running nil))))
 
   (free-all-resources)
 ;  (quit-audio)
   (quit-video-mode)
-;  (quit-all-procs)
+  (quit-all-mobs)
 ;  (clear-events)
 ;  (quit-events)
   (quit-sdl))