717     am : TAmmoType;

   717     am : TAmmoType;

   718     st : TSound;

   718     st : TSound;

   719 begin

   719 begin

   720 // initialize lua

   720 // initialize lua

   721 luaState:= lua_open;

   721 luaState:= lua_open;

   722 

   723 

   723 // open internal libraries

   724 // open internal libraries

   724 luaopen_base(luaState);

   725 luaopen_base(luaState);

   725 luaopen_string(luaState);

   726 luaopen_string(luaState);

   726 luaopen_math(luaState);

   727 luaopen_math(luaState);