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.

Location:
abuse/trunk/data-mac/addon/deathmat
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • abuse/trunk/data-mac/addon/deathmat/deathmat.lsp

    r102 r582  
    66(defun net_file (x) (concatenate 'string net_dir x))
    77(load (net_file "dstartup.lsp"))
    8 (load "lisp/options.lsp")     
     8(load "lisp/options.lsp")
    99
    1010(local_load "lisp/input.lsp")
  • abuse/trunk/data-mac/addon/deathmat/dstartup.lsp

    r102 r582  
    1010      (load "addon/deathmat/cur_lev.lsp")
    1111      (set_first_level (nth current_net_level net_levels)))
    12  
     12
    1313  ;; save the level we are so joining clients know which one to load
    14   (open_file "addon/deathmat/cur_lev.lsp" "wb" 
     14  (open_file "addon/deathmat/cur_lev.lsp" "wb"
    1515             (print `(setq current_net_level ,current_net_level))))
    16  
     16
    1717
    1818;; this is a simple check to see if they player has an engine version
     
    3232    (progn
    3333      (print "\nPlease make sure you unzipped the game with the -d option")
    34       (print "so that all directories get created properly.")     
    35       (print "example : pkunzip -d abusXXXX.zip")     
     34      (print "so that all directories get created properly.")
     35      (print "example : pkunzip -d abusXXXX.zip")
    3636      (quit)))
    3737(setq load_warn T)
     
    5252             (print (list 'setq 'server_version_major (major_version) ))
    5353             (print (list 'setq 'server_version_minor (minor_version)))))
    54              
     54
    5555
    5656(if (not (am_a_client))
     
    5959;(let ((input (nice_input "DEATHMATCH : Enter your name below" "Name" username)))
    6060;  (open_file "addon/deathmat/username.lsp" "wb"
    61 ;            (print (list 'setq 'username 
     61;            (print (list 'setq 'username
    6262;                         (concatenate 'string '(#\") input '(#\"))))))
    6363
     
    8282(defun display_player (player text_x text_y)
    8383  (if player
    84       (with_object player       
    85         (put_string (get_main_font) text_x text_y 
    86                     (concatenate 'string (digstr (kills) 2) " " (player_name) 
    87                                                      (if (local_player) 
     84      (with_object player
     85        (put_string (get_main_font) text_x text_y
     86                    (concatenate 'string (digstr (kills) 2) " " (player_name)
     87                                                     (if (local_player)
    8888                                                         " <<"
    8989                                                       ""))
  • abuse/trunk/data-mac/addon/deathmat/large.lsp

    r102 r582  
    1 (setq net_levels 
     1(setq net_levels
    22      '("netlevel/8play1.spe"
    33        "netlevel/8play2.spe"
  • abuse/trunk/data-mac/addon/deathmat/medium.lsp

    r102 r582  
    1 (setq net_levels 
     1(setq net_levels
    22      '(
    33        "netlevel/4play1.spe"
  • abuse/trunk/data-mac/addon/deathmat/small.lsp

    r102 r582  
    1 (setq net_levels 
     1(setq net_levels
    22      '("netlevel/2play1.spe"
    33        "netlevel/2play2.spe"
Note: See TracChangeset for help on using the changeset viewer.