home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 2003 June / macformat-130.iso / mac / Reviewed⁄Demos / Spearhead Demo / demota / pak1.pk3 / global / weapon.scr < prev    next >
Encoding:
Text File  |  2002-10-21  |  5.2 KB  |  216 lines
  1. start local.name:
  2.  
  3.     // Check if local.name is an alias.
  4.     // Make sure these names are all lower case.
  5.     switch (local.name)
  6.     {
  7.     //********************************************
  8.     //*** ALLIED WEAPONS
  9.     //********************************************
  10.     case "high standard":
  11.         //*** added on 7-18-2001
  12.         //*** FIX ME - need to make a highstandard.tik
  13.         local.name = models/weapons/silencedpistol.tik
  14.         self defaultnonvislevel 0.75
  15.         self suppresschance 50
  16.         break
  17.  
  18.     case "colt 45":
  19.         local.name = models/weapons/colt45.tik
  20.         self defaultnonvislevel 0.75
  21.         self suppresschance 50
  22.         break
  23.  
  24.     case "m1 garand":
  25.         local.name = models/weapons/m1_garand.tik
  26.         self defaultnonvislevel 0.5
  27.         self suppresschance 75
  28.         break
  29.  
  30.     case "springfield '03 sniper":
  31.         local.name = models/weapons/springfield.tik
  32.         self defaultnonvislevel 0.5
  33.         self suppresschance 25
  34.         break
  35.  
  36.     case "thompson":
  37.         local.name = models/weapons/thompsonsmg.tik
  38.         self defaultnonvislevel 0.25
  39.         self suppresschance 100
  40.         break
  41.  
  42.     case "bar":
  43.         local.name = models/weapons/bar.tik
  44.         self defaultnonvislevel 0.25
  45.         self suppresschance 100
  46.         break
  47.  
  48.     case "bazooka":
  49.         //*** added on 7-18-2001
  50.         local.name = models/weapons/bazooka.tik
  51.         self defaultnonvislevel 0.5
  52.         self suppresschance 100
  53.         break
  54.  
  55.     case "shotgun":
  56.         //*** added on 7-18-2001
  57.         local.name = models/weapons/shotgun.tik
  58.         self defaultnonvislevel 0.75
  59.         self suppresschance 75
  60.         break
  61.  
  62.  
  63.     //********************************************
  64.     //*** GERMAN WEAPONS
  65.     //********************************************
  66.     case "walter p38":
  67.         local.name = models/weapons/p38.tik
  68.         self defaultnonvislevel 0.75
  69.         self suppresschance 50
  70.         break
  71.  
  72.     case "mauser kar 98k":
  73.         local.name = models/weapons/kar98.tik
  74.         self defaultnonvislevel 0.5
  75.         self suppresschance 75
  76.         break
  77.  
  78.     case "mauser kar 98d sniper":
  79.         //*** added on 7-18-2001
  80.         local.name = models/weapons/kar98sniper.tik
  81.         self defaultnonvislevel 0.5
  82.         self suppresschance 25
  83.         break
  84.  
  85.     case "mp40":
  86.         local.name = models/weapons/mp40.tik
  87.         self defaultnonvislevel 0.25
  88.         self suppresschance 100
  89.         break
  90.  
  91.     case "stg44":
  92.         //*** added on 7-18-2001
  93.         local.name = models/weapons/mp44.tik
  94.         self defaultnonvislevel 0.25
  95.         self suppresschance 100
  96.         break
  97.  
  98.     case "panzerschrek":
  99.         //*** added on 7-18-2001
  100.         //*** yes the .tik file is named incorrectly, but I didn't change it because
  101.         //*** code is probably relying on it somewhere with the current spelling
  102.         local.name = models/weapons/panzerschreck.tik
  103.         self defaultnonvislevel 0.5
  104.         self suppresschance 100
  105.         break
  106.  
  107.     case "mg42":
  108.         //*** added on 7-18-2001
  109.         local.name = models/weapons/mp40.tik
  110.         self defaultnonvislevel 0.1
  111.         self suppresschance 100
  112.         break
  113.  
  114.  
  115.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  116.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  117.     // weapons added for SPEARHEAD
  118.     //
  119.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  120.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  121.  
  122.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  123.     // British weapons
  124.     //
  125.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  126.  
  127.     case "enfield":
  128.         local.name = models/weapons/enfield.tik
  129.         self defaultnonvislevel 0.5
  130.         self suppresschance 70
  131.         break
  132.  
  133.     case "webley revolver":
  134.         local.name = models/weapons/webley_revolver.tik
  135.         self defaultnonvislevel 0.75
  136.         self suppresschance 50
  137.         break
  138.  
  139.     case "sten":
  140.         local.name = models/weapons/sten.tik
  141.         self defaultnonvislevel 0.25
  142.         self suppresschance 100
  143.         break
  144.  
  145.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  146.     // Russian weapons
  147.     //
  148.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  149.  
  150.     case "nagant rifle":
  151.         local.name = models/weapons/mosin_nagant_rifle.tik
  152.         self defaultnonvislevel 0.5
  153.         self suppresschance 75
  154.         break
  155.  
  156.     case "svt":
  157.         local.name = models/weapons/svt_rifle.tik
  158.         self defaultnonvislevel 0.5
  159.         self suppresschance 25
  160.         break
  161.  
  162.     case "nagant revolver":
  163.         local.name = models/weapons/nagant_revolver.tik
  164.         self defaultnonvislevel 0.75
  165.         self suppresschance 50
  166.         break
  167.  
  168.     case "ppsh":
  169.         local.name = models/weapons/ppsh_smg.tik
  170.         self defaultnonvislevel 0.25
  171.         self suppresschance 100
  172.         break
  173.  
  174.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  175.     // New German weapons
  176.     //
  177.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  178.  
  179.     case "g43":
  180.         local.name = models/weapons/g43.tik
  181.         self defaultnonvislevel 0.5
  182.         self suppresschance 25
  183.         break
  184.  
  185.     case "portable mg42":
  186.         local.name = models/weapons/mg42carryable.tik
  187.         self defaultnonvislevel 0.1
  188.         self suppresschance 100
  189.         break
  190.  
  191.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  192.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  193.     // </end> weapons added for SPEARHEAD
  194.     //
  195.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  196.     //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  197.  
  198.  
  199.     case "none":
  200.     case "":
  201.         local.name = ""
  202.         break
  203.  
  204.     default:
  205.         //*** modified on 7-18-2001
  206.         //*** the remmed out next line is the original line
  207.         //self weapon_internal models/weapons/kar98.tik
  208.         //*************************************************
  209.         local.name = ""
  210.         println "^~^~^ weapon '" local.name "' is not handled in weapon.scr... setting to none!!"
  211.         break
  212.     }
  213.     self weapon_internal local.name
  214. end
  215.  
  216.