Changeset 582 for abuse/trunk/data-abuse/addonTweet

Timestamp:

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

Author:

Sam Hocevar

Message:

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

Location:

abuse/trunk/data-abuse/addon

Files:

• deathmat/deathmat.lsp (modified) (1 diff)
• deathmat/dstartup.lsp (modified) (5 diffs)
• deathmat/large.lsp (modified) (1 diff)
• deathmat/medium.lsp (modified) (1 diff)
• deathmat/small.lsp (modified) (1 diff)
• example/example.lsp (modified) (3 diffs)

abuse/trunk/data-abuse/addon/deathmat/deathmat.lsp

@@ -6 +6 @@
 (defun net_file (x) (concatenate 'string net_dir x))
 (load (net_file "dstartup.lsp"))
-(load "lisp/options.lsp")     
+(load "lisp/options.lsp")
 
 (load "lisp/input.lsp")

abuse/trunk/data-abuse/addon/deathmat/dstartup.lsp

@@ -10 +10 @@
       (load "config/cur_lev.lsp")
       (set_first_level (nth current_net_level net_levels)))
-  
+
   ;; save the level we are so joining clients know which one to load
-  (open_file "config/cur_lev.lsp" "wb" 
+  (open_file "config/cur_lev.lsp" "wb"
              (print `(setq current_net_level ,current_net_level))))
-  
+
 
 ;; this is a simple check to see if they player has an engine version
@@ -32 +32 @@
     (progn
       (print "\nPlease make sure you unzipped the game with the -d option")
-      (print "so that all directories get created properly.")      
-      (print "example : pkunzip -d abusXXXX.zip")      
+      (print "so that all directories get created properly.")
+      (print "example : pkunzip -d abusXXXX.zip")
       (quit)))
 (setq load_warn T)
@@ -52 +52 @@
              (print (list 'setq 'server_version_major (major_version) ))
              (print (list 'setq 'server_version_minor (minor_version)))))
-              
+
 
 (if (not (am_a_client))
@@ -59 +59 @@
 ;(let ((input (nice_input "DEATHMATCH : Enter your name below" "Name" username)))
 ;  (open_file "config/username.lsp" "wb"
-;            (print (list 'setq 'username 
+;            (print (list 'setq 'username
 ;                         (concatenate 'string '(#\") input '(#\"))))))
 
@@ -82 +82 @@
 (defun display_player (player text_x text_y)
   (if player
-      (with_object player       
-        (put_string (get_main_font) text_x text_y 
-                    (concatenate 'string (digstr (kills) 2) " " (player_name) 
-                                                     (if (local_player) 
+      (with_object player
+        (put_string (get_main_font) text_x text_y
+                    (concatenate 'string (digstr (kills) 2) " " (player_name)
+                                                     (if (local_player)
                                                          " <<"
                                                        ""))

abuse/trunk/data-abuse/addon/deathmat/large.lsp

@@ -1 @@
-(setq net_levels 
+(setq net_levels
       '("netlevel/8play1.spe"
         "netlevel/8play2.spe"

abuse/trunk/data-abuse/addon/deathmat/medium.lsp

@@ -1 @@
-(setq net_levels 
+(setq net_levels
       '(
         "netlevel/4play1.spe"

abuse/trunk/data-abuse/addon/deathmat/small.lsp

@@ -1 @@
-(setq net_levels 
+(setq net_levels
       '("netlevel/2play1.spe"
         "netlevel/2play2.spe"

abuse/trunk/data-abuse/addon/example/example.lsp

@@ -11 +11 @@
 ;;;; if you do not already have the directory c:\abuse\addon, make it now.
 
-;;;; If you created foretiles for abuse (using Satan Paint) you should 
+;;;; If you created foretiles for abuse (using Satan Paint) you should
 ;;;; start numbering them at 1200 because the last of the registered
 ;;;; tiles end at 1100 something.  Backtiles should start numbering at 350.
@@ -36 +36 @@
 ;;;; ****************** CREATING PACKAGES *******************
 ;;;; to archive this package you should do the following
-;;;;   DOS : 
+;;;;   DOS :
 ;;;;     cd c:\abuse\addon
 ;;;;     pkzip -rp example.zip example\*.*
@@ -57 +57 @@
 
 ;;;; Now the meat of this package :
-;;;; Note that slashes should be FORWARD slashes even if 
+;;;; Note that slashes should be FORWARD slashes even if
 ;;;; you are using DOS
 
 ;; load up some tiles I made.  You can add more filenames
 ;; if you wish, but they should all be loaded from 'your' dir.
-(load_tiles "addon/example/example.spe")   
+(load_tiles "addon/example/example.spe")
 
 ;; set the first level to the one I made
-(set_first_level "addon/example/example.lvl")  
+(set_first_level "addon/example/example.lvl")
 
 ;; load up the normal abuse startup file
-(load "abuse.lsp")                       
+(load "abuse.lsp")