source: abuse-frabs/trunk/addon/twist/lisp/players.lsp @ 566

Last change on this file since 566 was 566, checked in by Sam Hocevar, 11 years ago

data: clean up data packages; remove cache profile data (.cpf), backup
files (.bak, .old), old DOS files (.ini, .386, .mem, .ini, .exe, .cfg)
and remove CRLF endings and trailing spaces from text files.

File size: 7.5 KB
Line 
1;; Copyright 1999 Profound Corp,  All Rights reserved
2;; See licensing information for more details on usage rights
3
4
5;; Ant
6(def_char REDANT
7  (vars in_climbing_area
8        disable_top_draw
9        just_hit
10        ship_pan_x
11        special_power
12        used_special_power
13        last1_x last1_y
14        last2_x last2_y
15        has_saved_this_level
16        r_ramp g_ramp b_ramp
17        is_teleporting
18        just_fired
19        has_compass
20        )
21  (range 50 50)
22  (abilities (walk_top_speed    6)
23             (jump_yvel        -7)
24             (run_top_speed    15)
25             (jump_top_speed   30)
26             (jump_xvel        20)
27             (stop_accel        9)
28             (start_accel       8)
29             (start_hp        100)
30             (hamper_xrange    80)
31             (push_xrange       9))
32
33  (flags     (hurtable          nil)
34             (unlistable        T))
35
36  (funs (move_fun           cop_mover)
37        (damage_fun         bottom_damage)
38        (draw_fun           bottom_draw)
39        (map_draw_fun       compass_draw)
40        (get_cache_list_fun cop_cache)
41        (user_fun           cop_ufun))
42
43  (states "art/ant.spe"
44          (stopped            "awlk0001.pcx")
45          (running            (seq "awlk" 1 10))
46
47          (fast_running       (seq "awlk" 1 10))
48          (fly_running        (seq "awlk" 1 10))
49
50          (fast_stopped       "awlk0001.pcx")
51          (fly_stopped        "awlk0001.pcx")
52
53          (dead               "hidden")
54
55          (start_run_jump     "acff0001.pcx")
56          (run_jump           "dive")
57          (run_jump_fall      "dive")
58          (end_run_jump       (seq "acff" 1 4))
59
60          (fly_start_run_jump     "acff0001.pcx")
61          (fly_run_jump           "dive")
62          (fly_run_jump_fall      "dive")
63          (fly_end_run_jump       (seq "acff" 1 4))
64
65          (fast_start_run_jump     "acff0001.pcx")
66          (fast_run_jump           "dive")
67          (fast_run_jump_fall      "dive")
68          (fast_end_run_jump       (seq "acff" 1 4))
69
70
71          (flinch_up           (rep "afh10001.pcx" 2))
72          (flinch_down         (rep "afh20001.pcx" 2))
73
74          (climbing             (seq "awlk" 1 10))
75          (climb_off            (seq "awlk" 1 8))
76          (climb_on             (seq "awlk" 8 1))
77          ))
78
79
80;; Who
81(def_char RAIDER
82  (vars in_climbing_area
83        disable_top_draw
84        just_hit
85        ship_pan_x
86        special_power
87        used_special_power
88        last1_x last1_y
89        last2_x last2_y
90        has_saved_this_level
91        r_ramp g_ramp b_ramp
92        is_teleporting
93        just_fired
94        has_compass
95        )
96  (range 50 50)
97  (abilities (walk_top_speed    9)
98             (jump_yvel       -25)
99             (run_top_speed    36)
100             (jump_top_speed   30)
101             (jump_xvel        27)
102             (stop_accel       27)
103             (start_accel      24)
104             (start_hp        100)
105             (hamper_xrange    80)
106             (push_xrange       9))
107
108  (flags     (hurtable          T)
109             (unlistable        T))
110
111  (funs (move_fun           cop_mover)
112        (damage_fun         bottom_damage)
113        (draw_fun           bottom_draw)
114        (map_draw_fun       compass_draw)
115        (get_cache_list_fun cop_cache)
116        (user_fun           cop_ufun))
117
118  (states "addon/twist/art/robs.spe"
119          (stopped            (seq "wgo" 1 3))
120          (running            (seq "wgo" 1 3))
121
122          (fast_running       (seq "wgo" 1 3))
123          (fly_running        (seq "wgo" 1 3))
124
125          (fast_stopped       (seq "wgo" 1 3))
126          (fly_stopped        (seq "wgo" 1 3))
127
128          (dead               "flinch")
129
130          (start_run_jump     (seq "wgo" 1 3))
131          (run_jump           (seq "wgo" 1 3))
132          (run_jump_fall      (seq "wgo" 1 3))
133          (end_run_jump       (seq "wgo" 1 3))
134
135          (fly_start_run_jump     (seq "wgo" 1 3))
136          (fly_run_jump           (seq "wgo" 1 3))
137          (fly_run_jump_fall      (seq "wgo" 1 3))
138          (fly_end_run_jump       (seq "wgo" 1 3))
139
140          (fast_start_run_jump     (seq "wgo" 1 3))
141          (fast_run_jump           (seq "wgo" 1 3))
142          (fast_run_jump_fall      (seq "wgo" 1 3))
143          (fast_end_run_jump       (seq "wgo" 1 3))
144
145
146          (flinch_up           '("flinch" "flinch" "flinch"))
147          (flinch_down         '("flinch" "flinch" "flinch"))
148
149          (climbing             (seq "wtrn" 1 9))
150          (climb_off            (seq "wtrn" 1 8))
151          (climb_on             (seq "wtrn" 8 1))
152          ))
153
154
155;; Rob1
156(def_char BLADES
157  (vars in_climbing_area
158        disable_top_draw
159        just_hit
160        ship_pan_x
161        special_power
162        used_special_power
163        last1_x last1_y
164        last2_x last2_y
165        has_saved_this_level
166        r_ramp g_ramp b_ramp
167        is_teleporting
168        just_fired
169        has_compass
170        )
171  (range 50 50)
172  (abilities (walk_top_speed    3)
173             (jump_yvel         0)
174             (run_top_speed     6)
175             (jump_top_speed   40)
176             (jump_xvel        27)
177             (stop_accel        9)
178             (start_accel       8)
179             (start_hp        100)
180             (hamper_xrange    80)
181             (push_xrange       9))
182
183  (flags     (hurtable          T)
184             (unlistable        T))
185
186  (funs (move_fun           cop_mover)
187        (damage_fun         bottom_damage)
188        (draw_fun           bottom_draw)
189        (map_draw_fun       compass_draw)
190        (get_cache_list_fun cop_cache)
191        (user_fun           cop_ufun))
192
193  (states "addon/twist/art/robs.spe"
194          (stopped            (seq "clen" 1 10))
195          (running            (seq "clen" 1 10))
196
197          (fast_running       (seq "clen" 1 10))
198          (fly_running        (seq "clen" 1 10))
199
200          (fast_stopped       (seq "clen" 1 10))
201          (fly_stopped        (seq "clen" 1 10))
202
203          (dead               (seq "clen" 1 10))
204
205          (start_run_jump     (seq "clen" 1 10))
206          (run_jump           (seq "clen" 1 10))
207          (run_jump_fall      (seq "clen" 1 10))
208          (end_run_jump       (seq "clen" 1 10))
209
210          (fly_start_run_jump     (seq "clen" 1 10))
211          (fly_run_jump           (seq "clen" 1 10))
212          (fly_run_jump_fall      (seq "clen" 1 10))
213          (fly_end_run_jump       (seq "clen" 1 10))
214
215          (fast_start_run_jump     (seq "clen" 1 10))
216          (fast_run_jump           (seq "clen" 1 10))
217          (fast_run_jump_fall      (seq "clen" 1 10))
218          (fast_end_run_jump       (seq "clen" 1 10))
219
220
221          (flinch_up           (seq "clen" 1 10))
222          (flinch_down         (seq "clen" 1 10))
223
224          (climbing             (seq "clen" 1 10))
225          (climb_off            (seq "clen" 1 8))
226          (climb_on             (seq "clen" 8 1))
227          ))
228
229
230;; JUGGER
231(def_char JUGGERMAN
232  (vars in_climbing_area
233        disable_top_draw
234        just_hit
235        ship_pan_x
236        special_power
237        used_special_power
238        last1_x last1_y
239        last2_x last2_y
240        has_saved_this_level
241        r_ramp g_ramp b_ramp
242        is_teleporting
243        just_fired
244        has_compass
245        )
246  (range 50 50)
247  (abilities (walk_top_speed    3)
248             (jump_yvel       -10)
249             (run_top_speed     2)
250             (jump_top_speed    3)
251             (jump_xvel         3)
252             (stop_accel        9)
253             (start_accel       8)
254             (start_hp        200)
255             (hamper_xrange    80)
256             (push_xrange       9))
257
258  (flags     (hurtable          T)
259             (unlistable        T))
260
261  (funs (move_fun           cop_mover)
262        (damage_fun         bottom_damage)
263        (draw_fun           bottom_draw)
264        (map_draw_fun       compass_draw)
265        (get_cache_list_fun cop_cache)
266        (user_fun           cop_ufun))
267
268  (states "art/jug.spe"
269          (stopped            "robo0001.pcx")
270          (running            (seq "rwlk" 1 13))
271
272          (fast_running       (seq "rwlk" 1 13))
273          (fly_running        (seq "rwlk" 1 13))
274
275          (fast_stopped       "robo0001.pcx")
276          (fly_stopped        "robo0001.pcx")
277
278          (dead               "jugdie0001.pcx")
279
280          (start_run_jump     (seq "rwlk" 1 13))
281          (run_jump           (seq "rwlk" 1 13))
282          (run_jump_fall      (seq "rwlk" 1 13))
283          (end_run_jump       (seq "rwlk" 1 13))
284
285          (fly_start_run_jump     (seq "rwlk" 1 13))
286          (fly_run_jump           (seq "rwlk" 1 13))
287          (fly_run_jump_fall      (seq "rwlk" 1 13))
288          (fly_end_run_jump       (seq "rwlk" 1 13))
289
290          (fast_start_run_jump     (seq "rwlk" 1 13))
291          (fast_run_jump           (seq "rwlk" 1 13))
292          (fast_run_jump_fall      (seq "rwlk" 1 13))
293          (fast_end_run_jump       (seq "rwlk" 1 13))
294
295
296          (flinch_up           (seq "robo" 1 10))
297          (flinch_down         (seq "robo" 1 10))
298
299          (climbing             (seq "rwlk" 1 13))
300          (climb_off            (seq "rwlk" 1 8))
301          (climb_on             (seq "rwlk" 8 1))
302          ))
303
Note: See TracBrowser for help on using the repository browser.