hedgewars/uScript.pas
changeset 10230 361d36ec5181
parent 10210 1a6b9a98147c
child 10239 ed8bab6e92ba
equal deleted inserted replaced
10229:5d38aaff5564 10230:361d36ec5181
  2496     st : TSound;
  2496     st : TSound;
  2497     he : THogEffect;
  2497     he : THogEffect;
  2498     cg : TCapGroup;
  2498     cg : TCapGroup;
  2499 begin
  2499 begin
  2500 // initialize lua
  2500 // initialize lua
  2501 luaState:= lua_open;
  2501 luaState:= luaL_newstate();
  2502 TryDo(luaState <> nil, 'lua_open failed', true);
  2502 TryDo(luaState <> nil, 'luaL_newstate() failed', true);
  2503 
  2503 
  2504 // open internal libraries
  2504 // open internal libraries
  2505 luaopen_base(luaState);
  2505 luaL_openlibs(luaState);
  2506 luaopen_string(luaState);
       
  2507 luaopen_math(luaState);
       
  2508 luaopen_table(luaState);
       
  2509 
  2506 
  2510 // import some variables
  2507 // import some variables
  2511 ScriptSetString(_S'L', cLocale);
  2508 ScriptSetString(_S'L', cLocale);
  2512 
  2509 
  2513 // import game flags
  2510 // import game flags