[566] | 1 | ;; Copyright 1995 Crack dot Com, All Rights reserved |
---|
| 2 | ;; See licensing information for more details on usage rights |
---|
| 3 | |
---|
| 4 | |
---|
| 5 | (perm-space) |
---|
| 6 | |
---|
| 7 | (setq load_warn nil) |
---|
| 8 | (setq section 'game_section) |
---|
| 9 | (if (not (load "lisp/english.lsp")) ;; load language specific stuff |
---|
| 10 | (progn |
---|
| 11 | (print "Please make sure you unzipped the game with the -d option") |
---|
[582] | 12 | (print "so that all directories get created properly.") |
---|
| 13 | (print "example : pkunzip -d abusXXXX.zip") |
---|
[566] | 14 | (quit))) |
---|
| 15 | (setq load_warn T) |
---|
| 16 | |
---|
| 17 | |
---|
| 18 | (load "lisp/common.lsp") |
---|
| 19 | (load "lisp/userfuns.lsp") |
---|
[582] | 20 | (load "lisp/options.lsp") |
---|
[566] | 21 | (load "lisp/startup.lsp") |
---|
| 22 | (if (not (local_load "addon/twist/lisp/input.lsp")) |
---|
| 23 | (load "addon/twist/lisp/input.lsp")) |
---|
| 24 | |
---|
| 25 | (load "lisp/sfx.lsp") |
---|
| 26 | (load "lisp/gates.lsp") |
---|
| 27 | (load "lisp/duong.lsp") |
---|
| 28 | (load "lisp/ant.lsp") |
---|
| 29 | (load "lisp/people.lsp") |
---|
| 30 | (load "lisp/weapons.lsp") |
---|
| 31 | (load "lisp/explo.lsp") |
---|
| 32 | (load "lisp/platform.lsp") |
---|
| 33 | (load "lisp/guns.lsp") |
---|
| 34 | (load "lisp/jugger.lsp") |
---|
| 35 | (load "lisp/flyer.lsp") |
---|
| 36 | (load "lisp/teleport.lsp") |
---|
| 37 | (load "lisp/general.lsp") |
---|
| 38 | (load "lisp/powerup.lsp") |
---|
| 39 | (load "lisp/doors.lsp") |
---|
| 40 | (load "lisp/light.lsp") |
---|
| 41 | (load "lisp/ladder.lsp") |
---|
| 42 | (load "lisp/switch.lsp") |
---|
| 43 | |
---|
| 44 | (setq interfere T) |
---|
| 45 | |
---|
| 46 | ;; This is fRaBs addon LISP. |
---|
| 47 | |
---|
| 48 | (load "addon/twist/f2chars.lsp") |
---|
| 49 | (load "addon/twist/f2ai.lsp") |
---|
| 50 | (load "addon/aliens/astartup.lsp") |
---|
| 51 | (load "addon/claudio/claudio.lsp") |
---|
| 52 | (load "addon/twist/lisp/dray.lsp") |
---|
| 53 | (load "addon/twist/lisp/mario.lsp") |
---|
| 54 | (load "addon/leon/4frabs.lsp") |
---|
| 55 | (load "addon/newart/newart.lsp") |
---|
| 56 | |
---|
| 57 | (setq bad_guy_list (list DARNEL ANT_ROOF TRACK_GUN SPRAY_GUN JUGGER ROB1 WHO ROCKET FLYER GREEN_FLYER BOSS_ANT DROID_JUGGER DROID DEATH_SKULL DEATH_UMBRELLA ANT_SHIP WALK_ROB T_REX FACE_HUGGER ALIEN_DRONE ALIEN_WARRIOR ANT ANT_JUMPER ANT_PRED ANT_GREATER2 WALK_ROB2 WALK_ROBHEAD)) |
---|
| 58 | (setq object_destroyable_list (list DARNEL ANT_ROOF TRACK_GUN SPRAY_GUN JUGGER ROB1 WHO ROCKET FLYER GREEN_FLYER BOSS_ANT DROID_JUGGER DROID DEATH_SKULL DEATH_UMBRELLA ANT_SHIP WALK_ROB T_REX FACE_HUGGER ALIEN_DRONE ALIEN_WARRIOR ANT ANT_JUMPER ANT_PRED ANT_GREATER2 WALK_ROB2 WALK_ROBHEAD)) |
---|
| 59 | |
---|
| 60 | (gc) ;; garbage collection perm space |
---|
| 61 | (tmp-space) ;; execute game code in tmp space which is not GC'ed |
---|
| 62 | |
---|
[44] | 63 | (create_players DARNEL) |
---|