| 1 |
|
|---|
| 2 |
|
|---|
| 3 | ;;;; load up the normal abuse startup file
|
|---|
| 4 |
|
|---|
| 5 | ;; Copyright 1995 Crack dot Com, All Rights reserved
|
|---|
| 6 | ;; See licensing information for more details on usage rights
|
|---|
| 7 |
|
|---|
| 8 |
|
|---|
| 9 | (perm-space)
|
|---|
| 10 |
|
|---|
| 11 | (setq load_warn nil)
|
|---|
| 12 | (setq section 'game_section)
|
|---|
| 13 | (if (not (load "lisp/english.lsp")) ;; load language specific stuff
|
|---|
| 14 | (progn
|
|---|
| 15 | (print "Please make sure you unzipped the game with the -d option")
|
|---|
| 16 | (print "so that all directories get created properly.")
|
|---|
| 17 | (print "example : pkunzip -d abusXXXX.zip")
|
|---|
| 18 | (quit)))
|
|---|
| 19 | (setq load_warn T)
|
|---|
| 20 |
|
|---|
| 21 |
|
|---|
| 22 | (load "lisp/common.lsp")
|
|---|
| 23 | (load "lisp/userfuns.lsp")
|
|---|
| 24 | (load "lisp/options.lsp")
|
|---|
| 25 | (load "lisp/startup.lsp")
|
|---|
| 26 | (if (not (local_load "lisp/input.lsp")) ; get local copy first
|
|---|
| 27 | (load "lisp/input.lsp"))
|
|---|
| 28 |
|
|---|
| 29 | (load "lisp/sfx.lsp")
|
|---|
| 30 | (load "lisp/gates.lsp")
|
|---|
| 31 | (load "lisp/duong.lsp")
|
|---|
| 32 | (load "lisp/ant.lsp")
|
|---|
| 33 | (load "lisp/people.lsp")
|
|---|
| 34 | (load "lisp/weapons.lsp")
|
|---|
| 35 | (load "lisp/explo.lsp")
|
|---|
| 36 | (load "lisp/platform.lsp")
|
|---|
| 37 | (load "lisp/guns.lsp")
|
|---|
| 38 | (load "lisp/jugger.lsp")
|
|---|
| 39 | (load "lisp/flyer.lsp")
|
|---|
| 40 | (load "lisp/teleport.lsp")
|
|---|
| 41 | (load "lisp/general.lsp")
|
|---|
| 42 | (load "lisp/powerup.lsp")
|
|---|
| 43 | (load "lisp/doors.lsp")
|
|---|
| 44 | (load "lisp/light.lsp")
|
|---|
| 45 | (load "lisp/ladder.lsp")
|
|---|
| 46 | (load "lisp/switch.lsp")
|
|---|
| 47 |
|
|---|
| 48 |
|
|---|
| 49 |
|
|---|
| 50 |
|
|---|
| 51 | ;;;; load up additional files
|
|---|
| 52 | (load "addon/leon/lisp/njug.lsp")
|
|---|
| 53 | (load "addon/leon/lisp/deco.lsp")
|
|---|
| 54 | (load "addon/leon/lisp/text.lsp")
|
|---|
| 55 | (load "addon/leon/lisp/nextlev3.lsp")
|
|---|
| 56 | (load "addon/leon/lisp/lnant.lsp")
|
|---|
| 57 | (load "addon/leon/lisp/lmisc.lsp")
|
|---|
| 58 | (load "addon/leon/lisp/grenade.lsp")
|
|---|
| 59 | (load "addon/leon/lisp/nguns.lsp")
|
|---|
| 60 | (load "addon/leon/lisp/rain.lsp")
|
|---|
| 61 | (load_tiles "addon/leon/lnewft.spe")
|
|---|
| 62 | (load_tiles "addon/leon/lnewft2.spe")
|
|---|
| 63 | (set_first_level "addon/leon/level00.spe")
|
|---|
| 64 |
|
|---|
| 65 |
|
|---|
| 66 | (setq bad_guy_list (list DARNEL ANT_ROOF TRACK_GUN SPRAY_GUN JUGGER ROB1 WHO ROCKET FLYER GREEN_FLYER BOSS_ANT
|
|---|
| 67 | ANT ANT_JUMPER ANT_PRED ANT_GREATER2 NJUGGER))
|
|---|
| 68 |
|
|---|
| 69 |
|
|---|
| 70 |
|
|---|
| 71 | (gc) ;; garbage collection perm space
|
|---|
| 72 | (tmp-space) ;; execute game code in tmp space which is not GC'ed
|
|---|
| 73 |
|
|---|
| 74 | (create_players DARNEL)
|
|---|
