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 67ANT 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) 75