hedgewars/uScript.pas
changeset 8063 06efc1ea6a40
parent 8043 da083f8d95e6
child 8073 5a289ef40fdb
equal deleted inserted replaced
8062:abbcdf73327a 8063:06efc1ea6a40
  1978 ScriptCall('onScreenResize');
  1978 ScriptCall('onScreenResize');
  1979 end;
  1979 end;
  1980 
  1980 
  1981 // custom script loader via physfs, passed to lua_load
  1981 // custom script loader via physfs, passed to lua_load
  1982 const BUFSIZE = 1024;
  1982 const BUFSIZE = 1024;
  1983 var physfsReaderBuffer: pointer; external;
  1983 var physfsReaderBuffer: pointer; cvar; external;
  1984 function physfsReader(L: Plua_State; f: PFSFile; sz: Psize_t) : PChar; cdecl; external;
  1984 function physfsReader(L: Plua_State; f: PFSFile; sz: Psize_t) : PChar; cdecl; external;
  1985 
  1985 
  1986 
  1986 
  1987 procedure ScriptLoad(name : shortstring);
  1987 procedure ScriptLoad(name : shortstring);
  1988 var ret : LongInt;
  1988 var ret : LongInt;