Changeset 582 for abuse/trunk/data/register/weapons.lspTweet

Timestamp:

May 6, 2011, 12:47:14 AM (11 years ago)

Author:

Sam Hocevar

Message:

data: remove \r and trailing spaces and tabs from all Lisp sources.

File:

• abuse/trunk/data/register/weapons.lsp (modified) (5 diffs)

abuse/trunk/data/register/weapons.lsp

@@ -44 +44 @@
 
 
-(defun lsaber_draw () 
+(defun lsaber_draw ()
   (let ((c1 (find_rgb 255 255 255))
         (c2 (find_rgb 70 59 67))
@@ -84 +84 @@
   (if (and (eq 0 (mod (game_tick) 2)) (not (frame_panic)))
       (let ((rand (rand_on)))
-        (with_object (add_object SMALL_LIGHT_CLOUD (+ (x) (random 3)) 
+        (with_object (add_object SMALL_LIGHT_CLOUD (+ (x) (random 3))
                                  (- (y) (random 3) (/ (picture_height) 2)))
                      (set_fade_count 11))
@@ -93 +93 @@
           (let ((mex (x))
                 (mey (y)))
-            (with_object (get_object 0) (find_object_in_area (- mex 7) 
-                                                             (- mey 7) 
-                                                             (+ mex 7) 
+            (with_object (get_object 0) (find_object_in_area (- mex 7)
+                                                             (- mey 7)
+                                                             (+ mex 7)
                                                              (+ mey 7) bad_guy_list))))
-      (progn    
+      (progn
         (do_white_explo 40 45)
         nil)
@@ -110 +110 @@
                     (set_aistate (mod (+ (aistate) 35) 360))
                   (set_aistate (mod (+ (aistate) 325 ) 360)))))))
-      T))    
+      T))
 )
 
@@ -116 +116 @@
 
 (defun dfris_cache (type)
-  (list (list EXPLODE8 EXP_LIGHT) 
+  (list (list EXPLODE8 EXP_LIGHT)
         (list GRENADE_SND)))