hedgewars/uScript.pas
changeset 6982 8d41d22a291d
parent 6924 57b66ee3bff3
child 7010 10a0a31804f3
equal deleted inserted replaced
6981:045e8162c9cd 6982:8d41d22a291d
  1711 // not required if there is no script to run
  1711 // not required if there is no script to run
  1712 if not ScriptLoaded then
  1712 if not ScriptLoaded then
  1713     exit;
  1713     exit;
  1714 
  1714 
  1715 // push game variables so they may be modified by the script
  1715 // push game variables so they may be modified by the script
  1716 ScriptSetInteger('BorderColor', cExplosionBorderColor);
  1716 ScriptSetInteger('BorderColor', ExplosionBorderColor);
  1717 ScriptSetInteger('GameFlags', GameFlags);
  1717 ScriptSetInteger('GameFlags', GameFlags);
  1718 ScriptSetString('Seed', cSeed);
  1718 ScriptSetString('Seed', cSeed);
  1719 ScriptSetInteger('TemplateFilter', cTemplateFilter);
  1719 ScriptSetInteger('TemplateFilter', cTemplateFilter);
  1720 ScriptSetInteger('MapGen', cMapGen);
  1720 ScriptSetInteger('MapGen', cMapGen);
  1721 ScriptSetInteger('ScreenHeight', cScreenHeight);
  1721 ScriptSetInteger('ScreenHeight', cScreenHeight);