hedgewars/uScript.pas
changeset 3034 b576460ba8ad
parent 3004 e9b3613cc3fb
child 3038 4e48c276a468
equal deleted inserted replaced
3033:2a8f385ab466 3034:b576460ba8ad
   527 end;
   527 end;
   528 
   528 
   529 procedure ScriptOnGameInit;
   529 procedure ScriptOnGameInit;
   530 var s, t : ansistring;
   530 var s, t : ansistring;
   531 begin
   531 begin
   532 // not required if there's no script to run
   532 // not required if there is no script to run
   533 if not ScriptLoaded then
   533 if not ScriptLoaded then
   534     exit;
   534     exit;
   535 
   535 
   536 // push game variables so they may be modified by the script
   536 // push game variables so they may be modified by the script
   537 ScriptSetInteger('GameFlags', GameFlags);
   537 ScriptSetInteger('GameFlags', GameFlags);