Changeset 590 for abuse/trunk/data/addon/twistTweet

Timestamp:

May 7, 2011, 5:12:10 PM (12 years ago)

Author:

Sam Hocevar

Message:

data: merge registered data into the main data directory.

Location:

abuse/trunk/data/addon/twist/lisp

Files:

• startup.lsp (modified) (2 diffs)
• title.lsp (modified) (1 diff)

abuse/trunk/data/addon/twist/lisp/startup.lsp

@@ -41 +41 @@
             "art/fore/techno4.spe"   ;; 300-460
             "art/fore/cave.spe"      ;; 500-634
+            "art/fore/alien.spe"    ;; 700-774
+            "art/fore/trees.spe"    ;; 800-931
+            "art/fore/endgame.spe"  ;; 950-1014
+            "art/fore/trees2.spe"   ;; 1100-1134
 
             "art/back/backgrnd.spe"  ;; 0
@@ -47 +51 @@
             "art/back/cave.spe"      ;; 84-103
             "art/back/tech.spe"      ;; 110-139
+            "art/back/alienb.spe"   ;; 150-179
+            "art/back/green2.spe"   ;; 200-268
+            "art/back/galien.spe"   ;; 300-320
             )
 
-(setq load_warn nil)
-(load "register/tiles.lsp")       ;; load up registered artwork if it's there
-(setq load_warn T)
+(defun end_game_ai ()
+  (if (activated)
+      (if (eq (aistate) 8)
+          (if (not (next_picture))
+              (request_end_game))
+        (set_aistate (+ (aistate) 1))))
+  T)
+
+
+(def_char END_GAME
+  (funs (ai_fun end_game_ai))
+  (range 0 0)
+  (states "art/fore/endgame.spe"
+          (stopped (app (seq "pipe" 1 9)
+                        (seq "pipe" 1 9)
+                        (seq "pipe" 1 9)
+                        (seq "pipe" 1 9)
+                        (seq "pipe" 1 9)
+                        (seq "pipe" 1 9)
+                        (seq "pipe" 1 9)
+                        (seq "pipe" 1 9)
+                        (seq "pipe" 1 9)))))
+
 
 (setf demos        '("levels/demo1.dat" "levels/demo3.dat" "levels/demo4.dat" "levels/demo5.dat"))

abuse/trunk/data/addon/twist/lisp/title.lsp

@@ -6 +6 @@
 (setf logo              '("addon/twist/art/title.spe" . "profound"))
 (setq help_screens '("addon/twist/art/title.spe" "pro1" "pro2" "pro3" "pro4" "pro5"))
-(setq sell_screens '(("addon/twist/art/title.spe" . "pro1")("addon/twist/art/title.spe" . "pro2")("addon/twist/art/title.spe" . "pro3")("addon/twist/art/title.spe" . "pro4")("addon/twist/art/title.spe" . "pro5")("art/endgame.spe" . "credit")))
+(setq sell_screens '(("addon/twist/art/title.spe" . "pro1")("addon/twist/art/title.spe" . "pro2")("addon/twist/art/title.spe" . "pro3")("addon/twist/art/title.spe" . "pro4")("addon/twist/art/title.spe" . "pro5")("art/fore/endgame.spe" . "credit")))