Changeset 582 for abuse/trunk/data/registerTweet

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/register

Files:

• ant.lsp (modified) (6 diffs)
• flyer.lsp (modified) (4 diffs)
• powerup.lsp (modified) (2 diffs)
• tiles.lsp (modified) (2 diffs)
• weapons.lsp (modified) (5 diffs)

abuse/trunk/data/register/ant.lsp

@@ -14 +14 @@
                   (set_aistate 10)        ;; end game
                 (set_aistate 5)))))))         ;; fade out
-    
-(defun boss_cons () 
+
+(defun boss_cons ()
   (set_hp 1)
   (setq taunt_time 20))
@@ -24 +24 @@
         (playerx (+ (with_object (bg) (x)) (with_object (bg) (* (xvel) 8))))
         (playery (+ (- (with_object (bg) (y)) 15) (with_object (bg) (* (yvel) 2)))))
-    
+
     (if (and (can_see (x) (y) firex firey nil) (can_see firex firey playerx playery nil))
         (progn
@@ -90 +90 @@
                   (7;; fade out
                    (set_targetable nil)
-                   (set_fade_count (+ (fade_count) 2))     
+                   (set_fade_count (+ (fade_count) 2))
                    (if (eq (fade_count) 14)
                        (progn
@@ -99 +99 @@
                          (setq taunt_time (- 30 (* (aitype) 2)))
                          (go_state 0))))
-          
-                  (10;; game over         
+
+                  (10;; game over
                    (set_state hiding)
                    (set_targetable nil)
@@ -114 +114 @@
 
           T))))
-           
 
-           
-             
+
+
+
 (def_char BOSS_ANT
   (funs (ai_fun boss_ai)
@@ -127 +127 @@
   (fields ("taunt_time" "taunt_tint")
          ("aistate" "aistate"))
-  (states  "register/boss.spe" 
+  (states  "register/boss.spe"
    (stopped "awlk0001.pcx")
    (hiding  "hidden")

abuse/trunk/data/register/flyer.lsp

@@ -9 +9 @@
   (flags (hurtable T))
   (abilities (start_hp 20))
-  (vars fire_delay burst_delay burst_total burst_wait burst_left 
+  (vars fire_delay burst_delay burst_total burst_wait burst_left
         max_xvel   max_yvel    smoke_time fire_time)
   (fields ("fire_delay"  who_fdelay)
@@ -19 +19 @@
           ("aitype"      ai_type)
           ("aistate"     ai_state))
-  
+
   (range 200 200)
   (states "art/flyer.spe"
@@ -37 +37 @@
   (flags (hurtable T))
   (abilities (start_hp 20))
-  (vars fire_delay burst_delay burst_total burst_wait burst_left 
+  (vars fire_delay burst_delay burst_total burst_wait burst_left
         max_xvel   max_yvel    smoke_time fire_time)
   (fields ("fire_delay"   who_fdelay)
@@ -47 +47 @@
           ("aitype"       ai_type)
           ("aistate"      ai_state))
-  
+
   (range 200 200)
   (states "art/flyer.spe"

abuse/trunk/data/register/powerup.lsp

@@ -2 +2 @@
 ;; See licencing information for more details on usage rights
 
-(defun sneaky_power_ai () 
+(defun sneaky_power_ai ()
   (next_picture)
-  (if (touching_bg) 
-      (progn 
+  (if (touching_bg)
+      (progn
         (with_object (bg) (setq special_power SNEAKY_POWER))
         nil)
     T))
 
-(defun fly_power_ai () 
+(defun fly_power_ai ()
   (next_picture)
   (if (touching_bg)
-      (progn 
+      (progn
         (with_object (bg) (setq special_power FLY_POWER))
         nil)
@@ -19 +19 @@
 
 
-(defun health_power_ai () 
+(defun health_power_ai ()
   (next_picture)
-  (if (touching_bg) 
-      (progn 
-        (with_object (bg) 
+  (if (touching_bg)
+      (progn
+        (with_object (bg)
                      (progn
                        (setq special_power HEALTH_POWER)

abuse/trunk/data/register/tiles.lsp

@@ -1 +1 @@
 
-(load_tiles 
+(load_tiles
             "register/alien.spe"    ;; 700-774
             "register/trees.spe"    ;; 800-931
@@ -18 +18 @@
         (set_aistate (+ (aistate) 1))))
   T)
-      
+
 
 
 (def_char END_GAME
   (funs (ai_fun end_game_ai))
-  (range 0 0)  
+  (range 0 0)
   (states "art/endgame.spe"
           (stopped (app (seq "pipe" 1 9)

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)))