[langband-cvs] CVS: langband classes.lisp,1.148.2.11,1.148.2.12 package.lisp,1.109.2.5,1.109.2.6

[Stig E S. <st...@us...>]

Update of /cvsroot/langband/langband
In directory sc8-pr-cvs1:/tmp/cvs-serv10636

Modified Files:
      Tag: v017_loop_experiment_2
	classes.lisp package.lisp 
Log Message:
started work on getting missiles to work

Index: classes.lisp
===================================================================
RCS file: /cvsroot/langband/langband/classes.lisp,v
retrieving revision 1.148.2.11
retrieving revision 1.148.2.12
diff -C2 -d -r1.148.2.11 -r1.148.2.12
*** classes.lisp	20 Aug 2003 20:34:29 -0000	1.148.2.11
--- classes.lisp	22 Aug 2003 11:23:56 -0000	1.148.2.12
***************
*** 1698,1702 ****
  
  (defclass thrown-object-movement (sprite-movement)
!   ((move-speed :initform (* 2 +walk-speed+))
     (blocking? :initform t)
     ))
--- 1698,1707 ----
  
  (defclass thrown-object-movement (sprite-movement)
!   ((move-speed :initform (* 3 +walk-speed+))
!    (blocking? :initform t)
!    ))
! 
! (defclass missile-movement (sprite-movement)
!   ((move-speed :initform (* 3 +walk-speed+))
     (blocking? :initform t)
     ))

Index: package.lisp
===================================================================
RCS file: /cvsroot/langband/langband/package.lisp,v
retrieving revision 1.109.2.5
retrieving revision 1.109.2.6
diff -C2 -d -r1.109.2.5 -r1.109.2.6
*** package.lisp	21 Aug 2003 21:37:08 -0000	1.109.2.5
--- package.lisp	22 Aug 2003 11:23:57 -0000	1.109.2.6
***************
*** 111,114 ****
--- 111,115 ----
  	   #:message
  	   #:misc-player-info
+ 	   #:missile-movement
  	   #:monster-kind
  	   #:monster-knowledge