hedgewars/uScript.pas
changeset 6114 443cce9e060f
parent 6088 47d1b04003d1
child 6131 4e8816cf9459
equal deleted inserted replaced
6113:b3dfb796c3a5 6114:443cce9e060f
  1593 // not required if there is no script to run
  1593 // not required if there is no script to run
  1594 if not ScriptLoaded then
  1594 if not ScriptLoaded then
  1595     exit;
  1595     exit;
  1596 
  1596 
  1597 // push game variables so they may be modified by the script
  1597 // push game variables so they may be modified by the script
       
  1598 ScriptSetInteger('BorderColor', cExplosionBorderColor);
  1598 ScriptSetInteger('GameFlags', GameFlags);
  1599 ScriptSetInteger('GameFlags', GameFlags);
  1599 ScriptSetString('Seed', cSeed);
  1600 ScriptSetString('Seed', cSeed);
  1600 ScriptSetInteger('TemplateFilter', cTemplateFilter);
  1601 ScriptSetInteger('TemplateFilter', cTemplateFilter);
  1601 ScriptSetInteger('MapGen', cMapGen);
  1602 ScriptSetInteger('MapGen', cMapGen);
  1602 ScriptSetInteger('ScreenHeight', cScreenHeight);
  1603 ScriptSetInteger('ScreenHeight', cScreenHeight);