hedgewars/uScript.pas
changeset 12360 a775a61e02ab
parent 12332 657a8d63c99d
child 12371 2b1dd699b371
equal deleted inserted replaced
12359:81ab841a0da5 12360:a775a61e02ab
  2539 var gear: PGear;
  2539 var gear: PGear;
  2540 begin
  2540 begin
  2541     if CheckLuaParamCount(L, 1, 'HideHog', 'gearUid') then
  2541     if CheckLuaParamCount(L, 1, 'HideHog', 'gearUid') then
  2542         begin
  2542         begin
  2543         gear:= GearByUID(Trunc(lua_tonumber(L, 1)));
  2543         gear:= GearByUID(Trunc(lua_tonumber(L, 1)));
  2544         HideHog(gear^.hedgehog)
  2544         if (gear <> nil) and (gear^.hedgehog <> nil) then
  2545         end;
  2545             begin
  2546     lc_hidehog := 0;
  2546             HideHog(gear^.hedgehog);
       
  2547             lua_pushboolean(L, true);
       
  2548             end
       
  2549         else
       
  2550             lua_pushboolean(L, false);
       
  2551         end;
       
  2552     lc_hidehog := 1;
  2547 end;
  2553 end;
  2548 
  2554 
  2549 function lc_restorehog(L: Plua_State): LongInt; Cdecl;
  2555 function lc_restorehog(L: Plua_State): LongInt; Cdecl;
  2550 var i, h: LongInt;
  2556 var i, h: LongInt;
  2551     uid: LongWord;
  2557     uid: LongWord;