3591 var inQuote: boolean;

  3591 var inQuote: boolean;

  3592 var locSum: LongWord;

  3592 var locSum: LongWord;

  3593 var braceCount: LongWord;

  3593 var braceCount: LongWord;

  3594 var wordCount: LongWord;

  3594 var wordCount: LongWord;

  3595 var lastChar: char;

  3595 var lastChar: char;

  3597 function  ScriptReader(L: Plua_State; f: PFSFile; sz: Psize_t) : PChar; Cdecl;

  3596 function  ScriptReader(L: Plua_State; f: PFSFile; sz: Psize_t) : PChar; Cdecl;

  3598 var mybuf: PChar;

  3597 var mybuf: PChar;

  3599     i: LongInt;

  3598     i: LongInt;

  3600 begin

  3599 begin

  3601     SetRandomSeed(cSeed,true);

  3600     SetRandomSeed(cSeed,true);

  3656                         inComment := false

  3655                         inComment := false

  3657                 end;

  3656                 end;

  3658         end;

  3657         end;

  3659     ScriptLocaleReader:= mybuf

  3658     ScriptLocaleReader:= mybuf

  3660 end;

  3659 end;

  3662 

  3660 

  3663 function ScriptLoad(name : shortstring; mustExist : boolean): boolean;

  3661 function ScriptLoad(name : shortstring; mustExist : boolean): boolean;

  3664 var ret : LongInt;

  3662 var ret : LongInt;

  3665       s : shortstring;

  3663       s : shortstring;

  3666       f : PFSFile;

  3664       f : PFSFile;