Ignore:
Timestamp:
May 6, 2011, 12:47:14 AM (10 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-abuse/lisp/sfx.lsp

    r566 r582  
    4747(def_sound 'TICK_SND       (sfxdir "timerfst.wav"))
    4848
    49 (setq PLAYER_PAIN (make-array 4 :initial-contents 
     49(setq PLAYER_PAIN (make-array 4 :initial-contents
    5050                              (list (def_sound (sfxdir "plpain01.wav"))
    5151                                    (def_sound (sfxdir "plpain02.wav"))
     
    5858                                   (def_sound (sfxdir "pldeth05.wav"))
    5959                                   (def_sound (sfxdir "pldeth07.wav")))))
    60                                    
     60
    6161
    6262;; jugger stomp
     
    8080
    8181;; shotgun/laser taking from the lava sample
    82 (def_sound 'ZAP_SND       (sfxdir "zap2.wav")) 
     82(def_sound 'ZAP_SND       (sfxdir "zap2.wav"))
    8383
    8484;; rocket launch sound
     
    9393
    9494;; machine gun hitting the floor, sounds 1 & 2, played randomly
    95 (def_sound    'MG_HIT_SND1 (sfxdir "mghit01.wav"))   
     95(def_sound    'MG_HIT_SND1 (sfxdir "mghit01.wav"))
    9696(def_sound    'MG_HIT_SND2 (sfxdir "mghit02.wav"))
    9797
     
    131131;; electricity shooting up from the ground
    132132(def_sound 'ELECTRIC_SND   (sfxdir "elect02.wav"))
    133  
     133
    134134;; rocket being fired
    135135(def_sound 'ROCKET_SND     (sfxdir "rocket02.wav"))
     
    185185
    186186
    187 (setq AMB_SOUNDS (make-array 17 :initial-contents (list 
     187(setq AMB_SOUNDS (make-array 17 :initial-contents (list
    188188                               (def_sound (sfxdir "ambtech1.wav"))   ;; 0
    189189                               (def_sound (sfxdir "ambtech2.wav"))  ;; 1
     
    224224      T)))
    225225
    226        
    227 (defun ambs_cons () 
     226
     227(defun ambs_cons ()
    228228  (set_xvel 100)  ;; delay time to 100
    229229  (set_yvel 127)) ;; set volume default to 127
    230230
    231 (def_char AMBIENT_SOUND 
     231(def_char AMBIENT_SOUND
    232232  (funs (ai_fun          amb_sound_ai)
    233233        (draw_fun        dev_draw)
     
    236236  (range 500 500)
    237237  (fields ("aitype" amb_num)
    238           ("yvel"   amb_vol)     
     238          ("yvel"   amb_vol)
    239239          ("xvel"   amb_rep)
    240240          ("xacel"  amb_rand))
    241241  (states "art/misc.spe"
    242242          (stopped "sfx_player")))
    243        
     243
    244244(setq song_list '("music/abuse01.hmi" "music/abuse02.hmi"))
    245245(setq current_song song_list)
     
    251251        (break)
    252252        (setq current_song (cdr current_song))
    253         (if (not current_song) 
     253        (if (not current_song)
    254254            (setq current_song song_list))
    255255        (break)
    256256        )))
    257257
    258                                    
     258
    259259(defun level_loaded (name)
    260260  (trace)
Note: See TracChangeset for help on using the changeset viewer.