home *** CD-ROM | disk | FTP | other *** search
/ תקליטור אוסף מעל 200 משחקים מרתקים / over-200-games-micro-a-media.iso / ABUSE / LISP / ENGLISH.LSP < prev    next >
Encoding:
Lisp/Scheme  |  1995-09-13  |  3.3 KB  |  71 lines
  1. ;; Copyright 1995 Crack dot Com,  All Rights reserved
  2. ;; See licensing information for more details on usage rights
  3.  
  4. ;; all messages that need translation here
  5.  
  6. (setq gamma_msg "Click on the darkest color visible \n on your monitor for each spectrum")
  7. (setq telep_msg "Press down to teleport")
  8.  
  9. (defun get_train_msg (message_num)
  10.   (select message_num      
  11.       (0 "Aim gun with mouse, fire with left mouse button")
  12.       (1 "Collect ammo to increase firing speed")
  13.       (2 "Press the down arrow to activate objects, this is a switch")
  14.       (3 "This console saves the state of the game, press down")
  15.       (4 "Press down to activate platform")
  16.       (5 "Hold down the right mouse button to use special powers")
  17.       (6 "Click with the RIGHT mouse button to select weapons")
  18.       (7 "Press the up arrow to climb ladders")
  19.       (8 "Press the down arrow to start!")
  20.       (9 "Shoot hidden walls to destroy them")
  21.       (10 "Shoot switch ball to activate")
  22.       ))
  23.      
  24. (setq to_be_continued "To be continued.....")
  25.  
  26. (setq load_warn nil)
  27. (if (not (load "register/english.lsp"))
  28.     (setq end_msg 
  29.       (concatenate 'string "Thank you for playing Abuse.\n\n"
  30.                "* To use Abuse's builtin level editor, type :\n"
  31.                "  'abuse -edit' when you start the game.  It is highly recommended\n"
  32.                "  that you print out the key listing from abuse.doc and learn them.\n\n"
  33.                "* Read gamedev.txt for information on how you can make money with the\n"
  34.                "  levels you design.\n\n"
  35.                "* Edit lisp/options.lsp to configure a few options for abuse\n\n"
  36.                "* Buy commercial abuse and mow down aliens with the Plasma rifle,\n"
  37.                "  build up an army of Death frizbees for senseless destruction,\n"
  38.                "  or wave your Light saber around and watch the body parts fly\n\n"
  39.                "* Get 14 more levels with new artwork, new sounds, and new characters.\n"
  40.                "  call 1-800-810-0022.  Check or credit card accepted.  The order\n"
  41.                "  hotline is open 24hrs/day 7 days a week.\n\n")))
  42. (setq load_warn T)
  43.  
  44. (setq plot_start
  45.       (concatenate 'string 
  46.            "  The Ants were fearless, efficient killers.  The Unified Underground's "
  47.            "only opening was that the Ant defense systems were designed by engineers "
  48.            "too arrogant to consider the threat of an individual.  It was enough to "
  49.            "justify the covert Abuse Missions.\\n"
  50.            "  On August 31, 2021, eight bytes were zeroed in a computer, and Nick "
  51.            "Vrenna's identity was erased.  A suit of armor cradling a smoking auto "
  52.            "rifle stood in shadows appreciating the stench coming from the first "
  53.            "retired Ant of the day.  The armored soul feared the effort would end up "
  54.            "as pathetic as the Terran Surrender Terms, but humanity had nothing "
  55.            "else. "))
  56.  
  57. (setq plot_middle
  58.       (concatenate 'string 
  59.            "Against all hope, the first leg of the Abuse Missions was a success, "
  60.            "thought the armor while being wrenched through the site-teleporter to "
  61.            "god knows where.  But the congratulations were empty.  This much was "
  62.            "clearly a front.  The real action lay ahead.. "))
  63.  
  64.  
  65. (setq plot_end
  66.       (concatenate 'string 
  67.            "The armor went into it knowing what came next.  Even as the solid "
  68.            "coolant module was removed, the messy reaction started its jagged "
  69.            "growth.  Nick died when his identity record was zeroed out.  It wasn't "
  70.            "bad a second time.  The peace was welcome. "))
  71.