Ignore:
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:
1 edited

Legend:

Unmodified
Added
Removed
  • abuse/trunk/data/register/weapons.lsp

    r54 r582  
    4444
    4545
    46 (defun lsaber_draw () 
     46(defun lsaber_draw ()
    4747  (let ((c1 (find_rgb 255 255 255))
    4848        (c2 (find_rgb 70 59 67))
     
    8484  (if (and (eq 0 (mod (game_tick) 2)) (not (frame_panic)))
    8585      (let ((rand (rand_on)))
    86         (with_object (add_object SMALL_LIGHT_CLOUD (+ (x) (random 3)) 
     86        (with_object (add_object SMALL_LIGHT_CLOUD (+ (x) (random 3))
    8787                                 (- (y) (random 3) (/ (picture_height) 2)))
    8888                     (set_fade_count 11))
     
    9393          (let ((mex (x))
    9494                (mey (y)))
    95             (with_object (get_object 0) (find_object_in_area (- mex 7) 
    96                                                              (- mey 7) 
    97                                                              (+ mex 7) 
     95            (with_object (get_object 0) (find_object_in_area (- mex 7)
     96                                                             (- mey 7)
     97                                                             (+ mex 7)
    9898                                                             (+ mey 7) bad_guy_list))))
    99       (progn   
     99      (progn
    100100        (do_white_explo 40 45)
    101101        nil)
     
    110110                    (set_aistate (mod (+ (aistate) 35) 360))
    111111                  (set_aistate (mod (+ (aistate) 325 ) 360)))))))
    112       T))   
     112      T))
    113113)
    114114
     
    116116
    117117(defun dfris_cache (type)
    118   (list (list EXPLODE8 EXP_LIGHT) 
     118  (list (list EXPLODE8 EXP_LIGHT)
    119119        (list GRENADE_SND)))
    120120
Note: See TracChangeset for help on using the changeset viewer.