| 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 "Abuse data files not found. Maybe try the `-datadir' option?") |
|---|
| 12 | (quit))) |
|---|
| 13 | (setq load_warn T) |
|---|
| 14 | |
|---|
| 15 | (load "lisp/common.lsp") |
|---|
| 16 | (load "lisp/userfuns.lsp") |
|---|
| 17 | (load "lisp/options.lsp") |
|---|
| 18 | (load "lisp/startup.lsp") |
|---|
| 19 | (load "lisp/input.lsp") |
|---|
| 20 | |
|---|
| 21 | (load "lisp/sfx.lsp") |
|---|
| 22 | (load "lisp/gates.lsp") |
|---|
| 23 | (load "lisp/duong.lsp") |
|---|
| 24 | (load "lisp/ant.lsp") |
|---|
| 25 | (load "lisp/people.lsp") |
|---|
| 26 | (load "lisp/weapons.lsp") |
|---|
| 27 | (load "lisp/explo.lsp") |
|---|
| 28 | (load "lisp/platform.lsp") |
|---|
| 29 | (load "lisp/guns.lsp") |
|---|
| 30 | (load "lisp/jugger.lsp") |
|---|
| 31 | (load "lisp/flyer.lsp") |
|---|
| 32 | (load "lisp/teleport.lsp") |
|---|
| 33 | (load "lisp/general.lsp") |
|---|
| 34 | (load "lisp/powerup.lsp") |
|---|
| 35 | (load "lisp/doors.lsp") |
|---|
| 36 | (load "lisp/light.lsp") |
|---|
| 37 | (load "lisp/ladder.lsp") |
|---|
| 38 | (load "lisp/switch.lsp") |
|---|
| 39 | |
|---|
| 40 | ;; From the fRaBs addons. This is required in case we load a save file |
|---|
| 41 | ;; from a fRaBs install, it will miss graphic tiles. |
|---|
| 42 | (load "addon/twist/f2chars.lsp") |
|---|
| 43 | (load "addon/twist/f2ai.lsp") |
|---|
| 44 | (load "addon/aliens/astartup.lsp") |
|---|
| 45 | (load "addon/claudio/claudio.lsp") |
|---|
| 46 | (load "addon/twist/lisp/dray.lsp") |
|---|
| 47 | (load "addon/twist/lisp/mario.lsp") |
|---|
| 48 | (load "addon/leon/4frabs.lsp") |
|---|
| 49 | (load "addon/newart/newart.lsp") |
|---|
| 50 | |
|---|
| 51 | (setq bad_guy_list |
|---|
| 52 | (list DARNEL ANT_ROOF TRACK_GUN SPRAY_GUN JUGGER ROB1 WHO ROCKET FLYER |
|---|
| 53 | GREEN_FLYER BOSS_ANT DROID_JUGGER DROID DEATH_SKULL DEATH_UMBRELLA |
|---|
| 54 | ANT_SHIP WALK_ROB T_REX FACE_HUGGER ALIEN_DRONE ALIEN_WARRIOR ANT |
|---|
| 55 | ANT_JUMPER ANT_PRED ANT_GREATER2 WALK_ROB2 WALK_ROBHEAD)) |
|---|
| 56 | (setq object_destroyable_list |
|---|
| 57 | (list DARNEL ANT_ROOF TRACK_GUN SPRAY_GUN JUGGER ROB1 WHO ROCKET FLYER |
|---|
| 58 | GREEN_FLYER BOSS_ANT DROID_JUGGER DROID DEATH_SKULL DEATH_UMBRELLA |
|---|
| 59 | ANT_SHIP WALK_ROB T_REX FACE_HUGGER ALIEN_DRONE ALIEN_WARRIOR ANT |
|---|
| 60 | ANT_JUMPER ANT_PRED ANT_GREATER2 WALK_ROB2 WALK_ROBHEAD)) |
|---|
| 61 | |
|---|
| 62 | (gc) ;; garbage collection perm space |
|---|
| 63 | (tmp-space) ;; execute game code in tmp space which is not GC'ed |
|---|
| 64 | |
|---|
| 65 | (create_players DARNEL) |
|---|
| 66 | |
|---|
