source: abuse-mac/trunk/register/tiles.lsp @ 102

Last change on this file since 102 was 102, checked in by Sam Hocevar, 11 years ago
File size: 2.1 KB
RevLine 
[102]1
2(load_tiles
3        "register/alien.spe"    ;; 700-774
4        "register/trees.spe"    ;; 800-931
5        "art/endgame.spe"       ;; 950-1014
6        "register/trees2.spe"   ;; 1100-1134
7
8        "register/alienb.spe"   ;; 150-179
9        "register/green2.spe"   ;; 200-268
10        "register/galien.spe"   ;; 300-320
11        )
12
13(defun end_game_ai ()
14  (if (activated)
15      (if (eq (aistate) 8)
16      (if (not (next_picture))
17          (request_end_game))
18    (set_aistate (+ (aistate) 1))))
19  T)
20     
21
22
23(def_char END_GAME
24  (funs (ai_fun end_game_ai))
25  (range 0 0) 
26  (states "art/endgame.spe"
27      (stopped '("pipe0001.pcx" "pipe0002.pcx" "pipe0003.pcx" "pipe0004.pcx" "pipe0005.pcx"
28                 "pipe0006.pcx" "pipe0007.pcx" "pipe0008.pcx" "pipe0009.pcx"
29                 "pipe0001.pcx" "pipe0002.pcx" "pipe0003.pcx" "pipe0004.pcx" "pipe0005.pcx"
30                 "pipe0006.pcx" "pipe0007.pcx" "pipe0008.pcx" "pipe0009.pcx"
31                 "pipe0001.pcx" "pipe0002.pcx" "pipe0003.pcx" "pipe0004.pcx" "pipe0005.pcx"
32                 "pipe0006.pcx" "pipe0007.pcx" "pipe0008.pcx" "pipe0009.pcx"
33                 "pipe0001.pcx" "pipe0002.pcx" "pipe0003.pcx" "pipe0004.pcx" "pipe0005.pcx"
34                 "pipe0006.pcx" "pipe0007.pcx" "pipe0008.pcx" "pipe0009.pcx"
35                 "pipe0001.pcx" "pipe0002.pcx" "pipe0003.pcx" "pipe0004.pcx" "pipe0005.pcx"
36                 "pipe0006.pcx" "pipe0007.pcx" "pipe0008.pcx" "pipe0009.pcx"
37                 "pipe0001.pcx" "pipe0002.pcx" "pipe0003.pcx" "pipe0004.pcx" "pipe0005.pcx"
38                 "pipe0006.pcx" "pipe0007.pcx" "pipe0008.pcx" "pipe0009.pcx"
39                 "pipe0001.pcx" "pipe0002.pcx" "pipe0003.pcx" "pipe0004.pcx" "pipe0005.pcx"
40                 "pipe0006.pcx" "pipe0007.pcx" "pipe0008.pcx" "pipe0009.pcx"
41                 "pipe0001.pcx" "pipe0002.pcx" "pipe0003.pcx" "pipe0004.pcx" "pipe0005.pcx"
42                 "pipe0006.pcx" "pipe0007.pcx" "pipe0008.pcx" "pipe0009.pcx"
43                 "pipe0001.pcx" "pipe0002.pcx" "pipe0003.pcx" "pipe0004.pcx" "pipe0005.pcx"
44                 "pipe0006.pcx" "pipe0007.pcx" "pipe0008.pcx" "pipe0009.pcx"
45    ))))
46
47
48
49
50
Note: See TracBrowser for help on using the repository browser.